25 Eylül 2007 Salı

findorcreate

server static InventBatch findOrCreate(InventBatchId _inventBatchId, ItemId _itemId, Real _agirlik = 0)
{
InventBatch inventBatch;
InventBatchId inventBatchId;
;
inventBatch = InventBatch::find(_inventBatchId,_itemId);

if (inventBatch) //inventbatch bulmussan kullaniya onu gonder
return inventBatch;
else
{
if(_inventBatchId) // InventBatchid bos degilse,aksi halde bos kayita izin verir
{
ttsBegin;

inventBatch.inventBatchId = _inventBatchId;
inventBatch.itemId = _itemId;
inventBatch.prodDate = systemdateget();
inventBatch.Agirlik = _agirlik;
inventBatch.insert();

ttsCommit;

return inventBatch;
}
else
return null;
}
}

13 Eylül 2007 Perşembe

Raporda nesne erişimi / Access to object in report

//nesnenin oto tanımlama özelliği aktive edilirse doğrudan ismini kullanarak erişilebilirsiniz.
//you can access to object with its name, if you activate autodecleration property.

//Oto tanımlama yapmadan bir nesnenin özellğini kullanmak için AOT yapısından faydalanılabilir.
//you can access to object Without Aoutodecleration property using AOT

this.design("ReportDesign1").sectionName('ReportHeader').controlName("DispField").delete();

this.design("ReportDesign1").sectionName('ReportHeader').controlName("DispField").hide();

11 Eylül 2007 Salı

Bir kayıt için rapor yazdırma / Call a report from a spesific record


//rapor belli bir kayıt için çağırmak istendiğinde yazılacak kod
//code block to call a report from a spesific record

//init içne yazılacak
//embed into init section

// teklif tablosunda bir kayıt için örnek
//example for a quotation record


{
smmQuotationTable callersmmQuotationTable;
QueryBuildDataSource qbds;

;

sysReportRun::getRunbaseReport(this).getLast();

if (element.args().caller())
{
if (! element.args().record().recId)
throw error(strFmt("@SYS22338",funcName()));

switch (element.args().dataset())
{
case tablenum(smmQuotationTable):
callersmmQuotationTable = element.args().record();
break;

default:
throw error(strFmt("@SYS23396",funcName()));
}
}

if (callersmmQuotationTable.QuotationId)
{
qbds = element.query().dataSourceTable(tablenum(smmQuotationTable));
SysQuery::findOrCreateRange(qbds, fieldnum(smmQuotationTable,QuotationId)).value(callersmmQuotationTable.QuotationId);
}

super();
}