| iiYearPeriod | input | integer | Year Period |
| idCHistBalanceLC | input | decimal | Balance value with Local Currency for CHist |
| idCHistBalanceTC | input | decimal | Balance value with Transaction Currency for CHist |
| idCHistBalanceCC | input | decimal | Balance value with Consistent Currency for CHist |
| iiProject | input | integer | Project ID |
| iiCostCentre | input | integer | Cost Center ID |
| iiDivision | input | integer | Sub Account ID |
| iiJournal | input | integer | Daybook ID |
| iiGL | input | integer | GL ID |
| oiReturnStatus | output | integer | Return status of the method. |
QadFinancials
/* ========================================================================== */
/* This method uses the Query-result from the UpdateCBalanceAndCHist method. */
/* This temp-table holds all CHist records for this company/creditor/currency */
/* with a starting period >= parameter YearPeriod */
/* ========================================================================== */
for each tCHist where
tCHist.CHistYearPeriodFrom > iiYearPeriod and
tCHist.GL_ID = iiGL and
tCHist.Journal_ID = iiJournal and
tCHist.Division_ID = iiDivision and
tCHist.Project_ID = iiProject and
tCHist.CostCentre_ID = iiCostCentre :
/* ================== */
/* Update the balance */
/* ================== */
assign tCHist.CHistBalanceLC = tCHist.CHistBalanceLC + idCHistBalanceLC
tCHist.CHistBalanceTC = tCHist.CHistBalanceTC + idCHistBalanceTC
tCHist.CHistBalanceCC = tCHist.CHistBalanceCC + idCHistBalanceCC
tCHist.tc_Status = 'C':U.
end. /* for each tCHist where */