project QadFinancials > class BQBudgetActual > 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 BQBudgetActual.ApiCreateQBudgetLinkActual
method BQBudgetActual.ApiDeleteQBudgetLinkActual


program code (program1/bqbudgetactual.p)

/* ===================================================================== */
/* For every tQBudgetLinkActual (temporarely records) that gets deleted, */
/* a QBudgetLinkActual record will be created. These QBudgetLinkActual   */ 
/* records are the permanent linkt between the po-line and the budget    */
/* ===================================================================== */
if can-find (first tQBudgetLinkActual where 
                   tQBudgetLinkActual.tc_Status = "D":U)
then do :
    <M-3 run AdditonalUpdatesDelete (output viFcReturnSuper (oiReturnStatus)) in BQBudgetActual>
    if viFcReturnSuper <> 0 then assign oiReturnStatus = viFcReturnSuper.
    if oiReturnStatus < 0 
    then do :
        <M-5 run StopExternalInstances
           (output viFcReturnSuper (oiReturnStatus)) in BQBudgetActual>
        Return.
    end. /* if oiReturnStatus < 0 */
end. /* if can-find */
    
                                                                 
/* =========================================================== */
/* Ancestor code is skipped. WouAnt 20050311 / KriLae 20050324 */
/* As not necessary for QPosting and only causes overhead      */
/* =========================================================== */