project QadFinancials > class BFixedAssetDepreciation > method GetCumulDBDeprAmountLC


Parameters


iiFAAssetBookIdinputinteger
iiPrevYearinputinteger
odFADeprecByAssetBookPrevYearoutputdecimal
oiReturnStatusoutputintegerReturn status of the method.


Internal usage


QadFinancials
method BFixedAssetDepreciation.GetCumulDeprAmountEndPrevYearLC


program code (program1/bfixedassetdepreciation.p)

/* In order to avoid compilation warning -> this code is as a sepparate method */
<Q-1 run FADeprecByAssetBookDeprYear (all) (Read) (NoCache)
          (input viCompanyId, (CompanyId)
           input iiFAAssetBookId, (FAAssetBookId)
           input iiPrevYear, (DeprecYearUpperLimit)
           input ?, (DeprecYear)
           input ?, (DeprecMonth)
           output dataset tqFADeprecByAssetBookDeprYear) in BFixedAssetDepreciation >

for each tqFADeprecByAssetBookDeprYear:
    accumulate tqFADeprecByAssetBookDeprYear.tdFADepreciationAmountLC (total).
end.

assign odFADeprecByAssetBookPrevYear = (accum total tqFADeprecByAssetBookDeprYear.tdFADepreciationAmountLC).