project QadFinancials > class BCInvoice > method ApiStdMaintainTTWithIntPostDates

Description

This method is a submethod of ApiiStdMaintainTTWithIntPost because it could not contain all the code


Parameters


oiReturnStatusoutputintegerReturn status of the method.


Internal usage


QadFinancials
method BCInvoice.ApiStdMaintainTTWithIntPost


program code (program9/bcinvoice.p)

/* =================== */
    /* Calculate due dates */
    /* =================== */
    if tOpenBalanceCI.tcNormalPaymentConditionCode <> "":U and 
       tOpenBalanceCI.tcNormalPaymentConditionCode <> ?
    then do:
        <I-6 {bFcStartAndOpenInstance
             &ADD-TO-TRANSACTION = "false"
             &CLASS              = "BPaymentCondition"}>
        <M-5 run CalculateDueDiscountDate
           (input  ? (iiPaymentConditionID), 
            input  tOpenBalanceCI.tcNormalPaymentConditionCode (icPaymentConditionCode), 
            input  tOpenBalanceCI.ttInvoiceDate (itInvoiceDate), 
            output tOpenBalanceCI.ttInvoiceDueDate (otDueDate), 
            output tOpenBalanceCI.ttInvoiceDiscountDueDate (otDiscountDate), 
            output viFcReturnSuper (oiReturnStatus)) in BPaymentCondition>
        if viFcReturnSuper < 0 or (viFcReturnSuper > 0 and oiReturnStatus = 0)
        then assign oiReturnStatus = viFcReturnSuper.
        <I-7 {bFcCloseAndStopInstance
             &CLASS           = "BPaymentCondition"}>
        if oiReturnStatus < 0 then return.  
    end. /* if tOpenBalanceCI.tcNormalPaymentConditionCode <> "":U and */