1: PACKAGE BODY FA_TERMINAL_GAIN_LOSS_PVT as
2: /* $Header: FAVTGLB.pls 120.2 2005/12/02 22:36:23 tkawamur noship $ */
3:
4: FUNCTION fadtgl (
5: p_asset_id IN NUMBER,
7: p_deprn_reserve IN NUMBER,
8: p_mrc_sob_type_code IN VARCHAR2,
9: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null) RETURN NUMBER IS
10:
11: l_calling_fn varchar2(50) := 'FA_TERMINAL_GAIN_LOSS_PVT.fadtgl';
12: l_db_title varchar2(30) := 'fadtgl';
13: l_trans_rec FA_API_TYPES.trans_rec_type;
14: l_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type;
15: l_asset_type_rec FA_API_TYPES.asset_type_rec_type;
526: return 1;
527:
528: END fadtgl;
529:
530: END FA_TERMINAL_GAIN_LOSS_PVT;