Bir Query Örneği

Merhaba

Emre arkadaşımın göndermiş olduğu örnek joblar içinden query ile alakalı olan bir tanesi paylaşmak istedim.

static void query2(Args _args)
{
    CustTable   cust;

    Query                   q = new Query();
    QueryRun                qr;
    QueryBuildDataSource    qbdsCustTable;
    QueryBuildRange         qbrCurrency;
    CurrencyCode            currency;
    ;
    currency = “USD”;
    warning(“select ile”);
    while select cust
        where cust.Currency == currency
    {
        info(strFmt(“%1″, cust.Name));
    }

    //————————————–
    warning(“Query ile”);

    qbdsCustTable = q.addDataSource(tableNum(CustTable));
    qbrCurrency = qbdsCustTable.addRange(fieldNum(CustTable, Currency));
    qbrCurrency.value(sysQuery::value(currency));

    qr = new QueryRun(q);
    if(qr.prompt())
    {
        while(qr.next())
        {
            cust = qr.get(tableNum(CustTable));
            info(strFmt(“%1″, cust.Name));
        }
    }
}

 
Comment are closed.