6: g_current_units number:=0;
7:
8: -- +++++ Forward Declarations +++++
9: FUNCTION CALC_GAIN_LOSS_FOR_RET(
10: p_trans_rec IN FA_API_TYPES.trans_rec_type,
11: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
12: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
13: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
14: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
7:
8: -- +++++ Forward Declarations +++++
9: FUNCTION CALC_GAIN_LOSS_FOR_RET(
10: p_trans_rec IN FA_API_TYPES.trans_rec_type,
11: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
12: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
13: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
14: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
15: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
8: -- +++++ Forward Declarations +++++
9: FUNCTION CALC_GAIN_LOSS_FOR_RET(
10: p_trans_rec IN FA_API_TYPES.trans_rec_type,
11: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
12: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
13: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
14: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
15: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
16: p_period_rec IN FA_API_TYPES.period_rec_type,
9: FUNCTION CALC_GAIN_LOSS_FOR_RET(
10: p_trans_rec IN FA_API_TYPES.trans_rec_type,
11: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
12: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
13: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
14: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
15: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
16: p_period_rec IN FA_API_TYPES.period_rec_type,
17: p_asset_retire_rec IN FA_API_TYPES.asset_retire_rec_type,
10: p_trans_rec IN FA_API_TYPES.trans_rec_type,
11: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
12: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
13: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
14: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
15: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
16: p_period_rec IN FA_API_TYPES.period_rec_type,
17: p_asset_retire_rec IN FA_API_TYPES.asset_retire_rec_type,
18: p_group_thid IN NUMBER,
11: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
12: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
13: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
14: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
15: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
16: p_period_rec IN FA_API_TYPES.period_rec_type,
17: p_asset_retire_rec IN FA_API_TYPES.asset_retire_rec_type,
18: p_group_thid IN NUMBER,
19: p_salvage_value_retired IN NUMBER,
12: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
13: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
14: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
15: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
16: p_period_rec IN FA_API_TYPES.period_rec_type,
17: p_asset_retire_rec IN FA_API_TYPES.asset_retire_rec_type,
18: p_group_thid IN NUMBER,
19: p_salvage_value_retired IN NUMBER,
20: p_mrc_sob_type_code IN VARCHAR2,
13: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
14: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
15: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
16: p_period_rec IN FA_API_TYPES.period_rec_type,
17: p_asset_retire_rec IN FA_API_TYPES.asset_retire_rec_type,
18: p_group_thid IN NUMBER,
19: p_salvage_value_retired IN NUMBER,
20: p_mrc_sob_type_code IN VARCHAR2,
21: p_mode IN VARCHAR2,
18: p_group_thid IN NUMBER,
19: p_salvage_value_retired IN NUMBER,
20: p_mrc_sob_type_code IN VARCHAR2,
21: p_mode IN VARCHAR2,
22: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null)
23: RETURN BOOLEAN;
24:
25: FUNCTION CALC_GAIN_LOSS_FOR_REI(
26: p_trans_rec IN FA_API_TYPES.trans_rec_type,
22: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null)
23: RETURN BOOLEAN;
24:
25: FUNCTION CALC_GAIN_LOSS_FOR_REI(
26: p_trans_rec IN FA_API_TYPES.trans_rec_type,
27: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
28: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
29: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
30: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
23: RETURN BOOLEAN;
24:
25: FUNCTION CALC_GAIN_LOSS_FOR_REI(
26: p_trans_rec IN FA_API_TYPES.trans_rec_type,
27: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
28: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
29: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
30: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
31: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
24:
25: FUNCTION CALC_GAIN_LOSS_FOR_REI(
26: p_trans_rec IN FA_API_TYPES.trans_rec_type,
27: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
28: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
29: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
30: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
31: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
32: p_period_rec IN FA_API_TYPES.period_rec_type,
25: FUNCTION CALC_GAIN_LOSS_FOR_REI(
26: p_trans_rec IN FA_API_TYPES.trans_rec_type,
27: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
28: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
29: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
30: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
31: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
32: p_period_rec IN FA_API_TYPES.period_rec_type,
33: p_asset_retire_rec IN FA_API_TYPES.asset_retire_rec_type,
26: p_trans_rec IN FA_API_TYPES.trans_rec_type,
27: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
28: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
29: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
30: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
31: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
32: p_period_rec IN FA_API_TYPES.period_rec_type,
33: p_asset_retire_rec IN FA_API_TYPES.asset_retire_rec_type,
34: p_group_thid IN NUMBER,
27: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
28: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
29: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
30: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
31: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
32: p_period_rec IN FA_API_TYPES.period_rec_type,
33: p_asset_retire_rec IN FA_API_TYPES.asset_retire_rec_type,
34: p_group_thid IN NUMBER,
35: x_asset_fin_rec OUT NOCOPY FA_API_TYPES.asset_fin_rec_type,
28: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
29: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
30: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
31: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
32: p_period_rec IN FA_API_TYPES.period_rec_type,
33: p_asset_retire_rec IN FA_API_TYPES.asset_retire_rec_type,
34: p_group_thid IN NUMBER,
35: x_asset_fin_rec OUT NOCOPY FA_API_TYPES.asset_fin_rec_type,
36: p_mrc_sob_type_code IN VARCHAR2,
29: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
30: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
31: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
32: p_period_rec IN FA_API_TYPES.period_rec_type,
33: p_asset_retire_rec IN FA_API_TYPES.asset_retire_rec_type,
34: p_group_thid IN NUMBER,
35: x_asset_fin_rec OUT NOCOPY FA_API_TYPES.asset_fin_rec_type,
36: p_mrc_sob_type_code IN VARCHAR2,
37: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null)
31: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
32: p_period_rec IN FA_API_TYPES.period_rec_type,
33: p_asset_retire_rec IN FA_API_TYPES.asset_retire_rec_type,
34: p_group_thid IN NUMBER,
35: x_asset_fin_rec OUT NOCOPY FA_API_TYPES.asset_fin_rec_type,
36: p_mrc_sob_type_code IN VARCHAR2,
37: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null)
38: RETURN BOOLEAN;
39: -- +++++ End of Forward Declarations +++++
33: p_asset_retire_rec IN FA_API_TYPES.asset_retire_rec_type,
34: p_group_thid IN NUMBER,
35: x_asset_fin_rec OUT NOCOPY FA_API_TYPES.asset_fin_rec_type,
36: p_mrc_sob_type_code IN VARCHAR2,
37: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null)
38: RETURN BOOLEAN;
39: -- +++++ End of Forward Declarations +++++
40:
41: FUNCTION DO_RETIREMENT(p_trans_rec IN FA_API_TYPES.trans_rec_type,
37: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null)
38: RETURN BOOLEAN;
39: -- +++++ End of Forward Declarations +++++
40:
41: FUNCTION DO_RETIREMENT(p_trans_rec IN FA_API_TYPES.trans_rec_type,
42: p_asset_retire_rec IN FA_API_TYPES.asset_retire_rec_type,
43: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
44: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
45: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
38: RETURN BOOLEAN;
39: -- +++++ End of Forward Declarations +++++
40:
41: FUNCTION DO_RETIREMENT(p_trans_rec IN FA_API_TYPES.trans_rec_type,
42: p_asset_retire_rec IN FA_API_TYPES.asset_retire_rec_type,
43: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
44: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
45: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
46: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
39: -- +++++ End of Forward Declarations +++++
40:
41: FUNCTION DO_RETIREMENT(p_trans_rec IN FA_API_TYPES.trans_rec_type,
42: p_asset_retire_rec IN FA_API_TYPES.asset_retire_rec_type,
43: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
44: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
45: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
46: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
47: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
40:
41: FUNCTION DO_RETIREMENT(p_trans_rec IN FA_API_TYPES.trans_rec_type,
42: p_asset_retire_rec IN FA_API_TYPES.asset_retire_rec_type,
43: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
44: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
45: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
46: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
47: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
48: p_period_rec IN FA_API_TYPES.period_rec_type,
41: FUNCTION DO_RETIREMENT(p_trans_rec IN FA_API_TYPES.trans_rec_type,
42: p_asset_retire_rec IN FA_API_TYPES.asset_retire_rec_type,
43: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
44: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
45: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
46: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
47: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
48: p_period_rec IN FA_API_TYPES.period_rec_type,
49: p_mrc_sob_type_code IN VARCHAR2,
42: p_asset_retire_rec IN FA_API_TYPES.asset_retire_rec_type,
43: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
44: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
45: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
46: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
47: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
48: p_period_rec IN FA_API_TYPES.period_rec_type,
49: p_mrc_sob_type_code IN VARCHAR2,
50: p_calling_fn IN VARCHAR2,
43: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
44: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
45: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
46: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
47: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
48: p_period_rec IN FA_API_TYPES.period_rec_type,
49: p_mrc_sob_type_code IN VARCHAR2,
50: p_calling_fn IN VARCHAR2,
51: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null)
44: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
45: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
46: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
47: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
48: p_period_rec IN FA_API_TYPES.period_rec_type,
49: p_mrc_sob_type_code IN VARCHAR2,
50: p_calling_fn IN VARCHAR2,
51: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null)
52: return boolean IS
47: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
48: p_period_rec IN FA_API_TYPES.period_rec_type,
49: p_mrc_sob_type_code IN VARCHAR2,
50: p_calling_fn IN VARCHAR2,
51: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null)
52: return boolean IS
53:
54: l_trans_rec FA_API_TYPES.trans_rec_type;
55: l_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type;
50: p_calling_fn IN VARCHAR2,
51: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null)
52: return boolean IS
53:
54: l_trans_rec FA_API_TYPES.trans_rec_type;
55: l_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type;
56:
57: CURSOR c_get_group_exp_row IS
58: select adjustment_type,
51: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null)
52: return boolean IS
53:
54: l_trans_rec FA_API_TYPES.trans_rec_type;
55: l_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type;
56:
57: CURSOR c_get_group_exp_row IS
58: select adjustment_type,
59: debit_credit_flag,
88: l_calling_fn VARCHAR2(100) := 'fa_retirement_pvt.do_retirement';
89:
90: l_transaction_header_id FA_TRANSACTION_HEADERS.TRANSACTION_HEADER_ID%TYPE;
91:
92: l_asset_desc_rec_m FA_API_TYPES.asset_desc_rec_type;
93: l_asset_desc_rec FA_API_TYPES.asset_desc_rec_type;
94: l_asset_type_rec FA_API_TYPES.asset_type_rec_type;
95: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
96: l_asset_fin_rec_new_m FA_API_TYPES.asset_fin_rec_type;
89:
90: l_transaction_header_id FA_TRANSACTION_HEADERS.TRANSACTION_HEADER_ID%TYPE;
91:
92: l_asset_desc_rec_m FA_API_TYPES.asset_desc_rec_type;
93: l_asset_desc_rec FA_API_TYPES.asset_desc_rec_type;
94: l_asset_type_rec FA_API_TYPES.asset_type_rec_type;
95: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
96: l_asset_fin_rec_new_m FA_API_TYPES.asset_fin_rec_type;
97: l_asset_fin_rec_old FA_API_TYPES.asset_fin_rec_type;
90: l_transaction_header_id FA_TRANSACTION_HEADERS.TRANSACTION_HEADER_ID%TYPE;
91:
92: l_asset_desc_rec_m FA_API_TYPES.asset_desc_rec_type;
93: l_asset_desc_rec FA_API_TYPES.asset_desc_rec_type;
94: l_asset_type_rec FA_API_TYPES.asset_type_rec_type;
95: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
96: l_asset_fin_rec_new_m FA_API_TYPES.asset_fin_rec_type;
97: l_asset_fin_rec_old FA_API_TYPES.asset_fin_rec_type;
98: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
91:
92: l_asset_desc_rec_m FA_API_TYPES.asset_desc_rec_type;
93: l_asset_desc_rec FA_API_TYPES.asset_desc_rec_type;
94: l_asset_type_rec FA_API_TYPES.asset_type_rec_type;
95: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
96: l_asset_fin_rec_new_m FA_API_TYPES.asset_fin_rec_type;
97: l_asset_fin_rec_old FA_API_TYPES.asset_fin_rec_type;
98: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
99: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
92: l_asset_desc_rec_m FA_API_TYPES.asset_desc_rec_type;
93: l_asset_desc_rec FA_API_TYPES.asset_desc_rec_type;
94: l_asset_type_rec FA_API_TYPES.asset_type_rec_type;
95: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
96: l_asset_fin_rec_new_m FA_API_TYPES.asset_fin_rec_type;
97: l_asset_fin_rec_old FA_API_TYPES.asset_fin_rec_type;
98: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
99: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
100: l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
93: l_asset_desc_rec FA_API_TYPES.asset_desc_rec_type;
94: l_asset_type_rec FA_API_TYPES.asset_type_rec_type;
95: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
96: l_asset_fin_rec_new_m FA_API_TYPES.asset_fin_rec_type;
97: l_asset_fin_rec_old FA_API_TYPES.asset_fin_rec_type;
98: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
99: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
100: l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
101: l_asset_deprn_rec_old FA_API_TYPES.asset_deprn_rec_type;
94: l_asset_type_rec FA_API_TYPES.asset_type_rec_type;
95: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
96: l_asset_fin_rec_new_m FA_API_TYPES.asset_fin_rec_type;
97: l_asset_fin_rec_old FA_API_TYPES.asset_fin_rec_type;
98: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
99: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
100: l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
101: l_asset_deprn_rec_old FA_API_TYPES.asset_deprn_rec_type;
102: l_asset_deprn_rec_adj FA_API_TYPES.asset_deprn_rec_type;
95: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
96: l_asset_fin_rec_new_m FA_API_TYPES.asset_fin_rec_type;
97: l_asset_fin_rec_old FA_API_TYPES.asset_fin_rec_type;
98: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
99: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
100: l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
101: l_asset_deprn_rec_old FA_API_TYPES.asset_deprn_rec_type;
102: l_asset_deprn_rec_adj FA_API_TYPES.asset_deprn_rec_type;
103: l_asset_deprn_rec_new FA_API_TYPES.asset_deprn_rec_type;
96: l_asset_fin_rec_new_m FA_API_TYPES.asset_fin_rec_type;
97: l_asset_fin_rec_old FA_API_TYPES.asset_fin_rec_type;
98: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
99: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
100: l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
101: l_asset_deprn_rec_old FA_API_TYPES.asset_deprn_rec_type;
102: l_asset_deprn_rec_adj FA_API_TYPES.asset_deprn_rec_type;
103: l_asset_deprn_rec_new FA_API_TYPES.asset_deprn_rec_type;
104:
97: l_asset_fin_rec_old FA_API_TYPES.asset_fin_rec_type;
98: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
99: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
100: l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
101: l_asset_deprn_rec_old FA_API_TYPES.asset_deprn_rec_type;
102: l_asset_deprn_rec_adj FA_API_TYPES.asset_deprn_rec_type;
103: l_asset_deprn_rec_new FA_API_TYPES.asset_deprn_rec_type;
104:
105: l_group_reclass_options_rec FA_API_TYPES.group_reclass_options_rec_type;
98: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
99: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
100: l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
101: l_asset_deprn_rec_old FA_API_TYPES.asset_deprn_rec_type;
102: l_asset_deprn_rec_adj FA_API_TYPES.asset_deprn_rec_type;
103: l_asset_deprn_rec_new FA_API_TYPES.asset_deprn_rec_type;
104:
105: l_group_reclass_options_rec FA_API_TYPES.group_reclass_options_rec_type;
106:
99: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
100: l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
101: l_asset_deprn_rec_old FA_API_TYPES.asset_deprn_rec_type;
102: l_asset_deprn_rec_adj FA_API_TYPES.asset_deprn_rec_type;
103: l_asset_deprn_rec_new FA_API_TYPES.asset_deprn_rec_type;
104:
105: l_group_reclass_options_rec FA_API_TYPES.group_reclass_options_rec_type;
106:
107: l_deprn_exp NUMBER;
101: l_asset_deprn_rec_old FA_API_TYPES.asset_deprn_rec_type;
102: l_asset_deprn_rec_adj FA_API_TYPES.asset_deprn_rec_type;
103: l_asset_deprn_rec_new FA_API_TYPES.asset_deprn_rec_type;
104:
105: l_group_reclass_options_rec FA_API_TYPES.group_reclass_options_rec_type;
106:
107: l_deprn_exp NUMBER;
108: l_bonus_deprn_exp NUMBER;
109:
623:
624: END DO_RETIREMENT;
625:
626: FUNCTION UNDO_RETIREMENT_REINSTATEMENT(p_transaction_header_id IN NUMBER,
627: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
628: p_group_asset_id IN NUMBER,
629: p_set_of_books_id IN NUMBER,
630: p_mrc_sob_type_code IN VARCHAR2,
631: p_calling_fn IN VARCHAR2,
628: p_group_asset_id IN NUMBER,
629: p_set_of_books_id IN NUMBER,
630: p_mrc_sob_type_code IN VARCHAR2,
631: p_calling_fn IN VARCHAR2,
632: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null)
633: return boolean IS
634:
635: CURSOR c_get_thid IS
636: select transaction_header_id
729:
730: END UNDO_RETIREMENT_REINSTATEMENT;
731:
732: FUNCTION DO_REINSTATEMENT(
733: p_trans_rec IN FA_API_TYPES.trans_rec_type,
734: p_asset_retire_rec IN FA_API_TYPES.asset_retire_rec_type,
735: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
736: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
737: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
730: END UNDO_RETIREMENT_REINSTATEMENT;
731:
732: FUNCTION DO_REINSTATEMENT(
733: p_trans_rec IN FA_API_TYPES.trans_rec_type,
734: p_asset_retire_rec IN FA_API_TYPES.asset_retire_rec_type,
735: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
736: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
737: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
738: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
731:
732: FUNCTION DO_REINSTATEMENT(
733: p_trans_rec IN FA_API_TYPES.trans_rec_type,
734: p_asset_retire_rec IN FA_API_TYPES.asset_retire_rec_type,
735: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
736: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
737: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
738: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
739: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
732: FUNCTION DO_REINSTATEMENT(
733: p_trans_rec IN FA_API_TYPES.trans_rec_type,
734: p_asset_retire_rec IN FA_API_TYPES.asset_retire_rec_type,
735: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
736: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
737: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
738: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
739: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
740: p_period_rec IN FA_API_TYPES.period_rec_type,
733: p_trans_rec IN FA_API_TYPES.trans_rec_type,
734: p_asset_retire_rec IN FA_API_TYPES.asset_retire_rec_type,
735: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
736: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
737: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
738: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
739: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
740: p_period_rec IN FA_API_TYPES.period_rec_type,
741: p_mrc_sob_type_code IN VARCHAR2,
734: p_asset_retire_rec IN FA_API_TYPES.asset_retire_rec_type,
735: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
736: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
737: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
738: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
739: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
740: p_period_rec IN FA_API_TYPES.period_rec_type,
741: p_mrc_sob_type_code IN VARCHAR2,
742: p_calling_fn IN VARCHAR2,
735: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
736: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
737: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
738: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
739: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
740: p_period_rec IN FA_API_TYPES.period_rec_type,
741: p_mrc_sob_type_code IN VARCHAR2,
742: p_calling_fn IN VARCHAR2,
743: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null)
736: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
737: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
738: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
739: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
740: p_period_rec IN FA_API_TYPES.period_rec_type,
741: p_mrc_sob_type_code IN VARCHAR2,
742: p_calling_fn IN VARCHAR2,
743: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null)
744: return boolean IS
739: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
740: p_period_rec IN FA_API_TYPES.period_rec_type,
741: p_mrc_sob_type_code IN VARCHAR2,
742: p_calling_fn IN VARCHAR2,
743: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null)
744: return boolean IS
745:
746: l_calling_fn VARCHAR2(100) := 'fa_group_retirement_pvt.do_reinstatement';
747:
771: and code_combination_id = c_expense_ccid
772: and location_id = c_location_ccid;
773:
774:
775: l_trans_rec FA_API_TYPES.trans_rec_type;
776: l_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type;
777:
778:
779: CURSOR c_get_thid is
772: and location_id = c_location_ccid;
773:
774:
775: l_trans_rec FA_API_TYPES.trans_rec_type;
776: l_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type;
777:
778:
779: CURSOR c_get_thid is
780: select fa_transaction_headers_s.nextval
808: l_deprn_exp NUMBER;
809: l_bonus_deprn_exp NUMBER;
810:
811: -- +++++ Stores new fin_rec of member +++++
812: l_asset_fin_rec_mn FA_API_TYPES.asset_fin_rec_type;
813:
814: l_period_rec FA_API_TYPES.period_rec_type;
815: l_asset_desc_rec_m FA_API_TYPES.asset_desc_rec_type;
816: l_asset_desc_rec FA_API_TYPES.asset_desc_rec_type;
810:
811: -- +++++ Stores new fin_rec of member +++++
812: l_asset_fin_rec_mn FA_API_TYPES.asset_fin_rec_type;
813:
814: l_period_rec FA_API_TYPES.period_rec_type;
815: l_asset_desc_rec_m FA_API_TYPES.asset_desc_rec_type;
816: l_asset_desc_rec FA_API_TYPES.asset_desc_rec_type;
817: l_asset_type_rec FA_API_TYPES.asset_type_rec_type;
818: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
811: -- +++++ Stores new fin_rec of member +++++
812: l_asset_fin_rec_mn FA_API_TYPES.asset_fin_rec_type;
813:
814: l_period_rec FA_API_TYPES.period_rec_type;
815: l_asset_desc_rec_m FA_API_TYPES.asset_desc_rec_type;
816: l_asset_desc_rec FA_API_TYPES.asset_desc_rec_type;
817: l_asset_type_rec FA_API_TYPES.asset_type_rec_type;
818: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
819: l_asset_fin_rec_new_m FA_API_TYPES.asset_fin_rec_type;
812: l_asset_fin_rec_mn FA_API_TYPES.asset_fin_rec_type;
813:
814: l_period_rec FA_API_TYPES.period_rec_type;
815: l_asset_desc_rec_m FA_API_TYPES.asset_desc_rec_type;
816: l_asset_desc_rec FA_API_TYPES.asset_desc_rec_type;
817: l_asset_type_rec FA_API_TYPES.asset_type_rec_type;
818: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
819: l_asset_fin_rec_new_m FA_API_TYPES.asset_fin_rec_type;
820: l_asset_fin_rec_old FA_API_TYPES.asset_fin_rec_type;
813:
814: l_period_rec FA_API_TYPES.period_rec_type;
815: l_asset_desc_rec_m FA_API_TYPES.asset_desc_rec_type;
816: l_asset_desc_rec FA_API_TYPES.asset_desc_rec_type;
817: l_asset_type_rec FA_API_TYPES.asset_type_rec_type;
818: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
819: l_asset_fin_rec_new_m FA_API_TYPES.asset_fin_rec_type;
820: l_asset_fin_rec_old FA_API_TYPES.asset_fin_rec_type;
821: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
814: l_period_rec FA_API_TYPES.period_rec_type;
815: l_asset_desc_rec_m FA_API_TYPES.asset_desc_rec_type;
816: l_asset_desc_rec FA_API_TYPES.asset_desc_rec_type;
817: l_asset_type_rec FA_API_TYPES.asset_type_rec_type;
818: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
819: l_asset_fin_rec_new_m FA_API_TYPES.asset_fin_rec_type;
820: l_asset_fin_rec_old FA_API_TYPES.asset_fin_rec_type;
821: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
822: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
815: l_asset_desc_rec_m FA_API_TYPES.asset_desc_rec_type;
816: l_asset_desc_rec FA_API_TYPES.asset_desc_rec_type;
817: l_asset_type_rec FA_API_TYPES.asset_type_rec_type;
818: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
819: l_asset_fin_rec_new_m FA_API_TYPES.asset_fin_rec_type;
820: l_asset_fin_rec_old FA_API_TYPES.asset_fin_rec_type;
821: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
822: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
823: l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
816: l_asset_desc_rec FA_API_TYPES.asset_desc_rec_type;
817: l_asset_type_rec FA_API_TYPES.asset_type_rec_type;
818: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
819: l_asset_fin_rec_new_m FA_API_TYPES.asset_fin_rec_type;
820: l_asset_fin_rec_old FA_API_TYPES.asset_fin_rec_type;
821: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
822: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
823: l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
824: l_asset_deprn_rec_old FA_API_TYPES.asset_deprn_rec_type;
817: l_asset_type_rec FA_API_TYPES.asset_type_rec_type;
818: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
819: l_asset_fin_rec_new_m FA_API_TYPES.asset_fin_rec_type;
820: l_asset_fin_rec_old FA_API_TYPES.asset_fin_rec_type;
821: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
822: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
823: l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
824: l_asset_deprn_rec_old FA_API_TYPES.asset_deprn_rec_type;
825: l_asset_deprn_rec_adj FA_API_TYPES.asset_deprn_rec_type;
818: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
819: l_asset_fin_rec_new_m FA_API_TYPES.asset_fin_rec_type;
820: l_asset_fin_rec_old FA_API_TYPES.asset_fin_rec_type;
821: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
822: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
823: l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
824: l_asset_deprn_rec_old FA_API_TYPES.asset_deprn_rec_type;
825: l_asset_deprn_rec_adj FA_API_TYPES.asset_deprn_rec_type;
826: l_asset_deprn_rec_new FA_API_TYPES.asset_deprn_rec_type;
819: l_asset_fin_rec_new_m FA_API_TYPES.asset_fin_rec_type;
820: l_asset_fin_rec_old FA_API_TYPES.asset_fin_rec_type;
821: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
822: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
823: l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
824: l_asset_deprn_rec_old FA_API_TYPES.asset_deprn_rec_type;
825: l_asset_deprn_rec_adj FA_API_TYPES.asset_deprn_rec_type;
826: l_asset_deprn_rec_new FA_API_TYPES.asset_deprn_rec_type;
827: l_group_reclass_options_rec FA_API_TYPES.group_reclass_options_rec_type;
820: l_asset_fin_rec_old FA_API_TYPES.asset_fin_rec_type;
821: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
822: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
823: l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
824: l_asset_deprn_rec_old FA_API_TYPES.asset_deprn_rec_type;
825: l_asset_deprn_rec_adj FA_API_TYPES.asset_deprn_rec_type;
826: l_asset_deprn_rec_new FA_API_TYPES.asset_deprn_rec_type;
827: l_group_reclass_options_rec FA_API_TYPES.group_reclass_options_rec_type;
828:
821: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
822: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
823: l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
824: l_asset_deprn_rec_old FA_API_TYPES.asset_deprn_rec_type;
825: l_asset_deprn_rec_adj FA_API_TYPES.asset_deprn_rec_type;
826: l_asset_deprn_rec_new FA_API_TYPES.asset_deprn_rec_type;
827: l_group_reclass_options_rec FA_API_TYPES.group_reclass_options_rec_type;
828:
829: l_salvage_value_retired NUMBER;
822: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
823: l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
824: l_asset_deprn_rec_old FA_API_TYPES.asset_deprn_rec_type;
825: l_asset_deprn_rec_adj FA_API_TYPES.asset_deprn_rec_type;
826: l_asset_deprn_rec_new FA_API_TYPES.asset_deprn_rec_type;
827: l_group_reclass_options_rec FA_API_TYPES.group_reclass_options_rec_type;
828:
829: l_salvage_value_retired NUMBER;
830: l_cip_cost_retired NUMBER;
823: l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
824: l_asset_deprn_rec_old FA_API_TYPES.asset_deprn_rec_type;
825: l_asset_deprn_rec_adj FA_API_TYPES.asset_deprn_rec_type;
826: l_asset_deprn_rec_new FA_API_TYPES.asset_deprn_rec_type;
827: l_group_reclass_options_rec FA_API_TYPES.group_reclass_options_rec_type;
828:
829: l_salvage_value_retired NUMBER;
830: l_cip_cost_retired NUMBER;
831: l_adj_rec_cost_retired NUMBER;
1440: | retirement. |
1441: | |
1442: +====================================================================*/
1443: FUNCTION CALC_GAIN_LOSS_FOR_RET(
1444: p_trans_rec IN FA_API_TYPES.trans_rec_type,
1445: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
1446: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
1447: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
1448: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
1441: | |
1442: +====================================================================*/
1443: FUNCTION CALC_GAIN_LOSS_FOR_RET(
1444: p_trans_rec IN FA_API_TYPES.trans_rec_type,
1445: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
1446: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
1447: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
1448: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
1449: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
1442: +====================================================================*/
1443: FUNCTION CALC_GAIN_LOSS_FOR_RET(
1444: p_trans_rec IN FA_API_TYPES.trans_rec_type,
1445: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
1446: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
1447: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
1448: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
1449: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
1450: p_period_rec IN FA_API_TYPES.period_rec_type,
1443: FUNCTION CALC_GAIN_LOSS_FOR_RET(
1444: p_trans_rec IN FA_API_TYPES.trans_rec_type,
1445: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
1446: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
1447: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
1448: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
1449: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
1450: p_period_rec IN FA_API_TYPES.period_rec_type,
1451: p_asset_retire_rec IN FA_API_TYPES.asset_retire_rec_type,
1444: p_trans_rec IN FA_API_TYPES.trans_rec_type,
1445: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
1446: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
1447: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
1448: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
1449: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
1450: p_period_rec IN FA_API_TYPES.period_rec_type,
1451: p_asset_retire_rec IN FA_API_TYPES.asset_retire_rec_type,
1452: p_group_thid IN NUMBER,
1445: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
1446: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
1447: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
1448: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
1449: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
1450: p_period_rec IN FA_API_TYPES.period_rec_type,
1451: p_asset_retire_rec IN FA_API_TYPES.asset_retire_rec_type,
1452: p_group_thid IN NUMBER,
1453: p_salvage_value_retired IN NUMBER,
1446: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
1447: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
1448: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
1449: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
1450: p_period_rec IN FA_API_TYPES.period_rec_type,
1451: p_asset_retire_rec IN FA_API_TYPES.asset_retire_rec_type,
1452: p_group_thid IN NUMBER,
1453: p_salvage_value_retired IN NUMBER,
1454: p_mrc_sob_type_code IN VARCHAR2,
1447: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
1448: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
1449: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
1450: p_period_rec IN FA_API_TYPES.period_rec_type,
1451: p_asset_retire_rec IN FA_API_TYPES.asset_retire_rec_type,
1452: p_group_thid IN NUMBER,
1453: p_salvage_value_retired IN NUMBER,
1454: p_mrc_sob_type_code IN VARCHAR2,
1455: p_mode IN VARCHAR2,
1452: p_group_thid IN NUMBER,
1453: p_salvage_value_retired IN NUMBER,
1454: p_mrc_sob_type_code IN VARCHAR2,
1455: p_mode IN VARCHAR2,
1456: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null)
1457: return BOOLEAN is
1458:
1459: /* --Commented out as part of fix for 3188851.
1460: -- Cursor to get transaction header id of transfer out in
1479: and mt.deprn_basis_rule_id = db.deprn_basis_rule_id; -- ENERGY
1480:
1481: l_calling_fn VARCHAR2(100) := 'fa_retirement_pvt.calc_gain_loss_for_ret';
1482:
1483: l_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type;
1484: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
1485:
1486: l_trans_rec FA_API_TYPES.trans_rec_type;
1487: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
1480:
1481: l_calling_fn VARCHAR2(100) := 'fa_retirement_pvt.calc_gain_loss_for_ret';
1482:
1483: l_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type;
1484: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
1485:
1486: l_trans_rec FA_API_TYPES.trans_rec_type;
1487: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
1488: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
1482:
1483: l_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type;
1484: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
1485:
1486: l_trans_rec FA_API_TYPES.trans_rec_type;
1487: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
1488: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
1489: l_asset_deprn_rec FA_API_TYPES.asset_deprn_rec_type;
1490:
1483: l_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type;
1484: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
1485:
1486: l_trans_rec FA_API_TYPES.trans_rec_type;
1487: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
1488: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
1489: l_asset_deprn_rec FA_API_TYPES.asset_deprn_rec_type;
1490:
1491: l_adj FA_ADJUST_TYPE_PKG.FA_ADJ_ROW_STRUCT;
1484: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
1485:
1486: l_trans_rec FA_API_TYPES.trans_rec_type;
1487: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
1488: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
1489: l_asset_deprn_rec FA_API_TYPES.asset_deprn_rec_type;
1490:
1491: l_adj FA_ADJUST_TYPE_PKG.FA_ADJ_ROW_STRUCT;
1492:
1485:
1486: l_trans_rec FA_API_TYPES.trans_rec_type;
1487: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
1488: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
1489: l_asset_deprn_rec FA_API_TYPES.asset_deprn_rec_type;
1490:
1491: l_adj FA_ADJUST_TYPE_PKG.FA_ADJ_ROW_STRUCT;
1492:
1493: l_deprn_exp NUMBER;
2179: | reinstatement. |
2180: | |
2181: +====================================================================*/
2182: FUNCTION CALC_GAIN_LOSS_FOR_REI(
2183: p_trans_rec IN FA_API_TYPES.trans_rec_type,
2184: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
2185: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
2186: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
2187: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
2180: | |
2181: +====================================================================*/
2182: FUNCTION CALC_GAIN_LOSS_FOR_REI(
2183: p_trans_rec IN FA_API_TYPES.trans_rec_type,
2184: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
2185: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
2186: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
2187: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
2188: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
2181: +====================================================================*/
2182: FUNCTION CALC_GAIN_LOSS_FOR_REI(
2183: p_trans_rec IN FA_API_TYPES.trans_rec_type,
2184: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
2185: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
2186: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
2187: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
2188: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
2189: p_period_rec IN FA_API_TYPES.period_rec_type,
2182: FUNCTION CALC_GAIN_LOSS_FOR_REI(
2183: p_trans_rec IN FA_API_TYPES.trans_rec_type,
2184: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
2185: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
2186: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
2187: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
2188: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
2189: p_period_rec IN FA_API_TYPES.period_rec_type,
2190: p_asset_retire_rec IN FA_API_TYPES.asset_retire_rec_type,
2183: p_trans_rec IN FA_API_TYPES.trans_rec_type,
2184: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
2185: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
2186: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
2187: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
2188: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
2189: p_period_rec IN FA_API_TYPES.period_rec_type,
2190: p_asset_retire_rec IN FA_API_TYPES.asset_retire_rec_type,
2191: p_group_thid IN NUMBER,
2184: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
2185: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
2186: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
2187: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
2188: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
2189: p_period_rec IN FA_API_TYPES.period_rec_type,
2190: p_asset_retire_rec IN FA_API_TYPES.asset_retire_rec_type,
2191: p_group_thid IN NUMBER,
2192: x_asset_fin_rec OUT NOCOPY FA_API_TYPES.asset_fin_rec_type,
2185: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
2186: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
2187: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
2188: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
2189: p_period_rec IN FA_API_TYPES.period_rec_type,
2190: p_asset_retire_rec IN FA_API_TYPES.asset_retire_rec_type,
2191: p_group_thid IN NUMBER,
2192: x_asset_fin_rec OUT NOCOPY FA_API_TYPES.asset_fin_rec_type,
2193: p_mrc_sob_type_code IN VARCHAR2,
2186: p_asset_desc_rec IN FA_API_TYPES.asset_desc_rec_type,
2187: p_asset_cat_rec IN FA_API_TYPES.asset_cat_rec_type,
2188: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
2189: p_period_rec IN FA_API_TYPES.period_rec_type,
2190: p_asset_retire_rec IN FA_API_TYPES.asset_retire_rec_type,
2191: p_group_thid IN NUMBER,
2192: x_asset_fin_rec OUT NOCOPY FA_API_TYPES.asset_fin_rec_type,
2193: p_mrc_sob_type_code IN VARCHAR2,
2194: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null)
2188: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
2189: p_period_rec IN FA_API_TYPES.period_rec_type,
2190: p_asset_retire_rec IN FA_API_TYPES.asset_retire_rec_type,
2191: p_group_thid IN NUMBER,
2192: x_asset_fin_rec OUT NOCOPY FA_API_TYPES.asset_fin_rec_type,
2193: p_mrc_sob_type_code IN VARCHAR2,
2194: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null)
2195: RETURN BOOLEAN IS
2196:
2190: p_asset_retire_rec IN FA_API_TYPES.asset_retire_rec_type,
2191: p_group_thid IN NUMBER,
2192: x_asset_fin_rec OUT NOCOPY FA_API_TYPES.asset_fin_rec_type,
2193: p_mrc_sob_type_code IN VARCHAR2,
2194: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null)
2195: RETURN BOOLEAN IS
2196:
2197: l_calling_fn VARCHAR2(100) := 'fa_group_retirement_pvt.calc_gain_loss_for_rei';
2198:
2223:
2224: l_group_thid NUMBER(15);
2225: l_group_asset_id NUMBER(15);
2226: l_date_effective DATE;
2227: l_period_rec FA_API_TYPES.period_rec_type;
2228:
2229: -- BUG# 3031357
2230: -- adding additional columns to use N2 index for performance
2231:
2276:
2277: l_ret_period_counter NUMBER := to_number(null);
2278: l_adj FA_ADJUST_TYPE_PKG.FA_ADJ_ROW_STRUCT;
2279:
2280: l_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type;
2281: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
2282:
2283: l_trans_rec FA_API_TYPES.trans_rec_type;
2284: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
2277: l_ret_period_counter NUMBER := to_number(null);
2278: l_adj FA_ADJUST_TYPE_PKG.FA_ADJ_ROW_STRUCT;
2279:
2280: l_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type;
2281: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
2282:
2283: l_trans_rec FA_API_TYPES.trans_rec_type;
2284: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
2285: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
2279:
2280: l_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type;
2281: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
2282:
2283: l_trans_rec FA_API_TYPES.trans_rec_type;
2284: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
2285: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
2286: l_asset_deprn_rec FA_API_TYPES.asset_deprn_rec_type;
2287:
2280: l_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type;
2281: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
2282:
2283: l_trans_rec FA_API_TYPES.trans_rec_type;
2284: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
2285: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
2286: l_asset_deprn_rec FA_API_TYPES.asset_deprn_rec_type;
2287:
2288: l_deprn_exp NUMBER;
2281: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
2282:
2283: l_trans_rec FA_API_TYPES.trans_rec_type;
2284: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
2285: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
2286: l_asset_deprn_rec FA_API_TYPES.asset_deprn_rec_type;
2287:
2288: l_deprn_exp NUMBER;
2289: l_bonus_deprn_exp NUMBER;
2282:
2283: l_trans_rec FA_API_TYPES.trans_rec_type;
2284: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
2285: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
2286: l_asset_deprn_rec FA_API_TYPES.asset_deprn_rec_type;
2287:
2288: l_deprn_exp NUMBER;
2289: l_bonus_deprn_exp NUMBER;
2290:
2848: FUNCTION Do_Retirement_in_CGL(
2849: p_ret IN fa_ret_types.ret_struct,
2850: p_bk IN fa_ret_types.book_struct,
2851: p_dpr IN fa_STD_TYPES.dpr_struct,
2852: p_asset_deprn_rec_old IN FA_API_TYPES.asset_deprn_rec_type,
2853: p_mrc_sob_type_code IN VARCHAR2,
2854: p_calling_fn IN VARCHAR2,
2855: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null)
2856: return boolean IS
2851: p_dpr IN fa_STD_TYPES.dpr_struct,
2852: p_asset_deprn_rec_old IN FA_API_TYPES.asset_deprn_rec_type,
2853: p_mrc_sob_type_code IN VARCHAR2,
2854: p_calling_fn IN VARCHAR2,
2855: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null)
2856: return boolean IS
2857:
2858: CURSOR c_get_thid is
2859: select fa_transaction_headers_s.nextval
2900: where retirement_id = p_ret.retirement_id;
2901:
2902: l_calling_fn VARCHAR2(100) := 'fa_retirement_pvt.Do_Retirement_in_CGL';
2903:
2904: l_trans_rec FA_API_TYPES.trans_rec_type;
2905: l_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type;
2906: l_asset_hdr_rec_m FA_API_TYPES.asset_hdr_rec_type;
2907: l_asset_desc_rec FA_API_TYPES.asset_desc_rec_type;
2908: l_asset_type_rec FA_API_TYPES.asset_type_rec_type;
2901:
2902: l_calling_fn VARCHAR2(100) := 'fa_retirement_pvt.Do_Retirement_in_CGL';
2903:
2904: l_trans_rec FA_API_TYPES.trans_rec_type;
2905: l_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type;
2906: l_asset_hdr_rec_m FA_API_TYPES.asset_hdr_rec_type;
2907: l_asset_desc_rec FA_API_TYPES.asset_desc_rec_type;
2908: l_asset_type_rec FA_API_TYPES.asset_type_rec_type;
2909: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
2902: l_calling_fn VARCHAR2(100) := 'fa_retirement_pvt.Do_Retirement_in_CGL';
2903:
2904: l_trans_rec FA_API_TYPES.trans_rec_type;
2905: l_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type;
2906: l_asset_hdr_rec_m FA_API_TYPES.asset_hdr_rec_type;
2907: l_asset_desc_rec FA_API_TYPES.asset_desc_rec_type;
2908: l_asset_type_rec FA_API_TYPES.asset_type_rec_type;
2909: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
2910: l_asset_fin_rec_new_m FA_API_TYPES.asset_fin_rec_type;
2903:
2904: l_trans_rec FA_API_TYPES.trans_rec_type;
2905: l_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type;
2906: l_asset_hdr_rec_m FA_API_TYPES.asset_hdr_rec_type;
2907: l_asset_desc_rec FA_API_TYPES.asset_desc_rec_type;
2908: l_asset_type_rec FA_API_TYPES.asset_type_rec_type;
2909: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
2910: l_asset_fin_rec_new_m FA_API_TYPES.asset_fin_rec_type;
2911: l_asset_fin_rec_old FA_API_TYPES.asset_fin_rec_type;
2904: l_trans_rec FA_API_TYPES.trans_rec_type;
2905: l_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type;
2906: l_asset_hdr_rec_m FA_API_TYPES.asset_hdr_rec_type;
2907: l_asset_desc_rec FA_API_TYPES.asset_desc_rec_type;
2908: l_asset_type_rec FA_API_TYPES.asset_type_rec_type;
2909: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
2910: l_asset_fin_rec_new_m FA_API_TYPES.asset_fin_rec_type;
2911: l_asset_fin_rec_old FA_API_TYPES.asset_fin_rec_type;
2912: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
2905: l_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type;
2906: l_asset_hdr_rec_m FA_API_TYPES.asset_hdr_rec_type;
2907: l_asset_desc_rec FA_API_TYPES.asset_desc_rec_type;
2908: l_asset_type_rec FA_API_TYPES.asset_type_rec_type;
2909: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
2910: l_asset_fin_rec_new_m FA_API_TYPES.asset_fin_rec_type;
2911: l_asset_fin_rec_old FA_API_TYPES.asset_fin_rec_type;
2912: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
2913: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
2906: l_asset_hdr_rec_m FA_API_TYPES.asset_hdr_rec_type;
2907: l_asset_desc_rec FA_API_TYPES.asset_desc_rec_type;
2908: l_asset_type_rec FA_API_TYPES.asset_type_rec_type;
2909: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
2910: l_asset_fin_rec_new_m FA_API_TYPES.asset_fin_rec_type;
2911: l_asset_fin_rec_old FA_API_TYPES.asset_fin_rec_type;
2912: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
2913: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
2914: l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
2907: l_asset_desc_rec FA_API_TYPES.asset_desc_rec_type;
2908: l_asset_type_rec FA_API_TYPES.asset_type_rec_type;
2909: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
2910: l_asset_fin_rec_new_m FA_API_TYPES.asset_fin_rec_type;
2911: l_asset_fin_rec_old FA_API_TYPES.asset_fin_rec_type;
2912: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
2913: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
2914: l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
2915: l_asset_deprn_rec_adj FA_API_TYPES.asset_deprn_rec_type;
2908: l_asset_type_rec FA_API_TYPES.asset_type_rec_type;
2909: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
2910: l_asset_fin_rec_new_m FA_API_TYPES.asset_fin_rec_type;
2911: l_asset_fin_rec_old FA_API_TYPES.asset_fin_rec_type;
2912: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
2913: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
2914: l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
2915: l_asset_deprn_rec_adj FA_API_TYPES.asset_deprn_rec_type;
2916: l_asset_deprn_rec_new FA_API_TYPES.asset_deprn_rec_type;
2909: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
2910: l_asset_fin_rec_new_m FA_API_TYPES.asset_fin_rec_type;
2911: l_asset_fin_rec_old FA_API_TYPES.asset_fin_rec_type;
2912: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
2913: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
2914: l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
2915: l_asset_deprn_rec_adj FA_API_TYPES.asset_deprn_rec_type;
2916: l_asset_deprn_rec_new FA_API_TYPES.asset_deprn_rec_type;
2917: l_period_rec FA_API_TYPES.period_rec_type;
2910: l_asset_fin_rec_new_m FA_API_TYPES.asset_fin_rec_type;
2911: l_asset_fin_rec_old FA_API_TYPES.asset_fin_rec_type;
2912: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
2913: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
2914: l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
2915: l_asset_deprn_rec_adj FA_API_TYPES.asset_deprn_rec_type;
2916: l_asset_deprn_rec_new FA_API_TYPES.asset_deprn_rec_type;
2917: l_period_rec FA_API_TYPES.period_rec_type;
2918: l_group_reclass_options_rec FA_API_TYPES.group_reclass_options_rec_type;
2911: l_asset_fin_rec_old FA_API_TYPES.asset_fin_rec_type;
2912: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
2913: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
2914: l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
2915: l_asset_deprn_rec_adj FA_API_TYPES.asset_deprn_rec_type;
2916: l_asset_deprn_rec_new FA_API_TYPES.asset_deprn_rec_type;
2917: l_period_rec FA_API_TYPES.period_rec_type;
2918: l_group_reclass_options_rec FA_API_TYPES.group_reclass_options_rec_type;
2919:
2912: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
2913: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
2914: l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
2915: l_asset_deprn_rec_adj FA_API_TYPES.asset_deprn_rec_type;
2916: l_asset_deprn_rec_new FA_API_TYPES.asset_deprn_rec_type;
2917: l_period_rec FA_API_TYPES.period_rec_type;
2918: l_group_reclass_options_rec FA_API_TYPES.group_reclass_options_rec_type;
2919:
2920: l_member_exists VARCHAR2(1) := 'N';
2913: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
2914: l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
2915: l_asset_deprn_rec_adj FA_API_TYPES.asset_deprn_rec_type;
2916: l_asset_deprn_rec_new FA_API_TYPES.asset_deprn_rec_type;
2917: l_period_rec FA_API_TYPES.period_rec_type;
2918: l_group_reclass_options_rec FA_API_TYPES.group_reclass_options_rec_type;
2919:
2920: l_member_exists VARCHAR2(1) := 'N';
2921: l_deprn_reserve NUMBER;
2914: l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
2915: l_asset_deprn_rec_adj FA_API_TYPES.asset_deprn_rec_type;
2916: l_asset_deprn_rec_new FA_API_TYPES.asset_deprn_rec_type;
2917: l_period_rec FA_API_TYPES.period_rec_type;
2918: l_group_reclass_options_rec FA_API_TYPES.group_reclass_options_rec_type;
2919:
2920: l_member_exists VARCHAR2(1) := 'N';
2921: l_deprn_reserve NUMBER;
2922: l_temp_num NUMBER;
3420: p_bk IN fa_ret_types.book_struct,
3421: p_dpr IN fa_STD_TYPES.dpr_struct,
3422: p_mrc_sob_type_code IN VARCHAR2,
3423: p_calling_fn IN VARCHAR2,
3424: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null)
3425: return boolean IS
3426:
3427: CURSOR c_get_thid is
3428: select fa_transaction_headers_s.nextval
3444: and ret.transaction_header_id_out = trx.transaction_header_id;
3445:
3446: l_calling_fn VARCHAR2(100) := 'fa_retirement_pvt.Do_Reinstatement_in_CGL';
3447:
3448: l_trans_rec FA_API_TYPES.trans_rec_type;
3449: l_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type;
3450: l_asset_hdr_rec_m FA_API_TYPES.asset_hdr_rec_type;
3451: l_asset_desc_rec FA_API_TYPES.asset_desc_rec_type;
3452: l_asset_type_rec FA_API_TYPES.asset_type_rec_type;
3445:
3446: l_calling_fn VARCHAR2(100) := 'fa_retirement_pvt.Do_Reinstatement_in_CGL';
3447:
3448: l_trans_rec FA_API_TYPES.trans_rec_type;
3449: l_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type;
3450: l_asset_hdr_rec_m FA_API_TYPES.asset_hdr_rec_type;
3451: l_asset_desc_rec FA_API_TYPES.asset_desc_rec_type;
3452: l_asset_type_rec FA_API_TYPES.asset_type_rec_type;
3453: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
3446: l_calling_fn VARCHAR2(100) := 'fa_retirement_pvt.Do_Reinstatement_in_CGL';
3447:
3448: l_trans_rec FA_API_TYPES.trans_rec_type;
3449: l_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type;
3450: l_asset_hdr_rec_m FA_API_TYPES.asset_hdr_rec_type;
3451: l_asset_desc_rec FA_API_TYPES.asset_desc_rec_type;
3452: l_asset_type_rec FA_API_TYPES.asset_type_rec_type;
3453: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
3454: l_asset_fin_rec_new_m FA_API_TYPES.asset_fin_rec_type;
3447:
3448: l_trans_rec FA_API_TYPES.trans_rec_type;
3449: l_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type;
3450: l_asset_hdr_rec_m FA_API_TYPES.asset_hdr_rec_type;
3451: l_asset_desc_rec FA_API_TYPES.asset_desc_rec_type;
3452: l_asset_type_rec FA_API_TYPES.asset_type_rec_type;
3453: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
3454: l_asset_fin_rec_new_m FA_API_TYPES.asset_fin_rec_type;
3455: l_asset_fin_rec_old FA_API_TYPES.asset_fin_rec_type;
3448: l_trans_rec FA_API_TYPES.trans_rec_type;
3449: l_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type;
3450: l_asset_hdr_rec_m FA_API_TYPES.asset_hdr_rec_type;
3451: l_asset_desc_rec FA_API_TYPES.asset_desc_rec_type;
3452: l_asset_type_rec FA_API_TYPES.asset_type_rec_type;
3453: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
3454: l_asset_fin_rec_new_m FA_API_TYPES.asset_fin_rec_type;
3455: l_asset_fin_rec_old FA_API_TYPES.asset_fin_rec_type;
3456: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
3449: l_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type;
3450: l_asset_hdr_rec_m FA_API_TYPES.asset_hdr_rec_type;
3451: l_asset_desc_rec FA_API_TYPES.asset_desc_rec_type;
3452: l_asset_type_rec FA_API_TYPES.asset_type_rec_type;
3453: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
3454: l_asset_fin_rec_new_m FA_API_TYPES.asset_fin_rec_type;
3455: l_asset_fin_rec_old FA_API_TYPES.asset_fin_rec_type;
3456: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
3457: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
3450: l_asset_hdr_rec_m FA_API_TYPES.asset_hdr_rec_type;
3451: l_asset_desc_rec FA_API_TYPES.asset_desc_rec_type;
3452: l_asset_type_rec FA_API_TYPES.asset_type_rec_type;
3453: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
3454: l_asset_fin_rec_new_m FA_API_TYPES.asset_fin_rec_type;
3455: l_asset_fin_rec_old FA_API_TYPES.asset_fin_rec_type;
3456: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
3457: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
3458: l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
3451: l_asset_desc_rec FA_API_TYPES.asset_desc_rec_type;
3452: l_asset_type_rec FA_API_TYPES.asset_type_rec_type;
3453: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
3454: l_asset_fin_rec_new_m FA_API_TYPES.asset_fin_rec_type;
3455: l_asset_fin_rec_old FA_API_TYPES.asset_fin_rec_type;
3456: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
3457: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
3458: l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
3459: l_asset_deprn_rec_old FA_API_TYPES.asset_deprn_rec_type;
3452: l_asset_type_rec FA_API_TYPES.asset_type_rec_type;
3453: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
3454: l_asset_fin_rec_new_m FA_API_TYPES.asset_fin_rec_type;
3455: l_asset_fin_rec_old FA_API_TYPES.asset_fin_rec_type;
3456: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
3457: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
3458: l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
3459: l_asset_deprn_rec_old FA_API_TYPES.asset_deprn_rec_type;
3460: l_asset_deprn_rec_adj FA_API_TYPES.asset_deprn_rec_type;
3453: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
3454: l_asset_fin_rec_new_m FA_API_TYPES.asset_fin_rec_type;
3455: l_asset_fin_rec_old FA_API_TYPES.asset_fin_rec_type;
3456: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
3457: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
3458: l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
3459: l_asset_deprn_rec_old FA_API_TYPES.asset_deprn_rec_type;
3460: l_asset_deprn_rec_adj FA_API_TYPES.asset_deprn_rec_type;
3461: l_asset_deprn_rec_new FA_API_TYPES.asset_deprn_rec_type;
3454: l_asset_fin_rec_new_m FA_API_TYPES.asset_fin_rec_type;
3455: l_asset_fin_rec_old FA_API_TYPES.asset_fin_rec_type;
3456: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
3457: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
3458: l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
3459: l_asset_deprn_rec_old FA_API_TYPES.asset_deprn_rec_type;
3460: l_asset_deprn_rec_adj FA_API_TYPES.asset_deprn_rec_type;
3461: l_asset_deprn_rec_new FA_API_TYPES.asset_deprn_rec_type;
3462: l_period_rec FA_API_TYPES.period_rec_type;
3455: l_asset_fin_rec_old FA_API_TYPES.asset_fin_rec_type;
3456: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
3457: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
3458: l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
3459: l_asset_deprn_rec_old FA_API_TYPES.asset_deprn_rec_type;
3460: l_asset_deprn_rec_adj FA_API_TYPES.asset_deprn_rec_type;
3461: l_asset_deprn_rec_new FA_API_TYPES.asset_deprn_rec_type;
3462: l_period_rec FA_API_TYPES.period_rec_type;
3463: l_group_reclass_options_rec FA_API_TYPES.group_reclass_options_rec_type;
3456: l_asset_fin_rec_adj FA_API_TYPES.asset_fin_rec_type;
3457: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
3458: l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
3459: l_asset_deprn_rec_old FA_API_TYPES.asset_deprn_rec_type;
3460: l_asset_deprn_rec_adj FA_API_TYPES.asset_deprn_rec_type;
3461: l_asset_deprn_rec_new FA_API_TYPES.asset_deprn_rec_type;
3462: l_period_rec FA_API_TYPES.period_rec_type;
3463: l_group_reclass_options_rec FA_API_TYPES.group_reclass_options_rec_type;
3464:
3457: l_asset_fin_rec_new FA_API_TYPES.asset_fin_rec_type;
3458: l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
3459: l_asset_deprn_rec_old FA_API_TYPES.asset_deprn_rec_type;
3460: l_asset_deprn_rec_adj FA_API_TYPES.asset_deprn_rec_type;
3461: l_asset_deprn_rec_new FA_API_TYPES.asset_deprn_rec_type;
3462: l_period_rec FA_API_TYPES.period_rec_type;
3463: l_group_reclass_options_rec FA_API_TYPES.group_reclass_options_rec_type;
3464:
3465: calc_err EXCEPTION;
3458: l_inv_trans_rec FA_API_TYPES.inv_trans_rec_type;
3459: l_asset_deprn_rec_old FA_API_TYPES.asset_deprn_rec_type;
3460: l_asset_deprn_rec_adj FA_API_TYPES.asset_deprn_rec_type;
3461: l_asset_deprn_rec_new FA_API_TYPES.asset_deprn_rec_type;
3462: l_period_rec FA_API_TYPES.period_rec_type;
3463: l_group_reclass_options_rec FA_API_TYPES.group_reclass_options_rec_type;
3464:
3465: calc_err EXCEPTION;
3466:
3459: l_asset_deprn_rec_old FA_API_TYPES.asset_deprn_rec_type;
3460: l_asset_deprn_rec_adj FA_API_TYPES.asset_deprn_rec_type;
3461: l_asset_deprn_rec_new FA_API_TYPES.asset_deprn_rec_type;
3462: l_period_rec FA_API_TYPES.period_rec_type;
3463: l_group_reclass_options_rec FA_API_TYPES.group_reclass_options_rec_type;
3464:
3465: calc_err EXCEPTION;
3466:
3467: BEGIN
3672:
3673: FUNCTION Do_Terminal_Gain_Loss_All_Bk (
3674: p_book_type_code VARCHAR2,
3675: p_asset_id NUMBER,
3676: p_period_rec FA_API_TYPES.period_rec_type,
3677: p_mrc_sob_type_code VARCHAR2,
3678: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null)RETURN BOOLEAN IS
3679:
3680: l_calling_fn VARCHAR2(50) := 'FA_RETIREMENT_PVT.Do_Terminal_Gain_Loss_All_Bk';
3674: p_book_type_code VARCHAR2,
3675: p_asset_id NUMBER,
3676: p_period_rec FA_API_TYPES.period_rec_type,
3677: p_mrc_sob_type_code VARCHAR2,
3678: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null)RETURN BOOLEAN IS
3679:
3680: l_calling_fn VARCHAR2(50) := 'FA_RETIREMENT_PVT.Do_Terminal_Gain_Loss_All_Bk';
3681:
3682: cursor c_member_exists IS
3737: where asset_id = p_asset_id
3738: and transaction_header_id_out is null;
3739:
3740: l_adj fa_adjust_type_pkg.fa_adj_row_struct;
3741: l_asset_cat_rec FA_API_TYPES.asset_cat_rec_type;
3742:
3743: l_member_exists VARCHAR2(1) := 'N';
3744: l_deprn_reserve NUMBER;
3745: l_last_update_date DATE := sysdate;
3936: FUNCTION Do_Terminal_Gain_Loss (
3937: p_book_type_code VARCHAR2,
3938: p_total_requests NUMBER,
3939: p_request_number NUMBER,
3940: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null)RETURN BOOLEAN IS
3941:
3942: l_calling_fn VARCHAR2(50) := 'FA_RETIREMENT_PVT.Do_Terminal_Gain_Loss';
3943:
3944: l_period_rec FA_API_TYPES.period_rec_type;
3940: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null)RETURN BOOLEAN IS
3941:
3942: l_calling_fn VARCHAR2(50) := 'FA_RETIREMENT_PVT.Do_Terminal_Gain_Loss';
3943:
3944: l_period_rec FA_API_TYPES.period_rec_type;
3945:
3946: cursor c_get_groups is
3947: select bk.asset_id asset_id
3948: from fa_books bk,
4103:
4104: END Do_Terminal_Gain_Loss;
4105:
4106: FUNCTION Check_Terminal_Gain_Loss(
4107: p_trans_rec IN FA_API_TYPES.trans_rec_type,
4108: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
4109: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
4110: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
4111: p_period_rec IN FA_API_TYPES.period_rec_type,
4104: END Do_Terminal_Gain_Loss;
4105:
4106: FUNCTION Check_Terminal_Gain_Loss(
4107: p_trans_rec IN FA_API_TYPES.trans_rec_type,
4108: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
4109: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
4110: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
4111: p_period_rec IN FA_API_TYPES.period_rec_type,
4112: p_mrc_sob_type_code IN VARCHAR2,
4105:
4106: FUNCTION Check_Terminal_Gain_Loss(
4107: p_trans_rec IN FA_API_TYPES.trans_rec_type,
4108: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
4109: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
4110: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
4111: p_period_rec IN FA_API_TYPES.period_rec_type,
4112: p_mrc_sob_type_code IN VARCHAR2,
4113: p_calling_fn IN VARCHAR2,
4106: FUNCTION Check_Terminal_Gain_Loss(
4107: p_trans_rec IN FA_API_TYPES.trans_rec_type,
4108: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
4109: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
4110: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
4111: p_period_rec IN FA_API_TYPES.period_rec_type,
4112: p_mrc_sob_type_code IN VARCHAR2,
4113: p_calling_fn IN VARCHAR2,
4114: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null) RETURN BOOLEAN IS
4107: p_trans_rec IN FA_API_TYPES.trans_rec_type,
4108: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
4109: p_asset_type_rec IN FA_API_TYPES.asset_type_rec_type,
4110: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
4111: p_period_rec IN FA_API_TYPES.period_rec_type,
4112: p_mrc_sob_type_code IN VARCHAR2,
4113: p_calling_fn IN VARCHAR2,
4114: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null) RETURN BOOLEAN IS
4115:
4110: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
4111: p_period_rec IN FA_API_TYPES.period_rec_type,
4112: p_mrc_sob_type_code IN VARCHAR2,
4113: p_calling_fn IN VARCHAR2,
4114: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null) RETURN BOOLEAN IS
4115:
4116: l_calling_fn VARCHAR2(50) := 'FA_RETIREMENT_PVT.Check_Terminal_Gain_Loss';
4117:
4118: --
4306:
4307: END Check_Terminal_Gain_Loss;
4308:
4309: FUNCTION Do_Allocation(
4310: p_trans_rec IN FA_API_TYPES.trans_rec_type,
4311: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
4312: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
4313: p_asset_deprn_rec_new IN FA_API_TYPES.asset_deprn_rec_type,
4314: p_period_rec IN FA_API_TYPES.period_rec_type,
4307: END Check_Terminal_Gain_Loss;
4308:
4309: FUNCTION Do_Allocation(
4310: p_trans_rec IN FA_API_TYPES.trans_rec_type,
4311: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
4312: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
4313: p_asset_deprn_rec_new IN FA_API_TYPES.asset_deprn_rec_type,
4314: p_period_rec IN FA_API_TYPES.period_rec_type,
4315: p_reserve_amount IN NUMBER,
4308:
4309: FUNCTION Do_Allocation(
4310: p_trans_rec IN FA_API_TYPES.trans_rec_type,
4311: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
4312: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
4313: p_asset_deprn_rec_new IN FA_API_TYPES.asset_deprn_rec_type,
4314: p_period_rec IN FA_API_TYPES.period_rec_type,
4315: p_reserve_amount IN NUMBER,
4316: p_mem_ret_thid IN NUMBER DEFAULT NULL,
4309: FUNCTION Do_Allocation(
4310: p_trans_rec IN FA_API_TYPES.trans_rec_type,
4311: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
4312: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
4313: p_asset_deprn_rec_new IN FA_API_TYPES.asset_deprn_rec_type,
4314: p_period_rec IN FA_API_TYPES.period_rec_type,
4315: p_reserve_amount IN NUMBER,
4316: p_mem_ret_thid IN NUMBER DEFAULT NULL,
4317: p_mode IN VARCHAR2 DEFAULT 'NORMAL',
4310: p_trans_rec IN FA_API_TYPES.trans_rec_type,
4311: p_asset_hdr_rec IN FA_API_TYPES.asset_hdr_rec_type,
4312: p_asset_fin_rec IN FA_API_TYPES.asset_fin_rec_type,
4313: p_asset_deprn_rec_new IN FA_API_TYPES.asset_deprn_rec_type,
4314: p_period_rec IN FA_API_TYPES.period_rec_type,
4315: p_reserve_amount IN NUMBER,
4316: p_mem_ret_thid IN NUMBER DEFAULT NULL,
4317: p_mode IN VARCHAR2 DEFAULT 'NORMAL',
4318: p_mrc_sob_type_code IN VARCHAR2,
4316: p_mem_ret_thid IN NUMBER DEFAULT NULL,
4317: p_mode IN VARCHAR2 DEFAULT 'NORMAL',
4318: p_mrc_sob_type_code IN VARCHAR2,
4319: p_calling_fn IN VARCHAR2,
4320: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null)
4321: RETURN BOOLEAN IS
4322:
4323: l_calling_fn varchar2(40) := 'FA_RETIREMENT_PVT.Do_Allocation';
4324: