7: G_PKG_NAME CONSTANT varchar2(30) := 'FA_RESERVE_TRANSFER_PUB';
8: G_API_NAME CONSTANT varchar2(30) := 'Reserve Transfer 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:
16: FUNCTION do_all_books
17: (p_src_asset_id IN NUMBER,
18: p_dest_asset_id IN NUMBER,
19: p_book_type_code IN VARCHAR2,
20: px_src_trans_rec IN OUT NOCOPY FA_API_TYPES.trans_rec_type,
21: px_dest_trans_rec IN OUT NOCOPY FA_API_TYPES.trans_rec_type,
22: p_amount IN NUMBER,
23: p_log_level_rec IN fa_api_types.log_level_rec_type default null) RETURN BOOLEAN;
24:
17: (p_src_asset_id IN NUMBER,
18: p_dest_asset_id IN NUMBER,
19: p_book_type_code IN VARCHAR2,
20: px_src_trans_rec IN OUT NOCOPY FA_API_TYPES.trans_rec_type,
21: px_dest_trans_rec IN OUT NOCOPY FA_API_TYPES.trans_rec_type,
22: p_amount IN NUMBER,
23: p_log_level_rec IN fa_api_types.log_level_rec_type default null) RETURN BOOLEAN;
24:
25:
19: p_book_type_code IN VARCHAR2,
20: px_src_trans_rec IN OUT NOCOPY FA_API_TYPES.trans_rec_type,
21: px_dest_trans_rec IN OUT NOCOPY FA_API_TYPES.trans_rec_type,
22: p_amount IN NUMBER,
23: p_log_level_rec IN fa_api_types.log_level_rec_type default null) RETURN BOOLEAN;
24:
25:
26: --*********************** Public procedures ******************************--
27:
39: p_src_asset_id IN NUMBER,
40: p_dest_asset_id IN NUMBER,
41: p_book_type_code IN VARCHAR2,
42: p_amount IN NUMBER,
43: px_src_trans_rec IN OUT NOCOPY FA_API_TYPES.trans_rec_type,
44: px_dest_trans_rec IN OUT NOCOPY FA_API_TYPES.trans_rec_type) IS
45:
46: l_reporting_flag varchar2(1);
47:
40: p_dest_asset_id IN NUMBER,
41: p_book_type_code IN VARCHAR2,
42: p_amount IN NUMBER,
43: px_src_trans_rec IN OUT NOCOPY FA_API_TYPES.trans_rec_type,
44: px_dest_trans_rec IN OUT NOCOPY FA_API_TYPES.trans_rec_type) IS
45:
46: l_reporting_flag varchar2(1);
47:
48: -- used to store original sob info upon entry into api
227: FUNCTION do_all_books
228: (p_src_asset_id IN NUMBER,
229: p_dest_asset_id IN NUMBER,
230: p_book_type_code IN VARCHAR2,
231: px_src_trans_rec IN OUT NOCOPY FA_API_TYPES.trans_rec_type,
232: px_dest_trans_rec IN OUT NOCOPY FA_API_TYPES.trans_rec_type,
233: p_amount IN NUMBER,
234: p_log_level_rec in fa_api_types.log_level_rec_type default null) RETURN BOOLEAN IS
235:
228: (p_src_asset_id IN NUMBER,
229: p_dest_asset_id IN NUMBER,
230: p_book_type_code IN VARCHAR2,
231: px_src_trans_rec IN OUT NOCOPY FA_API_TYPES.trans_rec_type,
232: px_dest_trans_rec IN OUT NOCOPY FA_API_TYPES.trans_rec_type,
233: p_amount IN NUMBER,
234: p_log_level_rec in fa_api_types.log_level_rec_type default null) RETURN BOOLEAN IS
235:
236:
230: p_book_type_code IN VARCHAR2,
231: px_src_trans_rec IN OUT NOCOPY FA_API_TYPES.trans_rec_type,
232: px_dest_trans_rec IN OUT NOCOPY FA_API_TYPES.trans_rec_type,
233: p_amount IN NUMBER,
234: p_log_level_rec in fa_api_types.log_level_rec_type default null) RETURN BOOLEAN IS
235:
236:
237: -- used for new source asset
238: l_src_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
234: p_log_level_rec in fa_api_types.log_level_rec_type default null) RETURN BOOLEAN IS
235:
236:
237: -- used for new source asset
238: l_src_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
239: l_mrc_src_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
240: l_src_asset_desc_rec fa_api_types.asset_desc_rec_type;
241: l_src_asset_type_rec fa_api_types.asset_type_rec_type;
242: l_src_asset_cat_rec fa_api_types.asset_cat_rec_type;
235:
236:
237: -- used for new source asset
238: l_src_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
239: l_mrc_src_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
240: l_src_asset_desc_rec fa_api_types.asset_desc_rec_type;
241: l_src_asset_type_rec fa_api_types.asset_type_rec_type;
242: l_src_asset_cat_rec fa_api_types.asset_cat_rec_type;
243: l_src_asset_fin_rec_old fa_api_types.asset_fin_rec_type;
236:
237: -- used for new source asset
238: l_src_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
239: l_mrc_src_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
240: l_src_asset_desc_rec fa_api_types.asset_desc_rec_type;
241: l_src_asset_type_rec fa_api_types.asset_type_rec_type;
242: l_src_asset_cat_rec fa_api_types.asset_cat_rec_type;
243: l_src_asset_fin_rec_old fa_api_types.asset_fin_rec_type;
244: l_src_asset_fin_rec_new fa_api_types.asset_fin_rec_type;
237: -- used for new source asset
238: l_src_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
239: l_mrc_src_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
240: l_src_asset_desc_rec fa_api_types.asset_desc_rec_type;
241: l_src_asset_type_rec fa_api_types.asset_type_rec_type;
242: l_src_asset_cat_rec fa_api_types.asset_cat_rec_type;
243: l_src_asset_fin_rec_old fa_api_types.asset_fin_rec_type;
244: l_src_asset_fin_rec_new fa_api_types.asset_fin_rec_type;
245: l_src_asset_deprn_rec_old fa_api_types.asset_deprn_rec_type;
238: l_src_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
239: l_mrc_src_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
240: l_src_asset_desc_rec fa_api_types.asset_desc_rec_type;
241: l_src_asset_type_rec fa_api_types.asset_type_rec_type;
242: l_src_asset_cat_rec fa_api_types.asset_cat_rec_type;
243: l_src_asset_fin_rec_old fa_api_types.asset_fin_rec_type;
244: l_src_asset_fin_rec_new fa_api_types.asset_fin_rec_type;
245: l_src_asset_deprn_rec_old fa_api_types.asset_deprn_rec_type;
246: l_src_asset_deprn_rec_new fa_api_types.asset_deprn_rec_type;
239: l_mrc_src_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
240: l_src_asset_desc_rec fa_api_types.asset_desc_rec_type;
241: l_src_asset_type_rec fa_api_types.asset_type_rec_type;
242: l_src_asset_cat_rec fa_api_types.asset_cat_rec_type;
243: l_src_asset_fin_rec_old fa_api_types.asset_fin_rec_type;
244: l_src_asset_fin_rec_new fa_api_types.asset_fin_rec_type;
245: l_src_asset_deprn_rec_old fa_api_types.asset_deprn_rec_type;
246: l_src_asset_deprn_rec_new fa_api_types.asset_deprn_rec_type;
247:
240: l_src_asset_desc_rec fa_api_types.asset_desc_rec_type;
241: l_src_asset_type_rec fa_api_types.asset_type_rec_type;
242: l_src_asset_cat_rec fa_api_types.asset_cat_rec_type;
243: l_src_asset_fin_rec_old fa_api_types.asset_fin_rec_type;
244: l_src_asset_fin_rec_new fa_api_types.asset_fin_rec_type;
245: l_src_asset_deprn_rec_old fa_api_types.asset_deprn_rec_type;
246: l_src_asset_deprn_rec_new fa_api_types.asset_deprn_rec_type;
247:
248:
241: l_src_asset_type_rec fa_api_types.asset_type_rec_type;
242: l_src_asset_cat_rec fa_api_types.asset_cat_rec_type;
243: l_src_asset_fin_rec_old fa_api_types.asset_fin_rec_type;
244: l_src_asset_fin_rec_new fa_api_types.asset_fin_rec_type;
245: l_src_asset_deprn_rec_old fa_api_types.asset_deprn_rec_type;
246: l_src_asset_deprn_rec_new fa_api_types.asset_deprn_rec_type;
247:
248:
249: -- used for new destination asset
242: l_src_asset_cat_rec fa_api_types.asset_cat_rec_type;
243: l_src_asset_fin_rec_old fa_api_types.asset_fin_rec_type;
244: l_src_asset_fin_rec_new fa_api_types.asset_fin_rec_type;
245: l_src_asset_deprn_rec_old fa_api_types.asset_deprn_rec_type;
246: l_src_asset_deprn_rec_new fa_api_types.asset_deprn_rec_type;
247:
248:
249: -- used for new destination asset
250: l_dest_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
246: l_src_asset_deprn_rec_new fa_api_types.asset_deprn_rec_type;
247:
248:
249: -- used for new destination asset
250: l_dest_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
251: l_mrc_dest_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
252: l_dest_asset_desc_rec fa_api_types.asset_desc_rec_type;
253: l_dest_asset_type_rec fa_api_types.asset_type_rec_type;
254: l_dest_asset_cat_rec fa_api_types.asset_cat_rec_type;
247:
248:
249: -- used for new destination asset
250: l_dest_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
251: l_mrc_dest_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
252: l_dest_asset_desc_rec fa_api_types.asset_desc_rec_type;
253: l_dest_asset_type_rec fa_api_types.asset_type_rec_type;
254: l_dest_asset_cat_rec fa_api_types.asset_cat_rec_type;
255: l_dest_asset_fin_rec_old fa_api_types.asset_fin_rec_type;
248:
249: -- used for new destination asset
250: l_dest_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
251: l_mrc_dest_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
252: l_dest_asset_desc_rec fa_api_types.asset_desc_rec_type;
253: l_dest_asset_type_rec fa_api_types.asset_type_rec_type;
254: l_dest_asset_cat_rec fa_api_types.asset_cat_rec_type;
255: l_dest_asset_fin_rec_old fa_api_types.asset_fin_rec_type;
256: l_dest_asset_fin_rec_new fa_api_types.asset_fin_rec_type;
249: -- used for new destination asset
250: l_dest_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
251: l_mrc_dest_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
252: l_dest_asset_desc_rec fa_api_types.asset_desc_rec_type;
253: l_dest_asset_type_rec fa_api_types.asset_type_rec_type;
254: l_dest_asset_cat_rec fa_api_types.asset_cat_rec_type;
255: l_dest_asset_fin_rec_old fa_api_types.asset_fin_rec_type;
256: l_dest_asset_fin_rec_new fa_api_types.asset_fin_rec_type;
257: l_dest_asset_deprn_rec_old fa_api_types.asset_deprn_rec_type;
250: l_dest_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
251: l_mrc_dest_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
252: l_dest_asset_desc_rec fa_api_types.asset_desc_rec_type;
253: l_dest_asset_type_rec fa_api_types.asset_type_rec_type;
254: l_dest_asset_cat_rec fa_api_types.asset_cat_rec_type;
255: l_dest_asset_fin_rec_old fa_api_types.asset_fin_rec_type;
256: l_dest_asset_fin_rec_new fa_api_types.asset_fin_rec_type;
257: l_dest_asset_deprn_rec_old fa_api_types.asset_deprn_rec_type;
258: l_dest_asset_deprn_rec_new fa_api_types.asset_deprn_rec_type;
251: l_mrc_dest_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
252: l_dest_asset_desc_rec fa_api_types.asset_desc_rec_type;
253: l_dest_asset_type_rec fa_api_types.asset_type_rec_type;
254: l_dest_asset_cat_rec fa_api_types.asset_cat_rec_type;
255: l_dest_asset_fin_rec_old fa_api_types.asset_fin_rec_type;
256: l_dest_asset_fin_rec_new fa_api_types.asset_fin_rec_type;
257: l_dest_asset_deprn_rec_old fa_api_types.asset_deprn_rec_type;
258: l_dest_asset_deprn_rec_new fa_api_types.asset_deprn_rec_type;
259:
252: l_dest_asset_desc_rec fa_api_types.asset_desc_rec_type;
253: l_dest_asset_type_rec fa_api_types.asset_type_rec_type;
254: l_dest_asset_cat_rec fa_api_types.asset_cat_rec_type;
255: l_dest_asset_fin_rec_old fa_api_types.asset_fin_rec_type;
256: l_dest_asset_fin_rec_new fa_api_types.asset_fin_rec_type;
257: l_dest_asset_deprn_rec_old fa_api_types.asset_deprn_rec_type;
258: l_dest_asset_deprn_rec_new fa_api_types.asset_deprn_rec_type;
259:
260: l_src_row_id varchar2(30);
253: l_dest_asset_type_rec fa_api_types.asset_type_rec_type;
254: l_dest_asset_cat_rec fa_api_types.asset_cat_rec_type;
255: l_dest_asset_fin_rec_old fa_api_types.asset_fin_rec_type;
256: l_dest_asset_fin_rec_new fa_api_types.asset_fin_rec_type;
257: l_dest_asset_deprn_rec_old fa_api_types.asset_deprn_rec_type;
258: l_dest_asset_deprn_rec_new fa_api_types.asset_deprn_rec_type;
259:
260: l_src_row_id varchar2(30);
261: l_dest_row_id varchar2(30);
254: l_dest_asset_cat_rec fa_api_types.asset_cat_rec_type;
255: l_dest_asset_fin_rec_old fa_api_types.asset_fin_rec_type;
256: l_dest_asset_fin_rec_new fa_api_types.asset_fin_rec_type;
257: l_dest_asset_deprn_rec_old fa_api_types.asset_deprn_rec_type;
258: l_dest_asset_deprn_rec_new fa_api_types.asset_deprn_rec_type;
259:
260: l_src_row_id varchar2(30);
261: l_dest_row_id varchar2(30);
262: l_src_return_status boolean;
264:
265: l_amount number;
266: l_src_primary_cost number; -- ??? use ???
267:
268: l_period_rec FA_API_TYPES.period_rec_type;
269: l_rsob_tbl FA_CACHE_PKG.fazcrsob_sob_tbl_type;
270: l_reporting_flag varchar2(1);
271:
272: l_exchange_rate number;