Purchase category
1. PO invoice and product receipt
Changes have been done in the forms clicked ok methods of post and close ok
Blow is code for product receipt
// po category start
VendPackingSlipJour vendPackingSlipJour;
Vik_PurchaseOrderCategory poCategory;
int daydiff,prodreceiptcount;
PurchTable purchTableLocal;
if(curext() == 'SDS')
{
if( classidget(purchFormLetter) == classnum(PurchFormLetter_PackingSlip)) //&& (purchTable.Vik_PurchaseCategory != Vik_PurchaseCategory::None))
{
select purchTableLocal where purchTableLocal.PurchId == purchFormLetter.purchTable().PurchId;
select poCategory where poCategory.Vik_PurchaseCategory == purchTableLocal.Vik_PurchaseCategory;
select count(RecId) from vendPackingSlipJour where vendPackingSlipJour.PurchId == purchTableLocal.PurchId;
prodreceiptcount = int642int(vendPackingSlipJour.RecId);
if(prodreceiptcount > poCategory.DeliveryTimes)
throw error(strFmt(" The Product receipt for Purchase Order %1 has exceeded for the category %2",purchTableLocal.PurchId,purchTableLocal.Vik_PurchaseCategory));
}
}
// po category end
Below is code for Invoice
void clicked()
{
// po category start
Vik_PurchaseOrderCategory poCategory;
int daydiff,prodreceiptcount;
PurchTable purchTableLocal;
if(curext() == 'SDS')
{
select purchTableLocal where purchTableLocal.PurchId == purchFormLetter.purchTable().PurchId;
if( classidget(purchFormLetter) == classnum(PurchFormLetter_Invoice) && (purchTable.Vik_PurchaseCategory != Vik_PurchaseCategory::None))
{
select poCategory where poCategory.Vik_PurchaseCategory == purchTableLocal.Vik_PurchaseCategory;
// daydiff = purchTableLocal.createdDateTime - DateTimeUtil::getSystemDateTime();
daydiff = DateTimeutil::getDifference(DateTimeUtil::getSystemDateTime(), purchtablelocal.createddatetime) / 86400;
if(daydiff > poCategory.ExpireDays)
throw error(strFmt(" The Purchase Order %1 has exceeded the expire days for the category %2",purchTableLocal.PurchId,purchTableLocal.Vik_PurchaseCategory));
}
}
// po category end
// <GEERU>
if (SysCountryRegionCode::isLegalEntityInCountryRegion([ #isoRU ]) && ! purchFormLetter.checkBeforePost())
{
return;
}
// </GEERU>
super();
}
No comments:
Post a Comment