DBA Data[Home] [Help]

APPS.FA_RECLASS_UTIL_PVT dependencies on FA_RECLASS_UTIL_PVT

Line 1: PACKAGE BODY FA_RECLASS_UTIL_PVT AS

1: PACKAGE BODY FA_RECLASS_UTIL_PVT AS
2: /* $Header: FAVRCUTB.pls 120.18.12020000.3 2013/02/07 07:23:41 adaluru ship $ */
3:
4:
5: /* Global Variables */

Line 17: l_calling_fn varchar2(40) := 'fa_reclass_util_pvt.validate_cip_accts';

13: p_category_id IN VARCHAR2,
14: p_calling_fn IN VARCHAR2 , p_log_level_rec IN FA_API_TYPES.log_level_rec_type) return boolean IS
15:
16: v_count number;
17: l_calling_fn varchar2(40) := 'fa_reclass_util_pvt.validate_cip_accts';
18:
19: BEGIN
20: if p_asset_type = 'CIP' then
21: select count(1)

Line 59: l_calling_fn varchar2(40) := 'fa_reclass_util_pvt.check_cat_book_setup';

55: p_calling_fn IN VARCHAR2 , p_log_level_rec IN FA_API_TYPES.log_level_rec_type) return boolean IS
56:
57: l_count1 number;
58: l_count2 number;
59: l_calling_fn varchar2(40) := 'fa_reclass_util_pvt.check_cat_book_setup';
60: BEGIN
61:
62: -- Make sure the new category is defined in all the books the asset belongs to.
63: -- Get the number of books in which the new category is defined for the asset.

Line 115: l_calling_fn varchar2(40) := 'fa_reclass_util_pvt.validate_cat_types';

111: v_old_cap_flag varchar2(3);
112: v_old_cat_type varchar2(30);
113:
114: v_count number;
115: l_calling_fn varchar2(40) := 'fa_reclass_util_pvt.validate_cat_types';
116: BEGIN
117: -- both categories must be capitalized or expensed types
118: --old values
119: select capitalize_flag, category_type

Line 213: l_calling_fn varchar2(40) := 'fa_reclass_util_pvt.validate_units';

209: CURSOR get_dh_units IS
210: SELECT sum(units_assigned) FROM FA_DISTRIBUTION_HISTORY
211: WHERE asset_id = p_asset_id
212: AND date_ineffective is NULL;
213: l_calling_fn varchar2(40) := 'fa_reclass_util_pvt.validate_units';
214: BEGIN
215:
216: -- Units in asset history and
217: -- distribution history must match.

Line 250: l_calling_fn varchar2(40) := 'fa_reclass_util_pvt.validate_pending_ret';

246: p_asset_id IN NUMBER,
247: p_calling_fn IN VARCHAR2 , p_log_level_rec IN FA_API_TYPES.log_level_rec_type) return boolean IS
248:
249: v_count number:= 0;
250: l_calling_fn varchar2(40) := 'fa_reclass_util_pvt.validate_pending_ret';
251: BEGIN
252:
253: -- no pending retirements
254: select count(1)

Line 285: l_calling_fn varchar2(40) := 'fa_reclass_util_pvt.validate_fully_ret';

281: p_asset_id IN NUMBER,
282: p_calling_fn IN VARCHAR2 , p_log_level_rec IN FA_API_TYPES.log_level_rec_type) return boolean IS
283:
284: v_count NUMBER := 0;
285: l_calling_fn varchar2(40) := 'fa_reclass_util_pvt.validate_fully_ret';
286:
287: BEGIN
288: SELECT count(1)
289: INTO v_count

Line 324: l_calling_fn varchar2(40) := 'fa_reclass_util_pvt.val_prior_per_add';

