1: PACKAGE BODY jl_zz_fa_calc_adjustment_pkg AS
2: /* $Header: jlzzfcab.pls 115.4 2002/11/06 00:09:30 cleyvaol ship $ */
3: ----------------------------------------------------------------------------
4: -- FUNCTION --
5: -- Calc_adjustments --
228: RETURN (x_deprn_reserve);
229: END IF;
230:
231: IF (p_mode = 'OO') THEN
232: SELECT dsc.deprn_reserve - jl_zz_fa_calc_adjustment_pkg.calc_adjustments (bcc.book_type_code, dpc.period_counter, p_asset_id, 'RESERVE', 'NET' )
233: INTO x_deprn_reserve
234: FROM fa_deprn_summary dsc,
235: fa_deprn_periods dpc,
236: fa_book_controls bcc,
330: RETURN (x_ytd_deprn);
331: END IF;
332:
333: IF (p_mode = 'OO') THEN
334: SELECT dsc.ytd_deprn + jl_zz_fa_calc_adjustment_pkg.calc_adjustments (bcc.book_type_code, dpc.period_counter, p_asset_id, 'EXPENSE', 'NET' )
335: INTO x_ytd_deprn
336: FROM fa_deprn_summary dsc,
337: fa_deprn_periods dpc,
338: fa_book_controls bcc,
357: RETURN (0);
358:
359: END calc_corp_ytd_deprn;
360:
361: END jl_zz_fa_calc_adjustment_pkg;