project QadFinancials > class BConsolid > method ValidateComponent

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


oiReturnStatusoutputinteger


Internal usage


unused


program code (program/bconsolid.p)

/* Stop External Instances */
<M-72 run StopExternalInstances
   (output viFcReturnSuper (oiReturnStatus)) in BConsolid>
if viFcReturnSuper <> 0
then assign oiReturnStatus = viFcReturnSuper.
if viFcReturnSuper < 0
then return.


/* Validations before ancestor code */
<M-73 run ValidateComponentPre  (output viFcReturnSuper (oiReturnStatus)) in BConsolid>
if viFcReturnSuper <> 0
then assign viLocalReturnStatus = viFcReturnSuper.

<ANCESTOR-CODE>

if oiReturnStatus <> 0 and viLocalReturnStatus >= 0
then assign viLocalReturnStatus = oiReturnStatus.

<M-74 run ValidateComponentPost  (output viFcReturnSuper (oiReturnStatus)) in BConsolid>
if viFcReturnSuper <> 0 and viLocalReturnStatus >= 0
then assign viLocalReturnStatus = viFcReturnSuper.

assign oiReturnStatus = viLocalReturnStatus.