7: G_PKG_NAME CONSTANT varchar2(30) := 'FA_ADJUSTMENT_PUB';
8: G_API_NAME CONSTANT varchar2(30) := 'Adjustment API';
9: G_API_VERSION CONSTANT number := 1.0;
10:
11: g_log_level_rec fa_api_types.log_level_rec_type;
12:
13:
14: --*********************** Private functions ******************************--
15: -- This private function calls fa_asset_val_pvt.validate_over_depreciate
14: --*********************** Private functions ******************************--
15: -- This private function calls fa_asset_val_pvt.validate_over_depreciate
16: -- to determine this retirement adjustment is valid or not
17: FUNCTION validate_over_depreciate
18: (p_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type,
19: p_asset_type_rec FA_API_TYPES.asset_type_rec_type,
20: p_asset_fin_rec FA_API_TYPES.asset_fin_rec_type,
21: p_asset_deprn_rec FA_API_TYPES.asset_deprn_rec_type,
22: p_proceeds_of_sale NUMBER,
15: -- This private function calls fa_asset_val_pvt.validate_over_depreciate
16: -- to determine this retirement adjustment is valid or not
17: FUNCTION validate_over_depreciate
18: (p_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type,
19: p_asset_type_rec FA_API_TYPES.asset_type_rec_type,
20: p_asset_fin_rec FA_API_TYPES.asset_fin_rec_type,
21: p_asset_deprn_rec FA_API_TYPES.asset_deprn_rec_type,
22: p_proceeds_of_sale NUMBER,
23: p_cost_of_removal NUMBER,
16: -- to determine this retirement adjustment is valid or not
17: FUNCTION validate_over_depreciate
18: (p_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type,
19: p_asset_type_rec FA_API_TYPES.asset_type_rec_type,
20: p_asset_fin_rec FA_API_TYPES.asset_fin_rec_type,
21: p_asset_deprn_rec FA_API_TYPES.asset_deprn_rec_type,
22: p_proceeds_of_sale NUMBER,
23: p_cost_of_removal NUMBER,
24: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null) RETURN BOOLEAN;
17: FUNCTION validate_over_depreciate
18: (p_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type,
19: p_asset_type_rec FA_API_TYPES.asset_type_rec_type,
20: p_asset_fin_rec FA_API_TYPES.asset_fin_rec_type,
21: p_asset_deprn_rec FA_API_TYPES.asset_deprn_rec_type,
22: p_proceeds_of_sale NUMBER,
23: p_cost_of_removal NUMBER,
24: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null) RETURN BOOLEAN;
25:
20: p_asset_fin_rec FA_API_TYPES.asset_fin_rec_type,
21: p_asset_deprn_rec FA_API_TYPES.asset_deprn_rec_type,
22: p_proceeds_of_sale NUMBER,
23: p_cost_of_removal NUMBER,
24: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null) RETURN BOOLEAN;
25:
26: FUNCTION do_all_books
27: (px_trans_rec IN OUT NOCOPY FA_API_TYPES.trans_rec_type,
28: px_asset_hdr_rec IN OUT NOCOPY FA_API_TYPES.asset_hdr_rec_type,
23: p_cost_of_removal NUMBER,
24: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null) RETURN BOOLEAN;
25:
26: FUNCTION do_all_books
27: (px_trans_rec IN OUT NOCOPY FA_API_TYPES.trans_rec_type,
28: px_asset_hdr_rec IN OUT NOCOPY FA_API_TYPES.asset_hdr_rec_type,
29: p_cost_of_removal IN NUMBER,
30: p_proceeds IN NUMBER,
31: p_cost_of_removal_ccid IN NUMBER,
24: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null) RETURN BOOLEAN;
25:
26: FUNCTION do_all_books
27: (px_trans_rec IN OUT NOCOPY FA_API_TYPES.trans_rec_type,
28: px_asset_hdr_rec IN OUT NOCOPY FA_API_TYPES.asset_hdr_rec_type,
29: p_cost_of_removal IN NUMBER,
30: p_proceeds IN NUMBER,
31: p_cost_of_removal_ccid IN NUMBER,
32: p_proceeds_ccid IN NUMBER,
29: p_cost_of_removal IN NUMBER,
30: p_proceeds IN NUMBER,
31: p_cost_of_removal_ccid IN NUMBER,
32: p_proceeds_ccid IN NUMBER,
33: p_log_level_rec in fa_api_types.log_level_rec_type default null ) RETURN BOOLEAN;
34:
35:
36: --*********************** Public procedures ******************************--
37:
45: x_return_status OUT NOCOPY VARCHAR2,
46: x_msg_count OUT NOCOPY NUMBER,
47: x_msg_data OUT NOCOPY VARCHAR2,
48:
49: px_trans_rec IN OUT NOCOPY FA_API_TYPES.trans_rec_type,
50: px_asset_hdr_rec IN OUT NOCOPY FA_API_TYPES.asset_hdr_rec_type,
51: p_cost_of_removal IN NUMBER,
52: p_proceeds IN NUMBER,
53: p_cost_of_removal_ccid IN NUMBER DEFAULT NULL,
46: x_msg_count OUT NOCOPY NUMBER,
47: x_msg_data OUT NOCOPY VARCHAR2,
48:
49: px_trans_rec IN OUT NOCOPY FA_API_TYPES.trans_rec_type,
50: px_asset_hdr_rec IN OUT NOCOPY FA_API_TYPES.asset_hdr_rec_type,
51: p_cost_of_removal IN NUMBER,
52: p_proceeds IN NUMBER,
53: p_cost_of_removal_ccid IN NUMBER DEFAULT NULL,
54: p_proceeds_ccid IN NUMBER DEFAULT NULL) IS
215: -- book calling the private api for each.
216:
217:
218: FUNCTION do_all_books
219: (px_trans_rec IN OUT NOCOPY FA_API_TYPES.trans_rec_type,
220: px_asset_hdr_rec IN OUT NOCOPY FA_API_TYPES.asset_hdr_rec_type,
221: p_cost_of_removal IN NUMBER,
222: p_proceeds IN NUMBER,
223: p_cost_of_removal_ccid IN NUMBER,
216:
217:
218: FUNCTION do_all_books
219: (px_trans_rec IN OUT NOCOPY FA_API_TYPES.trans_rec_type,
220: px_asset_hdr_rec IN OUT NOCOPY FA_API_TYPES.asset_hdr_rec_type,
221: p_cost_of_removal IN NUMBER,
222: p_proceeds IN NUMBER,
223: p_cost_of_removal_ccid IN NUMBER,
224: p_proceeds_ccid IN NUMBER,
221: p_cost_of_removal IN NUMBER,
222: p_proceeds IN NUMBER,
223: p_cost_of_removal_ccid IN NUMBER,
224: p_proceeds_ccid IN NUMBER,
225: p_log_level_rec IN fa_api_types.log_level_rec_type default null) RETURN BOOLEAN IS
226:
227:
228: -- used for new source asset
229: l_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
225: p_log_level_rec IN fa_api_types.log_level_rec_type default null) RETURN BOOLEAN IS
226:
227:
228: -- used for new source asset
229: l_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
230: l_mrc_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
231: l_asset_desc_rec fa_api_types.asset_desc_rec_type;
232: l_asset_type_rec fa_api_types.asset_type_rec_type;
233: l_asset_cat_rec fa_api_types.asset_cat_rec_type;
226:
227:
228: -- used for new source asset
229: l_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
230: l_mrc_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
231: l_asset_desc_rec fa_api_types.asset_desc_rec_type;
232: l_asset_type_rec fa_api_types.asset_type_rec_type;
233: l_asset_cat_rec fa_api_types.asset_cat_rec_type;
234: l_asset_fin_rec_old fa_api_types.asset_fin_rec_type;
227:
228: -- used for new source asset
229: l_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
230: l_mrc_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
231: l_asset_desc_rec fa_api_types.asset_desc_rec_type;
232: l_asset_type_rec fa_api_types.asset_type_rec_type;
233: l_asset_cat_rec fa_api_types.asset_cat_rec_type;
234: l_asset_fin_rec_old fa_api_types.asset_fin_rec_type;
235: l_asset_fin_rec_new fa_api_types.asset_fin_rec_type;
228: -- used for new source asset
229: l_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
230: l_mrc_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
231: l_asset_desc_rec fa_api_types.asset_desc_rec_type;
232: l_asset_type_rec fa_api_types.asset_type_rec_type;
233: l_asset_cat_rec fa_api_types.asset_cat_rec_type;
234: l_asset_fin_rec_old fa_api_types.asset_fin_rec_type;
235: l_asset_fin_rec_new fa_api_types.asset_fin_rec_type;
236: l_asset_deprn_rec_old fa_api_types.asset_deprn_rec_type;
229: l_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
230: l_mrc_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
231: l_asset_desc_rec fa_api_types.asset_desc_rec_type;
232: l_asset_type_rec fa_api_types.asset_type_rec_type;
233: l_asset_cat_rec fa_api_types.asset_cat_rec_type;
234: l_asset_fin_rec_old fa_api_types.asset_fin_rec_type;
235: l_asset_fin_rec_new fa_api_types.asset_fin_rec_type;
236: l_asset_deprn_rec_old fa_api_types.asset_deprn_rec_type;
237: l_asset_deprn_rec_new fa_api_types.asset_deprn_rec_type;
230: l_mrc_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
231: l_asset_desc_rec fa_api_types.asset_desc_rec_type;
232: l_asset_type_rec fa_api_types.asset_type_rec_type;
233: l_asset_cat_rec fa_api_types.asset_cat_rec_type;
234: l_asset_fin_rec_old fa_api_types.asset_fin_rec_type;
235: l_asset_fin_rec_new fa_api_types.asset_fin_rec_type;
236: l_asset_deprn_rec_old fa_api_types.asset_deprn_rec_type;
237: l_asset_deprn_rec_new fa_api_types.asset_deprn_rec_type;
238:
231: l_asset_desc_rec fa_api_types.asset_desc_rec_type;
232: l_asset_type_rec fa_api_types.asset_type_rec_type;
233: l_asset_cat_rec fa_api_types.asset_cat_rec_type;
234: l_asset_fin_rec_old fa_api_types.asset_fin_rec_type;
235: l_asset_fin_rec_new fa_api_types.asset_fin_rec_type;
236: l_asset_deprn_rec_old fa_api_types.asset_deprn_rec_type;
237: l_asset_deprn_rec_new fa_api_types.asset_deprn_rec_type;
238:
239: l_proceeds number;
232: l_asset_type_rec fa_api_types.asset_type_rec_type;
233: l_asset_cat_rec fa_api_types.asset_cat_rec_type;
234: l_asset_fin_rec_old fa_api_types.asset_fin_rec_type;
235: l_asset_fin_rec_new fa_api_types.asset_fin_rec_type;
236: l_asset_deprn_rec_old fa_api_types.asset_deprn_rec_type;
237: l_asset_deprn_rec_new fa_api_types.asset_deprn_rec_type;
238:
239: l_proceeds number;
240: l_cost_of_removal number;
233: l_asset_cat_rec fa_api_types.asset_cat_rec_type;
234: l_asset_fin_rec_old fa_api_types.asset_fin_rec_type;
235: l_asset_fin_rec_new fa_api_types.asset_fin_rec_type;
236: l_asset_deprn_rec_old fa_api_types.asset_deprn_rec_type;
237: l_asset_deprn_rec_new fa_api_types.asset_deprn_rec_type;
238:
239: l_proceeds number;
240: l_cost_of_removal number;
241:
240: l_cost_of_removal number;
241:
242: l_primary_cost number; -- ??? use ???
243:
244: l_period_rec FA_API_TYPES.period_rec_type;
245: l_rsob_tbl FA_CACHE_PKG.fazcrsob_sob_tbl_type;
246: l_reporting_flag varchar2(1);
247:
248: l_exchange_rate number;
514:
515: end do_all_books;
516:
517: FUNCTION validate_over_depreciate
518: (p_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type,
519: p_asset_type_rec FA_API_TYPES.asset_type_rec_type,
520: p_asset_fin_rec FA_API_TYPES.asset_fin_rec_type,
521: p_asset_deprn_rec FA_API_TYPES.asset_deprn_rec_type,
522: p_proceeds_of_sale NUMBER,
515: end do_all_books;
516:
517: FUNCTION validate_over_depreciate
518: (p_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type,
519: p_asset_type_rec FA_API_TYPES.asset_type_rec_type,
520: p_asset_fin_rec FA_API_TYPES.asset_fin_rec_type,
521: p_asset_deprn_rec FA_API_TYPES.asset_deprn_rec_type,
522: p_proceeds_of_sale NUMBER,
523: p_cost_of_removal NUMBER,
516:
517: FUNCTION validate_over_depreciate
518: (p_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type,
519: p_asset_type_rec FA_API_TYPES.asset_type_rec_type,
520: p_asset_fin_rec FA_API_TYPES.asset_fin_rec_type,
521: p_asset_deprn_rec FA_API_TYPES.asset_deprn_rec_type,
522: p_proceeds_of_sale NUMBER,
523: p_cost_of_removal NUMBER,
524: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null) RETURN BOOLEAN IS
517: FUNCTION validate_over_depreciate
518: (p_asset_hdr_rec FA_API_TYPES.asset_hdr_rec_type,
519: p_asset_type_rec FA_API_TYPES.asset_type_rec_type,
520: p_asset_fin_rec FA_API_TYPES.asset_fin_rec_type,
521: p_asset_deprn_rec FA_API_TYPES.asset_deprn_rec_type,
522: p_proceeds_of_sale NUMBER,
523: p_cost_of_removal NUMBER,
524: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null) RETURN BOOLEAN IS
525:
520: p_asset_fin_rec FA_API_TYPES.asset_fin_rec_type,
521: p_asset_deprn_rec FA_API_TYPES.asset_deprn_rec_type,
522: p_proceeds_of_sale NUMBER,
523: p_cost_of_removal NUMBER,
524: p_log_level_rec IN FA_API_TYPES.log_level_rec_type default null) RETURN BOOLEAN IS
525:
526: l_deprn_reserve_new NUMBER := 0;
527: BEGIN
528: