The following lines contain the word 'select', 'insert', 'update' or 'delete':
L_LAST_UPDATE_DATE DATE;
L_LAST_UPDATED_BY NUMBER;
L_LAST_UPDATE_LOGIN NUMBER;
select transaction_status
from edr_trans_ackn
where erecord_id = p_erecord_id;
p_mode => EDR_TRANS_ACKN_PVT.G_UPDATE_MODE
);
-- after all the validations are done, update the acknowledgement
-- row in the database
-- Find out if the autonomous commit flag is on or not
-- if an auto commit is required call the corresponding
-- auto txn
IF FND_API.To_Boolean(p_autonomous_commit) THEN
EDR_TRANS_ACKN_PVT.SEND_ACKN_AUTO
( p_api_version => 1.0 ,
p_init_msg_list => FND_API.G_FALSE ,
x_return_status => l_return_status ,
x_msg_count => l_msg_count ,
x_msg_data => l_msg_data ,
p_event_name => p_event_name ,
p_event_key => p_event_key ,
p_erecord_id => p_erecord_id ,
p_trans_status => p_trans_status ,
p_ackn_by => p_ackn_by ,
p_ackn_note => p_ackn_note
);
last_update_date => l_last_update_date ,
last_updated_by => l_last_updated_by ,
last_update_login => l_last_update_login
);
update EDR_TRANS_ACKN SET
ACKN_DATE = SYSDATE ,
TRANSACTION_STATUS = p_trans_status ,
ACKN_BY = p_ackn_by ,
ACKN_NOTE = p_ackn_note ,
LAST_UPDATE_DATE = l_last_update_date ,
LAST_UPDATED_BY = l_last_updated_by ,
LAST_UPDATE_LOGIN = l_last_update_login
where ERECORD_ID = p_erecord_id;