保存上一次Query中的查询条件

来源:互联网 发布:淘宝无线手焦4 编辑:程序博客网 时间:2024/06/08 11:42

在Classes中添加方法

 

public container pack()
{
    return [#CurrentVersion,queryRun.pack()];
}

 

public boolean unpack(container _packedClass)
{
    Version     version = RunBase::getVersion(_packedClass);
    container   packedQuery;

    switch (version)
    {
        case #CurrentVersion:
            [version, packedQuery] = _packedClass;
            if (packedQuery)
            {
                queryRun = new QueryRun(packedQuery);
            }
            break;

        default:
            return false;
    }
    return true;
}

class xxxxxxx extends runbase
{
    QueryRun queryRun;
    str 20 id;
    DialogField settleDateField;
    TransDate settleDate;

    #DEFINE.CurrentVersion(4)
//    #LOCALMACRO.CurrentList
//    #ENDMACRO
}

public QueryRun queryRun()
{
    QueryRun ret;

    ret = new QueryRun(queryStr(xxxxxxxxxxx));

    return ret;
}

public boolean showQueryValues()
{
    return true;
}

原创粉丝点击