The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE UPDATE_TXN(p_order_id IN NUMBER,
p_line_id IN NUMBER,
p_ib_source_id IN NUMBER,
p_line_source IN VARCHAR2,
p_line_number IN NUMBER,
p_error_code OUT NOCOPY NUMBER,
p_error_description OUT NOCOPY VARCHAR2);
PROCEDURE UPDATE_CSI(p_order_id IN NUMBER,
p_line_id IN NUMBER,
p_ib_source_id IN NUMBER,
p_error_code OUT NOCOPY NUMBER);
cursor c_update_ib (p_order_id number,p_Line_id number) IS
select c.parameter_name
,c.parameter_value
,c.txn_attrib_detail_id
,c.attrib_source_table
,c.attrib_source_id
from xdp_order_line_items a,
xdp_fulfill_worklist b,
xdp_worklist_details c
where a.line_item_id = b.line_item_id and
b.workitem_instance_id = c.workitem_instance_id and
a.order_id = p_order_id and
a.line_item_id = p_line_id and
a.ib_source <> 'NONE' and
c.attrib_source_id is not null and
c.modified_flag = 'Y';
PROCEDURE UPDATE_IB(p_order_id IN NUMBER,
p_line_id IN NUMBER,
p_error_code IN OUT NOCOPY NUMBER,
p_error_description OUT NOCOPY VARCHAR2) IS
lv_error_code NUMBER := 0;
select a.ib_source
,a.ib_source_id
,a.line_source
,a.line_number
,a.is_virtual_line_flag
,b.comms_nl_trackable_flag
from xdp_order_line_items a,
mtl_system_items_b b
where a.inventory_item_id = b.inventory_item_id
and a.organization_id = b.organization_id
and a.line_item_id = p_line_id
and a.order_id = p_order_id
and a.ib_source is not null;
select a.line_number
from xdp_order_line_items a,
xdp_line_relationships b
where a.line_item_id = b.related_line_item_id
and b.line_item_id = p_line_id;
Log_debug(p_debug_api => 'xdp.plsql.XDP_INSTALL_BASE.UPDATE_IB',
p_debug_msg => 'Updating Install Base For Order Id is : '||p_order_id|| ' and Line Id is : '||p_line_id);
Log_debug(p_debug_api => 'xdp.plsql.XDP_INSTALL_BASE.UPDATE_IB',
p_debug_msg => ' Trackable Flag is : ' ||v_check_rec.comms_nl_trackable_flag);
Log_debug(p_debug_api => 'xdp.plsql.XDP_INSTALL_BASE.UPDATE_IB',
p_debug_msg => ' Ib Source is : ' ||v_check_rec.ib_source);
Log_debug(p_debug_api => 'xdp.plsql.XDP_INSTALL_BASE.UPDATE_IB',
p_debug_msg => ' is_virtual_line_flag is : ' ||v_check_rec.is_virtual_line_flag);
Log_debug(p_debug_api => 'xdp.plsql.XDP_INSTALL_BASE.UPDATE_IB',
p_debug_msg => ' lv_line_number : '||lv_line_number );
Log_debug(p_debug_api => 'xdp.plsql.XDP_INSTALL_BASE.UPDATE_IB',
p_debug_msg => ' Calling UPDATE_TXN ');
UPDATE_TXN(p_order_id,
p_line_id,
v_check_rec.ib_source_id,
v_check_rec.line_source,
lv_line_number,
lv_error_code,
lv_error_description);
Log_debug(p_debug_api => 'xdp.plsql.XDP_INSTALL_BASE.UPDATE_IB',
p_debug_msg => ' Update_Txn Failed. Error Code : '||lv_error_code ||'- Error Desc : '||lv_error_description );
Log_debug(p_debug_api => 'xdp.plsql.XDP_INSTALL_BASE.UPDATE_IB',
p_debug_msg => 'Ib Source is : '||v_check_rec.ib_source );
Log_debug(p_debug_api => 'xdp.plsql.XDP_INSTALL_BASE.UPDATE_IB',
p_debug_msg => ' Calling UPDATE_CSI');
UPDATE_CSI(p_order_id,
p_line_id,
v_check_rec.ib_source_id,
lv_error_code);
Log_debug(p_debug_api => 'xdp.plsql.XDP_INSTALL_BASE.UPDATE_IB',
p_debug_msg => ' Update_CSI Failed. Error Code : '||lv_error_code);
Log_debug(p_debug_api => 'xdp.plsql.XDP_INSTALL_BASE.UPDATE_IB',
p_debug_msg => ' Exception Occurred');
Log_debug(p_debug_api => 'xdp.plsql.XDP_INSTALL_BASE.UPDATE_IB',
p_debug_msg => 'Error Code : ' ||p_error_code||' - Error Desc : '||p_error_description);
END UPDATE_IB;
PROCEDURE UPDATE_TXN (p_order_id IN NUMBER,
p_line_id IN NUMBER,
p_ib_source_id IN NUMBER,
p_line_source IN VARCHAR2,
p_line_number IN NUMBER,
p_error_code OUT NOCOPY NUMBER,
p_error_description OUT NOCOPY VARCHAR2) IS
lv_index NUMBER;
e_update_txn_failed EXCEPTION;
Log_debug(p_debug_api => 'xdp.plsql.XDP_INSTALL_BASE.UPDATE_TXN',
p_debug_msg => 'In UPDATE_TXN');
Log_debug(p_debug_api => 'xdp.plsql.XDP_INSTALL_BASE.UPDATE_TXN',
p_debug_msg => 'Line Id is : '||p_line_number);
Log_debug(p_debug_api => 'xdp.plsql.XDP_INSTALL_BASE.UPDATE_TXN',
p_debug_msg => 'Calling CSI_UTILITY_GRP.get_config_key_for_om_line ');
Log_debug(p_debug_api => 'xdp.plsql.XDP_INSTALL_BASE.UPDATE_TXN',
p_debug_msg => 'Config Hdr Id : '||lv_config_session_key.session_hdr_id);
Log_debug(p_debug_api => 'xdp.plsql.XDP_INSTALL_BASE.UPDATE_TXN',
p_debug_msg => 'Config Rev Num : '||lv_config_session_key.session_rev_num);
Log_debug(p_debug_api => 'xdp.plsql.XDP_INSTALL_BASE.UPDATE_TXN',
p_debug_msg => 'Config item Id : '||lv_config_session_key.session_item_id);
Log_debug(p_debug_api => 'xdp.plsql.XDP_INSTALL_BASE.UPDATE_TXN',
p_debug_msg => 'source_transaction_id : '||p_line_number);
Log_debug(p_debug_api => 'xdp.plsql.XDP_INSTALL_BASE.UPDATE_TXN',
p_debug_msg => 'source_transaction_table : '||p_line_source);
Log_debug(p_debug_api => 'xdp.plsql.XDP_INSTALL_BASE.UPDATE_TXN',
p_debug_msg => 'CSI_UTILITY_GRP.get_config_key_for_om_line Failed');
Log_debug(p_debug_api => 'xdp.plsql.XDP_INSTALL_BASE.UPDATE_TXN',
p_debug_msg => 'Error Code : '||lv_return_status||'- Error Desc. : '||lv_return_message);
Log_debug(p_debug_api => 'xdp.plsql.XDP_INSTALL_BASE.UPDATE_TXN',
p_debug_msg => 'Calling GET_TXN_LINE_ID ');
Log_debug(p_debug_api => 'xdp.plsql.XDP_INSTALL_BASE.UPDATE_TXN',
p_debug_msg => 'Transaction Line Id : '||l_txn_line_rec.transaction_line_id );
FOR v_update_ib in c_update_ib(p_order_id,p_line_id) LOOP
lv_index1 := lv_index1 + 1;
l_txn_ext_attrib_vals_tbl(lv_index1).txn_attrib_detail_id := v_update_ib.txn_attrib_detail_id;
l_txn_ext_attrib_vals_tbl(lv_index1).attrib_source_table := v_update_ib.attrib_source_table;
l_txn_ext_attrib_vals_tbl(lv_index1).attribute_source_id := v_update_ib.attrib_source_id;
l_txn_ext_attrib_vals_tbl(lv_index1).attribute_value := v_update_ib.parameter_value;
Log_debug(p_debug_api => 'xdp.plsql.XDP_INSTALL_BASE.UPDATE_TXN',
p_debug_msg => 'Txn Ext Attrib Val. Count > 0 ');
Log_debug(p_debug_api => 'xdp.plsql.XDP_INSTALL_BASE.UPDATE_TXN',
p_debug_msg => 'Calling csi_t_txn_details_grp.update_txn_line_dtls');
csi_t_txn_details_grp.update_txn_line_dtls
(
p_api_version => 1.0
,p_commit => null
,p_init_msg_list => null
,p_validation_level => null
,p_txn_line_rec => l_txn_line_rec
,p_txn_line_detail_tbl => l_txn_line_detail_tbl
,px_txn_party_detail_tbl => l_txn_party_detail_tbl
,px_txn_pty_acct_detail_tbl => l_txn_pty_acct_detail_tbl
,px_txn_ii_rltns_tbl => l_txn_ii_rltns_tbl
,px_txn_org_assgn_tbl => l_txn_org_assgn_tbl
,px_txn_ext_attrib_vals_tbl => l_txn_ext_attrib_vals_tbl
,x_return_status => l_return_status
,x_msg_count => l_msg_count
,x_msg_data => l_msg_data
);
Log_debug(p_debug_api => 'xdp.plsql.XDP_INSTALL_BASE.UPDATE_TXN',
p_debug_msg => ' csi_t_txn_details_grp.update_txn_line_dtls Failed');
Log_debug(p_debug_api => 'xdp.plsql.XDP_INSTALL_BASE.UPDATE_TXN',
p_debug_msg => ' Error Desc : ' ||p_error_description);
Log_debug(p_debug_api => 'xdp.plsql.XDP_INSTALL_BASE.UPDATE_TXN',
p_debug_msg => ' csi_t_txn_details_grp.update_txn_line_dtls Completed ');
Log_debug(p_debug_api => 'xdp.plsql.XDP_INSTALL_BASE.UPDATE_TXN',
p_debug_msg => ' Exception Occurred');
Log_debug(p_debug_api => 'xdp.plsql.XDP_INSTALL_BASE.UPDATE_TXN',
p_debug_msg => 'Error Code : ' ||p_error_code||' - Error Desc : '||p_error_description);
xdp_utilities.generic_error('XDP_INSTALL_BASE.UPDATE_TXN'
,p_order_id
, SQLCODE
, SQLERRM);
END UPDATE_TXN;
PROCEDURE UPDATE_CSI (p_order_id IN NUMBER,
p_line_id IN NUMBER,
p_ib_source_id IN NUMBER,
p_error_code OUT NOCOPY NUMBER) IS
lv_index NUMBER;
e_update_csi_failed EXCEPTION;
select object_version_number
from csi_iea_values
where attribute_value_id = p_att_val_id;
select object_version_number
from csi_item_instances
where instance_id = p_inst_id;
Log_debug(p_debug_api => 'xdp.plsql.XDP_INSTALL_BASE.UPDATE_CSI',
p_debug_msg => 'In UPDATE_CSI');
FOR v_update_ib in c_update_ib(p_order_id,p_line_id) LOOP
lv_index := lv_index + 1;
IF v_update_ib.attrib_source_table = 'CSI_IEA_VALUES' THEN
l_extend_attrib_values_tbl(lv_index).attribute_value_id := v_update_ib.attrib_source_id;
l_extend_attrib_values_tbl(lv_index).attribute_value := v_update_ib.parameter_value;
FOR v_get_obj_num in c_get_obj_num(v_update_ib.attrib_source_id) LOOP
l_extend_attrib_values_tbl(lv_index).object_version_number := v_get_obj_num.object_version_number;
ELSIF v_update_ib.attrib_source_table = 'CSI_I_EXTENDED_ATTRIBS' THEN
l_extend_attrib_values_tbl(lv_index).attribute_value_id := null;
l_extend_attrib_values_tbl(lv_index).attribute_id := v_update_ib.attrib_source_id;
l_extend_attrib_values_tbl(lv_index).attribute_value := v_update_ib.parameter_value;
Log_debug(p_debug_api => 'xdp.plsql.XDP_INSTALL_BASE.UPDATE_CSI',
p_debug_msg => 'Calling csi_item_instance_pub.update_item_instance ');
csi_item_instance_pub.update_item_instance
(
p_api_version => 1.0
,p_commit => null
,p_init_msg_list => null
,p_validation_level => null
,p_instance_rec => l_instance_rec
,p_ext_attrib_values_tbl => l_extend_attrib_values_tbl
,p_party_tbl => l_party_tbl
,p_account_tbl => l_party_account_tbl
,p_pricing_attrib_tbl => l_pricing_attribs_tbl
,p_org_assignments_tbl => l_organization_units_tbl
,p_asset_assignment_tbl => l_instance_asset_tbl
,p_txn_rec => l_transaction_rec
,x_instance_id_lst => l_id_tbl
,x_return_status => l_return_status
,x_msg_count => l_msg_count
,x_msg_data => l_msg_data
);
Log_debug(p_debug_api => 'xdp.plsql.XDP_INSTALL_BASE.UPDATE_CSI',
p_debug_msg => 'csi_item_instance_pub.update_item_instance Failed');
Log_debug(p_debug_api => 'xdp.plsql.XDP_INSTALL_BASE.UPDATE_CSI',
p_debug_msg => 'Error Code : ' ||p_error_code || '- Error Desc. : '||l_msg_data );
Log_debug(p_debug_api => 'xdp.plsql.XDP_INSTALL_BASE.UPDATE_CSI',
p_debug_msg => 'When Others Exception Error Code : '||sqlcode||'- Error Desc. : '||sqlerrm );
xdp_utilities.generic_error('XDP_INSTALL_BASE.UPDATE_CSI'
,p_order_id
, SQLCODE
, SQLERRM);
END UPDATE_CSI;
SELECT transaction_line_id
INTO l_txn_line_id
FROM csi_t_txn_line_details
WHERE txn_line_detail_id = p_txn_line_detail_id ;