project QadFinancials > class BCashBox > 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/bcashbox.p)

<ANCESTOR-CODE>

if icTableName = "BankState":U
then do:
    assign tBankState.BankStateTransactionType = {&BANKSTATETRANSTYPE-CASH}.
end.

if icTableName = "BankStateLine":U 
then do: 
    assign tBankStateLine.tlPrint = true.
end.