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.