The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT COUNT(1)
INTO l_cnt_hdr
FROM ozf_sd_batch_headers_all
WHERE batch_id = p_batch_id;
SELECT STATUS_CODE
INTO l_status
FROM ozf_sd_batch_headers_all
WHERE batch_id = p_batch_id;
SELECT COUNT(1)
INTO l_cnt_line
FROM ozf_sd_batch_lines_all
WHERE batch_id = p_batch_id
AND purge_flag <> 'Y'
AND transmit_flag = 'Y';
UPDATE ozf_sd_batch_headers_all
SET status_code = 'SUBMITTED',
object_version_number = object_version_number + 1,
batch_submission_date = SYSDATE,
last_update_login = NVL(FND_GLOBAL.conc_login_id,-1),
last_update_date = SYSDATE,
last_updated_by = NVL(FND_GLOBAL.user_id,-1)
WHERE batch_id = p_batch_id;
UPDATE ozf_sd_batch_line_disputes
SET object_version_number = object_version_number + 1,
review_flag = 'Y',
last_update_login = NVL(FND_GLOBAL.conc_login_id,-1),
last_update_date = SYSDATE,
last_updated_by = NVL(FND_GLOBAL.user_id,-1)
WHERE batch_id = p_batch_id
AND batch_line_id IN ( SELECT batch_line_id
FROM ozf_sd_batch_lines_all
WHERE batch_id = p_batch_id
AND purge_flag <> 'Y'
AND transmit_flag = 'Y' );
UPDATE ozf_sd_batch_lines_all
SET status_code = 'SUBMITTED',
object_version_number = object_version_number + 1,
transmit_flag = 'N',
process_feed_flag = 'Y',
last_sub_claim_amount = batch_curr_claim_amount,
last_update_login = NVL(FND_GLOBAL.conc_login_id,-1),
last_update_date = SYSDATE,
last_updated_by = NVL(FND_GLOBAL.user_id,-1)
WHERE batch_id = p_batch_id
AND purge_flag <> 'Y'
AND transmit_flag = 'Y';