[Home] [Help]
42:
43: BEGIN
44:
45: if (p_log_level_rec.statement_level) then
46: fa_debug_pkg.add(l_calling_fn, '++++++++++++++++++++++++', '...', p_log_level_rec => p_log_level_rec);
47: fa_debug_pkg.add(l_calling_fn, '++ CALLED BY ', calling_module, p_log_level_rec => p_log_level_rec);
48: end if;
49:
50: if candidate_mode in ('RETIRE', 'CLEAR_PARTIAL') then
43: BEGIN
44:
45: if (p_log_level_rec.statement_level) then
46: fa_debug_pkg.add(l_calling_fn, '++++++++++++++++++++++++', '...', p_log_level_rec => p_log_level_rec);
47: fa_debug_pkg.add(l_calling_fn, '++ CALLED BY ', calling_module, p_log_level_rec => p_log_level_rec);
48: end if;
49:
50: if candidate_mode in ('RETIRE', 'CLEAR_PARTIAL') then
51:
69: and r.transaction_header_id_in = nvl(sth.source_transaction_header_id, sth.transaction_header_id)
70: and rownum = 1;
71:
72: if (p_log_level_rec.statement_level) then
73: fa_debug_pkg.add(l_calling_fn, '++ IN FAGINFO: Processing TAX', '...', p_log_level_rec => p_log_level_rec);
74: fa_debug_pkg.add(l_calling_fn, '++ retirement_id in CORP', l_ret_id_in_corp, p_log_level_rec => p_log_level_rec);
75: fa_debug_pkg.add(l_calling_fn, '++ l_units_retired in CORP', l_units_retired, p_log_level_rec => p_log_level_rec);
76: end if;
77:
70: and rownum = 1;
71:
72: if (p_log_level_rec.statement_level) then
73: fa_debug_pkg.add(l_calling_fn, '++ IN FAGINFO: Processing TAX', '...', p_log_level_rec => p_log_level_rec);
74: fa_debug_pkg.add(l_calling_fn, '++ retirement_id in CORP', l_ret_id_in_corp, p_log_level_rec => p_log_level_rec);
75: fa_debug_pkg.add(l_calling_fn, '++ l_units_retired in CORP', l_units_retired, p_log_level_rec => p_log_level_rec);
76: end if;
77:
78: exception
71:
72: if (p_log_level_rec.statement_level) then
73: fa_debug_pkg.add(l_calling_fn, '++ IN FAGINFO: Processing TAX', '...', p_log_level_rec => p_log_level_rec);
74: fa_debug_pkg.add(l_calling_fn, '++ retirement_id in CORP', l_ret_id_in_corp, p_log_level_rec => p_log_level_rec);
75: fa_debug_pkg.add(l_calling_fn, '++ l_units_retired in CORP', l_units_retired, p_log_level_rec => p_log_level_rec);
76: end if;
77:
78: exception
79: when no_data_found then -- when called from Corp
151: -- issue #3 in Bug 4398887
152: begin
153:
154: if (p_log_level_rec.statement_level) then
155: fa_debug_pkg.add(l_calling_fn, '++ IN FAGINFO: l_balance_tfr_in_tax BEFORE code for issue#3', l_balance_tfr_in_tax, p_log_level_rec => p_log_level_rec);
156: end if;
157:
158: if l_balance_tfr_in_tax = 0 then
159:
217:
218: end if;
219:
220: if (p_log_level_rec.statement_level) then
221: fa_debug_pkg.add(l_calling_fn, '++ IN FAGINFO: l_balance_tfr_in_tax AFTER code for issue#3', l_balance_tfr_in_tax, p_log_level_rec => p_log_level_rec);
222: end if;
223:
224: end;
225:
233: --adj_row.units_retired := 0;
234: adj_row.selection_thid := 0;
235: adj_row.selection_mode := FA_STD_TYPES.FA_AJ_ACTIVE;
236: if p_log_level_rec.statement_level then
237: fa_debug_pkg.add(l_calling_fn, '++++ selection_mode', 'FA_STD_TYPES.FA_AJ_ACTIVE', p_log_level_rec => p_log_level_rec);
238: end if;
239: else
240: if candidate_mode in ('RETIRE') then
241: adj_row.selection_retid := l_ret_id_in_corp;
241: adj_row.selection_retid := l_ret_id_in_corp;
242: adj_row.units_retired := l_units_retired;
243: adj_row.selection_mode := FA_STD_TYPES.FA_AJ_RETIRE;
244: if p_log_level_rec.statement_level then
245: fa_debug_pkg.add(l_calling_fn, '++++ selection_mode', 'FA_STD_TYPES.FA_AJ_RETIRE', p_log_level_rec => p_log_level_rec);
246: end if;
247: else
248: adj_row.selection_thid := l_id_out;
249: adj_row.selection_mode := FA_STD_TYPES.FA_AJ_CLEAR_PARTIAL;
247: else
248: adj_row.selection_thid := l_id_out;
249: adj_row.selection_mode := FA_STD_TYPES.FA_AJ_CLEAR_PARTIAL;
250: if p_log_level_rec.statement_level then
251: fa_debug_pkg.add(l_calling_fn, '++++ selection_mode', 'FA_STD_TYPES.FA_AJ_CLEAR_PARTIAL', p_log_level_rec => p_log_level_rec);
252: end if;
253: end if;
254:
255: end if;
259: --adj_row.units_retired := 0;
260: adj_row.selection_thid := 0;
261: adj_row.selection_mode := FA_STD_TYPES.FA_AJ_ACTIVE;
262: if p_log_level_rec.statement_level then
263: fa_debug_pkg.add(l_calling_fn, '++++ in ELSE: selection_mode', 'FA_STD_TYPES.FA_AJ_ACTIVE', p_log_level_rec => p_log_level_rec);
264: end if;
265: end if;
266:
267: end if;
747: h_nbv_retired := ret.cost_retired;
748: h_g_nbv_retired := null; --Bug11886090
749:
750: if (p_log_level_rec.statement_level) then
751: fa_debug_pkg.add(l_calling_fn, '++ IN FAGURT(1.2): in ret.wip_asset > 0', '');
752: end if;
753:
754: end if;
755:
771: FETCH c_get_nbv_ret_mrc INTO h_nbv_retired;
772: CLOSE c_get_nbv_ret_mrc;
773: end if;
774: if (p_log_level_rec.statement_level) then
775: fa_debug_pkg.add(l_calling_fn, '++ IN FAGURT(1.2): in else ret.units_retired is not null', '');
776: end if;
777:
778: end if;
779:
777:
778: end if;
779:
780: if (p_log_level_rec.statement_level) then
781: fa_debug_pkg.add(l_calling_fn, '++ IN FAGURT(1.5): ret.cost_retired', ret.cost_retired);
782: fa_debug_pkg.add(l_calling_fn, 'ret.rsv_retired', ret.rsv_retired, p_log_level_rec => p_log_level_rec);
783: end if;
784:
785: h_unrevalued_cost_retired := cost_frac * bk.unrevalued_cost;
778: end if;
779:
780: if (p_log_level_rec.statement_level) then
781: fa_debug_pkg.add(l_calling_fn, '++ IN FAGURT(1.5): ret.cost_retired', ret.cost_retired);
782: fa_debug_pkg.add(l_calling_fn, 'ret.rsv_retired', ret.rsv_retired, p_log_level_rec => p_log_level_rec);
783: end if;
784:
785: h_unrevalued_cost_retired := cost_frac * bk.unrevalued_cost;
786:
896: h_gain_loss := (ret.proceeds_of_sale + nvl(ret.reval_rsv_retired,0)) -
897: (nvl(h_g_nbv_retired, h_nbv_retired) + ret.cost_of_removal); /*13536787 - No need to substract impair reserve retired again as it is already
898: considered in nbv calc. */
899: if (p_log_level_rec.statement_level) then
900: fa_debug_pkg.add(l_calling_fn, '++ IN FAGURT(2): ret.proceeds_of_sale', ret.proceeds_of_sale);
901: fa_debug_pkg.add(l_calling_fn, 'ret.cost_of_removal', ret.cost_of_removal, p_log_level_rec => p_log_level_rec);
902: fa_debug_pkg.add(l_calling_fn, 'ret.reval_rsv_retired', ret.reval_rsv_retired, p_log_level_rec => p_log_level_rec);
903: fa_debug_pkg.add(l_calling_fn, 'h_nbv_retired', h_nbv_retired, p_log_level_rec => p_log_level_rec);
904: fa_debug_pkg.add(l_calling_fn, 'h_g_nbv_retired', h_g_nbv_retired, p_log_level_rec => p_log_level_rec);
897: (nvl(h_g_nbv_retired, h_nbv_retired) + ret.cost_of_removal); /*13536787 - No need to substract impair reserve retired again as it is already
898: considered in nbv calc. */
899: if (p_log_level_rec.statement_level) then
900: fa_debug_pkg.add(l_calling_fn, '++ IN FAGURT(2): ret.proceeds_of_sale', ret.proceeds_of_sale);
901: fa_debug_pkg.add(l_calling_fn, 'ret.cost_of_removal', ret.cost_of_removal, p_log_level_rec => p_log_level_rec);
902: fa_debug_pkg.add(l_calling_fn, 'ret.reval_rsv_retired', ret.reval_rsv_retired, p_log_level_rec => p_log_level_rec);
903: fa_debug_pkg.add(l_calling_fn, 'h_nbv_retired', h_nbv_retired, p_log_level_rec => p_log_level_rec);
904: fa_debug_pkg.add(l_calling_fn, 'h_g_nbv_retired', h_g_nbv_retired, p_log_level_rec => p_log_level_rec);
905: fa_debug_pkg.add(l_calling_fn, 'ret.impair_rsv_retired', ret.impair_rsv_retired, p_log_level_rec => p_log_level_rec);
898: considered in nbv calc. */
899: if (p_log_level_rec.statement_level) then
900: fa_debug_pkg.add(l_calling_fn, '++ IN FAGURT(2): ret.proceeds_of_sale', ret.proceeds_of_sale);
901: fa_debug_pkg.add(l_calling_fn, 'ret.cost_of_removal', ret.cost_of_removal, p_log_level_rec => p_log_level_rec);
902: fa_debug_pkg.add(l_calling_fn, 'ret.reval_rsv_retired', ret.reval_rsv_retired, p_log_level_rec => p_log_level_rec);
903: fa_debug_pkg.add(l_calling_fn, 'h_nbv_retired', h_nbv_retired, p_log_level_rec => p_log_level_rec);
904: fa_debug_pkg.add(l_calling_fn, 'h_g_nbv_retired', h_g_nbv_retired, p_log_level_rec => p_log_level_rec);
905: fa_debug_pkg.add(l_calling_fn, 'ret.impair_rsv_retired', ret.impair_rsv_retired, p_log_level_rec => p_log_level_rec);
906: fa_debug_pkg.add(l_calling_fn, 'h_gain_loss', h_gain_loss, p_log_level_rec => p_log_level_rec);
899: if (p_log_level_rec.statement_level) then
900: fa_debug_pkg.add(l_calling_fn, '++ IN FAGURT(2): ret.proceeds_of_sale', ret.proceeds_of_sale);
901: fa_debug_pkg.add(l_calling_fn, 'ret.cost_of_removal', ret.cost_of_removal, p_log_level_rec => p_log_level_rec);
902: fa_debug_pkg.add(l_calling_fn, 'ret.reval_rsv_retired', ret.reval_rsv_retired, p_log_level_rec => p_log_level_rec);
903: fa_debug_pkg.add(l_calling_fn, 'h_nbv_retired', h_nbv_retired, p_log_level_rec => p_log_level_rec);
904: fa_debug_pkg.add(l_calling_fn, 'h_g_nbv_retired', h_g_nbv_retired, p_log_level_rec => p_log_level_rec);
905: fa_debug_pkg.add(l_calling_fn, 'ret.impair_rsv_retired', ret.impair_rsv_retired, p_log_level_rec => p_log_level_rec);
906: fa_debug_pkg.add(l_calling_fn, 'h_gain_loss', h_gain_loss, p_log_level_rec => p_log_level_rec);
907: end if;
900: fa_debug_pkg.add(l_calling_fn, '++ IN FAGURT(2): ret.proceeds_of_sale', ret.proceeds_of_sale);
901: fa_debug_pkg.add(l_calling_fn, 'ret.cost_of_removal', ret.cost_of_removal, p_log_level_rec => p_log_level_rec);
902: fa_debug_pkg.add(l_calling_fn, 'ret.reval_rsv_retired', ret.reval_rsv_retired, p_log_level_rec => p_log_level_rec);
903: fa_debug_pkg.add(l_calling_fn, 'h_nbv_retired', h_nbv_retired, p_log_level_rec => p_log_level_rec);
904: fa_debug_pkg.add(l_calling_fn, 'h_g_nbv_retired', h_g_nbv_retired, p_log_level_rec => p_log_level_rec);
905: fa_debug_pkg.add(l_calling_fn, 'ret.impair_rsv_retired', ret.impair_rsv_retired, p_log_level_rec => p_log_level_rec);
906: fa_debug_pkg.add(l_calling_fn, 'h_gain_loss', h_gain_loss, p_log_level_rec => p_log_level_rec);
907: end if;
908:
901: fa_debug_pkg.add(l_calling_fn, 'ret.cost_of_removal', ret.cost_of_removal, p_log_level_rec => p_log_level_rec);
902: fa_debug_pkg.add(l_calling_fn, 'ret.reval_rsv_retired', ret.reval_rsv_retired, p_log_level_rec => p_log_level_rec);
903: fa_debug_pkg.add(l_calling_fn, 'h_nbv_retired', h_nbv_retired, p_log_level_rec => p_log_level_rec);
904: fa_debug_pkg.add(l_calling_fn, 'h_g_nbv_retired', h_g_nbv_retired, p_log_level_rec => p_log_level_rec);
905: fa_debug_pkg.add(l_calling_fn, 'ret.impair_rsv_retired', ret.impair_rsv_retired, p_log_level_rec => p_log_level_rec);
906: fa_debug_pkg.add(l_calling_fn, 'h_gain_loss', h_gain_loss, p_log_level_rec => p_log_level_rec);
907: end if;
908:
909: -- Call faxrnd to round nbv_retired in fagurt
902: fa_debug_pkg.add(l_calling_fn, 'ret.reval_rsv_retired', ret.reval_rsv_retired, p_log_level_rec => p_log_level_rec);
903: fa_debug_pkg.add(l_calling_fn, 'h_nbv_retired', h_nbv_retired, p_log_level_rec => p_log_level_rec);
904: fa_debug_pkg.add(l_calling_fn, 'h_g_nbv_retired', h_g_nbv_retired, p_log_level_rec => p_log_level_rec);
905: fa_debug_pkg.add(l_calling_fn, 'ret.impair_rsv_retired', ret.impair_rsv_retired, p_log_level_rec => p_log_level_rec);
906: fa_debug_pkg.add(l_calling_fn, 'h_gain_loss', h_gain_loss, p_log_level_rec => p_log_level_rec);
907: end if;
908:
909: -- Call faxrnd to round nbv_retired in fagurt
910: if not FA_UTILS_PKG.faxrnd(h_nbv_retired, ret.book, ret.set_of_books_id, p_log_level_rec => p_log_level_rec) then
1018: return(FALSE);
1019: end if;
1020:
1021: if (p_log_level_rec.statement_level) then
1022: fa_debug_pkg.add(l_calling_fn, '++++++ AFTER faginfo to get some variables...', '...', p_log_level_rec => p_log_level_rec);
1023: fa_debug_pkg.add(l_calling_fn, '++ l_unit_ret_in_corp', l_unit_ret_in_corp, p_log_level_rec => p_log_level_rec);
1024: fa_debug_pkg.add(l_calling_fn, '++ l_ret_id_in_corp', l_ret_id_in_corp, p_log_level_rec => p_log_level_rec);
1025: fa_debug_pkg.add(l_calling_fn, '++ h_id_out', h_id_out, p_log_level_rec => p_log_level_rec);
1026: fa_debug_pkg.add(l_calling_fn, '++ l_balance_tfr_in_tax (1=TRUE)', l_balance_tfr_in_tax);
1019: end if;
1020:
1021: if (p_log_level_rec.statement_level) then
1022: fa_debug_pkg.add(l_calling_fn, '++++++ AFTER faginfo to get some variables...', '...', p_log_level_rec => p_log_level_rec);
1023: fa_debug_pkg.add(l_calling_fn, '++ l_unit_ret_in_corp', l_unit_ret_in_corp, p_log_level_rec => p_log_level_rec);
1024: fa_debug_pkg.add(l_calling_fn, '++ l_ret_id_in_corp', l_ret_id_in_corp, p_log_level_rec => p_log_level_rec);
1025: fa_debug_pkg.add(l_calling_fn, '++ h_id_out', h_id_out, p_log_level_rec => p_log_level_rec);
1026: fa_debug_pkg.add(l_calling_fn, '++ l_balance_tfr_in_tax (1=TRUE)', l_balance_tfr_in_tax);
1027: end if;
1020:
1021: if (p_log_level_rec.statement_level) then
1022: fa_debug_pkg.add(l_calling_fn, '++++++ AFTER faginfo to get some variables...', '...', p_log_level_rec => p_log_level_rec);
1023: fa_debug_pkg.add(l_calling_fn, '++ l_unit_ret_in_corp', l_unit_ret_in_corp, p_log_level_rec => p_log_level_rec);
1024: fa_debug_pkg.add(l_calling_fn, '++ l_ret_id_in_corp', l_ret_id_in_corp, p_log_level_rec => p_log_level_rec);
1025: fa_debug_pkg.add(l_calling_fn, '++ h_id_out', h_id_out, p_log_level_rec => p_log_level_rec);
1026: fa_debug_pkg.add(l_calling_fn, '++ l_balance_tfr_in_tax (1=TRUE)', l_balance_tfr_in_tax);
1027: end if;
1028:
1021: if (p_log_level_rec.statement_level) then
1022: fa_debug_pkg.add(l_calling_fn, '++++++ AFTER faginfo to get some variables...', '...', p_log_level_rec => p_log_level_rec);
1023: fa_debug_pkg.add(l_calling_fn, '++ l_unit_ret_in_corp', l_unit_ret_in_corp, p_log_level_rec => p_log_level_rec);
1024: fa_debug_pkg.add(l_calling_fn, '++ l_ret_id_in_corp', l_ret_id_in_corp, p_log_level_rec => p_log_level_rec);
1025: fa_debug_pkg.add(l_calling_fn, '++ h_id_out', h_id_out, p_log_level_rec => p_log_level_rec);
1026: fa_debug_pkg.add(l_calling_fn, '++ l_balance_tfr_in_tax (1=TRUE)', l_balance_tfr_in_tax);
1027: end if;
1028:
1029:
1022: fa_debug_pkg.add(l_calling_fn, '++++++ AFTER faginfo to get some variables...', '...', p_log_level_rec => p_log_level_rec);
1023: fa_debug_pkg.add(l_calling_fn, '++ l_unit_ret_in_corp', l_unit_ret_in_corp, p_log_level_rec => p_log_level_rec);
1024: fa_debug_pkg.add(l_calling_fn, '++ l_ret_id_in_corp', l_ret_id_in_corp, p_log_level_rec => p_log_level_rec);
1025: fa_debug_pkg.add(l_calling_fn, '++ h_id_out', h_id_out, p_log_level_rec => p_log_level_rec);
1026: fa_debug_pkg.add(l_calling_fn, '++ l_balance_tfr_in_tax (1=TRUE)', l_balance_tfr_in_tax);
1027: end if;
1028:
1029:
1030: adj_row.transaction_header_id := ret.th_id_in;
1238: * Then find out cost and reserve retired and use these to find out
1239: * NBV retired for each effected distribution line.
1240: */
1241: if (p_log_level_rec.statement_level) then
1242: fa_debug_pkg.add(fname => l_calling_fn,
1243: element => '+++ret.cost_retired before if condition',
1244: value => ret.cost_retired, p_log_level_rec => p_log_level_rec);
1245: fa_debug_pkg.add(fname => l_calling_fn,
1246: element => '+++ret.rsv_retired before if condition',
1241: if (p_log_level_rec.statement_level) then
1242: fa_debug_pkg.add(fname => l_calling_fn,
1243: element => '+++ret.cost_retired before if condition',
1244: value => ret.cost_retired, p_log_level_rec => p_log_level_rec);
1245: fa_debug_pkg.add(fname => l_calling_fn,
1246: element => '+++ret.rsv_retired before if condition',
1247: value => ret.rsv_retired, p_log_level_rec => p_log_level_rec);
1248: fa_debug_pkg.add(fname => l_calling_fn,
1249: element => '+++h_nbv_retired before if condition',
1244: value => ret.cost_retired, p_log_level_rec => p_log_level_rec);
1245: fa_debug_pkg.add(fname => l_calling_fn,
1246: element => '+++ret.rsv_retired before if condition',
1247: value => ret.rsv_retired, p_log_level_rec => p_log_level_rec);
1248: fa_debug_pkg.add(fname => l_calling_fn,
1249: element => '+++h_nbv_retired before if condition',
1250: value => h_nbv_retired, p_log_level_rec => p_log_level_rec);
1251: fa_debug_pkg.add(fname => l_calling_fn,
1252: element => '+++h_g_nbv_retired before if condition',
1247: value => ret.rsv_retired, p_log_level_rec => p_log_level_rec);
1248: fa_debug_pkg.add(fname => l_calling_fn,
1249: element => '+++h_nbv_retired before if condition',
1250: value => h_nbv_retired, p_log_level_rec => p_log_level_rec);
1251: fa_debug_pkg.add(fname => l_calling_fn,
1252: element => '+++h_g_nbv_retired before if condition',
1253: value => h_g_nbv_retired, p_log_level_rec => p_log_level_rec);
1254: end if;
1255:
1297: if (ret.units_retired is null and NOT (l_unit_ret_in_corp and l_balance_tfr_in_tax = 0)) then
1298:
1299: OPEN c_ret_amount (ret.asset_id);
1300: if (p_log_level_rec.statement_level) then
1301: fa_debug_pkg.add(fname => l_calling_fn,
1302: element => '+++in amount',
1303: value => 1, p_log_level_rec => p_log_level_rec);
1304: end if;
1305: else
1304: end if;
1305: else
1306: OPEN c_ret_dists;
1307: if (p_log_level_rec.statement_level) then
1308: fa_debug_pkg.add(fname => l_calling_fn,
1309: element => '+++in dists',
1310: value => 1, p_log_level_rec => p_log_level_rec);
1311: end if;
1312: end if;
1414: adj_row.code_combination_id := l_ccid;
1415:
1416:
1417: if (p_log_level_rec.statement_level) then
1418: fa_debug_pkg.add(fname => l_calling_fn,
1419: element => 'l_dist_id',
1420: value => l_dist_id, p_log_level_rec => p_log_level_rec);
1421: fa_debug_pkg.add(fname => l_calling_fn,
1422: element => 'l_ccid',
1417: if (p_log_level_rec.statement_level) then
1418: fa_debug_pkg.add(fname => l_calling_fn,
1419: element => 'l_dist_id',
1420: value => l_dist_id, p_log_level_rec => p_log_level_rec);
1421: fa_debug_pkg.add(fname => l_calling_fn,
1422: element => 'l_ccid',
1423: value => l_ccid, p_log_level_rec => p_log_level_rec);
1424: fa_debug_pkg.add(fname => l_calling_fn,
1425: element => 'l_location_id',
1420: value => l_dist_id, p_log_level_rec => p_log_level_rec);
1421: fa_debug_pkg.add(fname => l_calling_fn,
1422: element => 'l_ccid',
1423: value => l_ccid, p_log_level_rec => p_log_level_rec);
1424: fa_debug_pkg.add(fname => l_calling_fn,
1425: element => 'l_location_id',
1426: value => l_location_id, p_log_level_rec => p_log_level_rec);
1427: fa_debug_pkg.add(fname => l_calling_fn,
1428: element => 'l_th_id_out',
1423: value => l_ccid, p_log_level_rec => p_log_level_rec);
1424: fa_debug_pkg.add(fname => l_calling_fn,
1425: element => 'l_location_id',
1426: value => l_location_id, p_log_level_rec => p_log_level_rec);
1427: fa_debug_pkg.add(fname => l_calling_fn,
1428: element => 'l_th_id_out',
1429: value => l_th_id_out, p_log_level_rec => p_log_level_rec);
1430: fa_debug_pkg.add(fname => l_calling_fn,
1431: element => 'l_new_dist_id',
1426: value => l_location_id, p_log_level_rec => p_log_level_rec);
1427: fa_debug_pkg.add(fname => l_calling_fn,
1428: element => 'l_th_id_out',
1429: value => l_th_id_out, p_log_level_rec => p_log_level_rec);
1430: fa_debug_pkg.add(fname => l_calling_fn,
1431: element => 'l_new_dist_id',
1432: value => l_new_dist_id, p_log_level_rec => p_log_level_rec);
1433: end if;
1434:
1499: CLOSE c_ret_rsv_costs_mrc;
1500: end if;
1501:
1502: if (p_log_level_rec.statement_level) then
1503: fa_debug_pkg.add(l_calling_fn, '++++ ret.th_id_in', ret.th_id_in, p_log_level_rec => p_log_level_rec);
1504: fa_debug_pkg.add(l_calling_fn, '++++ ret.book', ret.book, p_log_level_rec => p_log_level_rec);
1505: fa_debug_pkg.add(l_calling_fn, '++++ cpd_ctr', cpd_ctr, p_log_level_rec => p_log_level_rec);
1506: fa_debug_pkg.add(l_calling_fn, '++++ adj_row.distribution_id', adj_row.distribution_id, p_log_level_rec => p_log_level_rec);
1507: fa_debug_pkg.add(l_calling_fn, '++++ adj_row.source_type_code', adj_row.source_type_code, p_log_level_rec => p_log_level_rec);
1500: end if;
1501:
1502: if (p_log_level_rec.statement_level) then
1503: fa_debug_pkg.add(l_calling_fn, '++++ ret.th_id_in', ret.th_id_in, p_log_level_rec => p_log_level_rec);
1504: fa_debug_pkg.add(l_calling_fn, '++++ ret.book', ret.book, p_log_level_rec => p_log_level_rec);
1505: fa_debug_pkg.add(l_calling_fn, '++++ cpd_ctr', cpd_ctr, p_log_level_rec => p_log_level_rec);
1506: fa_debug_pkg.add(l_calling_fn, '++++ adj_row.distribution_id', adj_row.distribution_id, p_log_level_rec => p_log_level_rec);
1507: fa_debug_pkg.add(l_calling_fn, '++++ adj_row.source_type_code', adj_row.source_type_code, p_log_level_rec => p_log_level_rec);
1508: fa_debug_pkg.add(l_calling_fn, '++++ l_adj_type', l_adj_type, p_log_level_rec => p_log_level_rec);
1501:
1502: if (p_log_level_rec.statement_level) then
1503: fa_debug_pkg.add(l_calling_fn, '++++ ret.th_id_in', ret.th_id_in, p_log_level_rec => p_log_level_rec);
1504: fa_debug_pkg.add(l_calling_fn, '++++ ret.book', ret.book, p_log_level_rec => p_log_level_rec);
1505: fa_debug_pkg.add(l_calling_fn, '++++ cpd_ctr', cpd_ctr, p_log_level_rec => p_log_level_rec);
1506: fa_debug_pkg.add(l_calling_fn, '++++ adj_row.distribution_id', adj_row.distribution_id, p_log_level_rec => p_log_level_rec);
1507: fa_debug_pkg.add(l_calling_fn, '++++ adj_row.source_type_code', adj_row.source_type_code, p_log_level_rec => p_log_level_rec);
1508: fa_debug_pkg.add(l_calling_fn, '++++ l_adj_type', l_adj_type, p_log_level_rec => p_log_level_rec);
1509: fa_debug_pkg.add(l_calling_fn, '++ l_dist_cost', l_dist_cost, p_log_level_rec => p_log_level_rec);
1502: if (p_log_level_rec.statement_level) then
1503: fa_debug_pkg.add(l_calling_fn, '++++ ret.th_id_in', ret.th_id_in, p_log_level_rec => p_log_level_rec);
1504: fa_debug_pkg.add(l_calling_fn, '++++ ret.book', ret.book, p_log_level_rec => p_log_level_rec);
1505: fa_debug_pkg.add(l_calling_fn, '++++ cpd_ctr', cpd_ctr, p_log_level_rec => p_log_level_rec);
1506: fa_debug_pkg.add(l_calling_fn, '++++ adj_row.distribution_id', adj_row.distribution_id, p_log_level_rec => p_log_level_rec);
1507: fa_debug_pkg.add(l_calling_fn, '++++ adj_row.source_type_code', adj_row.source_type_code, p_log_level_rec => p_log_level_rec);
1508: fa_debug_pkg.add(l_calling_fn, '++++ l_adj_type', l_adj_type, p_log_level_rec => p_log_level_rec);
1509: fa_debug_pkg.add(l_calling_fn, '++ l_dist_cost', l_dist_cost, p_log_level_rec => p_log_level_rec);
1510: fa_debug_pkg.add(l_calling_fn, '++ l_dist_reserve', l_dist_reserve, p_log_level_rec => p_log_level_rec);
1503: fa_debug_pkg.add(l_calling_fn, '++++ ret.th_id_in', ret.th_id_in, p_log_level_rec => p_log_level_rec);
1504: fa_debug_pkg.add(l_calling_fn, '++++ ret.book', ret.book, p_log_level_rec => p_log_level_rec);
1505: fa_debug_pkg.add(l_calling_fn, '++++ cpd_ctr', cpd_ctr, p_log_level_rec => p_log_level_rec);
1506: fa_debug_pkg.add(l_calling_fn, '++++ adj_row.distribution_id', adj_row.distribution_id, p_log_level_rec => p_log_level_rec);
1507: fa_debug_pkg.add(l_calling_fn, '++++ adj_row.source_type_code', adj_row.source_type_code, p_log_level_rec => p_log_level_rec);
1508: fa_debug_pkg.add(l_calling_fn, '++++ l_adj_type', l_adj_type, p_log_level_rec => p_log_level_rec);
1509: fa_debug_pkg.add(l_calling_fn, '++ l_dist_cost', l_dist_cost, p_log_level_rec => p_log_level_rec);
1510: fa_debug_pkg.add(l_calling_fn, '++ l_dist_reserve', l_dist_reserve, p_log_level_rec => p_log_level_rec);
1511: fa_debug_pkg.add(l_calling_fn, '++ l_dist_imp_rsv', l_dist_imp_rsv, p_log_level_rec => p_log_level_rec);
1504: fa_debug_pkg.add(l_calling_fn, '++++ ret.book', ret.book, p_log_level_rec => p_log_level_rec);
1505: fa_debug_pkg.add(l_calling_fn, '++++ cpd_ctr', cpd_ctr, p_log_level_rec => p_log_level_rec);
1506: fa_debug_pkg.add(l_calling_fn, '++++ adj_row.distribution_id', adj_row.distribution_id, p_log_level_rec => p_log_level_rec);
1507: fa_debug_pkg.add(l_calling_fn, '++++ adj_row.source_type_code', adj_row.source_type_code, p_log_level_rec => p_log_level_rec);
1508: fa_debug_pkg.add(l_calling_fn, '++++ l_adj_type', l_adj_type, p_log_level_rec => p_log_level_rec);
1509: fa_debug_pkg.add(l_calling_fn, '++ l_dist_cost', l_dist_cost, p_log_level_rec => p_log_level_rec);
1510: fa_debug_pkg.add(l_calling_fn, '++ l_dist_reserve', l_dist_reserve, p_log_level_rec => p_log_level_rec);
1511: fa_debug_pkg.add(l_calling_fn, '++ l_dist_imp_rsv', l_dist_imp_rsv, p_log_level_rec => p_log_level_rec);
1512: end if;
1505: fa_debug_pkg.add(l_calling_fn, '++++ cpd_ctr', cpd_ctr, p_log_level_rec => p_log_level_rec);
1506: fa_debug_pkg.add(l_calling_fn, '++++ adj_row.distribution_id', adj_row.distribution_id, p_log_level_rec => p_log_level_rec);
1507: fa_debug_pkg.add(l_calling_fn, '++++ adj_row.source_type_code', adj_row.source_type_code, p_log_level_rec => p_log_level_rec);
1508: fa_debug_pkg.add(l_calling_fn, '++++ l_adj_type', l_adj_type, p_log_level_rec => p_log_level_rec);
1509: fa_debug_pkg.add(l_calling_fn, '++ l_dist_cost', l_dist_cost, p_log_level_rec => p_log_level_rec);
1510: fa_debug_pkg.add(l_calling_fn, '++ l_dist_reserve', l_dist_reserve, p_log_level_rec => p_log_level_rec);
1511: fa_debug_pkg.add(l_calling_fn, '++ l_dist_imp_rsv', l_dist_imp_rsv, p_log_level_rec => p_log_level_rec);
1512: end if;
1513:
1506: fa_debug_pkg.add(l_calling_fn, '++++ adj_row.distribution_id', adj_row.distribution_id, p_log_level_rec => p_log_level_rec);
1507: fa_debug_pkg.add(l_calling_fn, '++++ adj_row.source_type_code', adj_row.source_type_code, p_log_level_rec => p_log_level_rec);
1508: fa_debug_pkg.add(l_calling_fn, '++++ l_adj_type', l_adj_type, p_log_level_rec => p_log_level_rec);
1509: fa_debug_pkg.add(l_calling_fn, '++ l_dist_cost', l_dist_cost, p_log_level_rec => p_log_level_rec);
1510: fa_debug_pkg.add(l_calling_fn, '++ l_dist_reserve', l_dist_reserve, p_log_level_rec => p_log_level_rec);
1511: fa_debug_pkg.add(l_calling_fn, '++ l_dist_imp_rsv', l_dist_imp_rsv, p_log_level_rec => p_log_level_rec);
1512: end if;
1513:
1514: --commented for bug 3519644
1507: fa_debug_pkg.add(l_calling_fn, '++++ adj_row.source_type_code', adj_row.source_type_code, p_log_level_rec => p_log_level_rec);
1508: fa_debug_pkg.add(l_calling_fn, '++++ l_adj_type', l_adj_type, p_log_level_rec => p_log_level_rec);
1509: fa_debug_pkg.add(l_calling_fn, '++ l_dist_cost', l_dist_cost, p_log_level_rec => p_log_level_rec);
1510: fa_debug_pkg.add(l_calling_fn, '++ l_dist_reserve', l_dist_reserve, p_log_level_rec => p_log_level_rec);
1511: fa_debug_pkg.add(l_calling_fn, '++ l_dist_imp_rsv', l_dist_imp_rsv, p_log_level_rec => p_log_level_rec);
1512: end if;
1513:
1514: --commented for bug 3519644
1515: --adj_row.adjustment_amount := l_dist_cost - l_dist_reserve;
1514: --commented for bug 3519644
1515: --adj_row.adjustment_amount := l_dist_cost - l_dist_reserve;
1516:
1517: if (p_log_level_rec.statement_level) then
1518: fa_debug_pkg.add(fname => l_calling_fn,
1519: element => '+++ loop_counter',
1520: value => loop_counter, p_log_level_rec => p_log_level_rec);
1521: fa_debug_pkg.add(fname => l_calling_fn,
1522: element => '+++ tot_dist_lines',
1517: if (p_log_level_rec.statement_level) then
1518: fa_debug_pkg.add(fname => l_calling_fn,
1519: element => '+++ loop_counter',
1520: value => loop_counter, p_log_level_rec => p_log_level_rec);
1521: fa_debug_pkg.add(fname => l_calling_fn,
1522: element => '+++ tot_dist_lines',
1523: value => tot_dist_lines, p_log_level_rec => p_log_level_rec);
1524: end if;
1525:
1537:
1538: /* bug 3519644 */
1539:
1540: if (p_log_level_rec.statement_level) then
1541: fa_debug_pkg.add(fname => l_calling_fn,
1542: element => '+++adjustment_amount for NBV retired',
1543: value => adj_row.adjustment_amount, p_log_level_rec => p_log_level_rec);
1544: end if;
1545:
1567: adj_row.account := fa_cache_pkg.fazccb_record.capital_adj_acct;
1568: adj_row.debit_credit_flag := 'DR';
1569:
1570: if (p_log_level_rec.statement_level) then
1571: fa_debug_pkg.add(l_calling_fn,'Calling faxinaj for ', 'Retirement
1572: - Capital Adjustment', p_log_level_rec => p_log_level_rec);
1573: end if;
1574:
1575: if not FA_INS_ADJUST_PKG.faxinaj (adj_row,
1588: adj_row.account := fa_cache_pkg.fazccb_record.general_fund_acct;
1589: adj_row.debit_credit_flag := 'CR';
1590:
1591: if (p_log_level_rec.statement_level) then
1592: fa_debug_pkg.add(l_calling_fn,'Calling faxinaj for ', 'Retirement
1593: - General Fund Balance', p_log_level_rec => p_log_level_rec);
1594: end if;
1595:
1596: if not FA_INS_ADJUST_PKG.faxinaj (adj_row,
1745: adj_row.mrc_sob_type_code := ret.mrc_sob_type_code;
1746: adj_row.set_of_books_id := ret.set_of_books_id;
1747:
1748: if p_log_level_rec.statement_level then
1749: fa_debug_pkg.add
1750: (fname => 'fagurt',
1751: element => '+++ before faxinaj for REVAL_RSV_RETIRED_GAIN_ACCT',
1752: value => adj_row.selection_mode, p_log_level_rec => p_log_level_rec);
1753: end if;
1775: adj_row.leveling_flag := l_prev_leveling_flag;
1776: end if;
1777:
1778: if p_log_level_rec.statement_level then
1779: fa_debug_pkg.add
1780: (fname => 'fagurt',
1781: element => '+++ before faxinaj for REVAL_RSV_RETIRED_GAIN_ACCT',
1782: value => '', p_log_level_rec => p_log_level_rec);
1783: end if;
1995: h_ret_id := ret.retirement_id;
1996: h_book := ret.book;
1997:
1998: if p_log_level_rec.statement_level then
1999: fa_debug_pkg.add
2000: (fname => l_calling_fn,
2001: element => 'acct segment in fagpct',
2002: value => '', p_log_level_rec => p_log_level_rec);
2003: end if;
2045: adj_row.adjustment_type := 'COST';
2046: adj_row.adjustment_amount := ret.cost_retired;
2047:
2048: if p_log_level_rec.statement_level then
2049: fa_debug_pkg.add
2050: (fname => l_calling_fn,
2051: element => 'fagpct: ret.units_retired(1)',
2052: value => ret.units_retired);
2053: end if;
2082:
2083: end if;
2084:
2085: if p_log_level_rec.statement_level then
2086: fa_debug_pkg.add(l_calling_fn, '++ bk.book_class (TRUE=TAX)', bk.book_class);
2087: fa_debug_pkg.add(l_calling_fn, '++ ret.th_id_in', ret.th_id_in, p_log_level_rec => p_log_level_rec);
2088: fa_debug_pkg.add(l_calling_fn, '++ h_id_out=th_id_out_in_corp', h_id_out, p_log_level_rec => p_log_level_rec);
2089: fa_debug_pkg.add(l_calling_fn, '++ adj_row.selection_thid', adj_row.selection_thid, p_log_level_rec => p_log_level_rec);
2090: end if;
2083: end if;
2084:
2085: if p_log_level_rec.statement_level then
2086: fa_debug_pkg.add(l_calling_fn, '++ bk.book_class (TRUE=TAX)', bk.book_class);
2087: fa_debug_pkg.add(l_calling_fn, '++ ret.th_id_in', ret.th_id_in, p_log_level_rec => p_log_level_rec);
2088: fa_debug_pkg.add(l_calling_fn, '++ h_id_out=th_id_out_in_corp', h_id_out, p_log_level_rec => p_log_level_rec);
2089: fa_debug_pkg.add(l_calling_fn, '++ adj_row.selection_thid', adj_row.selection_thid, p_log_level_rec => p_log_level_rec);
2090: end if;
2091:
2084:
2085: if p_log_level_rec.statement_level then
2086: fa_debug_pkg.add(l_calling_fn, '++ bk.book_class (TRUE=TAX)', bk.book_class);
2087: fa_debug_pkg.add(l_calling_fn, '++ ret.th_id_in', ret.th_id_in, p_log_level_rec => p_log_level_rec);
2088: fa_debug_pkg.add(l_calling_fn, '++ h_id_out=th_id_out_in_corp', h_id_out, p_log_level_rec => p_log_level_rec);
2089: fa_debug_pkg.add(l_calling_fn, '++ adj_row.selection_thid', adj_row.selection_thid, p_log_level_rec => p_log_level_rec);
2090: end if;
2091:
2092: adj_row.mrc_sob_type_code := ret.mrc_sob_type_code;
2085: if p_log_level_rec.statement_level then
2086: fa_debug_pkg.add(l_calling_fn, '++ bk.book_class (TRUE=TAX)', bk.book_class);
2087: fa_debug_pkg.add(l_calling_fn, '++ ret.th_id_in', ret.th_id_in, p_log_level_rec => p_log_level_rec);
2088: fa_debug_pkg.add(l_calling_fn, '++ h_id_out=th_id_out_in_corp', h_id_out, p_log_level_rec => p_log_level_rec);
2089: fa_debug_pkg.add(l_calling_fn, '++ adj_row.selection_thid', adj_row.selection_thid, p_log_level_rec => p_log_level_rec);
2090: end if;
2091:
2092: adj_row.mrc_sob_type_code := ret.mrc_sob_type_code;
2093: adj_row.set_of_books_id := ret.set_of_books_id;
2624: l_overlap_ret boolean := FALSE; /* Bug#15909667 */
2625:
2626: BEGIN <
2627:
2628: if p_log_level_rec.statement_level then fa_debug_pkg.add(l_calling_fn, 'in farboe', '', p_log_level_rec => p_log_level_rec); end if;
2629:
2630: if (p_log_level_rec.statement_level) then
2631: fa_debug_pkg.add('farboe','IN FARBOE',1, p_log_level_rec => p_log_level_rec);
2632: fa_debug_pkg.add('farboe','start_pp',start_pp, p_log_level_rec => p_log_level_rec);
2627:
2628: if p_log_level_rec.statement_level then fa_debug_pkg.add(l_calling_fn, 'in farboe', '', p_log_level_rec => p_log_level_rec); end if;
2629:
2630: if (p_log_level_rec.statement_level) then
2631: fa_debug_pkg.add('farboe','IN FARBOE',1, p_log_level_rec => p_log_level_rec);
2632: fa_debug_pkg.add('farboe','start_pp',start_pp, p_log_level_rec => p_log_level_rec);
2633: fa_debug_pkg.add('farboe','end_pp',end_pp, p_log_level_rec => p_log_level_rec);
2634: fa_debug_pkg.add('farboe','pds_catchup',pds_catchup, p_log_level_rec => p_log_level_rec);
2635: end if;
2628: if p_log_level_rec.statement_level then fa_debug_pkg.add(l_calling_fn, 'in farboe', '', p_log_level_rec => p_log_level_rec); end if;
2629:
2630: if (p_log_level_rec.statement_level) then
2631: fa_debug_pkg.add('farboe','IN FARBOE',1, p_log_level_rec => p_log_level_rec);
2632: fa_debug_pkg.add('farboe','start_pp',start_pp, p_log_level_rec => p_log_level_rec);
2633: fa_debug_pkg.add('farboe','end_pp',end_pp, p_log_level_rec => p_log_level_rec);
2634: fa_debug_pkg.add('farboe','pds_catchup',pds_catchup, p_log_level_rec => p_log_level_rec);
2635: end if;
2636:
2629:
2630: if (p_log_level_rec.statement_level) then
2631: fa_debug_pkg.add('farboe','IN FARBOE',1, p_log_level_rec => p_log_level_rec);
2632: fa_debug_pkg.add('farboe','start_pp',start_pp, p_log_level_rec => p_log_level_rec);
2633: fa_debug_pkg.add('farboe','end_pp',end_pp, p_log_level_rec => p_log_level_rec);
2634: fa_debug_pkg.add('farboe','pds_catchup',pds_catchup, p_log_level_rec => p_log_level_rec);
2635: end if;
2636:
2637: tot_backup_deprn := 0;
2630: if (p_log_level_rec.statement_level) then
2631: fa_debug_pkg.add('farboe','IN FARBOE',1, p_log_level_rec => p_log_level_rec);
2632: fa_debug_pkg.add('farboe','start_pp',start_pp, p_log_level_rec => p_log_level_rec);
2633: fa_debug_pkg.add('farboe','end_pp',end_pp, p_log_level_rec => p_log_level_rec);
2634: fa_debug_pkg.add('farboe','pds_catchup',pds_catchup, p_log_level_rec => p_log_level_rec);
2635: end if;
2636:
2637: tot_backup_deprn := 0;
2638: backup_deprn := 0;
2664: h_Brow_deprn_reserve := 0; -- bug 5443855
2665: h_fiscal_year_name := fiscal_year_name; -- Bug 9311291
2666:
2667: if (p_log_level_rec.statement_level) then
2668: fa_debug_pkg.add('farboe','h_start_pdnum',h_start_pdnum, p_log_level_rec => p_log_level_rec);
2669: fa_debug_pkg.add('farboe','h_end_pdnum',h_end_pdnum, p_log_level_rec => p_log_level_rec);
2670: end if;
2671:
2672:
2665: h_fiscal_year_name := fiscal_year_name; -- Bug 9311291
2666:
2667: if (p_log_level_rec.statement_level) then
2668: fa_debug_pkg.add('farboe','h_start_pdnum',h_start_pdnum, p_log_level_rec => p_log_level_rec);
2669: fa_debug_pkg.add('farboe','h_end_pdnum',h_end_pdnum, p_log_level_rec => p_log_level_rec);
2670: end if;
2671:
2672:
2673: expand_array := 2;
2729: h_i := i;
2730: prev_dist_id := 0;
2731:
2732: if (p_log_level_rec.statement_level) then
2733: fa_debug_pkg.add('farboe','backing out pd',h_i, p_log_level_rec => p_log_level_rec);
2734: fa_debug_pkg.add('farboe','h_asset_id',h_asset_id, p_log_level_rec => p_log_level_rec);
2735: fa_debug_pkg.add('farboe','h_book',h_book, p_log_level_rec => p_log_level_rec);
2736: fa_debug_pkg.add('farboe','h_adj_type',h_adj_type, p_log_level_rec => p_log_level_rec);
2737: fa_debug_pkg.add('farboe','h_current_fiscal_yr',h_current_fiscal_yr, p_log_level_rec => p_log_level_rec);
2730: prev_dist_id := 0;
2731:
2732: if (p_log_level_rec.statement_level) then
2733: fa_debug_pkg.add('farboe','backing out pd',h_i, p_log_level_rec => p_log_level_rec);
2734: fa_debug_pkg.add('farboe','h_asset_id',h_asset_id, p_log_level_rec => p_log_level_rec);
2735: fa_debug_pkg.add('farboe','h_book',h_book, p_log_level_rec => p_log_level_rec);
2736: fa_debug_pkg.add('farboe','h_adj_type',h_adj_type, p_log_level_rec => p_log_level_rec);
2737: fa_debug_pkg.add('farboe','h_current_fiscal_yr',h_current_fiscal_yr, p_log_level_rec => p_log_level_rec);
2738: fa_debug_pkg.add('farboe','h_cpd_ctr',h_cpd_ctr, p_log_level_rec => p_log_level_rec);
2731:
2732: if (p_log_level_rec.statement_level) then
2733: fa_debug_pkg.add('farboe','backing out pd',h_i, p_log_level_rec => p_log_level_rec);
2734: fa_debug_pkg.add('farboe','h_asset_id',h_asset_id, p_log_level_rec => p_log_level_rec);
2735: fa_debug_pkg.add('farboe','h_book',h_book, p_log_level_rec => p_log_level_rec);
2736: fa_debug_pkg.add('farboe','h_adj_type',h_adj_type, p_log_level_rec => p_log_level_rec);
2737: fa_debug_pkg.add('farboe','h_current_fiscal_yr',h_current_fiscal_yr, p_log_level_rec => p_log_level_rec);
2738: fa_debug_pkg.add('farboe','h_cpd_ctr',h_cpd_ctr, p_log_level_rec => p_log_level_rec);
2739: fa_debug_pkg.add('farboe','h_i',h_i, p_log_level_rec => p_log_level_rec);
2732: if (p_log_level_rec.statement_level) then
2733: fa_debug_pkg.add('farboe','backing out pd',h_i, p_log_level_rec => p_log_level_rec);
2734: fa_debug_pkg.add('farboe','h_asset_id',h_asset_id, p_log_level_rec => p_log_level_rec);
2735: fa_debug_pkg.add('farboe','h_book',h_book, p_log_level_rec => p_log_level_rec);
2736: fa_debug_pkg.add('farboe','h_adj_type',h_adj_type, p_log_level_rec => p_log_level_rec);
2737: fa_debug_pkg.add('farboe','h_current_fiscal_yr',h_current_fiscal_yr, p_log_level_rec => p_log_level_rec);
2738: fa_debug_pkg.add('farboe','h_cpd_ctr',h_cpd_ctr, p_log_level_rec => p_log_level_rec);
2739: fa_debug_pkg.add('farboe','h_i',h_i, p_log_level_rec => p_log_level_rec);
2740: end if;
2733: fa_debug_pkg.add('farboe','backing out pd',h_i, p_log_level_rec => p_log_level_rec);
2734: fa_debug_pkg.add('farboe','h_asset_id',h_asset_id, p_log_level_rec => p_log_level_rec);
2735: fa_debug_pkg.add('farboe','h_book',h_book, p_log_level_rec => p_log_level_rec);
2736: fa_debug_pkg.add('farboe','h_adj_type',h_adj_type, p_log_level_rec => p_log_level_rec);
2737: fa_debug_pkg.add('farboe','h_current_fiscal_yr',h_current_fiscal_yr, p_log_level_rec => p_log_level_rec);
2738: fa_debug_pkg.add('farboe','h_cpd_ctr',h_cpd_ctr, p_log_level_rec => p_log_level_rec);
2739: fa_debug_pkg.add('farboe','h_i',h_i, p_log_level_rec => p_log_level_rec);
2740: end if;
2741:
2734: fa_debug_pkg.add('farboe','h_asset_id',h_asset_id, p_log_level_rec => p_log_level_rec);
2735: fa_debug_pkg.add('farboe','h_book',h_book, p_log_level_rec => p_log_level_rec);
2736: fa_debug_pkg.add('farboe','h_adj_type',h_adj_type, p_log_level_rec => p_log_level_rec);
2737: fa_debug_pkg.add('farboe','h_current_fiscal_yr',h_current_fiscal_yr, p_log_level_rec => p_log_level_rec);
2738: fa_debug_pkg.add('farboe','h_cpd_ctr',h_cpd_ctr, p_log_level_rec => p_log_level_rec);
2739: fa_debug_pkg.add('farboe','h_i',h_i, p_log_level_rec => p_log_level_rec);
2740: end if;
2741:
2742: if mrc_sob_type_code <> 'R' then
2735: fa_debug_pkg.add('farboe','h_book',h_book, p_log_level_rec => p_log_level_rec);
2736: fa_debug_pkg.add('farboe','h_adj_type',h_adj_type, p_log_level_rec => p_log_level_rec);
2737: fa_debug_pkg.add('farboe','h_current_fiscal_yr',h_current_fiscal_yr, p_log_level_rec => p_log_level_rec);
2738: fa_debug_pkg.add('farboe','h_cpd_ctr',h_cpd_ctr, p_log_level_rec => p_log_level_rec);
2739: fa_debug_pkg.add('farboe','h_i',h_i, p_log_level_rec => p_log_level_rec);
2740: end if;
2741:
2742: if mrc_sob_type_code <> 'R' then
2743: open DEPRN_ADJ;
2746: end if;
2747:
2748:
2749: if (p_log_level_rec.statement_level) then
2750: fa_debug_pkg.add('farboe','after open deprn_adj',1, p_log_level_rec => p_log_level_rec);
2751: end if;
2752:
2753: /* Get the number of adjustments in period being backed out
2754: Fix for 807256 */
2851: --while deprn_adj%FOUND loop
2852: loop
2853:
2854: if (p_log_level_rec.statement_level) then
2855: fa_debug_pkg.add('farboe','top of while loop',1, p_log_level_rec => p_log_level_rec);
2856: end if;
2857:
2858: h_adj_amount := 0;
2859: h_deprn_amount := 0;
2976: fa_srvr_msg.add_message(calling_fn => l_calling_fn, p_log_level_rec => p_log_level_rec);
2977: raise farboe_err;
2978: end if;
2979: if p_log_level_rec.statement_level then
2980: fa_debug_pkg.add('farboe','l_same_year',l_same_year, p_log_level_rec => p_log_level_rec);
2981: fa_debug_pkg.add('farboe',' deprn_start_pnum',deprn_start_pnum, p_log_level_rec => p_log_level_rec);
2982: fa_debug_pkg.add('farboe',' deprn_start_pnum',deprn_start_dp_num, p_log_level_rec => p_log_level_rec);
2983: end if;
2984: if l_same_year = 'Y' then
2977: raise farboe_err;
2978: end if;
2979: if p_log_level_rec.statement_level then
2980: fa_debug_pkg.add('farboe','l_same_year',l_same_year, p_log_level_rec => p_log_level_rec);
2981: fa_debug_pkg.add('farboe',' deprn_start_pnum',deprn_start_pnum, p_log_level_rec => p_log_level_rec);
2982: fa_debug_pkg.add('farboe',' deprn_start_pnum',deprn_start_dp_num, p_log_level_rec => p_log_level_rec);
2983: end if;
2984: if l_same_year = 'Y' then
2985: if p_pers_per_yr = 365 then
2978: end if;
2979: if p_log_level_rec.statement_level then
2980: fa_debug_pkg.add('farboe','l_same_year',l_same_year, p_log_level_rec => p_log_level_rec);
2981: fa_debug_pkg.add('farboe',' deprn_start_pnum',deprn_start_pnum, p_log_level_rec => p_log_level_rec);
2982: fa_debug_pkg.add('farboe',' deprn_start_pnum',deprn_start_dp_num, p_log_level_rec => p_log_level_rec);
2983: end if;
2984: if l_same_year = 'Y' then
2985: if p_pers_per_yr = 365 then
2986:
3064: end if; -- if l_same_year = 'Y'
3065: end if;
3066:
3067: if p_log_level_rec.statement_level then
3068: fa_debug_pkg.add
3069: (fname => l_calling_fn,
3070: element => 'h_ytd_deprn (Fix for 3558253 and 3518604)',
3071: value => h_ytd_deprn);
3072: fa_debug_pkg.add
3068: fa_debug_pkg.add
3069: (fname => l_calling_fn,
3070: element => 'h_ytd_deprn (Fix for 3558253 and 3518604)',
3071: value => h_ytd_deprn);
3072: fa_debug_pkg.add
3073: (fname => l_calling_fn,
3074: element => 'h_pd_num',
3075: value => h_pd_num, p_log_level_rec => p_log_level_rec);
3076: fa_debug_pkg.add
3072: fa_debug_pkg.add
3073: (fname => l_calling_fn,
3074: element => 'h_pd_num',
3075: value => h_pd_num, p_log_level_rec => p_log_level_rec);
3076: fa_debug_pkg.add
3077: (fname => l_calling_fn,
3078: element => 'h_start_pdnum',
3079: value => h_start_pdnum, p_log_level_rec => p_log_level_rec);
3080: fa_debug_pkg.add
3076: fa_debug_pkg.add
3077: (fname => l_calling_fn,
3078: element => 'h_start_pdnum',
3079: value => h_start_pdnum, p_log_level_rec => p_log_level_rec);
3080: fa_debug_pkg.add
3081: (fname => l_calling_fn,
3082: element => 'h_cost_frac',
3083: value => h_cost_frac, p_log_level_rec => p_log_level_rec);
3084: fa_debug_pkg.add
3080: fa_debug_pkg.add
3081: (fname => l_calling_fn,
3082: element => 'h_cost_frac',
3083: value => h_cost_frac, p_log_level_rec => p_log_level_rec);
3084: fa_debug_pkg.add
3085: (fname => l_calling_fn,
3086: element => 'h_temp_deprn_tot',
3087: value => h_temp_deprn_tot, p_log_level_rec => p_log_level_rec);
3088: end if;
3203: fa_srvr_msg.add_message(calling_fn => l_calling_fn);
3204: raise farboe_err;
3205: end if;
3206: if p_log_level_rec.statement_level then
3207: fa_debug_pkg.add('farboe','l_same_year',l_same_year);
3208: fa_debug_pkg.add('farboe',' deprn_start_pnum',deprn_start_pnum);
3209: fa_debug_pkg.add('farboe',' deprn_start_pnum',deprn_start_dp_num);
3210: end if;
3211: if l_same_year = 'Y' then
3204: raise farboe_err;
3205: end if;
3206: if p_log_level_rec.statement_level then
3207: fa_debug_pkg.add('farboe','l_same_year',l_same_year);
3208: fa_debug_pkg.add('farboe',' deprn_start_pnum',deprn_start_pnum);
3209: fa_debug_pkg.add('farboe',' deprn_start_pnum',deprn_start_dp_num);
3210: end if;
3211: if l_same_year = 'Y' then
3212: if p_pers_per_yr = 365 then
3205: end if;
3206: if p_log_level_rec.statement_level then
3207: fa_debug_pkg.add('farboe','l_same_year',l_same_year);
3208: fa_debug_pkg.add('farboe',' deprn_start_pnum',deprn_start_pnum);
3209: fa_debug_pkg.add('farboe',' deprn_start_pnum',deprn_start_dp_num);
3210: end if;
3211: if l_same_year = 'Y' then
3212: if p_pers_per_yr = 365 then
3213: select to_char(trunc(dp.calendar_period_open_date),'J')-
3265: end if; -- if l_same_year = 'Y'
3266: end if;
3267:
3268: if p_log_level_rec.statement_level then
3269: fa_debug_pkg.add
3270: (fname => l_calling_fn,
3271: element => 'h_ytd_deprn (Fix for 3558253 and 3518604)',
3272: value => h_ytd_deprn);
3273: fa_debug_pkg.add
3269: fa_debug_pkg.add
3270: (fname => l_calling_fn,
3271: element => 'h_ytd_deprn (Fix for 3558253 and 3518604)',
3272: value => h_ytd_deprn);
3273: fa_debug_pkg.add
3274: (fname => l_calling_fn,
3275: element => 'h_pd_num',
3276: value => h_pd_num);
3277: fa_debug_pkg.add
3273: fa_debug_pkg.add
3274: (fname => l_calling_fn,
3275: element => 'h_pd_num',
3276: value => h_pd_num);
3277: fa_debug_pkg.add
3278: (fname => l_calling_fn,
3279: element => 'h_start_pdnum',
3280: value => h_start_pdnum);
3281: fa_debug_pkg.add
3277: fa_debug_pkg.add
3278: (fname => l_calling_fn,
3279: element => 'h_start_pdnum',
3280: value => h_start_pdnum);
3281: fa_debug_pkg.add
3282: (fname => l_calling_fn,
3283: element => 'h_cost_frac',
3284: value => h_cost_frac);
3285: fa_debug_pkg.add
3281: fa_debug_pkg.add
3282: (fname => l_calling_fn,
3283: element => 'h_cost_frac',
3284: value => h_cost_frac);
3285: fa_debug_pkg.add
3286: (fname => l_calling_fn,
3287: element => 'h_temp_deprn_tot',
3288: value => h_temp_deprn_tot);
3289: end if;
3343:
3344: if h_annual_adj_check <> 0 then
3345:
3346: if p_log_level_rec.statement_level then
3347: fa_debug_pkg.add('farboe','Annualized Adj Logic','Starts', p_log_level_rec => p_log_level_rec);
3348: fa_debug_pkg.add('farboe','d_cal',d_cal, p_log_level_rec => p_log_level_rec);
3349: fa_debug_pkg.add('farboe','bk.prorate_date',bk.prorate_date, p_log_level_rec => p_log_level_rec);
3350: fa_debug_pkg.add('farboe','h_fiscal_year_name',h_fiscal_year_name, p_log_level_rec => p_log_level_rec);
3351: fa_debug_pkg.add('farboe','pds_per_year',pds_per_year, p_log_level_rec => p_log_level_rec);
3344: if h_annual_adj_check <> 0 then
3345:
3346: if p_log_level_rec.statement_level then
3347: fa_debug_pkg.add('farboe','Annualized Adj Logic','Starts', p_log_level_rec => p_log_level_rec);
3348: fa_debug_pkg.add('farboe','d_cal',d_cal, p_log_level_rec => p_log_level_rec);
3349: fa_debug_pkg.add('farboe','bk.prorate_date',bk.prorate_date, p_log_level_rec => p_log_level_rec);
3350: fa_debug_pkg.add('farboe','h_fiscal_year_name',h_fiscal_year_name, p_log_level_rec => p_log_level_rec);
3351: fa_debug_pkg.add('farboe','pds_per_year',pds_per_year, p_log_level_rec => p_log_level_rec);
3352: end if;
3345:
3346: if p_log_level_rec.statement_level then
3347: fa_debug_pkg.add('farboe','Annualized Adj Logic','Starts', p_log_level_rec => p_log_level_rec);
3348: fa_debug_pkg.add('farboe','d_cal',d_cal, p_log_level_rec => p_log_level_rec);
3349: fa_debug_pkg.add('farboe','bk.prorate_date',bk.prorate_date, p_log_level_rec => p_log_level_rec);
3350: fa_debug_pkg.add('farboe','h_fiscal_year_name',h_fiscal_year_name, p_log_level_rec => p_log_level_rec);
3351: fa_debug_pkg.add('farboe','pds_per_year',pds_per_year, p_log_level_rec => p_log_level_rec);
3352: end if;
3353:
3346: if p_log_level_rec.statement_level then
3347: fa_debug_pkg.add('farboe','Annualized Adj Logic','Starts', p_log_level_rec => p_log_level_rec);
3348: fa_debug_pkg.add('farboe','d_cal',d_cal, p_log_level_rec => p_log_level_rec);
3349: fa_debug_pkg.add('farboe','bk.prorate_date',bk.prorate_date, p_log_level_rec => p_log_level_rec);
3350: fa_debug_pkg.add('farboe','h_fiscal_year_name',h_fiscal_year_name, p_log_level_rec => p_log_level_rec);
3351: fa_debug_pkg.add('farboe','pds_per_year',pds_per_year, p_log_level_rec => p_log_level_rec);
3352: end if;
3353:
3354: BEGIN
3347: fa_debug_pkg.add('farboe','Annualized Adj Logic','Starts', p_log_level_rec => p_log_level_rec);
3348: fa_debug_pkg.add('farboe','d_cal',d_cal, p_log_level_rec => p_log_level_rec);
3349: fa_debug_pkg.add('farboe','bk.prorate_date',bk.prorate_date, p_log_level_rec => p_log_level_rec);
3350: fa_debug_pkg.add('farboe','h_fiscal_year_name',h_fiscal_year_name, p_log_level_rec => p_log_level_rec);
3351: fa_debug_pkg.add('farboe','pds_per_year',pds_per_year, p_log_level_rec => p_log_level_rec);
3352: end if;
3353:
3354: BEGIN
3355:
3378: end if;
3379: end if;
3380:
3381: if p_log_level_rec.statement_level then
3382: fa_debug_pkg.add('farboe','l_num_d_periods',l_num_d_periods, p_log_level_rec => p_log_level_rec);
3383: fa_debug_pkg.add('farboe','h_annualized_adj',h_annualized_adj, p_log_level_rec => p_log_level_rec);
3384: end if;
3385: end if;
3386: end if;
3379: end if;
3380:
3381: if p_log_level_rec.statement_level then
3382: fa_debug_pkg.add('farboe','l_num_d_periods',l_num_d_periods, p_log_level_rec => p_log_level_rec);
3383: fa_debug_pkg.add('farboe','h_annualized_adj',h_annualized_adj, p_log_level_rec => p_log_level_rec);
3384: end if;
3385: end if;
3386: end if;
3387:
3386: end if;
3387:
3388:
3389: if p_log_level_rec.statement_level then
3390: fa_debug_pkg.add
3391: (fname => l_calling_fn,
3392: element => 'deprn and adj',
3393: value => '', p_log_level_rec => p_log_level_rec);
3394: fa_debug_pkg.add('farboe','deprn_adjFOUND',1, p_log_level_rec => p_log_level_rec);
3390: fa_debug_pkg.add
3391: (fname => l_calling_fn,
3392: element => 'deprn and adj',
3393: value => '', p_log_level_rec => p_log_level_rec);
3394: fa_debug_pkg.add('farboe','deprn_adjFOUND',1, p_log_level_rec => p_log_level_rec);
3395: fa_debug_pkg.add('farboe','h_deprn_amount',h_deprn_amount, p_log_level_rec => p_log_level_rec);
3396: fa_debug_pkg.add('farboe','h_adj_amount',h_adj_amount, p_log_level_rec => p_log_level_rec);
3397: fa_debug_pkg.add('farboe','h_currpd_amount',h_currpd_amount, p_log_level_rec => p_log_level_rec);
3398: fa_debug_pkg.add('farboe','h_net_deprn_amount',h_net_deprn_amount, p_log_level_rec => p_log_level_rec);
3391: (fname => l_calling_fn,
3392: element => 'deprn and adj',
3393: value => '', p_log_level_rec => p_log_level_rec);
3394: fa_debug_pkg.add('farboe','deprn_adjFOUND',1, p_log_level_rec => p_log_level_rec);
3395: fa_debug_pkg.add('farboe','h_deprn_amount',h_deprn_amount, p_log_level_rec => p_log_level_rec);
3396: fa_debug_pkg.add('farboe','h_adj_amount',h_adj_amount, p_log_level_rec => p_log_level_rec);
3397: fa_debug_pkg.add('farboe','h_currpd_amount',h_currpd_amount, p_log_level_rec => p_log_level_rec);
3398: fa_debug_pkg.add('farboe','h_net_deprn_amount',h_net_deprn_amount, p_log_level_rec => p_log_level_rec);
3399: fa_debug_pkg.add('farboe','h_transaction_header_id',h_transaction_header_id, p_log_level_rec => p_log_level_rec);
3392: element => 'deprn and adj',
3393: value => '', p_log_level_rec => p_log_level_rec);
3394: fa_debug_pkg.add('farboe','deprn_adjFOUND',1, p_log_level_rec => p_log_level_rec);
3395: fa_debug_pkg.add('farboe','h_deprn_amount',h_deprn_amount, p_log_level_rec => p_log_level_rec);
3396: fa_debug_pkg.add('farboe','h_adj_amount',h_adj_amount, p_log_level_rec => p_log_level_rec);
3397: fa_debug_pkg.add('farboe','h_currpd_amount',h_currpd_amount, p_log_level_rec => p_log_level_rec);
3398: fa_debug_pkg.add('farboe','h_net_deprn_amount',h_net_deprn_amount, p_log_level_rec => p_log_level_rec);
3399: fa_debug_pkg.add('farboe','h_transaction_header_id',h_transaction_header_id, p_log_level_rec => p_log_level_rec);
3400: fa_debug_pkg.add('farboe','h_annual_adj_check',h_annual_adj_check, p_log_level_rec => p_log_level_rec);
3393: value => '', p_log_level_rec => p_log_level_rec);
3394: fa_debug_pkg.add('farboe','deprn_adjFOUND',1, p_log_level_rec => p_log_level_rec);
3395: fa_debug_pkg.add('farboe','h_deprn_amount',h_deprn_amount, p_log_level_rec => p_log_level_rec);
3396: fa_debug_pkg.add('farboe','h_adj_amount',h_adj_amount, p_log_level_rec => p_log_level_rec);
3397: fa_debug_pkg.add('farboe','h_currpd_amount',h_currpd_amount, p_log_level_rec => p_log_level_rec);
3398: fa_debug_pkg.add('farboe','h_net_deprn_amount',h_net_deprn_amount, p_log_level_rec => p_log_level_rec);
3399: fa_debug_pkg.add('farboe','h_transaction_header_id',h_transaction_header_id, p_log_level_rec => p_log_level_rec);
3400: fa_debug_pkg.add('farboe','h_annual_adj_check',h_annual_adj_check, p_log_level_rec => p_log_level_rec);
3401: end if;
3394: fa_debug_pkg.add('farboe','deprn_adjFOUND',1, p_log_level_rec => p_log_level_rec);
3395: fa_debug_pkg.add('farboe','h_deprn_amount',h_deprn_amount, p_log_level_rec => p_log_level_rec);
3396: fa_debug_pkg.add('farboe','h_adj_amount',h_adj_amount, p_log_level_rec => p_log_level_rec);
3397: fa_debug_pkg.add('farboe','h_currpd_amount',h_currpd_amount, p_log_level_rec => p_log_level_rec);
3398: fa_debug_pkg.add('farboe','h_net_deprn_amount',h_net_deprn_amount, p_log_level_rec => p_log_level_rec);
3399: fa_debug_pkg.add('farboe','h_transaction_header_id',h_transaction_header_id, p_log_level_rec => p_log_level_rec);
3400: fa_debug_pkg.add('farboe','h_annual_adj_check',h_annual_adj_check, p_log_level_rec => p_log_level_rec);
3401: end if;
3402:
3395: fa_debug_pkg.add('farboe','h_deprn_amount',h_deprn_amount, p_log_level_rec => p_log_level_rec);
3396: fa_debug_pkg.add('farboe','h_adj_amount',h_adj_amount, p_log_level_rec => p_log_level_rec);
3397: fa_debug_pkg.add('farboe','h_currpd_amount',h_currpd_amount, p_log_level_rec => p_log_level_rec);
3398: fa_debug_pkg.add('farboe','h_net_deprn_amount',h_net_deprn_amount, p_log_level_rec => p_log_level_rec);
3399: fa_debug_pkg.add('farboe','h_transaction_header_id',h_transaction_header_id, p_log_level_rec => p_log_level_rec);
3400: fa_debug_pkg.add('farboe','h_annual_adj_check',h_annual_adj_check, p_log_level_rec => p_log_level_rec);
3401: end if;
3402:
3403: source_type_code := h_source_type_code;
3396: fa_debug_pkg.add('farboe','h_adj_amount',h_adj_amount, p_log_level_rec => p_log_level_rec);
3397: fa_debug_pkg.add('farboe','h_currpd_amount',h_currpd_amount, p_log_level_rec => p_log_level_rec);
3398: fa_debug_pkg.add('farboe','h_net_deprn_amount',h_net_deprn_amount, p_log_level_rec => p_log_level_rec);
3399: fa_debug_pkg.add('farboe','h_transaction_header_id',h_transaction_header_id, p_log_level_rec => p_log_level_rec);
3400: fa_debug_pkg.add('farboe','h_annual_adj_check',h_annual_adj_check, p_log_level_rec => p_log_level_rec);
3401: end if;
3402:
3403: source_type_code := h_source_type_code;
3404:
3466:
3467: end if;
3468:
3469: if (p_log_level_rec.statement_level) then
3470: fa_debug_pkg.add('farboe','target_dpr_detail',
3471: target_dpr_detail, p_log_level_rec => p_log_level_rec);
3472: fa_debug_pkg.add('farboe','dpr_detail_counter',
3473: dpr_detail_counter, p_log_level_rec => p_log_level_rec);
3474: end if;
3468:
3469: if (p_log_level_rec.statement_level) then
3470: fa_debug_pkg.add('farboe','target_dpr_detail',
3471: target_dpr_detail, p_log_level_rec => p_log_level_rec);
3472: fa_debug_pkg.add('farboe','dpr_detail_counter',
3473: dpr_detail_counter, p_log_level_rec => p_log_level_rec);
3474: end if;
3475:
3476: tot_backup_deprn := 0;
3516: end;
3517:
3518:
3519: if (p_log_level_rec.statement_level) then
3520: fa_debug_pkg.add('farboe','h_curr_pd_add',
3521: h_curr_pd_add, p_log_level_rec => p_log_level_rec);
3522: end if;
3523:
3524: --bug fix 3558253 and 3518604 start
3527:
3528: if(nvl(h_curr_pd_add,0) > 0 )then
3529:
3530: if (p_log_level_rec.statement_level) then
3531: fa_debug_pkg.add('farboe','++ h_adj_exp_row 1',
3532: h_adj_exp_row, p_log_level_rec => p_log_level_rec);
3533: end if;
3534:
3535: BEGIN
3590: h_adj_exp_row := -1;
3591: END;
3592:
3593: if (p_log_level_rec.statement_level) then
3594: fa_debug_pkg.add('farboe','++ h_adj_exp_row 2',
3595: h_adj_exp_row, p_log_level_rec => p_log_level_rec);
3596: end if;
3597:
3598: if(nvl(h_adj_exp_row,0) > 0)then
3666:
3667: end if;
3668:
3669: if (p_log_level_rec.statement_level) then
3670: fa_debug_pkg.add('farboe','h_prior_fy_exp',
3671: h_prior_fy_exp, p_log_level_rec => p_log_level_rec);
3672: end if;
3673:
3674: elsif (nvl(h_curr_pd_reinst,0) > 0 )then
3673:
3674: elsif (nvl(h_curr_pd_reinst,0) > 0 )then
3675:
3676: if (p_log_level_rec.statement_level) then
3677: fa_debug_pkg.add('farboe','START - RET AFTER REINST',
3678: ' ', p_log_level_rec => p_log_level_rec);
3679: fa_debug_pkg.add('farboe','bk.ret_prorate_date',
3680: bk.ret_prorate_date, p_log_level_rec => p_log_level_rec);
3681: fa_debug_pkg.add('farboe','ret.th_id_in',
3675:
3676: if (p_log_level_rec.statement_level) then
3677: fa_debug_pkg.add('farboe','START - RET AFTER REINST',
3678: ' ', p_log_level_rec => p_log_level_rec);
3679: fa_debug_pkg.add('farboe','bk.ret_prorate_date',
3680: bk.ret_prorate_date, p_log_level_rec => p_log_level_rec);
3681: fa_debug_pkg.add('farboe','ret.th_id_in',
3682: ret.th_id_in, p_log_level_rec => p_log_level_rec);
3683: end if;
3677: fa_debug_pkg.add('farboe','START - RET AFTER REINST',
3678: ' ', p_log_level_rec => p_log_level_rec);
3679: fa_debug_pkg.add('farboe','bk.ret_prorate_date',
3680: bk.ret_prorate_date, p_log_level_rec => p_log_level_rec);
3681: fa_debug_pkg.add('farboe','ret.th_id_in',
3682: ret.th_id_in, p_log_level_rec => p_log_level_rec);
3683: end if;
3684:
3685: begin
3824: -- backout amount = catchup for reinstatement(=h_adj_exp_row) * (num of periods to backout)/(num of periods for the catchup)
3825: h_no_of_per_to_exclude := h_cpd_ctr - h_ret_prorate_pc;
3826:
3827: if (p_log_level_rec.statement_level) then
3828: fa_debug_pkg.add('farboe','h_old_reinst_pc',
3829: h_old_reinst_pc, p_log_level_rec => p_log_level_rec);
3830: fa_debug_pkg.add('farboe','h_old_ret_pc',
3831: h_old_ret_pc, p_log_level_rec => p_log_level_rec);
3832: fa_debug_pkg.add('farboe','h_ret_prorate_pc',
3826:
3827: if (p_log_level_rec.statement_level) then
3828: fa_debug_pkg.add('farboe','h_old_reinst_pc',
3829: h_old_reinst_pc, p_log_level_rec => p_log_level_rec);
3830: fa_debug_pkg.add('farboe','h_old_ret_pc',
3831: h_old_ret_pc, p_log_level_rec => p_log_level_rec);
3832: fa_debug_pkg.add('farboe','h_ret_prorate_pc',
3833: h_ret_prorate_pc, p_log_level_rec => p_log_level_rec);
3834: fa_debug_pkg.add('farboe','h_adj_exp_row',
3828: fa_debug_pkg.add('farboe','h_old_reinst_pc',
3829: h_old_reinst_pc, p_log_level_rec => p_log_level_rec);
3830: fa_debug_pkg.add('farboe','h_old_ret_pc',
3831: h_old_ret_pc, p_log_level_rec => p_log_level_rec);
3832: fa_debug_pkg.add('farboe','h_ret_prorate_pc',
3833: h_ret_prorate_pc, p_log_level_rec => p_log_level_rec);
3834: fa_debug_pkg.add('farboe','h_adj_exp_row',
3835: h_adj_exp_row, p_log_level_rec => p_log_level_rec);
3836: fa_debug_pkg.add('farboe','h_no_of_per_to_exclude',
3830: fa_debug_pkg.add('farboe','h_old_ret_pc',
3831: h_old_ret_pc, p_log_level_rec => p_log_level_rec);
3832: fa_debug_pkg.add('farboe','h_ret_prorate_pc',
3833: h_ret_prorate_pc, p_log_level_rec => p_log_level_rec);
3834: fa_debug_pkg.add('farboe','h_adj_exp_row',
3835: h_adj_exp_row, p_log_level_rec => p_log_level_rec);
3836: fa_debug_pkg.add('farboe','h_no_of_per_to_exclude',
3837: h_no_of_per_to_exclude, p_log_level_rec => p_log_level_rec);
3838: end if;
3832: fa_debug_pkg.add('farboe','h_ret_prorate_pc',
3833: h_ret_prorate_pc, p_log_level_rec => p_log_level_rec);
3834: fa_debug_pkg.add('farboe','h_adj_exp_row',
3835: h_adj_exp_row, p_log_level_rec => p_log_level_rec);
3836: fa_debug_pkg.add('farboe','h_no_of_per_to_exclude',
3837: h_no_of_per_to_exclude, p_log_level_rec => p_log_level_rec);
3838: end if;
3839:
3840: /* Bug13011372: To calculate correct backup when both reinst, ret done in same period */
3846: end if;
3847: end if;
3848:
3849: if (p_log_level_rec.statement_level) then
3850: fa_debug_pkg.add('farboe','backup_deprn',
3851: backup_deprn, p_log_level_rec => p_log_level_rec);
3852: fa_debug_pkg.add('farboe','END - RET AFTER REINST',
3853: ' ', p_log_level_rec => p_log_level_rec);
3854: end if;
3848:
3849: if (p_log_level_rec.statement_level) then
3850: fa_debug_pkg.add('farboe','backup_deprn',
3851: backup_deprn, p_log_level_rec => p_log_level_rec);
3852: fa_debug_pkg.add('farboe','END - RET AFTER REINST',
3853: ' ', p_log_level_rec => p_log_level_rec);
3854: end if;
3855:
3856: end if;
3857:
3858: --bug fix 3558253 and 3518604 end
3859:
3860: if (p_log_level_rec.statement_level) then
3861: fa_debug_pkg.add('farboe','before J in reverse',1, p_log_level_rec => p_log_level_rec);
3862: fa_debug_pkg.add('farboe','h_start_pdnum',h_start_pdnum, p_log_level_rec => p_log_level_rec);
3863: fa_debug_pkg.add('farboe','(i)',i);
3864: end if;
3865:
3858: --bug fix 3558253 and 3518604 end
3859:
3860: if (p_log_level_rec.statement_level) then
3861: fa_debug_pkg.add('farboe','before J in reverse',1, p_log_level_rec => p_log_level_rec);
3862: fa_debug_pkg.add('farboe','h_start_pdnum',h_start_pdnum, p_log_level_rec => p_log_level_rec);
3863: fa_debug_pkg.add('farboe','(i)',i);
3864: end if;
3865:
3866: if (h_adj_amount <> 0)and( h_backout_flag = 1) and nvl(h_curr_pd_reinst,0) = 0 then
3859:
3860: if (p_log_level_rec.statement_level) then
3861: fa_debug_pkg.add('farboe','before J in reverse',1, p_log_level_rec => p_log_level_rec);
3862: fa_debug_pkg.add('farboe','h_start_pdnum',h_start_pdnum, p_log_level_rec => p_log_level_rec);
3863: fa_debug_pkg.add('farboe','(i)',i);
3864: end if;
3865:
3866: if (h_adj_amount <> 0)and( h_backout_flag = 1) and nvl(h_curr_pd_reinst,0) = 0 then
3867: -- Bug 11782268 : Expense in period i is catchup for periods till i-1
3871: frac_of_fiscal_year := 0;
3872:
3873: if dpr_evenly > 0 then
3874: if (p_log_level_rec.statement_level) then
3875: fa_debug_pkg.add('farboe','J in reverse',2, p_log_level_rec => p_log_level_rec);
3876: end if;
3877:
3878: frac_of_fiscal_year := 1 / pds_per_year;
3879: else
3877:
3878: frac_of_fiscal_year := 1 / pds_per_year;
3879: else
3880: if (p_log_level_rec.statement_level) then
3881: fa_debug_pkg.add('farboe','J in reverse',3, p_log_level_rec => p_log_level_rec);
3882: fa_debug_pkg.add('farboe','d_cal',d_cal, p_log_level_rec => p_log_level_rec);
3883: end if;
3884:
3885: if not fa_cache_pkg.fazcff (d_cal, book,
3878: frac_of_fiscal_year := 1 / pds_per_year;
3879: else
3880: if (p_log_level_rec.statement_level) then
3881: fa_debug_pkg.add('farboe','J in reverse',3, p_log_level_rec => p_log_level_rec);
3882: fa_debug_pkg.add('farboe','d_cal',d_cal, p_log_level_rec => p_log_level_rec);
3883: end if;
3884:
3885: if not fa_cache_pkg.fazcff (d_cal, book,
3886: current_fiscal_yr, period_fracs, p_log_level_rec => p_log_level_rec) then
3897: h_temp_calc := (h_adj_exp_row - h_prior_fy_exp)/(round(frac_of_fiscal_year,3) * (h_annualized_adj/h_cost_frac));
3898:
3899: h_temp_calc := abs(trunc(h_temp_calc));
3900: if (p_log_level_rec.statement_level) then
3901: fa_debug_pkg.add('farboe','in calc of h_temp_calc','', p_log_level_rec => p_log_level_rec);
3902: end if;
3903: end if;
3904:
3905: if (p_log_level_rec.statement_level) then
3902: end if;
3903: end if;
3904:
3905: if (p_log_level_rec.statement_level) then
3906: fa_debug_pkg.add('farboe','h_adj_exp_row', h_adj_exp_row, p_log_level_rec => p_log_level_rec);
3907: fa_debug_pkg.add('farboe','h_prior_fy_exp', h_prior_fy_exp, p_log_level_rec => p_log_level_rec);
3908: fa_debug_pkg.add('farboe','frac_of_fiscal_year', frac_of_fiscal_year, p_log_level_rec => p_log_level_rec);
3909: fa_debug_pkg.add('farboe','h_annualized_adj', h_annualized_adj, p_log_level_rec => p_log_level_rec);
3910: fa_debug_pkg.add('farboe','h_cost_frac', h_cost_frac, p_log_level_rec => p_log_level_rec);
3903: end if;
3904:
3905: if (p_log_level_rec.statement_level) then
3906: fa_debug_pkg.add('farboe','h_adj_exp_row', h_adj_exp_row, p_log_level_rec => p_log_level_rec);
3907: fa_debug_pkg.add('farboe','h_prior_fy_exp', h_prior_fy_exp, p_log_level_rec => p_log_level_rec);
3908: fa_debug_pkg.add('farboe','frac_of_fiscal_year', frac_of_fiscal_year, p_log_level_rec => p_log_level_rec);
3909: fa_debug_pkg.add('farboe','h_annualized_adj', h_annualized_adj, p_log_level_rec => p_log_level_rec);
3910: fa_debug_pkg.add('farboe','h_cost_frac', h_cost_frac, p_log_level_rec => p_log_level_rec);
3911: fa_debug_pkg.add('farboe','h_temp_calc', h_temp_calc, p_log_level_rec => p_log_level_rec);
3904:
3905: if (p_log_level_rec.statement_level) then
3906: fa_debug_pkg.add('farboe','h_adj_exp_row', h_adj_exp_row, p_log_level_rec => p_log_level_rec);
3907: fa_debug_pkg.add('farboe','h_prior_fy_exp', h_prior_fy_exp, p_log_level_rec => p_log_level_rec);
3908: fa_debug_pkg.add('farboe','frac_of_fiscal_year', frac_of_fiscal_year, p_log_level_rec => p_log_level_rec);
3909: fa_debug_pkg.add('farboe','h_annualized_adj', h_annualized_adj, p_log_level_rec => p_log_level_rec);
3910: fa_debug_pkg.add('farboe','h_cost_frac', h_cost_frac, p_log_level_rec => p_log_level_rec);
3911: fa_debug_pkg.add('farboe','h_temp_calc', h_temp_calc, p_log_level_rec => p_log_level_rec);
3912: end if;
3905: if (p_log_level_rec.statement_level) then
3906: fa_debug_pkg.add('farboe','h_adj_exp_row', h_adj_exp_row, p_log_level_rec => p_log_level_rec);
3907: fa_debug_pkg.add('farboe','h_prior_fy_exp', h_prior_fy_exp, p_log_level_rec => p_log_level_rec);
3908: fa_debug_pkg.add('farboe','frac_of_fiscal_year', frac_of_fiscal_year, p_log_level_rec => p_log_level_rec);
3909: fa_debug_pkg.add('farboe','h_annualized_adj', h_annualized_adj, p_log_level_rec => p_log_level_rec);
3910: fa_debug_pkg.add('farboe','h_cost_frac', h_cost_frac, p_log_level_rec => p_log_level_rec);
3911: fa_debug_pkg.add('farboe','h_temp_calc', h_temp_calc, p_log_level_rec => p_log_level_rec);
3912: end if;
3913:
3906: fa_debug_pkg.add('farboe','h_adj_exp_row', h_adj_exp_row, p_log_level_rec => p_log_level_rec);
3907: fa_debug_pkg.add('farboe','h_prior_fy_exp', h_prior_fy_exp, p_log_level_rec => p_log_level_rec);
3908: fa_debug_pkg.add('farboe','frac_of_fiscal_year', frac_of_fiscal_year, p_log_level_rec => p_log_level_rec);
3909: fa_debug_pkg.add('farboe','h_annualized_adj', h_annualized_adj, p_log_level_rec => p_log_level_rec);
3910: fa_debug_pkg.add('farboe','h_cost_frac', h_cost_frac, p_log_level_rec => p_log_level_rec);
3911: fa_debug_pkg.add('farboe','h_temp_calc', h_temp_calc, p_log_level_rec => p_log_level_rec);
3912: end if;
3913:
3914: if(h_temp_calc > 0)then
3907: fa_debug_pkg.add('farboe','h_prior_fy_exp', h_prior_fy_exp, p_log_level_rec => p_log_level_rec);
3908: fa_debug_pkg.add('farboe','frac_of_fiscal_year', frac_of_fiscal_year, p_log_level_rec => p_log_level_rec);
3909: fa_debug_pkg.add('farboe','h_annualized_adj', h_annualized_adj, p_log_level_rec => p_log_level_rec);
3910: fa_debug_pkg.add('farboe','h_cost_frac', h_cost_frac, p_log_level_rec => p_log_level_rec);
3911: fa_debug_pkg.add('farboe','h_temp_calc', h_temp_calc, p_log_level_rec => p_log_level_rec);
3912: end if;
3913:
3914: if(h_temp_calc > 0)then
3915: if(j <= h_temp_calc)then
3935: * Fix for 807256 - SNARAYAN
3936: */
3937:
3938: if (p_log_level_rec.statement_level) then
3939: fa_debug_pkg.add('farboe','h_curr_pd_add',
3940: h_curr_pd_add, p_log_level_rec => p_log_level_rec);
3941: end if;
3942:
3943: if (h_annualized_adj <> 0) then
3962:
3963: elsif ( nvl(h_curr_pd_reinst,0) > 0 ) then
3964:
3965: if (p_log_level_rec.statement_level) then
3966: fa_debug_pkg.add('farboe','START - RET AFTER REINST', '2.1', p_log_level_rec => p_log_level_rec);
3967: fa_debug_pkg.add('farboe','dpr_detail.deprn_amount(target_dpr_detail)'
3968: , dpr_detail.deprn_amount(target_dpr_detail) );
3969: fa_debug_pkg.add('farboe','h_adj_amount'
3970: , h_adj_amount , p_log_level_rec => p_log_level_rec);
3963: elsif ( nvl(h_curr_pd_reinst,0) > 0 ) then
3964:
3965: if (p_log_level_rec.statement_level) then
3966: fa_debug_pkg.add('farboe','START - RET AFTER REINST', '2.1', p_log_level_rec => p_log_level_rec);
3967: fa_debug_pkg.add('farboe','dpr_detail.deprn_amount(target_dpr_detail)'
3968: , dpr_detail.deprn_amount(target_dpr_detail) );
3969: fa_debug_pkg.add('farboe','h_adj_amount'
3970: , h_adj_amount , p_log_level_rec => p_log_level_rec);
3971: fa_debug_pkg.add('farboe','backup_deprn'
3965: if (p_log_level_rec.statement_level) then
3966: fa_debug_pkg.add('farboe','START - RET AFTER REINST', '2.1', p_log_level_rec => p_log_level_rec);
3967: fa_debug_pkg.add('farboe','dpr_detail.deprn_amount(target_dpr_detail)'
3968: , dpr_detail.deprn_amount(target_dpr_detail) );
3969: fa_debug_pkg.add('farboe','h_adj_amount'
3970: , h_adj_amount , p_log_level_rec => p_log_level_rec);
3971: fa_debug_pkg.add('farboe','backup_deprn'
3972: , backup_deprn , p_log_level_rec => p_log_level_rec);
3973: end if;
3967: fa_debug_pkg.add('farboe','dpr_detail.deprn_amount(target_dpr_detail)'
3968: , dpr_detail.deprn_amount(target_dpr_detail) );
3969: fa_debug_pkg.add('farboe','h_adj_amount'
3970: , h_adj_amount , p_log_level_rec => p_log_level_rec);
3971: fa_debug_pkg.add('farboe','backup_deprn'
3972: , backup_deprn , p_log_level_rec => p_log_level_rec);
3973: end if;
3974:
3975: dpr_detail.deprn_amount(target_dpr_detail) :=
3976: h_adj_amount + backup_deprn +
3977: dpr_detail.deprn_amount(target_dpr_detail);
3978:
3979: if (p_log_level_rec.statement_level) then
3980: fa_debug_pkg.add('farboe','NEW dpr_detail.deprn_amount(target_dpr_detail)'
3981: , dpr_detail.deprn_amount(target_dpr_detail) );
3982: fa_debug_pkg.add('farboe','END - RET AFTER REINST', '2.9', p_log_level_rec => p_log_level_rec);
3983: end if;
3984: else
3978:
3979: if (p_log_level_rec.statement_level) then
3980: fa_debug_pkg.add('farboe','NEW dpr_detail.deprn_amount(target_dpr_detail)'
3981: , dpr_detail.deprn_amount(target_dpr_detail) );
3982: fa_debug_pkg.add('farboe','END - RET AFTER REINST', '2.9', p_log_level_rec => p_log_level_rec);
3983: end if;
3984: else
3985: /* else to add adjustment amount to total backup deprn when
3986: there is no annualized adjustment amount. Add adjustment
3990: means annualized_adj will be or should have a value. In this
3991: case there is specific logic just above */
3992:
3993: if (p_log_level_rec.statement_level) then
3994: fa_debug_pkg.add('farboe','6.1', 6.1, p_log_level_rec => p_log_level_rec);
3995: end if;
3996: /* Bug#13020521: For considering adj_amt in poa for prior dated assets */
3997: if (h_curr_pd_add = 0) or ((h_curr_pd_add = 1) and (h_annualized_adj = 0)) then
3998: if (p_log_level_rec.statement_level) then
3995: end if;
3996: /* Bug#13020521: For considering adj_amt in poa for prior dated assets */
3997: if (h_curr_pd_add = 0) or ((h_curr_pd_add = 1) and (h_annualized_adj = 0)) then
3998: if (p_log_level_rec.statement_level) then
3999: fa_debug_pkg.add('farboe','6.2', 6.2, p_log_level_rec => p_log_level_rec);
4000: fa_debug_pkg.add('farboe','h_adj_amount',
4001: h_adj_amount, p_log_level_rec => p_log_level_rec);
4002: fa_debug_pkg.add('farboe','target_dpr_detail',
4003: target_dpr_detail, p_log_level_rec => p_log_level_rec);
3996: /* Bug#13020521: For considering adj_amt in poa for prior dated assets */
3997: if (h_curr_pd_add = 0) or ((h_curr_pd_add = 1) and (h_annualized_adj = 0)) then
3998: if (p_log_level_rec.statement_level) then
3999: fa_debug_pkg.add('farboe','6.2', 6.2, p_log_level_rec => p_log_level_rec);
4000: fa_debug_pkg.add('farboe','h_adj_amount',
4001: h_adj_amount, p_log_level_rec => p_log_level_rec);
4002: fa_debug_pkg.add('farboe','target_dpr_detail',
4003: target_dpr_detail, p_log_level_rec => p_log_level_rec);
4004: end if;
3998: if (p_log_level_rec.statement_level) then
3999: fa_debug_pkg.add('farboe','6.2', 6.2, p_log_level_rec => p_log_level_rec);
4000: fa_debug_pkg.add('farboe','h_adj_amount',
4001: h_adj_amount, p_log_level_rec => p_log_level_rec);
4002: fa_debug_pkg.add('farboe','target_dpr_detail',
4003: target_dpr_detail, p_log_level_rec => p_log_level_rec);
4004: end if;
4005:
4006: -- Fix for Bug #3941213. Don't do this for prior
4010: h_adj_amount +
4011: dpr_detail.deprn_amount(target_dpr_detail);
4012: end if;
4013: if (p_log_level_rec.statement_level) then
4014: fa_debug_pkg.add('farboe','6.2.1', 6.21, p_log_level_rec => p_log_level_rec);
4015: end if;
4016: end if;
4017: if (p_log_level_rec.statement_level) then
4018: fa_debug_pkg.add('farboe','6.3', 6.3, p_log_level_rec => p_log_level_rec);
4014: fa_debug_pkg.add('farboe','6.2.1', 6.21, p_log_level_rec => p_log_level_rec);
4015: end if;
4016: end if;
4017: if (p_log_level_rec.statement_level) then
4018: fa_debug_pkg.add('farboe','6.3', 6.3, p_log_level_rec => p_log_level_rec);
4019: end if;
4020: end if;
4021:
4022:
4030: * conditional logic adds the amounts correctly. SNARAYAN
4031: */
4032:
4033: if p_log_level_rec.statement_level then
4034: fa_debug_pkg.add('farboe','7',7, p_log_level_rec => p_log_level_rec);
4035: end if;
4036:
4037: if ((h_adj_count > 0) and (h_ret_count = 0)) then
4038: /* When there are expense rows other than retirement expense
4073: end if;
4074: end if;
4075: prev_dist_id := h_dist_id;
4076: if p_log_level_rec.statement_level then
4077: fa_debug_pkg.add('farboe','9',9, p_log_level_rec => p_log_level_rec);
4078: end if;
4079:
4080: end loop; -- end of - while deprn_adj
4081:
4200: h_tot_deprn := 0;
4201: h_start_pd_deprn := 0;
4202:
4203: if p_log_level_rec.statement_level then
4204: fa_debug_pkg.add('farboe','dpr_detail_counter',dpr_detail_counter, p_log_level_rec => p_log_level_rec);
4205: end if;
4206:
4207: for m in 1 .. dpr_detail_counter loop
4208: h_tot_deprn := h_tot_deprn + dpr_detail.deprn_amount(m);
4210:
4211: h_start_pd_deprn := h_tot_deprn - h_temp_startpd_deprn;
4212:
4213: if p_log_level_rec.statement_level then
4214: fa_debug_pkg.add('farboe','h_tot_deprn',h_tot_deprn, p_log_level_rec => p_log_level_rec);
4215: fa_debug_pkg.add('farboe','h_temp_startpd_deprn',
4216: h_temp_startpd_deprn, p_log_level_rec => p_log_level_rec);
4217: fa_debug_pkg.add('farboe','h_start_pd_deprn',h_start_pd_deprn, p_log_level_rec => p_log_level_rec);
4218: end if;
4211: h_start_pd_deprn := h_tot_deprn - h_temp_startpd_deprn;
4212:
4213: if p_log_level_rec.statement_level then
4214: fa_debug_pkg.add('farboe','h_tot_deprn',h_tot_deprn, p_log_level_rec => p_log_level_rec);
4215: fa_debug_pkg.add('farboe','h_temp_startpd_deprn',
4216: h_temp_startpd_deprn, p_log_level_rec => p_log_level_rec);
4217: fa_debug_pkg.add('farboe','h_start_pd_deprn',h_start_pd_deprn, p_log_level_rec => p_log_level_rec);
4218: end if;
4219:
4213: if p_log_level_rec.statement_level then
4214: fa_debug_pkg.add('farboe','h_tot_deprn',h_tot_deprn, p_log_level_rec => p_log_level_rec);
4215: fa_debug_pkg.add('farboe','h_temp_startpd_deprn',
4216: h_temp_startpd_deprn, p_log_level_rec => p_log_level_rec);
4217: fa_debug_pkg.add('farboe','h_start_pd_deprn',h_start_pd_deprn, p_log_level_rec => p_log_level_rec);
4218: end if;
4219:
4220:
4221: /* Bug#4605961 */
4238:
4239: adj_row.adjustment_amount := h_tot_deprn;
4240:
4241: if p_log_level_rec.statement_level then
4242: fa_debug_pkg.add('farboe','h_start_pd_endpp',h_start_pd_endpp, p_log_level_rec => p_log_level_rec);
4243: end if;
4244:
4245: if mrc_sob_type_code <> 'R' then
4246:
4326: fraction of depreciation to backout.
4327: */
4328:
4329: if p_log_level_rec.statement_level then
4330: fa_debug_pkg.add('farboe(2)','h_same_fy',h_same_fy);
4331: fa_debug_pkg.add('farboe(2)','h_depr_first_year_ret',h_depr_first_year_ret);
4332: end if;
4333:
4334: temp_start_pp := 0;
4327: */
4328:
4329: if p_log_level_rec.statement_level then
4330: fa_debug_pkg.add('farboe(2)','h_same_fy',h_same_fy);
4331: fa_debug_pkg.add('farboe(2)','h_depr_first_year_ret',h_depr_first_year_ret);
4332: end if;
4333:
4334: temp_start_pp := 0;
4335:
4341:
4342: p_pers_per_yr := fa_cache_pkg.fazcct_record.number_per_fiscal_year;
4343:
4344: if p_log_level_rec.statement_level then
4345: fa_debug_pkg.add('farboe(1.4)','p_pers_per_yr',p_pers_per_yr);
4346: fa_debug_pkg.add('farboe(1.4)','depreciate_lastyr',depreciate_lastyr);
4347: fa_debug_pkg.add('farboe(1.4)','h_same_fy',h_same_fy);
4348: fa_debug_pkg.add('farboe(1.4)','h_depr_first_year_ret',h_depr_first_year_ret);
4349: fa_debug_pkg.add('farboe(1.4)','================','');
4342: p_pers_per_yr := fa_cache_pkg.fazcct_record.number_per_fiscal_year;
4343:
4344: if p_log_level_rec.statement_level then
4345: fa_debug_pkg.add('farboe(1.4)','p_pers_per_yr',p_pers_per_yr);
4346: fa_debug_pkg.add('farboe(1.4)','depreciate_lastyr',depreciate_lastyr);
4347: fa_debug_pkg.add('farboe(1.4)','h_same_fy',h_same_fy);
4348: fa_debug_pkg.add('farboe(1.4)','h_depr_first_year_ret',h_depr_first_year_ret);
4349: fa_debug_pkg.add('farboe(1.4)','================','');
4350: fa_debug_pkg.add('farboe(1.4)','p_pers_per_yr',p_pers_per_yr);
4343:
4344: if p_log_level_rec.statement_level then
4345: fa_debug_pkg.add('farboe(1.4)','p_pers_per_yr',p_pers_per_yr);
4346: fa_debug_pkg.add('farboe(1.4)','depreciate_lastyr',depreciate_lastyr);
4347: fa_debug_pkg.add('farboe(1.4)','h_same_fy',h_same_fy);
4348: fa_debug_pkg.add('farboe(1.4)','h_depr_first_year_ret',h_depr_first_year_ret);
4349: fa_debug_pkg.add('farboe(1.4)','================','');
4350: fa_debug_pkg.add('farboe(1.4)','p_pers_per_yr',p_pers_per_yr);
4351: fa_debug_pkg.add('farboe(1.4)','h_end_pdnum',h_end_pdnum);
4344: if p_log_level_rec.statement_level then
4345: fa_debug_pkg.add('farboe(1.4)','p_pers_per_yr',p_pers_per_yr);
4346: fa_debug_pkg.add('farboe(1.4)','depreciate_lastyr',depreciate_lastyr);
4347: fa_debug_pkg.add('farboe(1.4)','h_same_fy',h_same_fy);
4348: fa_debug_pkg.add('farboe(1.4)','h_depr_first_year_ret',h_depr_first_year_ret);
4349: fa_debug_pkg.add('farboe(1.4)','================','');
4350: fa_debug_pkg.add('farboe(1.4)','p_pers_per_yr',p_pers_per_yr);
4351: fa_debug_pkg.add('farboe(1.4)','h_end_pdnum',h_end_pdnum);
4352: fa_debug_pkg.add('farboe(1.4)','++h_start_pdnum',h_start_pdnum);
4345: fa_debug_pkg.add('farboe(1.4)','p_pers_per_yr',p_pers_per_yr);
4346: fa_debug_pkg.add('farboe(1.4)','depreciate_lastyr',depreciate_lastyr);
4347: fa_debug_pkg.add('farboe(1.4)','h_same_fy',h_same_fy);
4348: fa_debug_pkg.add('farboe(1.4)','h_depr_first_year_ret',h_depr_first_year_ret);
4349: fa_debug_pkg.add('farboe(1.4)','================','');
4350: fa_debug_pkg.add('farboe(1.4)','p_pers_per_yr',p_pers_per_yr);
4351: fa_debug_pkg.add('farboe(1.4)','h_end_pdnum',h_end_pdnum);
4352: fa_debug_pkg.add('farboe(1.4)','++h_start_pdnum',h_start_pdnum);
4353: fa_debug_pkg.add('farboe(1.4)','++bk.pc_fully_reserved',bk.pc_fully_reserved);
4346: fa_debug_pkg.add('farboe(1.4)','depreciate_lastyr',depreciate_lastyr);
4347: fa_debug_pkg.add('farboe(1.4)','h_same_fy',h_same_fy);
4348: fa_debug_pkg.add('farboe(1.4)','h_depr_first_year_ret',h_depr_first_year_ret);
4349: fa_debug_pkg.add('farboe(1.4)','================','');
4350: fa_debug_pkg.add('farboe(1.4)','p_pers_per_yr',p_pers_per_yr);
4351: fa_debug_pkg.add('farboe(1.4)','h_end_pdnum',h_end_pdnum);
4352: fa_debug_pkg.add('farboe(1.4)','++h_start_pdnum',h_start_pdnum);
4353: fa_debug_pkg.add('farboe(1.4)','++bk.pc_fully_reserved',bk.pc_fully_reserved);
4354: fa_debug_pkg.add('farboe(1.4)','++h_start_pd_pc',h_start_pd_pc);
4347: fa_debug_pkg.add('farboe(1.4)','h_same_fy',h_same_fy);
4348: fa_debug_pkg.add('farboe(1.4)','h_depr_first_year_ret',h_depr_first_year_ret);
4349: fa_debug_pkg.add('farboe(1.4)','================','');
4350: fa_debug_pkg.add('farboe(1.4)','p_pers_per_yr',p_pers_per_yr);
4351: fa_debug_pkg.add('farboe(1.4)','h_end_pdnum',h_end_pdnum);
4352: fa_debug_pkg.add('farboe(1.4)','++h_start_pdnum',h_start_pdnum);
4353: fa_debug_pkg.add('farboe(1.4)','++bk.pc_fully_reserved',bk.pc_fully_reserved);
4354: fa_debug_pkg.add('farboe(1.4)','++h_start_pd_pc',h_start_pd_pc);
4355: end if;
4348: fa_debug_pkg.add('farboe(1.4)','h_depr_first_year_ret',h_depr_first_year_ret);
4349: fa_debug_pkg.add('farboe(1.4)','================','');
4350: fa_debug_pkg.add('farboe(1.4)','p_pers_per_yr',p_pers_per_yr);
4351: fa_debug_pkg.add('farboe(1.4)','h_end_pdnum',h_end_pdnum);
4352: fa_debug_pkg.add('farboe(1.4)','++h_start_pdnum',h_start_pdnum);
4353: fa_debug_pkg.add('farboe(1.4)','++bk.pc_fully_reserved',bk.pc_fully_reserved);
4354: fa_debug_pkg.add('farboe(1.4)','++h_start_pd_pc',h_start_pd_pc);
4355: end if;
4356:
4349: fa_debug_pkg.add('farboe(1.4)','================','');
4350: fa_debug_pkg.add('farboe(1.4)','p_pers_per_yr',p_pers_per_yr);
4351: fa_debug_pkg.add('farboe(1.4)','h_end_pdnum',h_end_pdnum);
4352: fa_debug_pkg.add('farboe(1.4)','++h_start_pdnum',h_start_pdnum);
4353: fa_debug_pkg.add('farboe(1.4)','++bk.pc_fully_reserved',bk.pc_fully_reserved);
4354: fa_debug_pkg.add('farboe(1.4)','++h_start_pd_pc',h_start_pd_pc);
4355: end if;
4356:
4357: if p_pers_per_yr <> 365 then
4350: fa_debug_pkg.add('farboe(1.4)','p_pers_per_yr',p_pers_per_yr);
4351: fa_debug_pkg.add('farboe(1.4)','h_end_pdnum',h_end_pdnum);
4352: fa_debug_pkg.add('farboe(1.4)','++h_start_pdnum',h_start_pdnum);
4353: fa_debug_pkg.add('farboe(1.4)','++bk.pc_fully_reserved',bk.pc_fully_reserved);
4354: fa_debug_pkg.add('farboe(1.4)','++h_start_pd_pc',h_start_pd_pc);
4355: end if;
4356:
4357: if p_pers_per_yr <> 365 then
4358: if (depreciate_lastyr and not
4510: when no_data_found then null;
4511: end;
4512:
4513: if p_log_level_rec.statement_level then
4514: fa_debug_pkg.add('farboe','++ FOR CATCHUP: h_Brow_deprn_reserve', h_Brow_deprn_reserve, p_log_level_rec => p_log_level_rec);
4515: fa_debug_pkg.add('farboe','++ FOR CATCHUP: h_asset_addition_pc', h_asset_addition_pc, p_log_level_rec => p_log_level_rec);
4516: fa_debug_pkg.add('farboe','++ FOR CATCHUP: h_start_pd_pc (ret prorated pc)', h_start_pd_pc);
4517: fa_debug_pkg.add('farboe','++ FOR CATCHUP: l_same_fy', l_same_fy);
4518: fa_debug_pkg.add('farboe','++ FOR CATCHUP: l_adj_overlap', l_adj_overlap);
4511: end;
4512:
4513: if p_log_level_rec.statement_level then
4514: fa_debug_pkg.add('farboe','++ FOR CATCHUP: h_Brow_deprn_reserve', h_Brow_deprn_reserve, p_log_level_rec => p_log_level_rec);
4515: fa_debug_pkg.add('farboe','++ FOR CATCHUP: h_asset_addition_pc', h_asset_addition_pc, p_log_level_rec => p_log_level_rec);
4516: fa_debug_pkg.add('farboe','++ FOR CATCHUP: h_start_pd_pc (ret prorated pc)', h_start_pd_pc);
4517: fa_debug_pkg.add('farboe','++ FOR CATCHUP: l_same_fy', l_same_fy);
4518: fa_debug_pkg.add('farboe','++ FOR CATCHUP: l_adj_overlap', l_adj_overlap);
4519: end if;
4512:
4513: if p_log_level_rec.statement_level then
4514: fa_debug_pkg.add('farboe','++ FOR CATCHUP: h_Brow_deprn_reserve', h_Brow_deprn_reserve, p_log_level_rec => p_log_level_rec);
4515: fa_debug_pkg.add('farboe','++ FOR CATCHUP: h_asset_addition_pc', h_asset_addition_pc, p_log_level_rec => p_log_level_rec);
4516: fa_debug_pkg.add('farboe','++ FOR CATCHUP: h_start_pd_pc (ret prorated pc)', h_start_pd_pc);
4517: fa_debug_pkg.add('farboe','++ FOR CATCHUP: l_same_fy', l_same_fy);
4518: fa_debug_pkg.add('farboe','++ FOR CATCHUP: l_adj_overlap', l_adj_overlap);
4519: end if;
4520:
4513: if p_log_level_rec.statement_level then
4514: fa_debug_pkg.add('farboe','++ FOR CATCHUP: h_Brow_deprn_reserve', h_Brow_deprn_reserve, p_log_level_rec => p_log_level_rec);
4515: fa_debug_pkg.add('farboe','++ FOR CATCHUP: h_asset_addition_pc', h_asset_addition_pc, p_log_level_rec => p_log_level_rec);
4516: fa_debug_pkg.add('farboe','++ FOR CATCHUP: h_start_pd_pc (ret prorated pc)', h_start_pd_pc);
4517: fa_debug_pkg.add('farboe','++ FOR CATCHUP: l_same_fy', l_same_fy);
4518: fa_debug_pkg.add('farboe','++ FOR CATCHUP: l_adj_overlap', l_adj_overlap);
4519: end if;
4520:
4521: -- h_start_pd_pc : the period counter in which the prorated retired_date falls
4514: fa_debug_pkg.add('farboe','++ FOR CATCHUP: h_Brow_deprn_reserve', h_Brow_deprn_reserve, p_log_level_rec => p_log_level_rec);
4515: fa_debug_pkg.add('farboe','++ FOR CATCHUP: h_asset_addition_pc', h_asset_addition_pc, p_log_level_rec => p_log_level_rec);
4516: fa_debug_pkg.add('farboe','++ FOR CATCHUP: h_start_pd_pc (ret prorated pc)', h_start_pd_pc);
4517: fa_debug_pkg.add('farboe','++ FOR CATCHUP: l_same_fy', l_same_fy);
4518: fa_debug_pkg.add('farboe','++ FOR CATCHUP: l_adj_overlap', l_adj_overlap);
4519: end if;
4520:
4521: -- h_start_pd_pc : the period counter in which the prorated retired_date falls
4522: -- h_asset_addition_pc : the period counter in which the asset was added (i.e. period of addition)
4536: raise farboe_err;
4537: end if;
4538:
4539: if p_log_level_rec.statement_level then
4540: fa_debug_pkg.add('farboe','++ CATCHUP: ret.th_id_in', ret.th_id_in, p_log_level_rec => p_log_level_rec);
4541: fa_debug_pkg.add('farboe','++ CATCHUP: deprn_start_pnum', deprn_start_pnum, p_log_level_rec => p_log_level_rec);
4542: fa_debug_pkg.add('farboe','++ CATCHUP: h_cost_frac', h_cost_frac, p_log_level_rec => p_log_level_rec);
4543: fa_debug_pkg.add('farboe','++ CATCHUP: h_Brow_deprn_reserve', h_Brow_deprn_reserve, p_log_level_rec => p_log_level_rec);
4544: end if;
4537: end if;
4538:
4539: if p_log_level_rec.statement_level then
4540: fa_debug_pkg.add('farboe','++ CATCHUP: ret.th_id_in', ret.th_id_in, p_log_level_rec => p_log_level_rec);
4541: fa_debug_pkg.add('farboe','++ CATCHUP: deprn_start_pnum', deprn_start_pnum, p_log_level_rec => p_log_level_rec);
4542: fa_debug_pkg.add('farboe','++ CATCHUP: h_cost_frac', h_cost_frac, p_log_level_rec => p_log_level_rec);
4543: fa_debug_pkg.add('farboe','++ CATCHUP: h_Brow_deprn_reserve', h_Brow_deprn_reserve, p_log_level_rec => p_log_level_rec);
4544: end if;
4545:
4538:
4539: if p_log_level_rec.statement_level then
4540: fa_debug_pkg.add('farboe','++ CATCHUP: ret.th_id_in', ret.th_id_in, p_log_level_rec => p_log_level_rec);
4541: fa_debug_pkg.add('farboe','++ CATCHUP: deprn_start_pnum', deprn_start_pnum, p_log_level_rec => p_log_level_rec);
4542: fa_debug_pkg.add('farboe','++ CATCHUP: h_cost_frac', h_cost_frac, p_log_level_rec => p_log_level_rec);
4543: fa_debug_pkg.add('farboe','++ CATCHUP: h_Brow_deprn_reserve', h_Brow_deprn_reserve, p_log_level_rec => p_log_level_rec);
4544: end if;
4545:
4546: -- Bug 5738004
4539: if p_log_level_rec.statement_level then
4540: fa_debug_pkg.add('farboe','++ CATCHUP: ret.th_id_in', ret.th_id_in, p_log_level_rec => p_log_level_rec);
4541: fa_debug_pkg.add('farboe','++ CATCHUP: deprn_start_pnum', deprn_start_pnum, p_log_level_rec => p_log_level_rec);
4542: fa_debug_pkg.add('farboe','++ CATCHUP: h_cost_frac', h_cost_frac, p_log_level_rec => p_log_level_rec);
4543: fa_debug_pkg.add('farboe','++ CATCHUP: h_Brow_deprn_reserve', h_Brow_deprn_reserve, p_log_level_rec => p_log_level_rec);
4544: end if;
4545:
4546: -- Bug 5738004
4547: dpr.calc_catchup := TRUE;
4599: when no_data_found then null;
4600: end;
4601:
4602: if p_log_level_rec.statement_level then
4603: fa_debug_pkg.add('farboe','++ CATCHUP: h_fully_rsv_pd ', h_fully_rsv_pd, p_log_level_rec => p_log_level_rec);
4604: end if;
4605: end if; --bk.fully_reserved
4606: --Bug#9466566: To avoid divide by zero error.
4607: if not ( h_fully_rsv_pd = -1 ) and not ( end_pp = h_fully_rsv_pd + 1 ) then
4614: end if;
4615:
4616:
4617: if p_log_level_rec.statement_level then
4618: fa_debug_pkg.add('farboe','++ CATCHUP: h_same_fy', h_same_fy, p_log_level_rec => p_log_level_rec);
4619: fa_debug_pkg.add('farboe','++ CATCHUP: l_deprn_exp', l_deprn_exp, p_log_level_rec => p_log_level_rec);
4620: fa_debug_pkg.add('farboe','++ CATCHUP: pds_catchup', pds_catchup, p_log_level_rec => p_log_level_rec);
4621: fa_debug_pkg.add('farboe','++ CATCHUP: start_pp', start_pp, p_log_level_rec => p_log_level_rec);
4622: fa_debug_pkg.add('farboe','++ CATCHUP: deprn_start_pnum', deprn_start_pnum, p_log_level_rec => p_log_level_rec);
4615:
4616:
4617: if p_log_level_rec.statement_level then
4618: fa_debug_pkg.add('farboe','++ CATCHUP: h_same_fy', h_same_fy, p_log_level_rec => p_log_level_rec);
4619: fa_debug_pkg.add('farboe','++ CATCHUP: l_deprn_exp', l_deprn_exp, p_log_level_rec => p_log_level_rec);
4620: fa_debug_pkg.add('farboe','++ CATCHUP: pds_catchup', pds_catchup, p_log_level_rec => p_log_level_rec);
4621: fa_debug_pkg.add('farboe','++ CATCHUP: start_pp', start_pp, p_log_level_rec => p_log_level_rec);
4622: fa_debug_pkg.add('farboe','++ CATCHUP: deprn_start_pnum', deprn_start_pnum, p_log_level_rec => p_log_level_rec);
4623: fa_debug_pkg.add('farboe','++ CATCHUP: end_pp', end_pp, p_log_level_rec => p_log_level_rec);
4616:
4617: if p_log_level_rec.statement_level then
4618: fa_debug_pkg.add('farboe','++ CATCHUP: h_same_fy', h_same_fy, p_log_level_rec => p_log_level_rec);
4619: fa_debug_pkg.add('farboe','++ CATCHUP: l_deprn_exp', l_deprn_exp, p_log_level_rec => p_log_level_rec);
4620: fa_debug_pkg.add('farboe','++ CATCHUP: pds_catchup', pds_catchup, p_log_level_rec => p_log_level_rec);
4621: fa_debug_pkg.add('farboe','++ CATCHUP: start_pp', start_pp, p_log_level_rec => p_log_level_rec);
4622: fa_debug_pkg.add('farboe','++ CATCHUP: deprn_start_pnum', deprn_start_pnum, p_log_level_rec => p_log_level_rec);
4623: fa_debug_pkg.add('farboe','++ CATCHUP: end_pp', end_pp, p_log_level_rec => p_log_level_rec);
4624: fa_debug_pkg.add('farboe','++ CATCHUP: h_tot_deprn', h_tot_deprn, p_log_level_rec => p_log_level_rec);
4617: if p_log_level_rec.statement_level then
4618: fa_debug_pkg.add('farboe','++ CATCHUP: h_same_fy', h_same_fy, p_log_level_rec => p_log_level_rec);
4619: fa_debug_pkg.add('farboe','++ CATCHUP: l_deprn_exp', l_deprn_exp, p_log_level_rec => p_log_level_rec);
4620: fa_debug_pkg.add('farboe','++ CATCHUP: pds_catchup', pds_catchup, p_log_level_rec => p_log_level_rec);
4621: fa_debug_pkg.add('farboe','++ CATCHUP: start_pp', start_pp, p_log_level_rec => p_log_level_rec);
4622: fa_debug_pkg.add('farboe','++ CATCHUP: deprn_start_pnum', deprn_start_pnum, p_log_level_rec => p_log_level_rec);
4623: fa_debug_pkg.add('farboe','++ CATCHUP: end_pp', end_pp, p_log_level_rec => p_log_level_rec);
4624: fa_debug_pkg.add('farboe','++ CATCHUP: h_tot_deprn', h_tot_deprn, p_log_level_rec => p_log_level_rec);
4625: end if;
4618: fa_debug_pkg.add('farboe','++ CATCHUP: h_same_fy', h_same_fy, p_log_level_rec => p_log_level_rec);
4619: fa_debug_pkg.add('farboe','++ CATCHUP: l_deprn_exp', l_deprn_exp, p_log_level_rec => p_log_level_rec);
4620: fa_debug_pkg.add('farboe','++ CATCHUP: pds_catchup', pds_catchup, p_log_level_rec => p_log_level_rec);
4621: fa_debug_pkg.add('farboe','++ CATCHUP: start_pp', start_pp, p_log_level_rec => p_log_level_rec);
4622: fa_debug_pkg.add('farboe','++ CATCHUP: deprn_start_pnum', deprn_start_pnum, p_log_level_rec => p_log_level_rec);
4623: fa_debug_pkg.add('farboe','++ CATCHUP: end_pp', end_pp, p_log_level_rec => p_log_level_rec);
4624: fa_debug_pkg.add('farboe','++ CATCHUP: h_tot_deprn', h_tot_deprn, p_log_level_rec => p_log_level_rec);
4625: end if;
4626:
4619: fa_debug_pkg.add('farboe','++ CATCHUP: l_deprn_exp', l_deprn_exp, p_log_level_rec => p_log_level_rec);
4620: fa_debug_pkg.add('farboe','++ CATCHUP: pds_catchup', pds_catchup, p_log_level_rec => p_log_level_rec);
4621: fa_debug_pkg.add('farboe','++ CATCHUP: start_pp', start_pp, p_log_level_rec => p_log_level_rec);
4622: fa_debug_pkg.add('farboe','++ CATCHUP: deprn_start_pnum', deprn_start_pnum, p_log_level_rec => p_log_level_rec);
4623: fa_debug_pkg.add('farboe','++ CATCHUP: end_pp', end_pp, p_log_level_rec => p_log_level_rec);
4624: fa_debug_pkg.add('farboe','++ CATCHUP: h_tot_deprn', h_tot_deprn, p_log_level_rec => p_log_level_rec);
4625: end if;
4626:
4627: end if;
4620: fa_debug_pkg.add('farboe','++ CATCHUP: pds_catchup', pds_catchup, p_log_level_rec => p_log_level_rec);
4621: fa_debug_pkg.add('farboe','++ CATCHUP: start_pp', start_pp, p_log_level_rec => p_log_level_rec);
4622: fa_debug_pkg.add('farboe','++ CATCHUP: deprn_start_pnum', deprn_start_pnum, p_log_level_rec => p_log_level_rec);
4623: fa_debug_pkg.add('farboe','++ CATCHUP: end_pp', end_pp, p_log_level_rec => p_log_level_rec);
4624: fa_debug_pkg.add('farboe','++ CATCHUP: h_tot_deprn', h_tot_deprn, p_log_level_rec => p_log_level_rec);
4625: end if;
4626:
4627: end if;
4628: ---------------------
4628: ---------------------
4629:
4630:
4631: if p_log_level_rec.statement_level then
4632: fa_debug_pkg.add('farboe(1.5)','temp_start_pp',temp_start_pp);
4633: fa_debug_pkg.add('farboe(1.5)','end_pp',end_pp);
4634: fa_debug_pkg.add('farboe(1.5)','pds_catchup',pds_catchup);
4635: fa_debug_pkg.add('farboe(1.5)','temp_pds',temp_pds);
4636: fa_debug_pkg.add('farboe(1.5)','temp_frac',temp_frac);
4629:
4630:
4631: if p_log_level_rec.statement_level then
4632: fa_debug_pkg.add('farboe(1.5)','temp_start_pp',temp_start_pp);
4633: fa_debug_pkg.add('farboe(1.5)','end_pp',end_pp);
4634: fa_debug_pkg.add('farboe(1.5)','pds_catchup',pds_catchup);
4635: fa_debug_pkg.add('farboe(1.5)','temp_pds',temp_pds);
4636: fa_debug_pkg.add('farboe(1.5)','temp_frac',temp_frac);
4637: fa_debug_pkg.add('farboe(1.5)','h_tot_deprn',h_tot_deprn);
4630:
4631: if p_log_level_rec.statement_level then
4632: fa_debug_pkg.add('farboe(1.5)','temp_start_pp',temp_start_pp);
4633: fa_debug_pkg.add('farboe(1.5)','end_pp',end_pp);
4634: fa_debug_pkg.add('farboe(1.5)','pds_catchup',pds_catchup);
4635: fa_debug_pkg.add('farboe(1.5)','temp_pds',temp_pds);
4636: fa_debug_pkg.add('farboe(1.5)','temp_frac',temp_frac);
4637: fa_debug_pkg.add('farboe(1.5)','h_tot_deprn',h_tot_deprn);
4638: end if;
4631: if p_log_level_rec.statement_level then
4632: fa_debug_pkg.add('farboe(1.5)','temp_start_pp',temp_start_pp);
4633: fa_debug_pkg.add('farboe(1.5)','end_pp',end_pp);
4634: fa_debug_pkg.add('farboe(1.5)','pds_catchup',pds_catchup);
4635: fa_debug_pkg.add('farboe(1.5)','temp_pds',temp_pds);
4636: fa_debug_pkg.add('farboe(1.5)','temp_frac',temp_frac);
4637: fa_debug_pkg.add('farboe(1.5)','h_tot_deprn',h_tot_deprn);
4638: end if;
4639:
4632: fa_debug_pkg.add('farboe(1.5)','temp_start_pp',temp_start_pp);
4633: fa_debug_pkg.add('farboe(1.5)','end_pp',end_pp);
4634: fa_debug_pkg.add('farboe(1.5)','pds_catchup',pds_catchup);
4635: fa_debug_pkg.add('farboe(1.5)','temp_pds',temp_pds);
4636: fa_debug_pkg.add('farboe(1.5)','temp_frac',temp_frac);
4637: fa_debug_pkg.add('farboe(1.5)','h_tot_deprn',h_tot_deprn);
4638: end if;
4639:
4640: end if;
4633: fa_debug_pkg.add('farboe(1.5)','end_pp',end_pp);
4634: fa_debug_pkg.add('farboe(1.5)','pds_catchup',pds_catchup);
4635: fa_debug_pkg.add('farboe(1.5)','temp_pds',temp_pds);
4636: fa_debug_pkg.add('farboe(1.5)','temp_frac',temp_frac);
4637: fa_debug_pkg.add('farboe(1.5)','h_tot_deprn',h_tot_deprn);
4638: end if;
4639:
4640: end if;
4641:
4643: elsif p_pers_per_yr = 365 and pds_catchup <> 0
4644: and nvl(bk.pc_fully_reserved,-1) <> h_start_pd_pc then -- p_pds_per year is 365
4645:
4646: if p_log_level_rec.statement_level then
4647: fa_debug_pkg.add('farboe','IN 365',365, p_log_level_rec => p_log_level_rec);
4648: fa_debug_pkg.add('farboe','++ p_cal',p_cal, p_log_level_rec => p_log_level_rec);
4649: fa_debug_pkg.add('farboe','++ fiscal_year_name',fiscal_year_name, p_log_level_rec => p_log_level_rec);
4650: fa_debug_pkg.add('farboe','++ bk.deprn_start_jdate',bk.deprn_start_jdate, p_log_level_rec => p_log_level_rec);
4651: end if;
4644: and nvl(bk.pc_fully_reserved,-1) <> h_start_pd_pc then -- p_pds_per year is 365
4645:
4646: if p_log_level_rec.statement_level then
4647: fa_debug_pkg.add('farboe','IN 365',365, p_log_level_rec => p_log_level_rec);
4648: fa_debug_pkg.add('farboe','++ p_cal',p_cal, p_log_level_rec => p_log_level_rec);
4649: fa_debug_pkg.add('farboe','++ fiscal_year_name',fiscal_year_name, p_log_level_rec => p_log_level_rec);
4650: fa_debug_pkg.add('farboe','++ bk.deprn_start_jdate',bk.deprn_start_jdate, p_log_level_rec => p_log_level_rec);
4651: end if;
4652:
4645:
4646: if p_log_level_rec.statement_level then
4647: fa_debug_pkg.add('farboe','IN 365',365, p_log_level_rec => p_log_level_rec);
4648: fa_debug_pkg.add('farboe','++ p_cal',p_cal, p_log_level_rec => p_log_level_rec);
4649: fa_debug_pkg.add('farboe','++ fiscal_year_name',fiscal_year_name, p_log_level_rec => p_log_level_rec);
4650: fa_debug_pkg.add('farboe','++ bk.deprn_start_jdate',bk.deprn_start_jdate, p_log_level_rec => p_log_level_rec);
4651: end if;
4652:
4653: -- Bug fix 5660467(Added if condition to call funtion FA_GAINLOSS_DPR_PKG.CALC_CATCHUP
4646: if p_log_level_rec.statement_level then
4647: fa_debug_pkg.add('farboe','IN 365',365, p_log_level_rec => p_log_level_rec);
4648: fa_debug_pkg.add('farboe','++ p_cal',p_cal, p_log_level_rec => p_log_level_rec);
4649: fa_debug_pkg.add('farboe','++ fiscal_year_name',fiscal_year_name, p_log_level_rec => p_log_level_rec);
4650: fa_debug_pkg.add('farboe','++ bk.deprn_start_jdate',bk.deprn_start_jdate, p_log_level_rec => p_log_level_rec);
4651: end if;
4652:
4653: -- Bug fix 5660467(Added if condition to call funtion FA_GAINLOSS_DPR_PKG.CALC_CATCHUP
4654: -- only when asset was added without reserve)
4692: end if;
4693: end if;
4694:
4695: if p_log_level_rec.statement_level then
4696: fa_debug_pkg.add('farboe','++ h_daily_annual_adj_check ',h_daily_annual_adj_check, p_log_level_rec => p_log_level_rec);
4697: end if;
4698:
4699: if h_Brow_deprn_reserve = 0 or h_daily_annual_adj_check <> 0 then
4700: -- Bug# 5018194
4705: raise farboe_err;
4706: end if;
4707:
4708: if p_log_level_rec.statement_level then
4709: fa_debug_pkg.add('farboe','++ deprn_start_fy', deprn_start_fy, p_log_level_rec => p_log_level_rec);
4710: fa_debug_pkg.add('farboe','++ deprn_start_pnum', deprn_start_pnum, p_log_level_rec => p_log_level_rec);
4711: end if;
4712:
4713: h_ret_pjdate := to_char(bk.ret_prorate_date, 'J');
4706: end if;
4707:
4708: if p_log_level_rec.statement_level then
4709: fa_debug_pkg.add('farboe','++ deprn_start_fy', deprn_start_fy, p_log_level_rec => p_log_level_rec);
4710: fa_debug_pkg.add('farboe','++ deprn_start_pnum', deprn_start_pnum, p_log_level_rec => p_log_level_rec);
4711: end if;
4712:
4713: h_ret_pjdate := to_char(bk.ret_prorate_date, 'J');
4714:
4712:
4713: h_ret_pjdate := to_char(bk.ret_prorate_date, 'J');
4714:
4715: if p_log_level_rec.statement_level then
4716: fa_debug_pkg.add('farboe','h_ret_pjdate',h_ret_pjdate, p_log_level_rec => p_log_level_rec);
4717: end if;
4718:
4719: -- Get the depreciation start prorate period
4720: if not fa_cache_pkg.fazccp(p_cal, fiscal_year_name, h_ret_pjdate,
4722: raise farboe_err;
4723: end if;
4724:
4725: if p_log_level_rec.statement_level then
4726: fa_debug_pkg.add('farboe','h_ret_pp',h_ret_pp, p_log_level_rec => p_log_level_rec);
4727: fa_debug_pkg.add('farboe','start_pp',start_pp, p_log_level_rec => p_log_level_rec);
4728: fa_debug_pkg.add('farboe','h_start_pd_endpp',h_start_pd_endpp, p_log_level_rec => p_log_level_rec);
4729: end if;
4730:
4723: end if;
4724:
4725: if p_log_level_rec.statement_level then
4726: fa_debug_pkg.add('farboe','h_ret_pp',h_ret_pp, p_log_level_rec => p_log_level_rec);
4727: fa_debug_pkg.add('farboe','start_pp',start_pp, p_log_level_rec => p_log_level_rec);
4728: fa_debug_pkg.add('farboe','h_start_pd_endpp',h_start_pd_endpp, p_log_level_rec => p_log_level_rec);
4729: end if;
4730:
4731: /* Bug#4347020 */
4724:
4725: if p_log_level_rec.statement_level then
4726: fa_debug_pkg.add('farboe','h_ret_pp',h_ret_pp, p_log_level_rec => p_log_level_rec);
4727: fa_debug_pkg.add('farboe','start_pp',start_pp, p_log_level_rec => p_log_level_rec);
4728: fa_debug_pkg.add('farboe','h_start_pd_endpp',h_start_pd_endpp, p_log_level_rec => p_log_level_rec);
4729: end if;
4730:
4731: /* Bug#4347020 */
4732: h_amt_to_retain :=
4742: raise farboe_err;
4743: end if;
4744:
4745: if p_log_level_rec.statement_level then
4746: fa_debug_pkg.add('farboe','h_tot_deprn - Before', h_tot_deprn, p_log_level_rec => p_log_level_rec);
4747: fa_debug_pkg.add('farboe','h_amt_to_retain - Before', h_amt_to_retain, p_log_level_rec => p_log_level_rec);
4748: end if;
4749:
4750: h_tot_deprn := h_tot_deprn - h_amt_to_retain;
4743: end if;
4744:
4745: if p_log_level_rec.statement_level then
4746: fa_debug_pkg.add('farboe','h_tot_deprn - Before', h_tot_deprn, p_log_level_rec => p_log_level_rec);
4747: fa_debug_pkg.add('farboe','h_amt_to_retain - Before', h_amt_to_retain, p_log_level_rec => p_log_level_rec);
4748: end if;
4749:
4750: h_tot_deprn := h_tot_deprn - h_amt_to_retain;
4751:
4749:
4750: h_tot_deprn := h_tot_deprn - h_amt_to_retain;
4751:
4752: if p_log_level_rec.statement_level then
4753: fa_debug_pkg.add('farboe','h_start_pd_deprn',h_start_pd_deprn, p_log_level_rec => p_log_level_rec);
4754: fa_debug_pkg.add('farboe','OLD: h_tot_deprn',h_tot_deprn, p_log_level_rec => p_log_level_rec);
4755: end if;
4756:
4757: --------------------- NEW APPROACH for Bug#5074257
4750: h_tot_deprn := h_tot_deprn - h_amt_to_retain;
4751:
4752: if p_log_level_rec.statement_level then
4753: fa_debug_pkg.add('farboe','h_start_pd_deprn',h_start_pd_deprn, p_log_level_rec => p_log_level_rec);
4754: fa_debug_pkg.add('farboe','OLD: h_tot_deprn',h_tot_deprn, p_log_level_rec => p_log_level_rec);
4755: end if;
4756:
4757: --------------------- NEW APPROACH for Bug#5074257
4758: -- We can remove the logic above after some more verifications.
4757: --------------------- NEW APPROACH for Bug#5074257
4758: -- We can remove the logic above after some more verifications.
4759:
4760: if p_log_level_rec.statement_level then
4761: fa_debug_pkg.add('farboe','++ 365 CATCHUP: ret.th_id_in', ret.th_id_in, p_log_level_rec => p_log_level_rec);
4762: fa_debug_pkg.add('farboe','++ 365 CATCHUP: deprn_start_pnum', deprn_start_pnum, p_log_level_rec => p_log_level_rec);
4763: fa_debug_pkg.add('farboe','++ 365 CATCHUP: deprn_start_fy', deprn_start_fy, p_log_level_rec => p_log_level_rec);
4764: end if;
4765:
4758: -- We can remove the logic above after some more verifications.
4759:
4760: if p_log_level_rec.statement_level then
4761: fa_debug_pkg.add('farboe','++ 365 CATCHUP: ret.th_id_in', ret.th_id_in, p_log_level_rec => p_log_level_rec);
4762: fa_debug_pkg.add('farboe','++ 365 CATCHUP: deprn_start_pnum', deprn_start_pnum, p_log_level_rec => p_log_level_rec);
4763: fa_debug_pkg.add('farboe','++ 365 CATCHUP: deprn_start_fy', deprn_start_fy, p_log_level_rec => p_log_level_rec);
4764: end if;
4765:
4766: if (not FA_GAINLOSS_DPR_PKG.CALC_CATCHUP(
4759:
4760: if p_log_level_rec.statement_level then
4761: fa_debug_pkg.add('farboe','++ 365 CATCHUP: ret.th_id_in', ret.th_id_in, p_log_level_rec => p_log_level_rec);
4762: fa_debug_pkg.add('farboe','++ 365 CATCHUP: deprn_start_pnum', deprn_start_pnum, p_log_level_rec => p_log_level_rec);
4763: fa_debug_pkg.add('farboe','++ 365 CATCHUP: deprn_start_fy', deprn_start_fy, p_log_level_rec => p_log_level_rec);
4764: end if;
4765:
4766: if (not FA_GAINLOSS_DPR_PKG.CALC_CATCHUP(
4767: ret => ret,
4845: h_amt_to_retain := h_start_pd_deprn * ((h_ret_pp - start_pp) /
4846: ((h_start_pd_endpp - start_pp) + 1));
4847:
4848: if p_log_level_rec.statement_level then
4849: fa_debug_pkg.add('farboe','h_amt_to_retain ', h_amt_to_retain,p_log_level_rec => p_log_level_rec);
4850: end if;
4851: h_tot_deprn := l_deprn_exp - h_amt_to_retain;
4852: elsif bk.fully_reserved then
4853:
4860:
4861: h_amt_to_retain := h_amt_to_retain + (-1 * h_adj_exp_row);
4862:
4863: if p_log_level_rec.statement_level then
4864: fa_debug_pkg.add('farboe','h_tot_deprn - Before', h_tot_deprn,p_log_level_rec => p_log_level_rec);
4865: fa_debug_pkg.add('farboe','h_amt_to_retain - Before', h_amt_to_retain,p_log_level_rec => p_log_level_rec);
4866: end if;
4867:
4868: h_tot_deprn := l_deprn_exp - h_amt_to_retain;
4861: h_amt_to_retain := h_amt_to_retain + (-1 * h_adj_exp_row);
4862:
4863: if p_log_level_rec.statement_level then
4864: fa_debug_pkg.add('farboe','h_tot_deprn - Before', h_tot_deprn,p_log_level_rec => p_log_level_rec);
4865: fa_debug_pkg.add('farboe','h_amt_to_retain - Before', h_amt_to_retain,p_log_level_rec => p_log_level_rec);
4866: end if;
4867:
4868: h_tot_deprn := l_deprn_exp - h_amt_to_retain;
4869: else
4869: else
4870: h_tot_deprn := l_deprn_exp * abs(pds_catchup) / (end_pp - start_pp);
4871:
4872: if p_log_level_rec.statement_level then
4873: fa_debug_pkg.add('farboe','l_deprn_exp ', l_deprn_exp,p_log_level_rec => p_log_level_rec);
4874: fa_debug_pkg.add('farboe','h_tot_deprn - after', h_tot_deprn,p_log_level_rec => p_log_level_rec);
4875: end if;
4876: end if;
4877:
4870: h_tot_deprn := l_deprn_exp * abs(pds_catchup) / (end_pp - start_pp);
4871:
4872: if p_log_level_rec.statement_level then
4873: fa_debug_pkg.add('farboe','l_deprn_exp ', l_deprn_exp,p_log_level_rec => p_log_level_rec);
4874: fa_debug_pkg.add('farboe','h_tot_deprn - after', h_tot_deprn,p_log_level_rec => p_log_level_rec);
4875: end if;
4876: end if;
4877:
4878: end if;
4878: end if;
4879: end if;
4880:
4881: if p_log_level_rec.statement_level then
4882: fa_debug_pkg.add('farboe','++ 365 CATCHUP: h_same_fy', h_same_fy, p_log_level_rec => p_log_level_rec);
4883: fa_debug_pkg.add('farboe','++ 365 CATCHUP: l_deprn_exp', l_deprn_exp, p_log_level_rec => p_log_level_rec);
4884: fa_debug_pkg.add('farboe','++ 365 CATCHUP: pds_catchup', pds_catchup, p_log_level_rec => p_log_level_rec);
4885: fa_debug_pkg.add('farboe','++ 365 CATCHUP: start_pp', start_pp, p_log_level_rec => p_log_level_rec);
4886: fa_debug_pkg.add('farboe','++ 365 CATCHUP: deprn_start_pnum', deprn_start_pnum, p_log_level_rec => p_log_level_rec);
4879: end if;
4880:
4881: if p_log_level_rec.statement_level then
4882: fa_debug_pkg.add('farboe','++ 365 CATCHUP: h_same_fy', h_same_fy, p_log_level_rec => p_log_level_rec);
4883: fa_debug_pkg.add('farboe','++ 365 CATCHUP: l_deprn_exp', l_deprn_exp, p_log_level_rec => p_log_level_rec);
4884: fa_debug_pkg.add('farboe','++ 365 CATCHUP: pds_catchup', pds_catchup, p_log_level_rec => p_log_level_rec);
4885: fa_debug_pkg.add('farboe','++ 365 CATCHUP: start_pp', start_pp, p_log_level_rec => p_log_level_rec);
4886: fa_debug_pkg.add('farboe','++ 365 CATCHUP: deprn_start_pnum', deprn_start_pnum, p_log_level_rec => p_log_level_rec);
4887: fa_debug_pkg.add('farboe','++ 365 CATCHUP: end_pp', end_pp, p_log_level_rec => p_log_level_rec);
4880:
4881: if p_log_level_rec.statement_level then
4882: fa_debug_pkg.add('farboe','++ 365 CATCHUP: h_same_fy', h_same_fy, p_log_level_rec => p_log_level_rec);
4883: fa_debug_pkg.add('farboe','++ 365 CATCHUP: l_deprn_exp', l_deprn_exp, p_log_level_rec => p_log_level_rec);
4884: fa_debug_pkg.add('farboe','++ 365 CATCHUP: pds_catchup', pds_catchup, p_log_level_rec => p_log_level_rec);
4885: fa_debug_pkg.add('farboe','++ 365 CATCHUP: start_pp', start_pp, p_log_level_rec => p_log_level_rec);
4886: fa_debug_pkg.add('farboe','++ 365 CATCHUP: deprn_start_pnum', deprn_start_pnum, p_log_level_rec => p_log_level_rec);
4887: fa_debug_pkg.add('farboe','++ 365 CATCHUP: end_pp', end_pp, p_log_level_rec => p_log_level_rec);
4888: fa_debug_pkg.add('farboe','++ 365 CATCHUP: h_tot_deprn', h_tot_deprn, p_log_level_rec => p_log_level_rec);
4881: if p_log_level_rec.statement_level then
4882: fa_debug_pkg.add('farboe','++ 365 CATCHUP: h_same_fy', h_same_fy, p_log_level_rec => p_log_level_rec);
4883: fa_debug_pkg.add('farboe','++ 365 CATCHUP: l_deprn_exp', l_deprn_exp, p_log_level_rec => p_log_level_rec);
4884: fa_debug_pkg.add('farboe','++ 365 CATCHUP: pds_catchup', pds_catchup, p_log_level_rec => p_log_level_rec);
4885: fa_debug_pkg.add('farboe','++ 365 CATCHUP: start_pp', start_pp, p_log_level_rec => p_log_level_rec);
4886: fa_debug_pkg.add('farboe','++ 365 CATCHUP: deprn_start_pnum', deprn_start_pnum, p_log_level_rec => p_log_level_rec);
4887: fa_debug_pkg.add('farboe','++ 365 CATCHUP: end_pp', end_pp, p_log_level_rec => p_log_level_rec);
4888: fa_debug_pkg.add('farboe','++ 365 CATCHUP: h_tot_deprn', h_tot_deprn, p_log_level_rec => p_log_level_rec);
4889: end if;
4882: fa_debug_pkg.add('farboe','++ 365 CATCHUP: h_same_fy', h_same_fy, p_log_level_rec => p_log_level_rec);
4883: fa_debug_pkg.add('farboe','++ 365 CATCHUP: l_deprn_exp', l_deprn_exp, p_log_level_rec => p_log_level_rec);
4884: fa_debug_pkg.add('farboe','++ 365 CATCHUP: pds_catchup', pds_catchup, p_log_level_rec => p_log_level_rec);
4885: fa_debug_pkg.add('farboe','++ 365 CATCHUP: start_pp', start_pp, p_log_level_rec => p_log_level_rec);
4886: fa_debug_pkg.add('farboe','++ 365 CATCHUP: deprn_start_pnum', deprn_start_pnum, p_log_level_rec => p_log_level_rec);
4887: fa_debug_pkg.add('farboe','++ 365 CATCHUP: end_pp', end_pp, p_log_level_rec => p_log_level_rec);
4888: fa_debug_pkg.add('farboe','++ 365 CATCHUP: h_tot_deprn', h_tot_deprn, p_log_level_rec => p_log_level_rec);
4889: end if;
4890:
4883: fa_debug_pkg.add('farboe','++ 365 CATCHUP: l_deprn_exp', l_deprn_exp, p_log_level_rec => p_log_level_rec);
4884: fa_debug_pkg.add('farboe','++ 365 CATCHUP: pds_catchup', pds_catchup, p_log_level_rec => p_log_level_rec);
4885: fa_debug_pkg.add('farboe','++ 365 CATCHUP: start_pp', start_pp, p_log_level_rec => p_log_level_rec);
4886: fa_debug_pkg.add('farboe','++ 365 CATCHUP: deprn_start_pnum', deprn_start_pnum, p_log_level_rec => p_log_level_rec);
4887: fa_debug_pkg.add('farboe','++ 365 CATCHUP: end_pp', end_pp, p_log_level_rec => p_log_level_rec);
4888: fa_debug_pkg.add('farboe','++ 365 CATCHUP: h_tot_deprn', h_tot_deprn, p_log_level_rec => p_log_level_rec);
4889: end if;
4890:
4891: ---------------------
4884: fa_debug_pkg.add('farboe','++ 365 CATCHUP: pds_catchup', pds_catchup, p_log_level_rec => p_log_level_rec);
4885: fa_debug_pkg.add('farboe','++ 365 CATCHUP: start_pp', start_pp, p_log_level_rec => p_log_level_rec);
4886: fa_debug_pkg.add('farboe','++ 365 CATCHUP: deprn_start_pnum', deprn_start_pnum, p_log_level_rec => p_log_level_rec);
4887: fa_debug_pkg.add('farboe','++ 365 CATCHUP: end_pp', end_pp, p_log_level_rec => p_log_level_rec);
4888: fa_debug_pkg.add('farboe','++ 365 CATCHUP: h_tot_deprn', h_tot_deprn, p_log_level_rec => p_log_level_rec);
4889: end if;
4890:
4891: ---------------------
4892:
4896: elsif p_pers_per_yr = 365 and h_start_pdnum = h_end_pdnum - 1 and
4897: nvl(bk.pc_fully_reserved,-1) = h_start_pd_pc then
4898:
4899: if p_log_level_rec.statement_level then
4900: fa_debug_pkg.add('farboe','365 prorate and pcfr',h_start_pd_deprn, p_log_level_rec => p_log_level_rec);
4901: end if;
4902: h_dpr_temp := dpr;
4903: h_dpr_temp.rsv_known_flag := TRUE;
4904: h_dpr_temp.deprn_rsv := 0;
4937:
4938: end if;
4939:
4940: if p_log_level_rec.statement_level then
4941: fa_debug_pkg.add('farboe','after fagcdp deprn_amt',deprn_amt, p_log_level_rec => p_log_level_rec);
4942: end if;
4943: -- bug fix 5716178
4944: if(deprn_amt <> 0)then
4945: h_temp_end_pp := (h_tot_deprn * ((h_start_pd_endpp - start_pp) + 1)) /
4953: raise farboe_err;
4954: end if;
4955:
4956: if p_log_level_rec.statement_level then
4957: fa_debug_pkg.add('farboe','after faxceil',h_temp_end_pp, p_log_level_rec => p_log_level_rec);
4958: end if;
4959:
4960: h_ret_pjdate := to_char(bk.ret_prorate_date, 'J');
4961: if p_log_level_rec.statement_level then
4958: end if;
4959:
4960: h_ret_pjdate := to_char(bk.ret_prorate_date, 'J');
4961: if p_log_level_rec.statement_level then
4962: fa_debug_pkg.add('farboe','h_ret_pjdate',h_ret_pjdate, p_log_level_rec => p_log_level_rec);
4963: end if;
4964:
4965: -- Get the depreciation start prorate period
4966: if not fa_cache_pkg.fazccp(p_cal, fiscal_year_name, h_ret_pjdate,
5013:
5014: adj_row.adjustment_amount := nvl(h_tot_deprn,0) - nvl(h_temp_deprn_tot,0); --bug fix 3558253 and 3518604 start
5015:
5016: if p_log_level_rec.statement_level then
5017: fa_debug_pkg.add('farboe','h_tot_deprn final',h_tot_deprn, p_log_level_rec => p_log_level_rec);
5018: end if;
5019:
5020: --bugfix 4380845
5021: -- Call faxrnd
5091: adj_row.units_retired := units_retired;
5092: adj_row.selection_mode := FA_STD_TYPES.FA_AJ_RETIRE;
5093:
5094: if p_log_level_rec.statement_level then
5095: fa_debug_pkg.add
5096: (fname => l_calling_fn,
5097: element => 'dist and deprn',
5098: value => '', p_log_level_rec => p_log_level_rec);
5099: end if;
5232:
5233: BEGIN <
5234:
5235: if p_log_level_rec.statement_level then
5236: fa_debug_pkg.add(l_calling_fn, 'in FAGPDP 1', '', p_log_level_rec => p_log_level_rec);
5237: fa_debug_pkg.add(l_calling_fn, 'pds_catchup=', pds_catchup, p_log_level_rec => p_log_level_rec);
5238: end if;
5239:
5240: h_book := ret.book;
5233: BEGIN <
5234:
5235: if p_log_level_rec.statement_level then
5236: fa_debug_pkg.add(l_calling_fn, 'in FAGPDP 1', '', p_log_level_rec => p_log_level_rec);
5237: fa_debug_pkg.add(l_calling_fn, 'pds_catchup=', pds_catchup, p_log_level_rec => p_log_level_rec);
5238: end if;
5239:
5240: h_book := ret.book;
5241: h_asset_id := ret.asset_id;
5253: return(TRUE);
5254: end if;
5255:
5256: if p_log_level_rec.statement_level then
5257: fa_debug_pkg.add(l_calling_fn, 'in FAGPDP 3', '', p_log_level_rec => p_log_level_rec);
5258: end if;
5259:
5260: begin
5261: select fy.fiscal_year
5286: if (pds_catchup <= 0) or
5287: (not bk.depreciate_lastyr) or
5288: ( (bk.depr_first_year_ret = 0) and (h_current_fiscal_yr = l_first_fiscal_year) ) then
5289:
5290: if p_log_level_rec.statement_level then fa_debug_pkg.add(l_calling_fn, 'in FAGPDP 3', '', p_log_level_rec => p_log_level_rec); end if;
5291: h_stop_pdnum := cpdnum;
5292:
5293: /* Determine the period number to start marching forward */
5294:
5305: fa_srvr_msg.add_message(calling_fn => l_calling_fn, p_log_level_rec => p_log_level_rec);
5306: raise fagpdp_err;
5307: end if;
5308:
5309: if p_log_level_rec.statement_level then fa_debug_pkg.add(l_calling_fn, 'in FAGPDP 3.1', '', p_log_level_rec => p_log_level_rec); end if;
5310:
5311: if (p_log_level_rec.statement_level) then
5312: fa_debug_pkg.add('fagpdp','bk.depreciate_lastyr',bk.depreciate_lastyr, p_log_level_rec => p_log_level_rec);
5313: fa_debug_pkg.add('fagpdp','bk.depr_first_year_ret',bk.depr_first_year_ret, p_log_level_rec => p_log_level_rec);
5308:
5309: if p_log_level_rec.statement_level then fa_debug_pkg.add(l_calling_fn, 'in FAGPDP 3.1', '', p_log_level_rec => p_log_level_rec); end if;
5310:
5311: if (p_log_level_rec.statement_level) then
5312: fa_debug_pkg.add('fagpdp','bk.depreciate_lastyr',bk.depreciate_lastyr, p_log_level_rec => p_log_level_rec);
5313: fa_debug_pkg.add('fagpdp','bk.depr_first_year_ret',bk.depr_first_year_ret, p_log_level_rec => p_log_level_rec);
5314: end if;
5315:
5316: -- Bug#4867806: if not bk.depreciate_lastyr then
5309: if p_log_level_rec.statement_level then fa_debug_pkg.add(l_calling_fn, 'in FAGPDP 3.1', '', p_log_level_rec => p_log_level_rec); end if;
5310:
5311: if (p_log_level_rec.statement_level) then
5312: fa_debug_pkg.add('fagpdp','bk.depreciate_lastyr',bk.depreciate_lastyr, p_log_level_rec => p_log_level_rec);
5313: fa_debug_pkg.add('fagpdp','bk.depr_first_year_ret',bk.depr_first_year_ret, p_log_level_rec => p_log_level_rec);
5314: end if;
5315:
5316: -- Bug#4867806: if not bk.depreciate_lastyr then
5317: -- Bug#8665405: Checking if it is in first fiscal year
5317: -- Bug#8665405: Checking if it is in first fiscal year
5318: if (not bk.depreciate_lastyr) or ((bk.depr_first_year_ret = 0) and (h_current_fiscal_yr = l_first_fiscal_year)) then
5319:
5320: if p_log_level_rec.statement_level then
5321: fa_debug_pkg.add(l_calling_fn, 'in FAGPDP 4', '', p_log_level_rec => p_log_level_rec);
5322: end if;
5323:
5324: if (deprn_start_fy * bk.pers_per_yr + deprn_start_pnum) >=
5325: (bk.cpd_fiscal_year * bk.pers_per_yr + 1) then
5326:
5327: h_work_pdnum := deprn_start_pnum;
5328:
5329: if (p_log_level_rec.statement_level) then
5330: fa_debug_pkg.add('fagpdp(1.1)','h_work_pdnum',h_work_pdnum);
5331: end if;
5332:
5333: else
5334: h_work_pdnum := 1;
5333: else
5334: h_work_pdnum := 1;
5335:
5336: if (p_log_level_rec.statement_level) then
5337: fa_debug_pkg.add('fagpdp(1.2)','h_work_pdnum',h_work_pdnum);
5338: end if;
5339:
5340: end if;
5341:
5339:
5340: end if;
5341:
5342: if p_log_level_rec.statement_level then
5343: fa_debug_pkg.add(l_calling_fn, 'in FAGPDP 4.1', '', p_log_level_rec => p_log_level_rec);
5344: end if;
5345:
5346: else
5347: /* get the depreciation period in which the retirement
5346: else
5347: /* get the depreciation period in which the retirement
5348: prorate date falls into */
5349: if p_log_level_rec.statement_level then
5350: fa_debug_pkg.add(l_calling_fn, 'in FAGPDP 5', '', p_log_level_rec => p_log_level_rec);
5351: fa_debug_pkg.add(l_calling_fn, 'h_d_cal', h_d_cal, p_log_level_rec => p_log_level_rec);
5352: fa_debug_pkg.add(l_calling_fn, 'h_ret_p_date', h_ret_p_date, p_log_level_rec => p_log_level_rec);
5353: end if;
5354:
5347: /* get the depreciation period in which the retirement
5348: prorate date falls into */
5349: if p_log_level_rec.statement_level then
5350: fa_debug_pkg.add(l_calling_fn, 'in FAGPDP 5', '', p_log_level_rec => p_log_level_rec);
5351: fa_debug_pkg.add(l_calling_fn, 'h_d_cal', h_d_cal, p_log_level_rec => p_log_level_rec);
5352: fa_debug_pkg.add(l_calling_fn, 'h_ret_p_date', h_ret_p_date, p_log_level_rec => p_log_level_rec);
5353: end if;
5354:
5355: begin
5348: prorate date falls into */
5349: if p_log_level_rec.statement_level then
5350: fa_debug_pkg.add(l_calling_fn, 'in FAGPDP 5', '', p_log_level_rec => p_log_level_rec);
5351: fa_debug_pkg.add(l_calling_fn, 'h_d_cal', h_d_cal, p_log_level_rec => p_log_level_rec);
5352: fa_debug_pkg.add(l_calling_fn, 'h_ret_p_date', h_ret_p_date, p_log_level_rec => p_log_level_rec);
5353: end if;
5354:
5355: begin
5356: SELECT cp.period_num
5364: raise fagpdp_err;
5365: end; -- end of - select
5366:
5367: if p_log_level_rec.statement_level then
5368: fa_debug_pkg.add(l_calling_fn, 'in FAGPDP 5.1.1', '', p_log_level_rec => p_log_level_rec);
5369: end if;
5370:
5371: if (deprn_start_fy * bk.pers_per_yr + deprn_start_pnum) >=
5372: (bk.cpd_fiscal_year * bk.pers_per_yr + h_work_pdnum) then
5375:
5376: end if;
5377:
5378: if (p_log_level_rec.statement_level) then
5379: fa_debug_pkg.add('fagpdp(1.3)','h_work_pdnum',h_work_pdnum);
5380: end if;
5381:
5382: end if;
5383:
5380: end if;
5381:
5382: end if;
5383:
5384: if p_log_level_rec.statement_level then fa_debug_pkg.add(l_calling_fn, 'in FAGPDP 3.2', '', p_log_level_rec => p_log_level_rec); end if;
5385:
5386: /* get the first prorate prorate period in h_work_pdnum
5387: and the last prorate period in h_stop_pdnum to obtain
5388: the total number of prorate periods in the periods that
5483: If the adjustment records were put up by Retirement program, then
5484: don't use the "counter" part (the adjustment_per_period is 0)
5485: */
5486:
5487: if p_log_level_rec.statement_level then fa_debug_pkg.add(l_calling_fn, 'calling farboe', '', p_log_level_rec => p_log_level_rec); end if;
5488:
5489: if (p_log_level_rec.statement_level) then
5490: fa_debug_pkg.add('fagpdp(2)','before calling FARBOE','');
5491: end if;
5486:
5487: if p_log_level_rec.statement_level then fa_debug_pkg.add(l_calling_fn, 'calling farboe', '', p_log_level_rec => p_log_level_rec); end if;
5488:
5489: if (p_log_level_rec.statement_level) then
5490: fa_debug_pkg.add('fagpdp(2)','before calling FARBOE','');
5491: end if;
5492:
5493: if not farboe(ret.asset_id, ret.book, bk.cpd_fiscal_year,
5494: cost_frac, h_work_pdnum, h_stop_pdnum, 'EXPENSE',
5596: end if; -- end of - if bk.current_cost
5597:
5598: else -- This must be pds_catchup > 0
5599:
5600: if p_log_level_rec.statement_level then fa_debug_pkg.add(l_calling_fn, 'in FAGPDP 2', '', p_log_level_rec => p_log_level_rec); end if;
5601:
5602: -- Bug#6920756 Using l_decision_flag to judge as asset as fully reserved/ fully extended.
5603: -- Bug 8211842 : Check if asset has started extended depreciation
5604: if bk.extended_flag and bk.start_extended then
5607: l_decision_flag := bk.fully_reserved;
5608: end if;
5609:
5610: if not l_decision_flag then -- Bug#6920756
5611: if p_log_level_rec.statement_level then fa_debug_pkg.add(l_calling_fn, 'in FAGPDP 2.1', '', p_log_level_rec => p_log_level_rec); end if;
5612: /* BUG# 1400554
5613: populating the account seg for expense with the value
5614: in category books
5615: -- bridgway 09/14/00
5627: and facb.book_type_code = h_book
5628: and bc.book_type_code = facb.book_type_code;
5629:
5630: if p_log_level_rec.statement_level then
5631: fa_debug_pkg.add(l_calling_fn, 'in FAGPDP 3', '', p_log_level_rec => p_log_level_rec);
5632: end if;
5633:
5634: adj_row.account := h_deprn_exp_acct;
5635:
5664:
5665: if (ret.units_retired is NULL or ret.units_retired <= 0) then
5666:
5667: if p_log_level_rec.statement_level then
5668: fa_debug_pkg.add
5669: (l_calling_fn,
5670: 'in FAGPDP 4', '', p_log_level_rec => p_log_level_rec);
5671: fa_debug_pkg.add
5672: (fname => l_calling_fn,
5667: if p_log_level_rec.statement_level then
5668: fa_debug_pkg.add
5669: (l_calling_fn,
5670: 'in FAGPDP 4', '', p_log_level_rec => p_log_level_rec);
5671: fa_debug_pkg.add
5672: (fname => l_calling_fn,
5673: element => 'Insert cost into fa_adj',
5674: value => '', p_log_level_rec => p_log_level_rec);
5675: end if;
6006:
6007: end if; -- end of - if (pds_catchup = 0)
6008:
6009: if p_log_level_rec.statement_level then
6010: fa_debug_pkg.add(l_calling_fn, 'in FAGPDP 3', '', p_log_level_rec => p_log_level_rec);
6011: end if;
6012:
6013: h_deprn_amt := 0;
6014: h_reval_deprn_amt := 0;
6016: h_bonus_deprn_amt := 0;
6017: h_impairment_amt := 0;
6018:
6019: if p_log_level_rec.statement_level then
6020: fa_debug_pkg.add
6021: (fname => l_calling_fn,
6022: element => 'total deprn expense',
6023: value => '', p_log_level_rec => p_log_level_rec);
6024: end if;
6170: bonus_deprn_amt := h_bonus_deprn_amt;
6171: impairment_amt := h_impairment_amt;
6172:
6173: if p_log_level_rec.statement_level then
6174: fa_debug_pkg.add
6175: (fname => l_calling_fn,
6176: element => 'total reval deprn expense',
6177: value => '', p_log_level_rec => p_log_level_rec);
6178: end if;
6218:
6219: reval_deprn_amt := h_reval_deprn_amt;
6220:
6221: if p_log_level_rec.statement_level then
6222: fa_debug_pkg.add
6223: (fname => l_calling_fn,
6224: element => 'total reval amort',
6225: value => '', p_log_level_rec => p_log_level_rec);
6226: end if;
6433: exception when others then null;
6434: l_id := 0;
6435: end;
6436:
6437: fa_debug_pkg.add
6438: (fname => l_calling_fn,
6439: element => 'l_id in fagprv(1)',
6440: value => l_id);
6441:
6438: (fname => l_calling_fn,
6439: element => 'l_id in fagprv(1)',
6440: value => l_id);
6441:
6442: fa_debug_pkg.add
6443: (fname => l_calling_fn,
6444: element => 'ret.retirement_id in fagprv(1)',
6445: value => ret.retirement_id);
6446: end if;
6445: value => ret.retirement_id);
6446: end if;
6447:
6448: if p_log_level_rec.statement_level then
6449: fa_debug_pkg.add
6450: (fname => l_calling_fn,
6451: element => 'cost frac in fagprv',
6452: value => to_char(cost_frac)||':'||to_char(ret.reserve_retired));
6453: end if;
6509: raise fagprv_err;
6510: end if;
6511:
6512: if p_log_level_rec.statement_level then
6513: fa_debug_pkg.add
6514: (fname => l_calling_fn,
6515: element => 'deprn_reserve in fagprv',
6516: value => to_char(deprn_reserve));
6517: fa_debug_pkg.add
6513: fa_debug_pkg.add
6514: (fname => l_calling_fn,
6515: element => 'deprn_reserve in fagprv',
6516: value => to_char(deprn_reserve));
6517: fa_debug_pkg.add
6518: (fname => l_calling_fn,
6519: element => 'deprn_amt in fagprv',
6520: value => to_char(deprn_amt));
6521: end if;
6525: tot_bonus_deprn_reserve := bonus_deprn_reserve + bonus_deprn_amt;
6526: tot_impairment_reserve := impairment_reserve + impairment_amt;
6527:
6528: if p_log_level_rec.statement_level then
6529: fa_debug_pkg.add
6530: (fname => l_calling_fn,
6531: element => 'bonus_deprn_reserve in fagprv',
6532: value => to_char(bonus_deprn_reserve));
6533: fa_debug_pkg.add
6529: fa_debug_pkg.add
6530: (fname => l_calling_fn,
6531: element => 'bonus_deprn_reserve in fagprv',
6532: value => to_char(bonus_deprn_reserve));
6533: fa_debug_pkg.add
6534: (fname => l_calling_fn,
6535: element => 'bonus_deprn_amt in fagprv',
6536: value => to_char(bonus_deprn_amt));
6537: end if;
6568: raise fagprv_err;
6569: end if;
6570:
6571: if p_log_level_rec.statement_level then
6572: fa_debug_pkg.add
6573: (fname => l_calling_fn,
6574: element => 'acct segment in fagprv',
6575: value => '', p_log_level_rec => p_log_level_rec);
6576: end if;
6627: adj_row.asset_invoice_id := 0;
6628: adj_row.leveling_flag := TRUE;
6629:
6630: if p_log_level_rec.statement_level then
6631: fa_debug_pkg.add
6632: (fname => l_calling_fn,
6633: element => 'deprn_allocation_code in fagprv',
6634: value => '', p_log_level_rec => p_log_level_rec);
6635: end if;
6671:
6672: end if;
6673:
6674: if p_log_level_rec.statement_level then
6675: fa_debug_pkg.add(l_calling_fn, '++ bk.book_class (TRUE=TAX)', bk.book_class);
6676: fa_debug_pkg.add(l_calling_fn, '++ adj_row.selection_thid', adj_row.selection_thid, p_log_level_rec => p_log_level_rec);
6677: end if;
6678:
6679: adj_row.mrc_sob_type_code := ret.mrc_sob_type_code;
6672: end if;
6673:
6674: if p_log_level_rec.statement_level then
6675: fa_debug_pkg.add(l_calling_fn, '++ bk.book_class (TRUE=TAX)', bk.book_class);
6676: fa_debug_pkg.add(l_calling_fn, '++ adj_row.selection_thid', adj_row.selection_thid, p_log_level_rec => p_log_level_rec);
6677: end if;
6678:
6679: adj_row.mrc_sob_type_code := ret.mrc_sob_type_code;
6680: adj_row.set_of_books_id := ret.set_of_books_id;
6686: adj_row.track_member_flag := null;
6687: end if;
6688:
6689: if p_log_level_rec.statement_level then
6690: fa_debug_pkg.add
6691: (fname => l_calling_fn,
6692: element => 'Before faxinaj for RESERVE',
6693: value => '', p_log_level_rec => p_log_level_rec);
6694:
6691: (fname => l_calling_fn,
6692: element => 'Before faxinaj for RESERVE',
6693: value => '', p_log_level_rec => p_log_level_rec);
6694:
6695: fa_debug_pkg.add
6696: (fname => l_calling_fn,
6697: element => 'account',
6698: value => adj_row.account, p_log_level_rec => p_log_level_rec);
6699:
6710:
6711: end if;
6712:
6713: if p_log_level_rec.statement_level then
6714: fa_debug_pkg.add
6715: (fname => l_calling_fn,
6716: element => 'After faxinaj for RESERVE',
6717: value => '', p_log_level_rec => p_log_level_rec);
6718: end if;
6751: end if; -- end of tot_bonus_deprn_reserve <> 0
6752:
6753:
6754: if p_log_level_rec.statement_level then
6755: fa_debug_pkg.add
6756: (fname => l_calling_fn,
6757: element => 'After faxinaj for BONUS RESERVE',
6758: value => '', p_log_level_rec => p_log_level_rec);
6759: end if;
6792: end if; -- end of tot_impairment_reserve <> 0
6793:
6794:
6795: if p_log_level_rec.statement_level then
6796: fa_debug_pkg.add
6797: (fname => l_calling_fn,
6798: element => 'After faxinaj for IMPAIR RESERVE',
6799: value => '', p_log_level_rec => p_log_level_rec);
6800: end if;
6838: elsif (not((bk.group_asset_id is not null) and
6839: (nvl(bk.tracking_method, 'ALLOCATE') = 'ALLOCATE'))) then
6840:
6841: if p_log_level_rec.statement_level then
6842: fa_debug_pkg.add
6843: (fname => l_calling_fn,
6844: element => 'h_asset_id in fagprv(2)',
6845: value => h_asset_id);
6846: fa_debug_pkg.add
6842: fa_debug_pkg.add
6843: (fname => l_calling_fn,
6844: element => 'h_asset_id in fagprv(2)',
6845: value => h_asset_id);
6846: fa_debug_pkg.add
6847: (fname => l_calling_fn,
6848: element => 'h_book in fagprv(2)',
6849: value => h_book);
6850: fa_debug_pkg.add
6846: fa_debug_pkg.add
6847: (fname => l_calling_fn,
6848: element => 'h_book in fagprv(2)',
6849: value => h_book);
6850: fa_debug_pkg.add
6851: (fname => l_calling_fn,
6852: element => 'h_ret_id in fagprv(2)',
6853: value => h_ret_id);
6854:
6863: exception when others then null;
6864: l_id := 0;
6865: end;
6866:
6867: fa_debug_pkg.add
6868: (fname => l_calling_fn,
6869: element => 'l_id from dh in fagprv(2)',
6870: value => l_id);
6871:
6884: raise fagprv_err;
6885: end;
6886:
6887: if p_log_level_rec.statement_level then
6888: fa_debug_pkg.add
6889: (fname => l_calling_fn,
6890: element => 'transaction_header_id_out in fagprv',
6891: value => h_id_out, p_log_level_rec => p_log_level_rec);
6892: end if;
6908: h_sum_of_part_active_units := 0;
6909: end;
6910:
6911: if p_log_level_rec.statement_level then
6912: fa_debug_pkg.add
6913: (fname => l_calling_fn,
6914: element => '++ h_sum_of_part_active_units in fagprv',
6915: value => h_sum_of_part_active_units, p_log_level_rec => p_log_level_rec);
6916: end if;
6948:
6949: end if;
6950:
6951: if p_log_level_rec.statement_level then
6952: fa_debug_pkg.add
6953: (fname => l_calling_fn,
6954: element => 'transaction_header_id_out in fagprv',
6955: value => h_id_out, p_log_level_rec => p_log_level_rec);
6956: fa_debug_pkg.add
6952: fa_debug_pkg.add
6953: (fname => l_calling_fn,
6954: element => 'transaction_header_id_out in fagprv',
6955: value => h_id_out, p_log_level_rec => p_log_level_rec);
6956: fa_debug_pkg.add
6957: (fname => l_calling_fn,
6958: element => 'tot_deprn_reserve in fagprv',
6959: value => tot_deprn_reserve, p_log_level_rec => p_log_level_rec);
6960: end if;
6970: end if;
6971:
6972:
6973: if p_log_level_rec.statement_level then
6974: fa_debug_pkg.add
6975: (fname => l_calling_fn,
6976: element => 'cleared amount in fagprv(2)',
6977: value => adj_row.amount_inserted);
6978: fa_debug_pkg.add
6974: fa_debug_pkg.add
6975: (fname => l_calling_fn,
6976: element => 'cleared amount in fagprv(2)',
6977: value => adj_row.amount_inserted);
6978: fa_debug_pkg.add
6979: (fname => l_calling_fn,
6980: element => 'cost_frac in fagprv(2)',
6981: value => cost_frac);
6982: fa_debug_pkg.add
6978: fa_debug_pkg.add
6979: (fname => l_calling_fn,
6980: element => 'cost_frac in fagprv(2)',
6981: value => cost_frac);
6982: fa_debug_pkg.add
6983: (fname => l_calling_fn,
6984: element => 're-allocated amount in fagprv(2)',
6985: value => adj_row.adjustment_amount);
6986: end if;
7020: h_cur_units := 0;
7021: end;
7022:
7023: if p_log_level_rec.statement_level then
7024: fa_debug_pkg.add
7025: (fname => l_calling_fn,
7026: element => '++ h_cur_units in fagprv(2.5)',
7027: value => h_cur_units);
7028: end if;
7069: adj_row.mrc_sob_type_code := ret.mrc_sob_type_code;
7070: adj_row.set_of_books_id := ret.set_of_books_id;
7071:
7072: if p_log_level_rec.statement_level then
7073: fa_debug_pkg.add
7074: (fname => l_calling_fn,
7075: element => 'Insert fa_adjustments in fagprv2,accnt_type',
7076: value => adj_row.account_type, p_log_level_rec => p_log_level_rec);
7077: end if;
7123: adj_row.mrc_sob_type_code := ret.mrc_sob_type_code;
7124: adj_row.set_of_books_id := ret.set_of_books_id;
7125:
7126: if p_log_level_rec.statement_level then
7127: fa_debug_pkg.add
7128: (fname => l_calling_fn,
7129: element => 'Insert fa_adjustments in fagprv2,accnt_type',
7130: value => adj_row.account_type, p_log_level_rec => p_log_level_rec);
7131: end if;
7165:
7166: end if; -- if h_cur_units <> 0
7167:
7168: if p_log_level_rec.statement_level then
7169: fa_debug_pkg.add
7170: (fname => l_calling_fn,
7171: element => 'Before faxinaj for REVAL RESERVE',
7172: value => '', p_log_level_rec => p_log_level_rec);
7173: end if;
7305: ret.bonus_rsv_retired := tot_bonus_deprn_reserve;
7306: ret.impair_rsv_retired := tot_impairment_reserve;
7307:
7308: if p_log_level_rec.statement_level then
7309: fa_debug_pkg.add
7310: (fname => l_calling_fn,
7311: element => 'Value of reval_rsv_retired is ',
7312: value => to_char(tot_reval_reserve));
7313: end if;
7312: value => to_char(tot_reval_reserve));
7313: end if;
7314:
7315: if p_log_level_rec.statement_level then
7316: fa_debug_pkg.add
7317: (fname => l_calling_fn,
7318: element => 'Value of rsv_retired is ',
7319: value => to_char(tot_deprn_reserve));
7320: end if;
7319: value => to_char(tot_deprn_reserve));
7320: end if;
7321:
7322: if p_log_level_rec.statement_level then
7323: fa_debug_pkg.add
7324: (fname => l_calling_fn,
7325: element => 'Return true from EFA_RUPD.fagprv ',
7326: value => to_char(tot_deprn_reserve));
7327: end if;
7442: adj_row.set_of_books_id := ret.set_of_books_id;
7443: adj_row.track_member_flag := null;
7444:
7445: if p_log_level_rec.statement_level then
7446: fa_debug_pkg.add(fname => l_calling_fn,
7447: element => 'Before faxinaj for Group RESERVE',
7448: value => adj_row.adjustment_amount, p_log_level_rec => p_log_level_rec);
7449: end if;
7450:
7500: adj_row.set_of_books_id := ret.set_of_books_id;
7501: adj_row.track_member_flag := null;
7502:
7503: if p_log_level_rec.statement_level then
7504: fa_debug_pkg.add(fname => l_calling_fn,
7505: element => 'Before faxinaj for Group BONUS RESERVE',
7506: value => adj_row.adjustment_amount, p_log_level_rec => p_log_level_rec);
7507: end if;
7508:
7575: adj_row.set_of_books_id := ret.set_of_books_id;
7576: adj_row.track_member_flag := null;
7577:
7578: if p_log_level_rec.statement_level then
7579: fa_debug_pkg.add(fname => l_calling_fn,
7580: element => 'Before faxinaj for Group IMPAIR RESERVE',
7581: value => adj_row.adjustment_amount, p_log_level_rec => p_log_level_rec);
7582: end if;
7583: