project QadFinancials > class BAPMatchingReport > method CalcAllCInvoiceForMatchingVariance
query calculated fields procedure
Description
Calculate the field MatchingType for the query CInvoiceForMatchingVariance.
Parameters
icFromCreditorCode | input | character | |
icToCreditorCode | input | character | |
icCompanyCode | input | character | |
icFromLogisticCharge | input | character | |
iiCompanyId | input | integer | |
icFromPurchaseOrder | input | character | |
icToPurchaseOrder | input | character | |
icFromItem | input | character | |
icToItem | input | character | |
itFromInvoiceDate | input | date | |
itToInvoiceDate | input | date | |
icReceiptSite | input | character | |
icCurrencyCode | input | character | |
icToLogisticCharge | input | character | |
ilIsLgCharge | input | logical | |
itFromInvoicePostingDt | input | date | |
itToInvoicePostingDt | input | date | |
icOrderType | input | character | |
iiDomainId | input | integer | |
oiReturnStatus | output | integer | Return status of the method. |
Internal usage
QadFinancials
program code (program1/bapmatchingreport.p)
assign vcFinancialMatching = {&INVOICEMATCHING-FINANCIAL-TR}
vcReceiverMatching = {&INVOICEMATCHING-RECEIVER-TR}.
create query vhQuery in widget-pool "non-persistent".
vhQuery:forward-only = yes.
vhQuery:set-buffers(ih_Buffer).
vhQuery:query-prepare("for each ":U + ih_Buffer:table).
vhQuery:query-open().
vhQuery:get-first().
do while not vhQuery:query-off-end:
assign {&tcMatchingType} = (if {&tlCInvoiceIsLogisticMatching} = false
then vcFinancialMatching
else if {&tlCInvoiceIsLogisticMatching} = true
then vcReceiverMatching
else "?":U).
vhQuery:get-next().
end.
vhQuery:query-close().
delete object vhQuery.