project BLF > class BXmlDaemonQueue > 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/bxmldaemonqueue.p)

<ANCESTOR-CODE>

    /* =================================================================================== */
    /* Backwards compatibility issue: new fields have been added as mandatory              */
    /* But we can still have callers that do not pass any value for these field. This is   */
    /* solved by making sure that when the value is unknown, we set it here to its default */ 
    /* =================================================================================== */
    for each t_sXmlDaemonQueue where 
             (t_sXmlDaemonQueue.tc_Status = "C":U or 
              t_sXmlDaemonQueue.tc_Status = "N":U) and 
             (t_sXmlDaemonQueue.XmlDaemonQueueAct = "":U or 
              t_sXmlDaemonQueue.XmlDaemonQueueAct = ?) :
        assign t_sXmlDaemonQueue.XmlDaemonQueueAct = "Create":U.
    end. /* t_sXmlDaemonQueue */