method Calculate

Description

Add code here to initialize the calculated fields of the class temp-tables after loading existing records from the application database.

Parameters

oiReturnStatus

output

integer

Internal usage

unused

program code (program/bcdocumentstatus.p)

<ANCESTOR-CODE>

for each tCDocumentStatus:
    <Q-9 assign vlFcQueryRecordsAvailable = CDocumentByTypeStatus (NoCache)
          (input viCompanyId, (CompanyId)
           input tCDocumentStatus.CDocumentStatusDocType, (CDocumentType)
           input tCDocumentStatus.CDocumentStatusStatus, (CDocumentStatus)
           input tCDocumentStatus.BankGL_ID, (GLID)) in BCDocument >

    assign tCDocumentStatus.tlCDocumentStatusIsReferenced = vlFcQueryRecordsAvailable <> false.
end.