oiReturnStatus | output | integer | Return status of the method. |
<M-4 run CheckValidationExceptionList (input no (ilValidateInputData), output vlDoValidate (olDoValidation)) in database> if vlDoValidate then do: /* Copy tables from t_o<table> to t_s<table> */ <I-1 {bFcRun &PARAMETERS = "output viFcReturnSuper" &PROCEDURE = "gipr_GetTables"}> if viFcReturnSuper <> 0 then assign oiReturnStatus = viFcReturnSuper. if oiReturnStatus >= 0 then do: <M-2 run ValidateComponent (output viFcReturnSuper (oiReturnStatus)) in database> if viFcReturnSuper <> 0 then assign oiReturnStatus = viFcReturnSuper. end. if oiReturnStatus >= 0 then do: /* And copy changes to t_s<table> back to t_o<table> */ <I-3 {bFcRun &PARAMETERS = "output viFcReturnSuper" &PROCEDURE = "gipr_SetTables"}> if viFcReturnSuper <> 0 then assign oiReturnStatus = viFcReturnSuper. end. assign vlFcDataValidated = (oiReturnStatus >= 0). end. else vlFcDataValidated = yes.