1: PACKAGE BODY FA_MASS_REINS_PKG as
2: /* $Header: faxmrsb.pls 120.10 2005/11/11 08:08:21 tdewanga ship $ */
3:
4: g_log_level_rec fa_api_types.log_level_rec_type;
5:
6: PROCEDURE Mass_Reinstate(
7: p_mass_retirement_id IN NUMBER,
8: p_parent_request_id IN NUMBER,
46: l_return_status VARCHAR2(1);
47: l_msg_count number;
48: l_msg_data VARCHAR2(4000);
49:
50: l_trans_rec FA_API_TYPES.trans_rec_type;
51: l_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type;
52: l_asset_retire_rec FA_API_TYPES.asset_retire_rec_type;
53: l_asset_dist_tbl FA_API_TYPES.asset_dist_tbl_type;
54: l_subcomp_tbl FA_API_TYPES.subcomp_tbl_type;
47: l_msg_count number;
48: l_msg_data VARCHAR2(4000);
49:
50: l_trans_rec FA_API_TYPES.trans_rec_type;
51: l_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type;
52: l_asset_retire_rec FA_API_TYPES.asset_retire_rec_type;
53: l_asset_dist_tbl FA_API_TYPES.asset_dist_tbl_type;
54: l_subcomp_tbl FA_API_TYPES.subcomp_tbl_type;
55: l_inv_tbl FA_API_TYPES.inv_tbl_type;
48: l_msg_data VARCHAR2(4000);
49:
50: l_trans_rec FA_API_TYPES.trans_rec_type;
51: l_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type;
52: l_asset_retire_rec FA_API_TYPES.asset_retire_rec_type;
53: l_asset_dist_tbl FA_API_TYPES.asset_dist_tbl_type;
54: l_subcomp_tbl FA_API_TYPES.subcomp_tbl_type;
55: l_inv_tbl FA_API_TYPES.inv_tbl_type;
56:
49:
50: l_trans_rec FA_API_TYPES.trans_rec_type;
51: l_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type;
52: l_asset_retire_rec FA_API_TYPES.asset_retire_rec_type;
53: l_asset_dist_tbl FA_API_TYPES.asset_dist_tbl_type;
54: l_subcomp_tbl FA_API_TYPES.subcomp_tbl_type;
55: l_inv_tbl FA_API_TYPES.inv_tbl_type;
56:
57: l_calling_fn varchar2(35) := 'FA_MASS_REINS_PKG.mass_reinstate';
50: l_trans_rec FA_API_TYPES.trans_rec_type;
51: l_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type;
52: l_asset_retire_rec FA_API_TYPES.asset_retire_rec_type;
53: l_asset_dist_tbl FA_API_TYPES.asset_dist_tbl_type;
54: l_subcomp_tbl FA_API_TYPES.subcomp_tbl_type;
55: l_inv_tbl FA_API_TYPES.inv_tbl_type;
56:
57: l_calling_fn varchar2(35) := 'FA_MASS_REINS_PKG.mass_reinstate';
58: l_string varchar2(250);
51: l_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type;
52: l_asset_retire_rec FA_API_TYPES.asset_retire_rec_type;
53: l_asset_dist_tbl FA_API_TYPES.asset_dist_tbl_type;
54: l_subcomp_tbl FA_API_TYPES.subcomp_tbl_type;
55: l_inv_tbl FA_API_TYPES.inv_tbl_type;
56:
57: l_calling_fn varchar2(35) := 'FA_MASS_REINS_PKG.mass_reinstate';
58: l_string varchar2(250);
59:
327:
328: PROCEDURE write_message
329: (p_asset_number in varchar2,
330: p_message in varchar2,
331: p_log_level_rec in fa_api_types.log_level_rec_type default null) IS
332:
333: l_message varchar2(30);
334: l_mesg varchar2(100);
335: l_string varchar2(512);