The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT substr(cp.user_concurrent_program_name,1,80)
INTO l_report_name
FROM FND_CONCURRENT_PROGRAMS_VL cp,
FND_CONCURRENT_REQUESTS cr
--Commented By Raj WHERE cr.request_id = P_CONC_REQUEST_ID
WHERE cr.request_id = FND_GLOBAL.conc_request_id
AND cp.application_id = cr.program_application_id
AND cp.concurrent_program_id = cr.concurrent_program_id;