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/bprojectstatus.p)

<ANCESTOR-CODE>

for each tProjectStatus:
    <Q-1 assign vlFcQueryRecordsAvailable = ProjectByProjectStatus (Cache)
          (input ?, (CompanyId)
           input tProjectStatus.ProjectStatus_ID, (ProjectStatusId)
           input ?, (ProjectID)
           input ?, (ProjectCode)) in BProject >

    assign tProjectStatus.tlIsUsed = (vlFcQueryRecordsAvailable <> false).
end.