The following lines contain the word 'select', 'insert', 'update' or 'delete':
select nvl(staged_flag,'N')
into x_staged_flag
from mtl_reservations
where reservation_id = p_reservation_id;
PROCEDURE update_staged_flag
( x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_reservation_id IN NUMBER,
p_staged_flag IN VARCHAR2)
is
l_api_name CONSTANT VARCHAR2(30) := 'update_staged_flag';
SAVEPOINT update_stage_sa;
update mtl_reservations
set staged_flag = p_staged_flag
,ship_ready_flag = l_ship_ready_flag -- Bug #2816312
where reservation_id = p_reservation_id;
ROLLBACK TO update_stage_sa;
ROLLBACK TO update_stage_sa;
ROLLBACK TO update_stage_sa;
END update_staged_flag;