method ConfirmReported

Description

confirm all loggings as reported

Parameters

oiReturnStatus

output

integer

Return status of the method.

Internal usage

unused

program code (program1/bcorrlog.p)

<M-5 run DataLoad (input  '' (icRowids), 
                   input  '' (icPkeys), 
                   input  '' (icObjectIds), 
                   input  'for each CorrLog where CorrLog.CorrLogIsReported = false':U (icFreeform), 
                   input  no (ilKeepPrevious), 
                   output oiReturnStatus (oiReturnStatus)) in BCorrLog>
if oiReturnStatus <> 0
then return.

for each tCorrLog:
    assign tCorrLog.CorrLogIsReported = yes
           tCorrLog.tc_Status         = "C":U.
end.

assign vlFcDataValidated = true.
<M-4 run DataSave (output oiReturnStatus (oiReturnStatus)) in BCorrLog>