52: end if;
53:
54: -- perform basic reclass
55: -- Populate old and new dist lines
56: l_err_stage:= 'fa_reclass_util_pvt.get_asset_distribution';
57:
58: if (p_log_level_rec.statement_level) then
59: fa_debug_pkg.add(l_calling_fn, '-', 'before '||l_err_stage, p_log_level_rec => p_log_level_rec);
60: end if;
58: if (p_log_level_rec.statement_level) then
59: fa_debug_pkg.add(l_calling_fn, '-', 'before '||l_err_stage, p_log_level_rec => p_log_level_rec);
60: end if;
61:
62: if NOT fa_reclass_util_pvt.get_asset_distribution(
63: p_trans_rec => px_trans_rec,
64: p_asset_hdr_rec => px_asset_hdr_rec,
65: p_asset_cat_rec_old => px_asset_cat_rec_old,
66: p_asset_cat_rec_new => px_asset_cat_rec_new,
71:
72:
73: -- populate category desc flex info based on
74: -- p_rec_opt_rec.copy_cat_desc_flag
75: l_err_stage:= 'fa_reclass_util_pvt.get_cat_desc_flex';
76: -- dbms_output.put_line(l_err_stage);
77: if (p_log_level_rec.statement_level) then
78: fa_debug_pkg.add(l_calling_fn, '-', 'before '||l_err_stage, p_log_level_rec => p_log_level_rec);
79: end if;
77: if (p_log_level_rec.statement_level) then
78: fa_debug_pkg.add(l_calling_fn, '-', 'before '||l_err_stage, p_log_level_rec => p_log_level_rec);
79: end if;
80:
81: if NOT fa_reclass_util_pvt.get_cat_desc_flex(
82: p_asset_hdr_rec => px_asset_hdr_rec,
83: px_asset_desc_rec => px_asset_desc_rec,
84: p_asset_cat_rec_old => px_asset_cat_rec_old,
85: px_asset_cat_rec_new => px_asset_cat_rec_new,
221: l_calling_fn varchar2(40) := 'fa_reclass_pvt.validate_reclass';
222: call_err EXCEPTION;
223: BEGIN
224:
225: l_err_stage:= 'fa_reclass_util_pvt.validate_units';
226: -- dbms_output.put_line(l_err_stage);
227: if not fa_reclass_util_pvt.validate_units(
228: p_trans_rec.transaction_type_code,
229: p_asset_hdr_rec.asset_id,
223: BEGIN
224:
225: l_err_stage:= 'fa_reclass_util_pvt.validate_units';
226: -- dbms_output.put_line(l_err_stage);
227: if not fa_reclass_util_pvt.validate_units(
228: p_trans_rec.transaction_type_code,
229: p_asset_hdr_rec.asset_id,
230: l_calling_fn , p_log_level_rec => p_log_level_rec) then
231: raise call_err;
230: l_calling_fn , p_log_level_rec => p_log_level_rec) then
231: raise call_err;
232: end if;
233:
234: l_err_stage:= 'fa_reclass_util_pvt.validate_cat_types';
235: -- dbms_output.put_line(l_err_stage);
236: if not fa_reclass_util_pvt.validate_cat_types(
237: p_trans_rec.transaction_type_code,
238: p_asset_cat_rec_old.category_id,
232: end if;
233:
234: l_err_stage:= 'fa_reclass_util_pvt.validate_cat_types';
235: -- dbms_output.put_line(l_err_stage);
236: if not fa_reclass_util_pvt.validate_cat_types(
237: p_trans_rec.transaction_type_code,
238: p_asset_cat_rec_old.category_id,
239: p_asset_cat_rec_new.category_id,
240: p_asset_desc_rec.lease_id,
243: raise call_err;
244: end if;
245:
246: -- validate CIP accounts
247: l_err_stage:= 'fa_reclass_util_pvt.validate_CIP_accounts';
248: -- dbms_output.put_line(l_err_stage);
249: if not fa_reclass_util_pvt.validate_CIP_accounts(
250: p_trans_rec.transaction_type_code,
251: p_asset_hdr_rec.book_type_code,
245:
246: -- validate CIP accounts
247: l_err_stage:= 'fa_reclass_util_pvt.validate_CIP_accounts';
248: -- dbms_output.put_line(l_err_stage);
249: if not fa_reclass_util_pvt.validate_CIP_accounts(
250: p_trans_rec.transaction_type_code,
251: p_asset_hdr_rec.book_type_code,
252: p_asset_type_rec.asset_type,
253: p_asset_cat_rec_new.category_id,
254: l_calling_fn , p_log_level_rec => p_log_level_rec) then
255: raise call_err;
256: end if;
257:
258: l_err_stage:= 'fa_reclass_util_pvt.check_cat_book_setup';
259: -- dbms_output.put_line(l_err_stage);
260: if not fa_reclass_util_pvt.check_cat_book_setup(
261: p_trans_rec.transaction_type_code,
262: p_asset_cat_rec_new.category_id,
256: end if;
257:
258: l_err_stage:= 'fa_reclass_util_pvt.check_cat_book_setup';
259: -- dbms_output.put_line(l_err_stage);
260: if not fa_reclass_util_pvt.check_cat_book_setup(
261: p_trans_rec.transaction_type_code,
262: p_asset_cat_rec_new.category_id,
263: p_asset_hdr_rec.asset_id,
264: l_calling_fn , p_log_level_rec => p_log_level_rec) then
264: l_calling_fn , p_log_level_rec => p_log_level_rec) then
265: raise call_err;
266: end if;
267:
268: l_err_stage:= 'fa_reclass_util_pvt.validate_pending_retire';
269: -- dbms_output.put_line(l_err_stage);
270: if not fa_reclass_util_pvt.validate_pending_retire(
271: p_trans_rec.transaction_type_code,
272: p_asset_hdr_rec.asset_id,
266: end if;
267:
268: l_err_stage:= 'fa_reclass_util_pvt.validate_pending_retire';
269: -- dbms_output.put_line(l_err_stage);
270: if not fa_reclass_util_pvt.validate_pending_retire(
271: p_trans_rec.transaction_type_code,
272: p_asset_hdr_rec.asset_id,
273: l_calling_fn , p_log_level_rec => p_log_level_rec) then
274: raise call_err;
273: l_calling_fn , p_log_level_rec => p_log_level_rec) then
274: raise call_err;
275: end if;
276:
277: l_err_stage:= 'fa_reclass_util_pvt.validate_fully_retired';
278: -- dbms_output.put_line(l_err_stage);
279: if not fa_reclass_util_pvt.validate_fully_retired(
280: p_trans_rec.transaction_type_code,
281: p_asset_hdr_rec.asset_id,
275: end if;
276:
277: l_err_stage:= 'fa_reclass_util_pvt.validate_fully_retired';
278: -- dbms_output.put_line(l_err_stage);
279: if not fa_reclass_util_pvt.validate_fully_retired(
280: p_trans_rec.transaction_type_code,
281: p_asset_hdr_rec.asset_id,
282: l_calling_fn , p_log_level_rec => p_log_level_rec) then
283: raise call_err;
284: end if;
285:
286: /*
287: -- validate transaction date
288: if not fa_reclass_util_pvt.validate_transaction_date(
289: p_trans_rec,
290: p_asset_hdr_rec.asset_id,
291: p_asset_hdr_rec.book_type_code,
292: l_calling_fn , p_log_level_rec => p_log_level_rec) then
449:
450: FOR book_rec in book_cr(px_asset_hdr_rec.asset_id) LOOP
451:
452: -- validate redefault for each book
453: -- dbms_output.put_line('FA_RECLASS_UTIL_PVT.Validate_Adjustment', p_log_level_rec => p_log_level_rec);
454: -- Bug#12620567
455: if NOT FA_RECLASS_UTIL_PVT.Validate_Adjustment(
456: p_transaction_type_code => px_trans_rec.transaction_type_code,
457: p_asset_id => px_asset_hdr_rec.asset_id,
451:
452: -- validate redefault for each book
453: -- dbms_output.put_line('FA_RECLASS_UTIL_PVT.Validate_Adjustment', p_log_level_rec => p_log_level_rec);
454: -- Bug#12620567
455: if NOT FA_RECLASS_UTIL_PVT.Validate_Adjustment(
456: p_transaction_type_code => px_trans_rec.transaction_type_code,
457: p_asset_id => px_asset_hdr_rec.asset_id,
458: p_book_type_code => book_rec.book_type_code,
459: p_amortize_flag => l_amortize_flag,