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

icTableName	input	character	Name of the database table of which a record is created in the class temp-table.
oiReturnStatus	output	integer

Internal usage

unused

program code (program/bgrossincomeaccounting.p)

<ANCESTOR-CODE>

case icTableName:
    when 'GrossIncAcc'
    then do:
        assign tGrossIncAcc.Company_ID                 = viCompanyId
               tGrossIncAcc.GrossIncAccIsAllDivision   = true
               tGrossIncAcc.GrossIncAccIsAllCostCentre = true
               tGrossIncAcc.GrossIncAccIsAllProject    = true.
    end. /* when 'GrossIncAcc' */
end. /* case icTableName: */