The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT RE.CONCURRENT_PROGRAM_ID
INTO h_conc_program_id
FROM FND_CONCURRENT_REQUESTS RE
WHERE RE.REQUEST_ID = X_request_id
AND RE.PROGRAM_APPLICATION_ID in (140, 8731);
SELECT DECODE(PR.CONCURRENT_PROGRAM_NAME,
'FAMTFR', 'TRANSFER',
'FAMAPT', 'RECLASS',
'FAMRCL', 'RECLASS',
'FARET', 'GAINLOSS',
'FAMRET', 'MASSRET',
'FAMRST', 'MASSRST',
'FADRB', 'RB_DEP',
'FADRB2', 'RB_DEP',
'FAJERB', 'RB_CJE',
'FAMCP', 'COPY',
'FAIMCP', 'COPY',
'FATAXUP', 'TAXUP',
'FAUSTR', 'TAXUP',
'FAACUP', 'TAXUP',
'FATMTA', 'TAXUP',
'FAMACH', 'MASSCHG',
'FAVRVL', 'REVAL',
'FACXTRET','TRANSFER', -- bug# 2153455
'FACTFR', 'TRANSFER', -- bug# 2153455
'FACHRMR', 'TRANSFER', -- bug# 2153455
'OTHER')
INTO h_trx_type
FROM FND_CONCURRENT_PROGRAMS PR
WHERE PR.CONCURRENT_PROGRAM_ID = h_conc_program_id
AND PR.APPLICATION_ID in ( 140, 8731 );
/* All checks completed, update book_controls with mass request id */
/*
* Ensure this is the only request running against the book by
* updating the request ID in fa_book_controls to the request_id
* of the running request
*/
if (h_mrc_sob_type_code = 'R') then
UPDATE fa_book_controls_mrc_v
SET mass_request_id = X_request_id
WHERE book_type_code = X_book;
UPDATE fa_book_controls
SET mass_request_id = X_request_id
WHERE book_type_code = X_book;
UPDATE fa_book_controls_mrc_v
SET mass_request_id = NULL
WHERE book_type_code = X_book
AND mass_request_id = X_request_id;
UPDATE fa_book_controls
SET mass_request_id = NULL
WHERE book_type_code = X_book
AND mass_request_id = X_request_id;