lingdanglfw(DAX)

导航

< 2025年3月 >
23 24 25 26 27 28 1
2 3 4 5 6 7 8
9 10 11 12 13 14 15
16 17 18 19 20 21 22
23 24 25 26 27 28 29
30 31 1 2 3 4 5

统计

get record count of form datasource

modified class : SysQuery

 

public client server static Integer countTotal(QueryRun _queryRun,int num = 1)//add datasource num
{
    container c = SysQuery::countPrim(_queryRun.pack(false),num);

    return conpeek(c,1);
}

 

 

private server static container countPrim(container _queryPack,int num = 1)//add datasource num
{
    Query                   countQuery;
    QueryRun                countQueryRun;
    QueryBuildDataSource    qbds;
    QueryBuildFieldList     qbfl;
    Common                  common;
    Integer                 counter;
    Integer                 loops;
    ;
    countQueryRun   = new QueryRun(_queryPack);
    countQuery      = countQueryRun.query();
    qbds            = countQuery.dataSourceNo(num);//put datasource num
    qbds.update(false);
    qbds.sortClear();
    qbfl = qbds.fields();
    qbfl.dynamic(false);
    qbfl.clearFieldList();
    //if (countQuery.dataSourceCount() == 1)  //remark this
        qbds.addSelectionField(fieldnum(Common,RecId),SelectionField::Count);

    countQueryRun   = new QueryRun(countQuery);

    while (countQueryRun.next())
    {
        common  = countQueryRun.get(countQuery.dataSourceNo(num).table());//put datasource num
        counter += common.RecId;
        loops++;
    }

    return [counter,loops];
}

 

 

usage:

 

    Query query;
    QueryRun queryRun;
    ;
    query =new query();

    query.addDataSource(tablenum(CustTable)).addRange(fieldnum(CustTable,AccountNum)).value(queryRange('000001','000008'));


    queryRun = new QueryRun(query);
    info(strfmt('%1',SysQuery::countTotal(queryRun)));

 

 

 

 

 

posted on   lingdanglfw  阅读(297)  评论(0编辑  收藏  举报

编辑推荐:
· Linux系列:如何用 C#调用 C方法造成内存泄露
· AI与.NET技术实操系列(二):开始使用ML.NET
· 记一次.NET内存居高不下排查解决与启示
· 探究高空视频全景AR技术的实现原理
· 理解Rust引用及其生命周期标识(上)
阅读排行:
· DeepSeek 开源周回顾「GitHub 热点速览」
· 物流快递公司核心技术能力-地址解析分单基础技术分享
· .NET 10首个预览版发布:重大改进与新特性概览!
· AI与.NET技术实操系列(二):开始使用ML.NET
· 单线程的Redis速度为什么快?
点击右上角即可分享
微信分享提示