Parameters
iiEntryNumber | input | integer | |
oiReturnStatus | output | integer | Return status of the method. |
Internal usage
QadFinancials
program code (program1/bdebtorreport.p)
if vcDRCompanyFilter = ?
then assign viDRCurrentCompany_ID = viCompanyId.
else do:
find first tqCompanyByDomainActive where
tqCompanyByDomainActive.tcCompanyCode = entry(iiEntryNumber, vcDRCompanyFilter)
no-error.
assign viDRCurrentCompany_ID = if available tqCompanyByDomainActive
then tqCompanyByDomainActive.tiCompany_ID
else viCompanyId.
end.