The following lines contain the word 'select', 'insert', 'update' or 'delete':
,p_delete_pending IN VARCHAR2 DEFAULT fnd_api.g_false
,x_batch_step_rec OUT NOCOPY gme_batch_steps%ROWTYPE
,x_return_status OUT NOCOPY VARCHAR2)
IS
/* Miscellaneous */
l_batch_header gme_batch_header%ROWTYPE;
trans_delete_err EXCEPTION;
trans_update_err EXCEPTION;
SELECT d.dep_step_id, s.step_status
FROM gme_batch_step_dependencies d, gme_batch_steps s
WHERE d.batchstep_id = p_batch_step_rec.batchstep_id
AND s.batchstep_id = d.dep_step_id;
SELECT m.material_detail_id
FROM gme_material_details m, gme_batch_step_items i
WHERE m.material_detail_id = i.material_detail_id
AND i.batchstep_id = v_batchstep_id;
/* Update the Batch Step Status to Close */
x_batch_step_rec.step_status := 4;
/* Update the batch step to the database */
IF NOT (gme_batch_steps_dbl.update_row (x_batch_step_rec) ) THEN
RAISE batch_step_upd_err;
x_batch_step_rec.last_update_date := gme_common_pvt.g_timestamp;
x_batch_step_rec.last_updated_by := gme_common_pvt.g_user_ident;
x_batch_step_rec.last_update_login := gme_common_pvt.g_login_id;
WHEN close_phant_error OR trans_update_err OR trans_delete_err OR fetch_trans_err THEN
x_return_status := l_return_status;