The following lines contain the word 'select', 'insert', 'update' or 'delete':
l_txn_tbl.DELETE;
select source_object_code,source_object_id
into l_src_obj_code,l_src_obj_id
from CSI_COUNTER_ASSOCIATIONS
where counter_id = p_ctr_rdg_tbl(l_array_counter).counter_id
and rownum < 2;
select counter_id
into l_counter_id
from CSI_COUNTER_PROPERTIES_B
where counter_property_id = p_prop_rdg_tbl(l_array_counter).counter_property_id;
PROCEDURE Update_Counter_Reading(
P_Api_Version_Number IN NUMBER,
P_Init_Msg_List IN VARCHAR2,
P_Commit IN VARCHAR2,
p_validation_level IN NUMBER,
p_CTR_GRP_LOG_ID IN NUMBER,
p_CTR_RDG_Tbl IN CTR_RDG_Tbl_Type,
p_PROP_RDG_Tbl IN PROP_RDG_Tbl_Type,
X_Return_Status OUT NOCOPY VARCHAR2,
X_Msg_Count OUT NOCOPY NUMBER,
X_Msg_Data OUT NOCOPY VARCHAR2
)
IS
l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_COUNTER_READING';
Csi_Counter_Readings_Pub.Update_Counter_Reading
(
p_api_version => 1.0
,p_commit => p_commit
,p_init_msg_list => p_init_msg_list
,p_validation_level => p_validation_level
,p_ctr_rdg_tbl => l_ctr_rdg_tbl
,x_return_status => x_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
);
csi_ctr_gen_utility_pvt.put_line('ERROR FROM Update_Counter_Reading_pub API ');
END Update_Counter_Reading;
select source_object_code,source_object_id
into l_src_obj_code,l_src_obj_id
from CSI_COUNTER_ASSOCIATIONS
where counter_id = p_ctr_rdg_rec.counter_id
and rownum < 2;
ELSE -- Should have got inserted into CSI Transaction during Pre Capture Phase
Begin
select transaction_type_id,source_header_ref_id,source_transaction_date
into l_txn_tbl(1).transaction_type_id,
l_txn_tbl(1).source_header_ref_id,
l_txn_tbl(1).source_transaction_date
from CSI_TRANSACTIONS
where transaction_id = p_counter_grp_log_id;
PROCEDURE Update_Counter_Reading(
p_Api_Version_Number IN NUMBER,
P_Init_Msg_List IN VARCHAR2,
P_Commit IN VARCHAR2,
p_validation_level IN NUMBER,
p_CTR_RDG_Rec IN CTR_RDG_Rec_Type,
p_COUNTER_GRP_LOG_ID IN NUMBER,
p_object_version_number IN NUMBER,
X_Return_Status OUT NOCOPY VARCHAR2,
X_Msg_Count OUT NOCOPY NUMBER,
X_Msg_Data OUT NOCOPY VARCHAR2
) IS
--
l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_COUNTER_READING';
Csi_Counter_Readings_Pub.Update_Counter_Reading
(
p_api_version => 1.0
,p_commit => p_commit
,p_init_msg_list => p_init_msg_list
,p_validation_level => p_validation_level
,p_ctr_rdg_tbl => l_ctr_rdg_tbl
,x_return_status => x_return_status
,x_msg_count => x_msg_count
,x_msg_data => x_msg_data
);
csi_ctr_gen_utility_pvt.put_line('ERROR FROM Update_Counter_Reading_pub API ');
END Update_Counter_Reading;
P_READING_UPDATED IN VARCHAR2,
X_Return_Status OUT NOCOPY VARCHAR2,
X_Msg_Count OUT NOCOPY NUMBER,
X_Msg_Data OUT NOCOPY VARCHAR2
) IS
BEGIN
x_return_status := FND_API.G_RET_STS_SUCCESS;
PROCEDURE UPDATE_CTR_PROP_READING(
p_api_version_number IN NUMBER,
p_init_msg_list IN VARCHAR2,
p_commit IN VARCHAR2,
p_validation_level IN NUMBER,
p_PROP_RDG_Rec IN PROP_RDG_Rec_Type,
p_COUNTER_GRP_LOG_ID IN NUMBER,
p_object_version_number IN NUMBER,
X_Return_Status OUT NOCOPY VARCHAR2,
X_Msg_Count OUT NOCOPY NUMBER,
X_Msg_Data OUT NOCOPY VARCHAR2
) IS
l_api_name CONSTANT VARCHAR2(30) := 'UPDATE_CTR_PROP_READING';
END Update_CTR_Prop_Reading;