242: x_return_status OUT NOCOPY VARCHAR2,
243: x_error_msg OUT NOCOPY VARCHAR2)
244: IS
245:
246: l_txn_rec csi_datastructures_pub.transaction_rec ;
247: l_dest_txn_processed NUMBER ;
248: l_dest_txn_qty NUMBER ;
249: l_msg_index NUMBER;
250: l_msg_data VARCHAR2(2000);
373: ------------------------------------------------------------------------------------------
374: -- Creates a CSI Transactions record using CSI Private API.
375: ------------------------------------------------------------------------------------------
376: PROCEDURE create_csi_txn(
377: px_txn_rec IN OUT NOCOPY CSI_DATASTRUCTURES_PUB.TRANSACTION_REC,
378: x_return_status OUT NOCOPY VARCHAR2,
379: x_error_message OUT NOCOPY VARCHAR2)
380: IS
381:
428: l_prorate_convention varchar2(10);
429: l_ext_ret_rec fa_mass_ext_retirements%ROWTYPE ;
430: l_sysdate date ;
431: l_unit_cost number;
432: l_txn_rec csi_datastructures_pub.transaction_rec;
433:
434: l_return_status varchar2(1);
435: l_error_msg varchar2(2000);
436:
664: -- If it finds one, it will update else it will create.
665: -- Callers will pass +ve to increment the instance-asset by p_transaction_units or -ve to decrement.
666: -----------------------------------------------------------------------------------------------
667: PROCEDURE update_inst_asset (
668: p_inst_asset_rec IN csi_datastructures_pub.instance_asset_rec ,
669: p_transaction_units IN NUMBER,
670: p_csi_txn_rec IN csi_datastructures_pub.transaction_rec,
671: x_return_status OUT NOCOPY VARCHAR2,
672: x_error_msg OUT NOCOPY VARCHAR2)
666: -----------------------------------------------------------------------------------------------
667: PROCEDURE update_inst_asset (
668: p_inst_asset_rec IN csi_datastructures_pub.instance_asset_rec ,
669: p_transaction_units IN NUMBER,
670: p_csi_txn_rec IN csi_datastructures_pub.transaction_rec,
671: x_return_status OUT NOCOPY VARCHAR2,
672: x_error_msg OUT NOCOPY VARCHAR2)
673: IS
674:
681: l_time_stamp DATE ;
682: l_sysdate DATE ;
683:
684: --Specific to the API's here
685: l_dest_inst_asset_query_rec csi_datastructures_pub.instance_asset_query_rec ;
686: l_dest_inst_asset_tbl csi_datastructures_pub.instance_asset_tbl;
687: l_dest_inst_asset_header_tbl csi_datastructures_pub.instance_asset_header_tbl;
688: l_dest_asset_tbl cse_datastructures_pub.asset_query_tbl;
689: l_asset_id_tbl csi_asset_pvt.asset_id_tbl ;
682: l_sysdate DATE ;
683:
684: --Specific to the API's here
685: l_dest_inst_asset_query_rec csi_datastructures_pub.instance_asset_query_rec ;
686: l_dest_inst_asset_tbl csi_datastructures_pub.instance_asset_tbl;
687: l_dest_inst_asset_header_tbl csi_datastructures_pub.instance_asset_header_tbl;
688: l_dest_asset_tbl cse_datastructures_pub.asset_query_tbl;
689: l_asset_id_tbl csi_asset_pvt.asset_id_tbl ;
690: l_asset_loc_tbl csi_asset_pvt.asset_loc_tbl ;
683:
684: --Specific to the API's here
685: l_dest_inst_asset_query_rec csi_datastructures_pub.instance_asset_query_rec ;
686: l_dest_inst_asset_tbl csi_datastructures_pub.instance_asset_tbl;
687: l_dest_inst_asset_header_tbl csi_datastructures_pub.instance_asset_header_tbl;
688: l_dest_asset_tbl cse_datastructures_pub.asset_query_tbl;
689: l_asset_id_tbl csi_asset_pvt.asset_id_tbl ;
690: l_asset_loc_tbl csi_asset_pvt.asset_loc_tbl ;
691: l_lookup_tbl csi_asset_pvt.lookup_tbl ;
691: l_lookup_tbl csi_asset_pvt.lookup_tbl ;
692: l_asset_count_rec csi_asset_pvt.asset_count_rec ;
693:
694: ---Local variables only for this spec.
695: l_inst_asset_rec csi_datastructures_pub.instance_asset_rec ;
696: l_csi_txn_rec csi_datastructures_pub.transaction_rec ;
697:
698: CURSOR inst_asset_cur (c_instance_asset_id IN NUMBER) IS
699: SELECT cia.object_version_number
692: l_asset_count_rec csi_asset_pvt.asset_count_rec ;
693:
694: ---Local variables only for this spec.
695: l_inst_asset_rec csi_datastructures_pub.instance_asset_rec ;
696: l_csi_txn_rec csi_datastructures_pub.transaction_rec ;
697:
698: CURSOR inst_asset_cur (c_instance_asset_id IN NUMBER) IS
699: SELECT cia.object_version_number
700: FROM csi_i_assets cia
878: p_src_fa_inst_dtls_rec IN fa_inst_dtls_rec,
879: p_dest_move_trans_rec IN move_trans_rec,
880: p_dest_fa_dist_rec IN cse_datastructures_pub.distribution_rec,
881: p_transaction_units IN NUMBER,
882: p_csi_txn_rec IN csi_datastructures_pub.transaction_rec,
883: x_return_status OUT NOCOPY VARCHAR2,
884: x_error_msg OUT NOCOPY VARCHAR2 )
885: IS
886: l_api_version NUMBER ;
899: l_fnd_error VARCHAR2(1);
900: l_asset_attrib_rec CSE_DATASTRUCTURES_PUB.asset_attrib_rec;
901:
902: temp_str VARCHAR2(512);
903: l_src_inst_asset_rec csi_datastructures_pub.instance_asset_rec ;
904: l_dest_inst_asset_rec csi_datastructures_pub.instance_asset_rec ;
905:
906: e_error EXCEPTION ;
907: l_error_msg VARCHAR2(2000);
900: l_asset_attrib_rec CSE_DATASTRUCTURES_PUB.asset_attrib_rec;
901:
902: temp_str VARCHAR2(512);
903: l_src_inst_asset_rec csi_datastructures_pub.instance_asset_rec ;
904: l_dest_inst_asset_rec csi_datastructures_pub.instance_asset_rec ;
905:
906: e_error EXCEPTION ;
907: l_error_msg VARCHAR2(2000);
908:
1078: p_dest_move_trans_rec IN move_trans_rec,
1079: p_dest_fa_rec IN fa_rec,
1080: p_dest_fa_dist_rec IN cse_datastructures_pub.distribution_rec,
1081: p_transaction_units IN NUMBER,
1082: p_csi_txn_rec IN csi_datastructures_pub.transaction_rec,
1083: x_return_status OUT NOCOPY VARCHAR2,
1084: x_error_msg OUT NOCOPY VARCHAR2)
1085: IS
1086: l_return_status VARCHAR2(1);
1204:
1205: l_fnd_success VARCHAR2(1) := fnd_api.g_ret_sts_success;
1206: l_fnd_error VARCHAR2(1) := fnd_api.g_ret_sts_error;
1207: l_sysdate DATE := sysdate;
1208: l_txn_rec CSI_DATASTRUCTURES_PUB.transaction_rec ;
1209: l_error_msg VARCHAR2(4000);
1210: l_return_status VARCHAR2(1);
1211: l_valid_to_process VARCHAR2(1);
1212: l_src_move_trans_rec move_trans_rec ;
1223: l_validation_level NUMBER := fnd_api.g_valid_level_full;
1224: l_msg_index NUMBER;
1225: l_msg_data VARCHAR2(2000);
1226: l_msg_count NUMBER;
1227: l_trx_error_rec csi_datastructures_pub.transaction_error_rec ;
1228: l_txn_error_id NUMBER ;
1229: l_mass_add_rec fa_mass_additions%ROWTYPE ;
1230: l_asset_query_rec cse_datastructures_pub.asset_query_rec ;
1231:
1429: PROCEDURE get_inst_txn_dtls_srl(
1430: p_instance_id IN number,
1431: p_transaction_id IN number,
1432: p_source_dest_flag IN varchar2 default 'C',
1433: x_instance_rec OUT nocopy csi_datastructures_pub.instance_header_rec,
1434: x_return_status OUT nocopy varchar2)
1435: IS
1436:
1437: l_transaction_id number;
1437: l_transaction_id number;
1438: l_time_stamp date := sysdate;
1439:
1440: -- get instance details variables
1441: g_inst_rec csi_datastructures_pub.instance_header_rec;
1442: g_pty_tbl csi_datastructures_pub.party_header_tbl;
1443: g_pa_tbl csi_datastructures_pub.party_account_header_tbl;
1444: g_ou_tbl csi_datastructures_pub.org_units_header_tbl;
1445: g_prc_tbl csi_datastructures_pub.pricing_attribs_tbl;
1438: l_time_stamp date := sysdate;
1439:
1440: -- get instance details variables
1441: g_inst_rec csi_datastructures_pub.instance_header_rec;
1442: g_pty_tbl csi_datastructures_pub.party_header_tbl;
1443: g_pa_tbl csi_datastructures_pub.party_account_header_tbl;
1444: g_ou_tbl csi_datastructures_pub.org_units_header_tbl;
1445: g_prc_tbl csi_datastructures_pub.pricing_attribs_tbl;
1446: g_eav_tbl csi_datastructures_pub.extend_attrib_values_tbl;
1439:
1440: -- get instance details variables
1441: g_inst_rec csi_datastructures_pub.instance_header_rec;
1442: g_pty_tbl csi_datastructures_pub.party_header_tbl;
1443: g_pa_tbl csi_datastructures_pub.party_account_header_tbl;
1444: g_ou_tbl csi_datastructures_pub.org_units_header_tbl;
1445: g_prc_tbl csi_datastructures_pub.pricing_attribs_tbl;
1446: g_eav_tbl csi_datastructures_pub.extend_attrib_values_tbl;
1447: g_ea_tbl csi_datastructures_pub.extend_attrib_tbl;
1440: -- get instance details variables
1441: g_inst_rec csi_datastructures_pub.instance_header_rec;
1442: g_pty_tbl csi_datastructures_pub.party_header_tbl;
1443: g_pa_tbl csi_datastructures_pub.party_account_header_tbl;
1444: g_ou_tbl csi_datastructures_pub.org_units_header_tbl;
1445: g_prc_tbl csi_datastructures_pub.pricing_attribs_tbl;
1446: g_eav_tbl csi_datastructures_pub.extend_attrib_values_tbl;
1447: g_ea_tbl csi_datastructures_pub.extend_attrib_tbl;
1448: g_asset_tbl csi_datastructures_pub.instance_asset_header_tbl;
1441: g_inst_rec csi_datastructures_pub.instance_header_rec;
1442: g_pty_tbl csi_datastructures_pub.party_header_tbl;
1443: g_pa_tbl csi_datastructures_pub.party_account_header_tbl;
1444: g_ou_tbl csi_datastructures_pub.org_units_header_tbl;
1445: g_prc_tbl csi_datastructures_pub.pricing_attribs_tbl;
1446: g_eav_tbl csi_datastructures_pub.extend_attrib_values_tbl;
1447: g_ea_tbl csi_datastructures_pub.extend_attrib_tbl;
1448: g_asset_tbl csi_datastructures_pub.instance_asset_header_tbl;
1449:
1442: g_pty_tbl csi_datastructures_pub.party_header_tbl;
1443: g_pa_tbl csi_datastructures_pub.party_account_header_tbl;
1444: g_ou_tbl csi_datastructures_pub.org_units_header_tbl;
1445: g_prc_tbl csi_datastructures_pub.pricing_attribs_tbl;
1446: g_eav_tbl csi_datastructures_pub.extend_attrib_values_tbl;
1447: g_ea_tbl csi_datastructures_pub.extend_attrib_tbl;
1448: g_asset_tbl csi_datastructures_pub.instance_asset_header_tbl;
1449:
1450: l_return_status varchar2(1);
1443: g_pa_tbl csi_datastructures_pub.party_account_header_tbl;
1444: g_ou_tbl csi_datastructures_pub.org_units_header_tbl;
1445: g_prc_tbl csi_datastructures_pub.pricing_attribs_tbl;
1446: g_eav_tbl csi_datastructures_pub.extend_attrib_values_tbl;
1447: g_ea_tbl csi_datastructures_pub.extend_attrib_tbl;
1448: g_asset_tbl csi_datastructures_pub.instance_asset_header_tbl;
1449:
1450: l_return_status varchar2(1);
1451: l_msg_data varchar2(2000);
1444: g_ou_tbl csi_datastructures_pub.org_units_header_tbl;
1445: g_prc_tbl csi_datastructures_pub.pricing_attribs_tbl;
1446: g_eav_tbl csi_datastructures_pub.extend_attrib_values_tbl;
1447: g_ea_tbl csi_datastructures_pub.extend_attrib_tbl;
1448: g_asset_tbl csi_datastructures_pub.instance_asset_header_tbl;
1449:
1450: l_return_status varchar2(1);
1451: l_msg_data varchar2(2000);
1452: l_msg_count number;
1655: l_txn_quantity number;
1656:
1657: l_src_move_tbl cse_asset_move_pkg.move_trans_tbl;
1658: l_dest_move_tbl cse_asset_move_pkg.move_trans_tbl;
1659: l_src_inst_rec csi_datastructures_pub.instance_header_rec;
1660: l_dest_inst_rec csi_datastructures_pub.instance_header_rec;
1661:
1662: s_ind binary_integer := 0;
1663: d_ind binary_integer := 0;
1656:
1657: l_src_move_tbl cse_asset_move_pkg.move_trans_tbl;
1658: l_dest_move_tbl cse_asset_move_pkg.move_trans_tbl;
1659: l_src_inst_rec csi_datastructures_pub.instance_header_rec;
1660: l_dest_inst_rec csi_datastructures_pub.instance_header_rec;
1661:
1662: s_ind binary_integer := 0;
1663: d_ind binary_integer := 0;
1664:
2079: l_qty_canbe_process NUMBER;
2080: l_qty_being_process NUMBER;
2081:
2082: l_sysdate DATE := sysdate;
2083: l_txn_rec csi_datastructures_pub.transaction_rec;
2084:
2085: l_src_transaction_id NUMBER;
2086: l_src_fa_inst_dtls_tbl src_fa_inst_dtls_tbl;
2087:
2484: p_csi_txn_id IN number,
2485: x_return_status OUT nocopy varchar2,
2486: x_error_message OUT nocopy varchar2)
2487: IS
2488: l_txn_rec csi_datastructures_pub.transaction_rec;
2489: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
2490: l_msg_count number;
2491: l_msg_data varchar2(2000);
2492: BEGIN
2539: l_error_msg varchar2(2000);
2540: l_src_txn_object_ver_num number ;
2541: l_dest_txn_qty number ;
2542: l_dest_txn_processed number ;
2543: l_txn_rec csi_datastructures_pub.transaction_rec ;
2544:
2545: CURSOR csi_txn_cur (c_transaction_id IN NUMBER) IS
2546: SELECT object_version_number
2547: FROM csi_transactions
2610: l_cost_api_ver NUMBER ;
2611: l_api_version NUMBER ;
2612: l_src_transaction_id NUMBER;
2613: l_src_transaction_type_id NUMBER;
2614: l_src_inst_asset_query_rec csi_datastructures_pub.instance_asset_rec ;
2615: l_src_inst_asset_rec csi_datastructures_pub.instance_asset_rec ;
2616: l_dest_inst_asset_rec csi_datastructures_pub.instance_asset_rec ;
2617: l_src_inst_asset_tbl csi_datastructures_pub.instance_asset_tbl;
2618: l_dest_inst_asset_tbl csi_datastructures_pub.instance_asset_tbl;
2611: l_api_version NUMBER ;
2612: l_src_transaction_id NUMBER;
2613: l_src_transaction_type_id NUMBER;
2614: l_src_inst_asset_query_rec csi_datastructures_pub.instance_asset_rec ;
2615: l_src_inst_asset_rec csi_datastructures_pub.instance_asset_rec ;
2616: l_dest_inst_asset_rec csi_datastructures_pub.instance_asset_rec ;
2617: l_src_inst_asset_tbl csi_datastructures_pub.instance_asset_tbl;
2618: l_dest_inst_asset_tbl csi_datastructures_pub.instance_asset_tbl;
2619: l_dest_inst_asset_header_tbl csi_datastructures_pub.instance_asset_header_tbl;
2612: l_src_transaction_id NUMBER;
2613: l_src_transaction_type_id NUMBER;
2614: l_src_inst_asset_query_rec csi_datastructures_pub.instance_asset_rec ;
2615: l_src_inst_asset_rec csi_datastructures_pub.instance_asset_rec ;
2616: l_dest_inst_asset_rec csi_datastructures_pub.instance_asset_rec ;
2617: l_src_inst_asset_tbl csi_datastructures_pub.instance_asset_tbl;
2618: l_dest_inst_asset_tbl csi_datastructures_pub.instance_asset_tbl;
2619: l_dest_inst_asset_header_tbl csi_datastructures_pub.instance_asset_header_tbl;
2620: l_dest_num_of_rows NUMBER;
2613: l_src_transaction_type_id NUMBER;
2614: l_src_inst_asset_query_rec csi_datastructures_pub.instance_asset_rec ;
2615: l_src_inst_asset_rec csi_datastructures_pub.instance_asset_rec ;
2616: l_dest_inst_asset_rec csi_datastructures_pub.instance_asset_rec ;
2617: l_src_inst_asset_tbl csi_datastructures_pub.instance_asset_tbl;
2618: l_dest_inst_asset_tbl csi_datastructures_pub.instance_asset_tbl;
2619: l_dest_inst_asset_header_tbl csi_datastructures_pub.instance_asset_header_tbl;
2620: l_dest_num_of_rows NUMBER;
2621: l_dest_inst_asset_query_rec csi_datastructures_pub.instance_asset_query_rec ;
2614: l_src_inst_asset_query_rec csi_datastructures_pub.instance_asset_rec ;
2615: l_src_inst_asset_rec csi_datastructures_pub.instance_asset_rec ;
2616: l_dest_inst_asset_rec csi_datastructures_pub.instance_asset_rec ;
2617: l_src_inst_asset_tbl csi_datastructures_pub.instance_asset_tbl;
2618: l_dest_inst_asset_tbl csi_datastructures_pub.instance_asset_tbl;
2619: l_dest_inst_asset_header_tbl csi_datastructures_pub.instance_asset_header_tbl;
2620: l_dest_num_of_rows NUMBER;
2621: l_dest_inst_asset_query_rec csi_datastructures_pub.instance_asset_query_rec ;
2622: l_dest_transaction_type_id NUMBER;
2615: l_src_inst_asset_rec csi_datastructures_pub.instance_asset_rec ;
2616: l_dest_inst_asset_rec csi_datastructures_pub.instance_asset_rec ;
2617: l_src_inst_asset_tbl csi_datastructures_pub.instance_asset_tbl;
2618: l_dest_inst_asset_tbl csi_datastructures_pub.instance_asset_tbl;
2619: l_dest_inst_asset_header_tbl csi_datastructures_pub.instance_asset_header_tbl;
2620: l_dest_num_of_rows NUMBER;
2621: l_dest_inst_asset_query_rec csi_datastructures_pub.instance_asset_query_rec ;
2622: l_dest_transaction_type_id NUMBER;
2623: l_dest_asset_query_rec cse_datastructures_pub.asset_query_rec ;
2617: l_src_inst_asset_tbl csi_datastructures_pub.instance_asset_tbl;
2618: l_dest_inst_asset_tbl csi_datastructures_pub.instance_asset_tbl;
2619: l_dest_inst_asset_header_tbl csi_datastructures_pub.instance_asset_header_tbl;
2620: l_dest_num_of_rows NUMBER;
2621: l_dest_inst_asset_query_rec csi_datastructures_pub.instance_asset_query_rec ;
2622: l_dest_transaction_type_id NUMBER;
2623: l_dest_asset_query_rec cse_datastructures_pub.asset_query_rec ;
2624: e_goto_next_trans EXCEPTION;
2625: l_commit VARCHAR2(1) ;
2625: l_commit VARCHAR2(1) ;
2626: l_init_msg_list VARCHAR2(1) ;
2627: l_validation_level NUMBER ;
2628: l_msg_data VARCHAR2(2000);
2629: l_txn_rec csi_datastructures_pub.transaction_rec ;
2630: j PLS_INTEGER;
2631: i PLS_INTEGER;
2632: l_msg_index NUMBER;
2633: l_msg_count NUMBER;
2632: l_msg_index NUMBER;
2633: l_msg_count NUMBER;
2634:
2635: l_serial_move_type VARCHAR2(20) ;
2636: l_trx_error_rec csi_datastructures_pub.transaction_error_rec;
2637: l_txn_error_id NUMBER ;
2638: l_api_name VARCHAR2(100) ;
2639: l_sysdate DATE ;
2640: l_time_stamp DATE ;
3445: 'INTERORG_DIRECT_SHIP',
3446: 'ISO_DIRECT_SHIP') ;
3447:
3448: l_sysdate DATE ;
3449: l_dest_inst_asset_rec csi_datastructures_pub.instance_asset_rec ;
3450: l_txn_rec csi_datastructures_pub.transaction_rec ;
3451: l_msg_index NUMBER;
3452: l_msg_count NUMBER;
3453: l_msg_data VARCHAR2(2000);
3446: 'ISO_DIRECT_SHIP') ;
3447:
3448: l_sysdate DATE ;
3449: l_dest_inst_asset_rec csi_datastructures_pub.instance_asset_rec ;
3450: l_txn_rec csi_datastructures_pub.transaction_rec ;
3451: l_msg_index NUMBER;
3452: l_msg_count NUMBER;
3453: l_msg_data VARCHAR2(2000);
3454: l_return_status VARCHAR2(1);
3452: l_msg_count NUMBER;
3453: l_msg_data VARCHAR2(2000);
3454: l_return_status VARCHAR2(1);
3455: l_error_msg VARCHAR2(2000);
3456: l_trx_error_rec csi_datastructures_pub.transaction_error_rec;
3457: i NUMBER ;
3458: j NUMBER ;
3459: l_src_move_trans_tbl move_trans_tbl ;
3460: l_dest_move_trans_tbl move_trans_tbl ;
4368: PROCEDURE log_error(
4369: p_txn_context IN txn_context,
4370: p_error_message IN varchar2)
4371: IS
4372: l_error_rec csi_datastructures_pub.transaction_error_rec;
4373: l_error_id number;
4374: l_source_type varchar2(20);
4375: l_error_message varchar2(2000);
4376:
4535: l_txn_action varchar2(20);
4536: l_return_status varchar2(1);
4537: l_error_message varchar2(2000);
4538:
4539: l_csi_txn_rec csi_datastructures_pub.transaction_rec ;
4540:
4541: ---For Public API's
4542: l_api_name varchar2(100);
4543: l_api_version number;