project QadFinancials > class BDInvoice > method ApiStdMaintainTTWithIntPostDates
Description
This method is a submethod of ApiStdMaintainTTWitIntPostDates.
This method calculates the due date and the discount due date of the debtor invoice.
Parameters
oiReturnStatus | output | integer | Return status of the method. |
Internal usage
QadFinancials
program code (program9/bdinvoice.p)
/* =================== */
/* Dalculate due dates */
/* =================== */
if tDIOpenBalance.tcNormalPaymentConditionCode <> "":U and tDIOpenBalance.tcNormalPaymentConditionCode <> ?
then do:
<I-6 {bFcStartAndOpenInstance
&ADD-TO-TRANSACTION = "false"
&CLASS = "BPaymentCondition"}>
<M-5 run CalculateDueDiscountDate
(input ? (iiPaymentConditionID),
input tDIOpenBalance.tcNormalPaymentConditionCode (icPaymentConditionCode),
input tDIOpenBalance.ttInvoiceDate (itInvoiceDate),
output tDIOpenBalance.ttInvoiceDueDate (otDueDate),
output tDIOpenBalance.ttInvoiceDiscountDueDate (otDiscountDate),
output viFcReturnSuper (oiReturnStatus)) in BPaymentCondition>
if viFcReturnSuper < 0 or (viFcReturnSuper > 0 and oiReturnStatus = 0)
then assign oiReturnStatus = viFcReturnSuper.
<I-7 {bFcCloseAndStopInstance
&CLASS = "BPaymentCondition"}>
if oiReturnStatus < 0 then return.
end. /* if tDIOpenBalance.tcNormalPaymentConditionCode <> "":U and */