[Home] [Help]
6003: WHERE instance_id = p_ins_id;
6004: --
6005: l_instance_csr instance_csr%ROWTYPE;
6006: --
6007: px_oks_txn_inst_tbl oks_ibint_pub.txn_instance_tbl;
6008: l_ctr_group_id NUMBER;
6009: l_eam_item_type NUMBER;
6010: --
6011: BEGIN
8021: set contracts_invoked = 'Y'
8022: where transaction_id = l_upd_txn_tbl(K);
8023: END IF;
8024: --
8025: OKS_IBINT_PUB.IB_interface
8026: (
8027: P_Api_Version => 1.0,
8028: P_init_msg_list => p_init_msg_list,
8029: P_single_txn_date_flag => 'N',
8033: x_return_status => x_return_status,
8034: x_msg_count => x_msg_count,
8035: x_msg_data => x_msg_data
8036: );
8037: csi_gen_utility_pvt.put_line('Status returned from Oks_ibint_pub.IB_interface is :'||x_return_status);
8038: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS)
8039: THEN
8040: csi_gen_utility_pvt.put_line('Error from Call_to_contracts...');
8041: l_msg_index := 1;
8262: l_msg_index NUMBER;
8263: l_line_count NUMBER;
8264: l_flag VARCHAR2(1):='N';
8265: l_transaction_type VARCHAR2(10) := NULL;
8266: l_old_oks_cp_rec oks_ibint_pub.cp_rec_type;
8267: l_new_oks_cp_rec oks_ibint_pub.cp_rec_type;
8268: l_contracts_status VARCHAR2(3);
8269: l_owner_party_id NUMBER;
8270: l_transaction_date DATE ;
8263: l_line_count NUMBER;
8264: l_flag VARCHAR2(1):='N';
8265: l_transaction_type VARCHAR2(10) := NULL;
8266: l_old_oks_cp_rec oks_ibint_pub.cp_rec_type;
8267: l_new_oks_cp_rec oks_ibint_pub.cp_rec_type;
8268: l_contracts_status VARCHAR2(3);
8269: l_owner_party_id NUMBER;
8270: l_transaction_date DATE ;
8271: l_internal_party_id NUMBER;
8496: --
8497: px_child_inst_tbl csi_item_instance_grp.child_inst_tbl;
8498: l_child_exists VARCHAR2(1);
8499: --
8500: px_oks_txn_inst_tbl oks_ibint_pub.txn_instance_tbl;
8501: l_batch_id NUMBER;
8502: l_batch_type VARCHAR2(50);
8503: --
8504: SKIP_ERROR EXCEPTION;
9660: UPDATE CSI_TRANSACTIONS
9661: set contracts_invoked = 'Y'
9662: where transaction_id = p_txn_rec.transaction_id;
9663: --
9664: OKS_IBINT_PUB.IB_interface
9665: (
9666: P_Api_Version => 1.0,
9667: P_init_msg_list => p_init_msg_list,
9668: P_single_txn_date_flag => 'N',
9672: x_return_status => x_return_status,
9673: x_msg_count => x_msg_count,
9674: x_msg_data => x_msg_data
9675: );
9676: csi_gen_utility_pvt.put_line('Status returned from Oks_ibint_pub.IB_interface is :'||x_return_status);
9677: --
9678: IF x_return_status = 'W' THEN -- Warning from OKS
9679: -- Since OKS does not have the ability to pass the instance_id for the warning record(s),
9680: -- we are not populating the grp error tbl. We are still looping thru' the message stack
9811: l_msg_count NUMBER;
9812: l_iface_error_text VARCHAR2(2000);
9813: l_grp_error_tbl csi_datastructures_pub.grp_error_tbl;
9814: l_instance_rec csi_datastructures_pub.instance_rec;
9815: px_oks_txn_inst_tbl OKS_IBINT_PUB.TXN_INSTANCE_TBL;
9816: l_batch_type VARCHAR2(50);
9817: l_batch_id NUMBER;
9818: --
9819: BEGIN
9931: UPDATE CSI_TRANSACTIONS
9932: set contracts_invoked = 'Y'
9933: where transaction_id = p_txn_rec.transaction_id;
9934: --
9935: OKS_IBINT_PUB.IB_interface
9936: (
9937: P_Api_Version => 1.0,
9938: P_init_msg_list => p_init_msg_list,
9939: P_single_txn_date_flag => 'N',
9943: x_return_status => x_return_status,
9944: x_msg_count => x_msg_count,
9945: x_msg_data => x_msg_data
9946: );
9947: csi_gen_utility_pvt.put_line('Status returned from Oks_ibint_pub.IB_interface is :'||x_return_status);
9948: --
9949: IF NOT(x_return_status = FND_API.G_RET_STS_SUCCESS)
9950: THEN
9951: csi_gen_utility_pvt.put_line('Error from Call_to_contracts...');