The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT USERENV('SESSIONID')
INTO l_session_id
FROM dual;
SELECT audsid INTO l_session_id
FROM v$session
WHERE audsid = 0
AND MODULE = 'Discoverer4';
SELECT NVL(LOWER(SUBSTR(program,INSTRB(program,'\',-1,1)+1)), 'xxx')
,MODULE
INTO program_name
,l_module
FROM v$session
WHERE audsid = USERENV('SESSIONID');
SELECT UPPER(init_function_name) INTO l_init_function_name
FROM fnd_product_initialization
WHERE application_short_name = UPPER(l_application_short_name);
INSERT INTO pa_rep_sec_porgz_tmp
(
ORGANIZATION_ID
)
SELECT INSTANCE_PK1_VALUE
FROM fnd_grants fg,
fnd_objects fob,
(SELECT nvl(pa_security_pvt.get_menu_id('PA_PRM_PROJ_AUTH'),-1) menu_id
,nvl(PA_SECURITY_PVT.GET_GRANTEE_KEY, -1) grantee_key
FROM dual) prj_auth_menu
WHERE fg.INSTANCE_TYPE = 'INSTANCE'
AND fg.GRANTEE_TYPE = 'USER'
AND fg.OBJECT_ID = fob.OBJECT_ID
AND fob.OBJ_NAME = 'ORGANIZATION'
AND fg.MENU_ID = prj_auth_menu.MENU_ID
AND fg.GRANTEE_KEY = prj_auth_menu.GRANTEE_KEY -- in replacement of the following string of code
-- AND fg.GRANTEE_KEY = 'PER:' || fu.EMPLOYEE_ID
AND trunc(SYSDATE) BETWEEN trunc(fg.START_DATE)
AND trunc(NVL(fg.END_DATE, SYSDATE+1));
INSERT INTO pa_rep_sec_proj_tmp
(
PROJECT_ID
)
SELECT ppp.PROJECT_ID
FROM pa_project_parties ppp,
fnd_user fu
-- fnd_grants fg /*bug#4904076 Perf bug*/
WHERE fu.USER_ID = fnd_global.user_id AND
fu.EMPLOYEE_ID = ppp.RESOURCE_SOURCE_ID AND
--start rem | 24-JUN-2009 cklee fxied bug:6708625 |
object_type = 'PA_PROJECTS' --(since this is reading project records)
and resource_type_id = 101 --(since this join is grabbing project
--end rem | 24-JUN-2009 cklee fxied bug:6708625 |
and ppp.PROJECT_ROLE_ID = 1;