The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT 'Y'
FROM fnd_concurrent_requests req,
fnd_concurrent_programs prog,
fnd_executables exe
WHERE req.program_application_id = prog.application_id
AND req.concurrent_program_id = prog.concurrent_program_id
AND req.phase_code = 'R'
AND prog.executable_application_id = exe.application_id
AND prog.executable_id = exe.executable_id
AND exe.executable_name = L_Interface_Process;
SELECT gi.RowId Row_Id from Pa_Gl_Interface gi
WHERE Status = 'NEW'
AND not exists (Select 0 from gl_Interface_control gc where gc.group_id = gi.group_id)
AND user_je_category_name in ( select user_je_category_name
from gl_je_Categories where je_category_name='Labor Cost');
SELECT gi.RowId Row_Id from Pa_Gl_Interface gi
WHERE Status = 'NEW'
AND not exists (Select 0 from gl_Interface_control gc where gc.group_id = gi.group_id)
AND user_je_category_name in ( select user_je_category_name
from gl_je_Categories where je_category_name
in ('Budget','Usage Cost'));
SELECT gi.RowId Row_Id from Pa_Gl_Interface gi
WHERE Status = 'NEW'
AND not exists (Select 0 from gl_Interface_control gc where gc.group_id = gi.group_id)
AND user_je_category_name in ( select user_je_category_name
from gl_je_Categories where je_category_name='Total Burdened Cost');
SELECT gi.RowId Row_Id from Pa_Gl_Interface gi
WHERE Status = 'NEW'
AND not exists (Select 0 from gl_Interface_control gc where gc.group_id = gi.group_id)
AND user_je_category_name in ( select user_je_category_name
from gl_je_Categories where je_category_name='Revenue');
SELECT gi.RowId Row_Id from Pa_Gl_Interface gi
WHERE Status = 'NEW'
AND not exists (Select 0 from gl_Interface_control gc where gc.group_id = gi.group_id)
AND user_je_category_name in ( select user_je_category_name
from gl_je_Categories where je_category_name
in (Select gjc.je_category_name
FROM gl_je_categories gjc,
pa_lookups pl
WHERE pl.meaning = gjc.JE_CATEGORY_NAME
and pl.lookup_type = 'CC_CCD_LINE_TYPE_JE_CATEGORY'));
IF ( nvl(L_Interface_Is_Running,'N') = 'N' ) THEN /* If No Process is running update
corrupted data as rejected */
IF P_Module = 'LABOR' Then
For Rec In Corruption_labor Loop
Update PA_GL_Interface
Set Status = 'PREV_GL_INTERFACE_UNSUCCESSFUL'
Where RowId = Rec.Row_Id;
Update PA_GL_Interface
Set Status = 'PREV_GL_INTERFACE_UNSUCCESSFUL'
Where RowId = Rec.Row_Id;
Update PA_GL_Interface
Set Status = 'PREV_GL_INTERFACE_UNSUCCESSFUL'
Where RowId = Rec.Row_Id;
Update PA_GL_Interface
Set Status = 'PREV_GL_INTERFACE_UNSUCCESSFUL'
Where RowId = Rec.Row_Id;
Update PA_GL_Interface
Set Status = 'PREV_GL_INTERFACE_UNSUCCESSFUL'
Where RowId = Rec.Row_Id;