Description
Write here all tests on database update (new / modify / delete) that cannot be coded with a validation mask.
The type of update can be found in tc_status (N/C/D).
If you find incorrect data, you must write an entry in tFcMessages (using SetMessage) and set the return status of this method to either +1 or -1.
Return status +1 = data will still be accepted.
Return status -1 = data will not be accepted.
This method is run from SetPublicTables, before transferring the received data into the class temp-tables.
Parameters
| oiReturnStatus | output | integer | |
Internal usage
unused
program code (program/bcoamaskcc.p)
assign oiReturnStatus = -98
viLocalReturnStatus = 0.
/* ================================================================ */
/* Do the validations that need to be done before the ancestor code */
/* ================================================================ */
<M-28 run ValidateComponentPre (output viFcReturnSuper (oiReturnStatus)) in BCOAMaskCC>
if viFcReturnSuper < 0 or (viFcReturnSuper > 0 and viLocalReturnStatus = 0)
then assign viLocalReturnStatus = viFcReturnSuper.
assign oiReturnStatus = 0.
<ANCESTOR-CODE>
if oiReturnStatus < 0 or (oiReturnStatus > 0 and viLocalReturnStatus = 0)
then assign viLocalReturnStatus = oiReturnStatus.
assign oiReturnStatus = -98.
/* =============================================================== */
/* Do the validations that need to be done after the ancestor code */
/* =============================================================== */
<M-30 run ValidateComponentPost (output viFcReturnSuper (oiReturnStatus)) in BCOAMaskCC>
if viFcReturnSuper < 0 or (viFcReturnSuper > 0 and viLocalReturnStatus = 0)
then assign viLocalReturnStatus = viFcReturnSuper.
assign oiReturnStatus = viLocalReturnStatus.