1: PACKAGE BODY FA_MASSCHG_PKG as
2: /* $Header: FAMACHB.pls 120.18.12010000.1 2008/07/28 13:12:10 appldev ship $ */
3:
4: g_log_level_rec fa_api_types.log_level_rec_type;
5:
6: PROCEDURE write_message
7: (p_asset_number in varchar2,
8: p_message in varchar2
5:
6: PROCEDURE write_message
7: (p_asset_number in varchar2,
8: p_message in varchar2
9: ,p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null);
10:
11: PROCEDURE do_mass_change (
12: p_mass_change_id IN NUMBER,
13: p_parent_request_id IN NUMBER,
113: l_old_deprn_limit_type varchar2(30);
114: l_old_deprn_limit number;
115: l_old_deprn_limit_amount number;
116:
117: l_period_rec FA_API_TYPES.period_rec_type;
118: l_asset_fin_rec_old FA_API_TYPES.asset_fin_rec_type;
119:
120: l_trans_rec FA_API_TYPES.trans_rec_type;
121: l_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type;
114: l_old_deprn_limit number;
115: l_old_deprn_limit_amount number;
116:
117: l_period_rec FA_API_TYPES.period_rec_type;
118: l_asset_fin_rec_old FA_API_TYPES.asset_fin_rec_type;
119:
120: l_trans_rec FA_API_TYPES.trans_rec_type;
121: l_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type;
122: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
116:
117: l_period_rec FA_API_TYPES.period_rec_type;
118: l_asset_fin_rec_old FA_API_TYPES.asset_fin_rec_type;
119:
120: l_trans_rec FA_API_TYPES.trans_rec_type;
121: l_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type;
122: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
123: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
124: l_asset_fin_mrc_tbl_new FA_API_TYPES.asset_fin_tbl_type;
117: l_period_rec FA_API_TYPES.period_rec_type;
118: l_asset_fin_rec_old FA_API_TYPES.asset_fin_rec_type;
119:
120: l_trans_rec FA_API_TYPES.trans_rec_type;
121: l_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type;
122: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
123: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
124: l_asset_fin_mrc_tbl_new FA_API_TYPES.asset_fin_tbl_type;
125: l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
118: l_asset_fin_rec_old FA_API_TYPES.asset_fin_rec_type;
119:
120: l_trans_rec FA_API_TYPES.trans_rec_type;
121: l_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type;
122: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
123: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
124: l_asset_fin_mrc_tbl_new FA_API_TYPES.asset_fin_tbl_type;
125: l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
126: l_inv_tbl FA_API_TYPES.inv_tbl_type;
119:
120: l_trans_rec FA_API_TYPES.trans_rec_type;
121: l_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type;
122: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
123: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
124: l_asset_fin_mrc_tbl_new FA_API_TYPES.asset_fin_tbl_type;
125: l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
126: l_inv_tbl FA_API_TYPES.inv_tbl_type;
127: l_asset_deprn_rec_adj FA_API_TYPES.asset_deprn_rec_type;
120: l_trans_rec FA_API_TYPES.trans_rec_type;
121: l_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type;
122: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
123: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
124: l_asset_fin_mrc_tbl_new FA_API_TYPES.asset_fin_tbl_type;
125: l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
126: l_inv_tbl FA_API_TYPES.inv_tbl_type;
127: l_asset_deprn_rec_adj FA_API_TYPES.asset_deprn_rec_type;
128: l_asset_deprn_rec_new FA_API_TYPES.asset_deprn_rec_type;
121: l_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type;
122: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
123: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
124: l_asset_fin_mrc_tbl_new FA_API_TYPES.asset_fin_tbl_type;
125: l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
126: l_inv_tbl FA_API_TYPES.inv_tbl_type;
127: l_asset_deprn_rec_adj FA_API_TYPES.asset_deprn_rec_type;
128: l_asset_deprn_rec_new FA_API_TYPES.asset_deprn_rec_type;
129: l_asset_deprn_mrc_tbl_new FA_API_TYPES.asset_deprn_tbl_type;
122: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
123: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
124: l_asset_fin_mrc_tbl_new FA_API_TYPES.asset_fin_tbl_type;
125: l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
126: l_inv_tbl FA_API_TYPES.inv_tbl_type;
127: l_asset_deprn_rec_adj FA_API_TYPES.asset_deprn_rec_type;
128: l_asset_deprn_rec_new FA_API_TYPES.asset_deprn_rec_type;
129: l_asset_deprn_mrc_tbl_new FA_API_TYPES.asset_deprn_tbl_type;
130: l_group_reclass_options_rec FA_API_TYPES.group_reclass_options_rec_type;
123: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
124: l_asset_fin_mrc_tbl_new FA_API_TYPES.asset_fin_tbl_type;
125: l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
126: l_inv_tbl FA_API_TYPES.inv_tbl_type;
127: l_asset_deprn_rec_adj FA_API_TYPES.asset_deprn_rec_type;
128: l_asset_deprn_rec_new FA_API_TYPES.asset_deprn_rec_type;
129: l_asset_deprn_mrc_tbl_new FA_API_TYPES.asset_deprn_tbl_type;
130: l_group_reclass_options_rec FA_API_TYPES.group_reclass_options_rec_type;
131:
124: l_asset_fin_mrc_tbl_new FA_API_TYPES.asset_fin_tbl_type;
125: l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
126: l_inv_tbl FA_API_TYPES.inv_tbl_type;
127: l_asset_deprn_rec_adj FA_API_TYPES.asset_deprn_rec_type;
128: l_asset_deprn_rec_new FA_API_TYPES.asset_deprn_rec_type;
129: l_asset_deprn_mrc_tbl_new FA_API_TYPES.asset_deprn_tbl_type;
130: l_group_reclass_options_rec FA_API_TYPES.group_reclass_options_rec_type;
131:
132: l_mesg_name VARCHAR2(30);
125: l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
126: l_inv_tbl FA_API_TYPES.inv_tbl_type;
127: l_asset_deprn_rec_adj FA_API_TYPES.asset_deprn_rec_type;
128: l_asset_deprn_rec_new FA_API_TYPES.asset_deprn_rec_type;
129: l_asset_deprn_mrc_tbl_new FA_API_TYPES.asset_deprn_tbl_type;
130: l_group_reclass_options_rec FA_API_TYPES.group_reclass_options_rec_type;
131:
132: l_mesg_name VARCHAR2(30);
133:
126: l_inv_tbl FA_API_TYPES.inv_tbl_type;
127: l_asset_deprn_rec_adj FA_API_TYPES.asset_deprn_rec_type;
128: l_asset_deprn_rec_new FA_API_TYPES.asset_deprn_rec_type;
129: l_asset_deprn_mrc_tbl_new FA_API_TYPES.asset_deprn_tbl_type;
130: l_group_reclass_options_rec FA_API_TYPES.group_reclass_options_rec_type;
131:
132: l_mesg_name VARCHAR2(30);
133:
134: -- mass change info
996:
997: PROCEDURE write_message
998: (p_asset_number in varchar2,
999: p_message in varchar2
1000: ,p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null) IS
1001:
1002: l_message varchar2(30);
1003: l_mesg varchar2(100);
1004: l_string varchar2(512);