project QadFinancials > class BBudgetLinkActual > 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 BBudgetLinkActual.ApiCreateBudgetLinkActual
method BBudgetLinkActual.ApiUpdateBudgetLinkActualRep
method BBudgetLinkActual.DeleteBudgetLinkActualByBudgetID


program code (program1/bbudgetlinkactual.p)

/* ============================================================================================= */
    /* For every tBudgetLinkActual that is created, a BudgetLink record will be created or updated.  */
    /* ============================================================================================= */
    if can-find (first tBudgetLinkActual where 
                       tBudgetLinkActual.tc_Status = "N":U or
                       tBudgetLinkActual.tc_Status = "D":U)
    then do :
        <M-3 run AdditionalUpdatesCreateDelete (output viFcReturnSuper (oiReturnStatus)) in BBudgetLinkActual>
        if viFcReturnSuper <> 0 then assign oiReturnStatus = viFcReturnSuper.
        if oiReturnStatus < 0 
        then do :
            <M-5 run StopExternalInstances
               (output viFcReturnSuper (oiReturnStatus)) in BBudgetLinkActual>
            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 */
    /* ============================================================================ */