Merhaba
static void query5(Args _args)
{
CustTable cust;
Query q = new Query();
QueryRun qr;
QueryBuildDataSource qbdsCustTable;
QueryBuildRange qbrCurrency;
QueryBuildRange qbrRiskAmount;
CurrencyCode currency;
Amount riskAmount;
dialog d = new Dialog(“Müşteriler”);
dialogField dfCurrency;
dialogField dfRiskAmount;
;
//Dialog
dfCurrency = d.addField(typeId(CurrencyCode));
dfRiskAmount = d.addField(typeId(Amount), “Max risk tutarı :”);
if(d.run())
{
//getFromDialog
currency = dfCurrency.value();
riskAmount = dfRiskAmount.value();
//fetch
qbdsCustTable = q.addDataSource(tableNum(CustTable));
qbrCurrency = qbdsCustTable.addRange(fieldNum(CustTable, Currency));
qbrRiskAmount = qbdsCustTable.addRange(fieldNum(CustTable, RiskAmount));
if(currency)
qbrCurrency.value(sysQuery::value(currency));
qbrRiskAmount.value(sysQuery::range(0.01, riskAmount));
//super ben yazmam
qr = new QueryRun(q);
while(qr.next())
{
cust = qr.get(tableNum(CustTable));
info(strFmt(“%1 %2 %3 “,
cust.Name,
cust.Currency,
cust.RiskAmount));
}
}
}