DBA Data[Home] [Help]

APPS.FA_ASSET_HIERARCHY_PVT dependencies on FA_ASSET_HIERARCHY

Line 1: PACKAGE BODY FA_ASSET_HIERARCHY_PVT as

1: PACKAGE BODY FA_ASSET_HIERARCHY_PVT as
2: /* $Header: FAVAHRB.pls 120.4 2009/04/16 14:37:26 bridgway ship $ */
3:
4:
5: FUNCTION validate_parent ( p_parent_hierarchy_id in number,

Line 13: from fa_asset_hierarchy_purpose

9: l_parent_id number;
10:
11: Cursor C1 IS
12: select book_type_code
13: from fa_asset_hierarchy_purpose
14: where asset_hierarchy_purpose_id =
15: ( select asset_hierarchy_purpose_id
16: from fa_asset_hierarchy
17: where asset_hierarchy_id = p_parent_hierarchy_id

Line 16: from fa_asset_hierarchy

12: select book_type_code
13: from fa_asset_hierarchy_purpose
14: where asset_hierarchy_purpose_id =
15: ( select asset_hierarchy_purpose_id
16: from fa_asset_hierarchy
17: where asset_hierarchy_id = p_parent_hierarchy_id
18: and level_number = 1);
19: BEGIN
20:

Line 27: calling_fn => 'FA_ASSET_HIERARCHY_PVT.validate_parent',

23: close C1;
24:
25: if l_purpose_book is null then
26: fa_srvr_msg.add_message(
27: calling_fn => 'FA_ASSET_HIERARCHY_PVT.validate_parent',
28: name => 'CUA_INVALID_PARENT' , p_log_level_rec => p_log_level_rec);
29: return FALSE;
30: end if;
31:

Line 34: calling_fn => 'FA_ASSET_HIERARCHY_PVT.validate_parent',

30: end if;
31:
32: if l_purpose_book <> p_book_type_code then
33: fa_srvr_msg.add_message(
34: calling_fn => 'FA_ASSET_HIERARCHY_PVT.validate_parent',
35: name => 'CUA_INVALID_PARENT_BOOK_TYPE' , p_log_level_rec => p_log_level_rec);
36: return FALSE;
37: end if;
38:

Line 52: from fa_asset_hierarchy_purpose

48: p_asset_hierarchy_rec IN FA_API_TYPES.asset_hierarchy_rec_type , p_log_level_rec IN FA_API_TYPES.log_level_rec_type) return boolean IS
49:
50: cursor C_purpose is
51: select asset_hierarchy_purpose_id
52: from fa_asset_hierarchy_purpose
53: where book_type_code = p_asset_hdr_rec.book_type_code
54: and purpose_type = 'INHERITANCE';
55:
56: l_err_stage varchar2(640);

Line 69: calling_fn => 'fa_asset_hierarchy_pvt.add_asset',

65: -- validate the required_parameters
66: if ( p_asset_hdr_rec.asset_id is null OR
67: p_asset_hierarchy_rec.parent_hierarchy_id is null ) then
68: fa_srvr_msg.add_message(
69: calling_fn => 'fa_asset_hierarchy_pvt.add_asset',
70: name => 'FA_SHARED_ITEM_NULL' , p_log_level_rec => p_log_level_rec);
71: return FALSE;
72: end if;
73:

Line 76: if not FA_ASSET_HIERARCHY_PVT.validate_parent(

72: end if;
73:
74: /*
75: -- check the parent is a valid
76: if not FA_ASSET_HIERARCHY_PVT.validate_parent(
77: p_asset_hierarchy_rec.parent_hierarchy_id,
78: p_asset_hdr_rec.book_type_code , p_log_level_rec => p_log_level_rec) then
79: return FALSE;
80: end if;

Line 105: calling_fn => 'fa_asset_hierarchy_pvt.add_asset',

101: x_err_stage => l_err_stage,
102: x_err_stack => l_err_stack, p_log_level_rec => p_log_level_rec);
103: if l_err_code <> '0' then
104: fa_srvr_msg.add_message(
105: calling_fn => 'fa_asset_hierarchy_pvt.add_asset',
106: name => l_err_code , p_log_level_rec => p_log_level_rec);
107: return FALSE;
108: end if;
109:

Line 115: calling_fn => 'fa_asset_hierarchy_pvt.add_asset', p_log_level_rec => p_log_level_rec);

111: EXCEPTION
112: when others then
113: rollback;
114: fa_srvr_msg.add_sql_error(
115: calling_fn => 'fa_asset_hierarchy_pvt.add_asset', p_log_level_rec => p_log_level_rec);
116: return FALSE;
117: END;
118:
119: -----------------------------------

Line 159: calling_fn => 'fa_asset_hierarchy_pvt.load_distributions', p_log_level_rec => p_log_level_rec);

155: return TRUE;
156: EXCEPTION
157: when others then
158: fa_srvr_msg.add_sql_error(
159: calling_fn => 'fa_asset_hierarchy_pvt.load_distributions', p_log_level_rec => p_log_level_rec);
160: return FALSE;
161:
162:
163: END load_distributions;

Line 225: from fa_asset_hierarchy

221:
222:
223: select depreciation_start_date
224: into l_parent_deprn_start_date
225: from fa_asset_hierarchy
226: where asset_hierarchy_id = p_asset_hr_rec.parent_hierarchy_id;
227:
228: if l_inherit_flag <> 'Y' AND
229: to_date(p_asset_hr_attr_rec_in.prorate_date,'DD/MM/YYYY') >

Line 314: calling_fn => 'fa_asset_hierarchy_pvt.derive_asset_attribute',

310:
311: EXCEPTION
312: when inherit_error then
313: fa_srvr_msg.add_message(
314: calling_fn => 'fa_asset_hierarchy_pvt.derive_asset_attribute',
315: name => 'CUA_MAP_DATES', p_log_level_rec => p_log_level_rec);
316: return FALSE;
317:
318: when daa_error then

Line 320: calling_fn => 'fa_asset_hierarchy_pvt.derive_asset_attribute',

316: return FALSE;
317:
318: when daa_error then
319: fa_srvr_msg.add_message(
320: calling_fn => 'fa_asset_hierarchy_pvt.derive_asset_attribute',
321: name => l_err_code , p_log_level_rec => p_log_level_rec);
322: return FALSE;
323:
324: when rej_error then

Line 327: calling_fn => 'fa_asset_hierarchy_pvt.derive_asset_attribute',

323:
324: when rej_error then
325: if l_cat_RF = 'Y' then
326: fa_srvr_msg.add_message(
327: calling_fn => 'fa_asset_hierarchy_pvt.derive_asset_attribute',
328: name => 'CUA_MAP_CAT_ID' , p_log_level_rec => p_log_level_rec);
329: end if;
330:
331: if l_lease_RF = 'Y' then

Line 333: calling_fn => 'fa_asset_hierarchy_pvt.derive_asset_attribute',

329: end if;
330:
331: if l_lease_RF = 'Y' then
332: fa_srvr_msg.add_message(
333: calling_fn => 'fa_asset_hierarchy_pvt.derive_asset_attribute',
334: name => 'CUA_MAP_LEASE_ID' , p_log_level_rec => p_log_level_rec);
335: end if;
336:
337: if l_serial_num_RF = 'Y' then

Line 339: calling_fn => 'fa_asset_hierarchy_pvt.derive_asset_attribute',

335: end if;
336:
337: if l_serial_num_RF = 'Y' then
338: fa_srvr_msg.add_message(
339: calling_fn => 'fa_asset_hierarchy_pvt.derive_asset_attribute',
340: name => 'CUA_MAP_SERIAL_NUMBER' , p_log_level_rec => p_log_level_rec);
341: end if;
342:
343: if l_asset_key_RF = 'Y' then

Line 345: calling_fn => 'fa_asset_hierarchy_pvt.derive_asset_attribute',

341: end if;
342:
343: if l_asset_key_RF = 'Y' then
344: fa_srvr_msg.add_message(
345: calling_fn => 'fa_asset_hierarchy_pvt.derive_asset_attribute',
346: name => 'CUA_MAP_ASSET_KEY_CCID' , p_log_level_rec => p_log_level_rec);
347: end if;
348:
349: if l_dist_RF = 'Y' then

Line 351: calling_fn => 'fa_asset_hierarchy_pvt.derive_asset_attribute',

347: end if;
348:
349: if l_dist_RF = 'Y' then
350: fa_srvr_msg.add_message(
351: calling_fn => 'fa_asset_hierarchy_pvt.derive_asset_attribute',
352: name => 'CUA_MAP_DISTRIBUTION' , p_log_level_rec => p_log_level_rec);
353: end if;
354:
355: if l_life_RF = 'Y' then

Line 357: calling_fn => 'fa_asset_hierarchy_pvt.derive_asset_attribute',

353: end if;
354:
355: if l_life_RF = 'Y' then
356: fa_srvr_msg.add_message(
357: calling_fn => 'fa_asset_hierarchy_pvt.derive_asset_attribute',
358: name => 'CUA_MAP_LIFE_IN_MONTHS' , p_log_level_rec => p_log_level_rec);
359: end if;
360:
361:

Line 366: CALLING_FN => 'fa_asset_hierarchy_pvt.derive_asset_attribute' , p_log_level_rec => p_log_level_rec);

362: return FALSE;
363:
364: when others then
365: FA_SRVR_MSG.ADD_SQL_ERROR(
366: CALLING_FN => 'fa_asset_hierarchy_pvt.derive_asset_attribute' , p_log_level_rec => p_log_level_rec);
367: RETURN (FALSE);
368:
369: END derive_asset_attribute;
370:

Line 431: calling_fn => 'fa_asset_hierarchy_pvt.create_batch',

427:
428:
429: if l_err_code <> '0' then
430: fa_srvr_msg.add_message(
431: calling_fn => 'fa_asset_hierarchy_pvt.create_batch',
432: name => 'CUA_BATCH_ERRORED', p_log_level_rec => p_log_level_rec);
433: return FALSE;
434: end if;
435:

Line 451: calling_fn => 'fa_asset_hierarchy_pvt.create_batch.submit_request', p_log_level_rec => p_log_level_rec);

447: '','','','','','','','','','');
448:
449: if(l_request_num = 0) then
450: fa_srvr_msg.add_message(
451: calling_fn => 'fa_asset_hierarchy_pvt.create_batch.submit_request', p_log_level_rec => p_log_level_rec);
452: return FALSE;
453: else
454: Update fa_mass_update_batch_headers
455: set status_code = 'IP'

Line 460: calling_fn => 'fa_asset_hierarchy_pvt.create_batch',

456: , concurrent_request_id = l_request_num
457: where batch_id = l_batch_id;
458:
459: fa_srvr_msg.add_message(
460: calling_fn => 'fa_asset_hierarchy_pvt.create_batch',
461: name => 'CUA_BATCH_SUBMITTED',
462: token1 => 'Request_id',
463: value1 => to_char(l_request_num),
464: token2 => 'Batch_no',

Line 476: END FA_ASSET_HIERARCHY_PVT;

472:
473: END create_batch;
474:
475:
476: END FA_ASSET_HIERARCHY_PVT;