project QadFinancials > class BBudgetLinkCommitment > method AdditionalUpdates

Description

This empty method allows to do additional updates on class temp-tables after records were received (and validated) from outside, using method SetPublicTables.
You can start instances of other business classes to do those updates.


Parameters


oiReturnStatusoutputinteger


Internal usage


QadFinancials
method BBudgetLinkCommitment.ApiCreateBudgetLinkCommit
method BBudgetLinkCommitment.DeleteBudgetLinkCommitByBudgetID


program code (program1/bbudgetlinkcommitment.p)

/* ============================================================================================= */
    /* For every tBudgetLinkActual that is created, a BudgetLink record will be created or updated.  */
    /* ============================================================================================= */
    if can-find (first tBudgetLinkCommit where 
                       tBudgetLinkCommit.tc_Status = "N":U or 
                       tBudgetLinkCommit.tc_Status = "D":U)
    then do :
        <M-3 run AdditionalUpdatesCreateDelete (output viFcReturnSuper (oiReturnStatus)) in BBudgetLinkCommitment>
        if viFcReturnSuper <> 0 then assign oiReturnStatus = viFcReturnSuper.
        if oiReturnStatus < 0 
        then do :
            <M-5 run StopExternalInstances
               (output viFcReturnSuper (oiReturnStatus)) in BBudgetLinkCommitment>
            Return.
        end. /* if oiReturnStatus < 0 */
    end. /* if can-find */
    
    /* ============================================================================ */
    /* Ancestor code is skipped. WouAnt / KriLae 20060313                           */
    /* As not necessary for the result of the Q-records and it only causes overhead */
    /* ============================================================================ */