55: end if;
56:
57: -- perform basic reclass
58: -- Populate old and new dist lines
59: l_err_stage:= 'fa_reclass_util_pvt.get_asset_distribution';
60:
61: if (p_log_level_rec.statement_level) then
62: fa_debug_pkg.add(l_calling_fn, '-', 'before '||l_err_stage
63: ,p_log_level_rec => p_log_level_rec);
62: fa_debug_pkg.add(l_calling_fn, '-', 'before '||l_err_stage
63: ,p_log_level_rec => p_log_level_rec);
64: end if;
65:
66: if NOT fa_reclass_util_pvt.get_asset_distribution(
67: p_trans_rec => px_trans_rec,
68: p_asset_hdr_rec => px_asset_hdr_rec,
69: p_asset_cat_rec_old => px_asset_cat_rec_old,
70: p_asset_cat_rec_new => px_asset_cat_rec_new,
76:
77:
78: -- populate category desc flex info based on
79: -- p_rec_opt_rec.copy_cat_desc_flag
80: l_err_stage:= 'fa_reclass_util_pvt.get_cat_desc_flex';
81: -- dbms_output.put_line(l_err_stage);
82: if (p_log_level_rec.statement_level) then
83: fa_debug_pkg.add(l_calling_fn, '-', 'before '||l_err_stage
84: ,p_log_level_rec => p_log_level_rec);
83: fa_debug_pkg.add(l_calling_fn, '-', 'before '||l_err_stage
84: ,p_log_level_rec => p_log_level_rec);
85: end if;
86:
87: if NOT fa_reclass_util_pvt.get_cat_desc_flex(
88: p_asset_hdr_rec => px_asset_hdr_rec,
89: px_asset_desc_rec => px_asset_desc_rec,
90: p_asset_cat_rec_old => px_asset_cat_rec_old,
91: px_asset_cat_rec_new => px_asset_cat_rec_new,
232: l_calling_fn varchar2(40) := 'fa_reclass_pvt.validate_reclass';
233: call_err EXCEPTION;
234: BEGIN
235:
236: l_err_stage:= 'fa_reclass_util_pvt.validate_units';
237: -- dbms_output.put_line(l_err_stage);
238: if not fa_reclass_util_pvt.validate_units(
239: p_trans_rec.transaction_type_code,
240: p_asset_hdr_rec.asset_id,
234: BEGIN
235:
236: l_err_stage:= 'fa_reclass_util_pvt.validate_units';
237: -- dbms_output.put_line(l_err_stage);
238: if not fa_reclass_util_pvt.validate_units(
239: p_trans_rec.transaction_type_code,
240: p_asset_hdr_rec.asset_id,
241: l_calling_fn
242: ,p_log_level_rec => p_log_level_rec) then
242: ,p_log_level_rec => p_log_level_rec) then
243: raise call_err;
244: end if;
245:
246: l_err_stage:= 'fa_reclass_util_pvt.validate_cat_types';
247: -- dbms_output.put_line(l_err_stage);
248: if not fa_reclass_util_pvt.validate_cat_types(
249: p_trans_rec.transaction_type_code,
250: p_asset_cat_rec_old.category_id,
244: end if;
245:
246: l_err_stage:= 'fa_reclass_util_pvt.validate_cat_types';
247: -- dbms_output.put_line(l_err_stage);
248: if not fa_reclass_util_pvt.validate_cat_types(
249: p_trans_rec.transaction_type_code,
250: p_asset_cat_rec_old.category_id,
251: p_asset_cat_rec_new.category_id,
252: p_asset_desc_rec.lease_id,
256: raise call_err;
257: end if;
258:
259: -- validate CIP accounts
260: l_err_stage:= 'fa_reclass_util_pvt.validate_CIP_accounts';
261: -- dbms_output.put_line(l_err_stage);
262: if not fa_reclass_util_pvt.validate_CIP_accounts(
263: p_trans_rec.transaction_type_code,
264: p_asset_hdr_rec.book_type_code,
258:
259: -- validate CIP accounts
260: l_err_stage:= 'fa_reclass_util_pvt.validate_CIP_accounts';
261: -- dbms_output.put_line(l_err_stage);
262: if not fa_reclass_util_pvt.validate_CIP_accounts(
263: p_trans_rec.transaction_type_code,
264: p_asset_hdr_rec.book_type_code,
265: p_asset_type_rec.asset_type,
266: p_asset_cat_rec_new.category_id,
268: ,p_log_level_rec => p_log_level_rec) then
269: raise call_err;
270: end if;
271:
272: l_err_stage:= 'fa_reclass_util_pvt.check_cat_book_setup';
273: -- dbms_output.put_line(l_err_stage);
274: if not fa_reclass_util_pvt.check_cat_book_setup(
275: p_trans_rec.transaction_type_code,
276: p_asset_cat_rec_new.category_id,
270: end if;
271:
272: l_err_stage:= 'fa_reclass_util_pvt.check_cat_book_setup';
273: -- dbms_output.put_line(l_err_stage);
274: if not fa_reclass_util_pvt.check_cat_book_setup(
275: p_trans_rec.transaction_type_code,
276: p_asset_cat_rec_new.category_id,
277: p_asset_hdr_rec.asset_id,
278: l_calling_fn
279: ,p_log_level_rec => p_log_level_rec) then
280: raise call_err;
281: end if;
282:
283: l_err_stage:= 'fa_reclass_util_pvt.validate_pending_retire';
284: -- dbms_output.put_line(l_err_stage);
285: if not fa_reclass_util_pvt.validate_pending_retire(
286: p_trans_rec.transaction_type_code,
287: p_asset_hdr_rec.asset_id,
281: end if;
282:
283: l_err_stage:= 'fa_reclass_util_pvt.validate_pending_retire';
284: -- dbms_output.put_line(l_err_stage);
285: if not fa_reclass_util_pvt.validate_pending_retire(
286: p_trans_rec.transaction_type_code,
287: p_asset_hdr_rec.asset_id,
288: l_calling_fn
289: ,p_log_level_rec => p_log_level_rec) then
289: ,p_log_level_rec => p_log_level_rec) then
290: raise call_err;
291: end if;
292:
293: l_err_stage:= 'fa_reclass_util_pvt.validate_fully_retired';
294: -- dbms_output.put_line(l_err_stage);
295: if not fa_reclass_util_pvt.validate_fully_retired(
296: p_trans_rec.transaction_type_code,
297: p_asset_hdr_rec.asset_id,
291: end if;
292:
293: l_err_stage:= 'fa_reclass_util_pvt.validate_fully_retired';
294: -- dbms_output.put_line(l_err_stage);
295: if not fa_reclass_util_pvt.validate_fully_retired(
296: p_trans_rec.transaction_type_code,
297: p_asset_hdr_rec.asset_id,
298: l_calling_fn
299: ,p_log_level_rec => p_log_level_rec) then
301: end if;
302:
303: /*
304: -- validate transaction date
305: if not fa_reclass_util_pvt.validate_transaction_date(
306: p_trans_rec,
307: p_asset_hdr_rec.asset_id,
308: p_asset_hdr_rec.book_type_code,
309: l_calling_fn
474:
475: FOR book_rec in book_cr(px_asset_hdr_rec.asset_id) LOOP
476:
477: -- validate redefault for each book
478: -- dbms_output.put_line('FA_RECLASS_UTIL_PVT.Validate_Adjustment');
479: if NOT FA_RECLASS_UTIL_PVT.Validate_Adjustment(
480: p_transaction_type_code => px_trans_rec.transaction_type_code,
481: p_asset_id => px_asset_hdr_rec.asset_id,
482: p_book_type_code => book_rec.book_type_code,
475: FOR book_rec in book_cr(px_asset_hdr_rec.asset_id) LOOP
476:
477: -- validate redefault for each book
478: -- dbms_output.put_line('FA_RECLASS_UTIL_PVT.Validate_Adjustment');
479: if NOT FA_RECLASS_UTIL_PVT.Validate_Adjustment(
480: p_transaction_type_code => px_trans_rec.transaction_type_code,
481: p_asset_id => px_asset_hdr_rec.asset_id,
482: p_book_type_code => book_rec.book_type_code,
483: p_amortize_flag => l_amortize_flag,