The following lines contain the word 'select', 'insert', 'update' or 'delete':
select SUBSTR(argument1,INSTR(argument1,'=',1)+1,LENGTH(argument1)),
SUBSTR(argument2,INSTR(argument2,'=',1)+1,LENGTH(argument2)),
SUBSTR(argument3,INSTR(argument3,'=',1)+1,LENGTH(argument3))
into P_REQUEST_ID_T,P_BOOK_T,P_CURRENCY_T
from FND_CONCURRENT_REQUESTS
where request_id=P_CONC_REQUEST_ID;
SELECT
SC.COMPANY_NAME
INTO
L_COMPANY_NAME
FROM
FA_SYSTEM_CONTROLS SC;
SELECT
SOB.CURRENCY_CODE,
CUR.PRECISION
INTO
L_CURRENCY_CODE
,L_PRECISION
FROM
FA_BOOK_CONTROLS BC,
GL_SETS_OF_BOOKS SOB,
FND_CURRENCIES CUR
WHERE BC.BOOK_TYPE_CODE = P_BOOK_T
AND SOB.SET_OF_BOOKS_ID = BC.SET_OF_BOOKS_ID
AND CUR.CURRENCY_CODE = SOB.CURRENCY_CODE;
SELECT
CR.CONCURRENT_PROGRAM_ID
INTO
L_CONC_PROGRAM_ID
FROM
FND_CONCURRENT_REQUESTS CR
WHERE CR.PROGRAM_APPLICATION_ID = 140
AND CR.REQUEST_ID = P_CONC_REQUEST_ID;
SELECT
CP.USER_CONCURRENT_PROGRAM_NAME
INTO
L_REPORT_NAME
FROM
FND_CONCURRENT_PROGRAMS_VL CP
WHERE CP.CONCURRENT_PROGRAM_ID = L_CONC_PROGRAM_ID
AND CP.APPLICATION_ID = 140;