320: p_calling_fn IN VARCHAR2 , p_log_level_rec IN FA_API_TYPES.log_level_rec_type) return boolean IS
321:
322:
323: v_is_prior_period NUMBER :=0;
324: l_calling_fn varchar2(40) := 'fa_reclass_util_pvt.val_prior_per_add';
325:
326: BEGIN
327:
328: /**** donot know whether I need this

Line 387: l_calling_fn varchar2(40) := 'fa_reclass_util_pvt.validate_trx_date';

383: l_prior_trans_date DATE;
384: l_prior_date_effective DATE;
385: l_check_another_trans NUMBER := 0;
386:
387: l_calling_fn varchar2(40) := 'fa_reclass_util_pvt.validate_trx_date';
388:
389: CURSOR get_prior_trans_date IS
390: SELECT max(transaction_date_entered)
391: FROM FA_TRANSACTION_HEADERS

Line 460: l_calling_fn varchar2(40) := 'fa_reclass_util_pvt.validate_adjustment';

456: prior_date_effective DATE;
457: check_another_trans NUMBER;
458: l_period_of_addition varchar2(1);
459:
460: l_calling_fn varchar2(40) := 'fa_reclass_util_pvt.validate_adjustment';
461:
462: CURSOR check_mass_change_allowed IS
463: SELECT 'x' FROM FA_BOOK_CONTROLS
464: WHERE book_type_code = p_book_type_code AND allow_mass_changes = 'NO'

Line 622: l_calling_fn varchar2(40) := 'fa_reclass_util_pvt.get_new_ccid';

618: h_concat_segs varchar2(2000) := '';
619: h_delimiter varchar2(1);
620:
621: l_err_stage varchar2(250);
622: l_calling_fn varchar2(40) := 'fa_reclass_util_pvt.get_new_ccid';
623:
624: BEGIN
625:
626: l_err_stage := 'Get the new category DEPRN_EXPENSE_ACCT';

Line 802: l_calling_fn varchar2(40) := 'fa_reclass_util_pvt.get_asset_dist';

798:
799: l_new_deprn_exp_acct fa_category_books.deprn_expense_acct%type;
800: l_old_deprn_exp_acct fa_category_books.deprn_expense_acct%type;
801: l_err_stage varchar2(250);
802: l_calling_fn varchar2(40) := 'fa_reclass_util_pvt.get_asset_dist';
803: l_trx_date_entered date; -- fix for bug 3255715
804:
805: BEGIN
806:

Line 953: l_calling_fn varchar2(40) := 'fa_reclass_util_pvt.get_cat_desc_flex';

949: l_seg varchar2(30);
950: l_err_stage varchar2(100);
951:
952: l_bal_seg_equal varchar2(1):= null;
953: l_calling_fn varchar2(40) := 'fa_reclass_util_pvt.get_cat_desc_flex';
954:
955: --
956:
957: delim varchar2(1);

Line 1089: l_err_stage:= 'FA_RECLASS_UTIL_PVT.check_bal_seg_equal';

1085: l_concat_cat := concat_string;
1086:
1087: --
1088: -- determine whether balancing seg of old and new cat is same
1089: l_err_stage:= 'FA_RECLASS_UTIL_PVT.check_bal_seg_equal';
1090: -- dbms_output.put_line(l_err_stage);
1091: if FA_RECLASS_UTIL_PVT.check_bal_seg_equal(
1092: p_old_category_id => p_asset_cat_rec_old.category_id,
1093: p_new_category_id => px_asset_cat_rec_new.category_id,

Line 1091: if FA_RECLASS_UTIL_PVT.check_bal_seg_equal(

1087: --
1088: -- determine whether balancing seg of old and new cat is same
1089: l_err_stage:= 'FA_RECLASS_UTIL_PVT.check_bal_seg_equal';
1090: -- dbms_output.put_line(l_err_stage);
1091: if FA_RECLASS_UTIL_PVT.check_bal_seg_equal(
1092: p_old_category_id => p_asset_cat_rec_old.category_id,
1093: p_new_category_id => px_asset_cat_rec_new.category_id,
1094: p_calling_fn => l_calling_fn , p_log_level_rec => p_log_level_rec) then
1095: l_bal_seg_equal:= 'Y';

Line 1248: l_calling_fn varchar2(40) := 'fa_reclass_util_pvt.check_bal_seg_equal';

1244: l_all_segs_old FND_FLEX_EXT.SegmentArray;
1245: l_all_segs_new FND_FLEX_EXT.SegmentArray;
1246: l_old_bal_seg VARCHAR2(30);
1247: l_new_bal_seg VARCHAR2(30);
1248: l_calling_fn varchar2(40) := 'fa_reclass_util_pvt.check_bal_seg_equal';
1249:
1250: seg_err EXCEPTION;
1251: BEGIN
1252:

Line 1327: END FA_RECLASS_UTIL_PVT;

1323: return FALSE;
1324:
1325: END check_bal_seg_equal;
1326:
1327: END FA_RECLASS_UTIL_PVT;