[ExtensionOf(classStr(CustVendVoucher))]
final class DaxCustVendVoucher_Extension
public void post(LedgerVoucher ledgerPostingJournal,
CustVendTrans custVendTrans,
NoYes approval,
UnknownNoYes euroTriangulation,
boolean withHoldTaxType,
boolean useSubLedger)
{
LedgerJournalTrans ledgerJournalTransLocal;
VendTrans vendTransUpdate;
CustTrans custTrans;
Common commonLocal = common;
next post(_ledgerPostingJournal, custVendTrans, approval, euroTriangulation, withHoldTaxType, useSubLedger);
if (commonLocal.TableId == tableNum(LedgerJournalTrans))
{
ledgerJournalTransLocal = commonLocal;
if (custVendTrans.tableid == tableNum(CustTrans))
{
ttsbegin;
select firstonly1 custTrans
where custTrans.RecId == _custVendTrans.RecId;
custTrans.selectForUpdate(true);
custTrans.PaymentDate = ledgerJournalTransLocal.PaymentDate;
custTrans.doUpdate();
ttscommit;
}
}
}
No comments:
Post a Comment