The following lines contain the word 'select', 'insert', 'update' or 'delete':
UPDATE po_requisition_headers porh
SET porh.authorization_status = p_new_status,
porh.last_update_date = sysdate,
porh.last_updated_by = fnd_global.user_id,
porh.last_update_login = fnd_global.login_id
WHERE porh.requisition_header_id = p_requisition_header_id;
select max(sequence_num) + 1
into l_sequence_number
from po_action_history
where object_type_code= 'REQUISITION'
and object_id = p_requisition_header_id;
INSERT into PO_ACTION_HISTORY
(object_id,
object_type_code,
object_sub_type_code,
sequence_num,
last_update_date,
last_updated_by,
creation_date,
created_by,
action_code,
action_date,
employee_id,
note,
object_revision_num,
last_update_login,
request_id,
program_application_id,
program_id,
program_update_date,
approval_path_id,
offline_code)
VALUES
(p_requisition_header_id,
'REQUISITION',
'PURCHASE',
nvl(l_sequence_number,0),
sysdate,
fnd_global.user_id,
sysdate,
fnd_global.user_id,
p_action,
decode(p_action, '',to_date(''), sysdate),
p_fwd_to_id,
p_note,
l_revision_num,
fnd_global.login_id,
0,
0,
0,
'',
l_approval_path_id,
l_offline_code );
UPDATE po_action_history
SET action_code = p_action,
action_date = sysdate,
note = p_note,
last_updated_by = fnd_global.user_id,
last_update_date = sysdate,
object_revision_num = null,
approval_path_id = null
WHERE object_id = p_requisition_header_id
AND object_type_code = 'REQUISITION'
AND action_code IS NULL;
select porh.authorization_status
into l_old_status
from po_requisition_headers porh
where porh.requisition_header_id = p_requisition_header_id;
-- Update previous record with action being performed
--
podusupah( p_requisition_header_id => p_requisition_header_id,
p_action => p_action,
p_note => p_note );