project QadFinancials > class BBankCharge > method InitialValues

Description

Add code here to initialize the calculated fields of a 'new' record (= a record that must be created in the application database) in a class temp-table.


Parameters


icTableNameinputcharacterName of the database table of which a record is created in the class temp-table.
oiReturnStatusoutputinteger


Internal usage


unused


program code (program/bbankcharge.p)

<ANCESTOR-CODE>
case icTableName :
        
        /* BANK STATE */
        when "BankCharge":U
        then do:
            assign tBankCharge.Currency_ID         = viCompanyLCId
                   tBankCharge.tcCurrencyCode      = vcCompanyLC
                   tBankCharge.BankChargeValidDateFrom = today.
        end.
end case.