project QadFinancials > class BDInvoice > method CalcOverdueDaysForSales1
query calculated fields procedure
Description
Assign a value to query calculated field tqDInvoiceByDebtor.tiOverdueDaysForSales (available in preprocessor {&tiOverdueDaysForSales})
Parameters
iiCompanyId | input | integer | Company id |
iiDebtorID | input | integer | |
itInvoicStartDate | input | date | |
itInvoiceEndDate | input | date | |
ilDInvoiceIsOpen | input | logical | |
icCompanyListID | input | character | |
icInvoiceType | input | character | |
icCurrencyCode | input | character | |
oiReturnStatus | output | integer | Return status of the method. |
Internal usage
QadFinancials
program code (program1/bdinvoice.p)
if {&tiOverdueDaysForSales} <> ?
then do:
if today >= {&ttDInvoiceDueDate} then
assign {&tiOverdueDaysForSales} = today - {&ttDInvoiceDueDate}.
else assign {&tiOverdueDaysForSales} = 0.
end.