project QadFinancials > class BDInvoice > method CalcDInvoiceNumberForSales1
query calculated fields procedure
Description
Assign a value to query calculated field tqDInvoiceByDebtor.tcDInvoiceNumberForSales (available in preprocessor {&tcDInvoiceNumberForSales})
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 {&tiDInvoicePostingYear} <> ? or {&tcJournalCode} <> ? or {&tiDInvoiceVoucher} <> ? then
assign {&tcDInvoiceNumberForSales} = string({&tiDInvoicePostingYear}) + "/":U + {&tcJournalCode} + "/":U + string({&tiDInvoiceVoucher},"999999999":U).
else
assign {&tcDInvoiceNumberForSales} = NOW.