Query & Dialog Örnekleri 4

Merhaba

static void query4(Args _args)
{
    CustTable   cust;

    Query                   q = new Query();
    QueryRun                qr;
    QueryBuildDataSource    qbdsCustTable;
    QueryBuildRange         qbrCurrency;
    CurrencyCode            currency;
    dialog                  d = new Dialog(“Müşteriler”);
    dialogField             dfCurrency;
    ;
    dfCurrency = d.addField(typeId(CurrencyCode));
    if(d.run())
    {


        currency = dfCurrency.value();

        qbdsCustTable = q.addDataSource(tableNum(CustTable));
        qbrCurrency = qbdsCustTable.addRange(fieldNum(CustTable, Currency));

        if(currency)
            qbrCurrency.value(sysQuery::value(currency));

        qr = new QueryRun(q);

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

    }
}

 
Comment are closed.