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: g_release number := fa_cache_pkg.fazarel_release;
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) 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) 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) 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: l_calling_fn VARCHAR2(35) := 'fa_rsv_transfer_pub.do_rsv_transfer';
230: FUNCTION do_all_books
231: (p_src_asset_id IN NUMBER,
232: p_dest_asset_id IN NUMBER,
233: p_book_type_code IN VARCHAR2,
234: px_src_trans_rec IN OUT NOCOPY FA_API_TYPES.trans_rec_type,
235: px_dest_trans_rec IN OUT NOCOPY FA_API_TYPES.trans_rec_type,
236: p_amount IN NUMBER
237: , p_log_level_rec IN FA_API_TYPES.log_level_rec_type) RETURN BOOLEAN IS
238:
231: (p_src_asset_id IN NUMBER,
232: p_dest_asset_id IN NUMBER,
233: p_book_type_code IN VARCHAR2,
234: px_src_trans_rec IN OUT NOCOPY FA_API_TYPES.trans_rec_type,
235: px_dest_trans_rec IN OUT NOCOPY FA_API_TYPES.trans_rec_type,
236: p_amount IN NUMBER
237: , p_log_level_rec IN FA_API_TYPES.log_level_rec_type) RETURN BOOLEAN IS
238:
239:
233: p_book_type_code IN VARCHAR2,
234: px_src_trans_rec IN OUT NOCOPY FA_API_TYPES.trans_rec_type,
235: px_dest_trans_rec IN OUT NOCOPY FA_API_TYPES.trans_rec_type,
236: p_amount IN NUMBER
237: , p_log_level_rec IN FA_API_TYPES.log_level_rec_type) RETURN BOOLEAN IS
238:
239:
240: -- used for new source asset
241: l_src_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
237: , p_log_level_rec IN FA_API_TYPES.log_level_rec_type) RETURN BOOLEAN IS
238:
239:
240: -- used for new source asset
241: l_src_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
242: l_mrc_src_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
243: l_src_asset_desc_rec fa_api_types.asset_desc_rec_type;
244: l_src_asset_type_rec fa_api_types.asset_type_rec_type;
245: l_src_asset_cat_rec fa_api_types.asset_cat_rec_type;
238:
239:
240: -- used for new source asset
241: l_src_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
242: l_mrc_src_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
243: l_src_asset_desc_rec fa_api_types.asset_desc_rec_type;
244: l_src_asset_type_rec fa_api_types.asset_type_rec_type;
245: l_src_asset_cat_rec fa_api_types.asset_cat_rec_type;
246: l_src_asset_fin_rec_old fa_api_types.asset_fin_rec_type;
239:
240: -- used for new source asset
241: l_src_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
242: l_mrc_src_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
243: l_src_asset_desc_rec fa_api_types.asset_desc_rec_type;
244: l_src_asset_type_rec fa_api_types.asset_type_rec_type;
245: l_src_asset_cat_rec fa_api_types.asset_cat_rec_type;
246: l_src_asset_fin_rec_old fa_api_types.asset_fin_rec_type;
247: l_src_asset_fin_rec_new fa_api_types.asset_fin_rec_type;
240: -- used for new source asset
241: l_src_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
242: l_mrc_src_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
243: l_src_asset_desc_rec fa_api_types.asset_desc_rec_type;
244: l_src_asset_type_rec fa_api_types.asset_type_rec_type;
245: l_src_asset_cat_rec fa_api_types.asset_cat_rec_type;
246: l_src_asset_fin_rec_old fa_api_types.asset_fin_rec_type;
247: l_src_asset_fin_rec_new fa_api_types.asset_fin_rec_type;
248: l_src_asset_deprn_rec_old fa_api_types.asset_deprn_rec_type;
241: l_src_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
242: l_mrc_src_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
243: l_src_asset_desc_rec fa_api_types.asset_desc_rec_type;
244: l_src_asset_type_rec fa_api_types.asset_type_rec_type;
245: l_src_asset_cat_rec fa_api_types.asset_cat_rec_type;
246: l_src_asset_fin_rec_old fa_api_types.asset_fin_rec_type;
247: l_src_asset_fin_rec_new fa_api_types.asset_fin_rec_type;
248: l_src_asset_deprn_rec_old fa_api_types.asset_deprn_rec_type;
249: l_src_asset_deprn_rec_new fa_api_types.asset_deprn_rec_type;
242: l_mrc_src_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
243: l_src_asset_desc_rec fa_api_types.asset_desc_rec_type;
244: l_src_asset_type_rec fa_api_types.asset_type_rec_type;
245: l_src_asset_cat_rec fa_api_types.asset_cat_rec_type;
246: l_src_asset_fin_rec_old fa_api_types.asset_fin_rec_type;
247: l_src_asset_fin_rec_new fa_api_types.asset_fin_rec_type;
248: l_src_asset_deprn_rec_old fa_api_types.asset_deprn_rec_type;
249: l_src_asset_deprn_rec_new fa_api_types.asset_deprn_rec_type;
250:
243: l_src_asset_desc_rec fa_api_types.asset_desc_rec_type;
244: l_src_asset_type_rec fa_api_types.asset_type_rec_type;
245: l_src_asset_cat_rec fa_api_types.asset_cat_rec_type;
246: l_src_asset_fin_rec_old fa_api_types.asset_fin_rec_type;
247: l_src_asset_fin_rec_new fa_api_types.asset_fin_rec_type;
248: l_src_asset_deprn_rec_old fa_api_types.asset_deprn_rec_type;
249: l_src_asset_deprn_rec_new fa_api_types.asset_deprn_rec_type;
250:
251:
244: l_src_asset_type_rec fa_api_types.asset_type_rec_type;
245: l_src_asset_cat_rec fa_api_types.asset_cat_rec_type;
246: l_src_asset_fin_rec_old fa_api_types.asset_fin_rec_type;
247: l_src_asset_fin_rec_new fa_api_types.asset_fin_rec_type;
248: l_src_asset_deprn_rec_old fa_api_types.asset_deprn_rec_type;
249: l_src_asset_deprn_rec_new fa_api_types.asset_deprn_rec_type;
250:
251:
252: -- used for new destination asset
245: l_src_asset_cat_rec fa_api_types.asset_cat_rec_type;
246: l_src_asset_fin_rec_old fa_api_types.asset_fin_rec_type;
247: l_src_asset_fin_rec_new fa_api_types.asset_fin_rec_type;
248: l_src_asset_deprn_rec_old fa_api_types.asset_deprn_rec_type;
249: l_src_asset_deprn_rec_new fa_api_types.asset_deprn_rec_type;
250:
251:
252: -- used for new destination asset
253: l_dest_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
249: l_src_asset_deprn_rec_new fa_api_types.asset_deprn_rec_type;
250:
251:
252: -- used for new destination asset
253: l_dest_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
254: l_mrc_dest_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
255: l_dest_asset_desc_rec fa_api_types.asset_desc_rec_type;
256: l_dest_asset_type_rec fa_api_types.asset_type_rec_type;
257: l_dest_asset_cat_rec fa_api_types.asset_cat_rec_type;
250:
251:
252: -- used for new destination asset
253: l_dest_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
254: l_mrc_dest_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
255: l_dest_asset_desc_rec fa_api_types.asset_desc_rec_type;
256: l_dest_asset_type_rec fa_api_types.asset_type_rec_type;
257: l_dest_asset_cat_rec fa_api_types.asset_cat_rec_type;
258: l_dest_asset_fin_rec_old fa_api_types.asset_fin_rec_type;
251:
252: -- used for new destination asset
253: l_dest_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
254: l_mrc_dest_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
255: l_dest_asset_desc_rec fa_api_types.asset_desc_rec_type;
256: l_dest_asset_type_rec fa_api_types.asset_type_rec_type;
257: l_dest_asset_cat_rec fa_api_types.asset_cat_rec_type;
258: l_dest_asset_fin_rec_old fa_api_types.asset_fin_rec_type;
259: l_dest_asset_fin_rec_new fa_api_types.asset_fin_rec_type;
252: -- used for new destination asset
253: l_dest_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
254: l_mrc_dest_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
255: l_dest_asset_desc_rec fa_api_types.asset_desc_rec_type;
256: l_dest_asset_type_rec fa_api_types.asset_type_rec_type;
257: l_dest_asset_cat_rec fa_api_types.asset_cat_rec_type;
258: l_dest_asset_fin_rec_old fa_api_types.asset_fin_rec_type;
259: l_dest_asset_fin_rec_new fa_api_types.asset_fin_rec_type;
260: l_dest_asset_deprn_rec_old fa_api_types.asset_deprn_rec_type;
253: l_dest_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
254: l_mrc_dest_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
255: l_dest_asset_desc_rec fa_api_types.asset_desc_rec_type;
256: l_dest_asset_type_rec fa_api_types.asset_type_rec_type;
257: l_dest_asset_cat_rec fa_api_types.asset_cat_rec_type;
258: l_dest_asset_fin_rec_old fa_api_types.asset_fin_rec_type;
259: l_dest_asset_fin_rec_new fa_api_types.asset_fin_rec_type;
260: l_dest_asset_deprn_rec_old fa_api_types.asset_deprn_rec_type;
261: l_dest_asset_deprn_rec_new fa_api_types.asset_deprn_rec_type;
254: l_mrc_dest_asset_hdr_rec fa_api_types.asset_hdr_rec_type;
255: l_dest_asset_desc_rec fa_api_types.asset_desc_rec_type;
256: l_dest_asset_type_rec fa_api_types.asset_type_rec_type;
257: l_dest_asset_cat_rec fa_api_types.asset_cat_rec_type;
258: l_dest_asset_fin_rec_old fa_api_types.asset_fin_rec_type;
259: l_dest_asset_fin_rec_new fa_api_types.asset_fin_rec_type;
260: l_dest_asset_deprn_rec_old fa_api_types.asset_deprn_rec_type;
261: l_dest_asset_deprn_rec_new fa_api_types.asset_deprn_rec_type;
262:
255: l_dest_asset_desc_rec fa_api_types.asset_desc_rec_type;
256: l_dest_asset_type_rec fa_api_types.asset_type_rec_type;
257: l_dest_asset_cat_rec fa_api_types.asset_cat_rec_type;
258: l_dest_asset_fin_rec_old fa_api_types.asset_fin_rec_type;
259: l_dest_asset_fin_rec_new fa_api_types.asset_fin_rec_type;
260: l_dest_asset_deprn_rec_old fa_api_types.asset_deprn_rec_type;
261: l_dest_asset_deprn_rec_new fa_api_types.asset_deprn_rec_type;
262:
263: l_src_row_id varchar2(30);
256: l_dest_asset_type_rec fa_api_types.asset_type_rec_type;
257: l_dest_asset_cat_rec fa_api_types.asset_cat_rec_type;
258: l_dest_asset_fin_rec_old fa_api_types.asset_fin_rec_type;
259: l_dest_asset_fin_rec_new fa_api_types.asset_fin_rec_type;
260: l_dest_asset_deprn_rec_old fa_api_types.asset_deprn_rec_type;
261: l_dest_asset_deprn_rec_new fa_api_types.asset_deprn_rec_type;
262:
263: l_src_row_id varchar2(30);
264: l_dest_row_id varchar2(30);
257: l_dest_asset_cat_rec fa_api_types.asset_cat_rec_type;
258: l_dest_asset_fin_rec_old fa_api_types.asset_fin_rec_type;
259: l_dest_asset_fin_rec_new fa_api_types.asset_fin_rec_type;
260: l_dest_asset_deprn_rec_old fa_api_types.asset_deprn_rec_type;
261: l_dest_asset_deprn_rec_new fa_api_types.asset_deprn_rec_type;
262:
263: l_src_row_id varchar2(30);
264: l_dest_row_id varchar2(30);
265: l_src_return_status boolean;
267:
268: l_amount number;
269: l_src_primary_cost number; -- ??? use ???
270:
271: l_period_rec FA_API_TYPES.period_rec_type;
272: l_rsob_tbl FA_CACHE_PKG.fazcrsob_sob_tbl_type;
273: l_reporting_flag varchar2(1);
274:
275: l_exchange_rate number;