The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT employee_id
FROM fnd_user
WHERE user_id = C_User_ID;
SELECT decode(count(1),1,'EDIT','NONE')
FROM okc_k_headers_all_b
WHERE id = C_K_Header_ID
AND created_by = C_User_ID;
SELECT default_access_level
FROM pa_project_role_types prt
WHERE prt.project_role_id = C_Role_ID;
SELECT project_role_id
FROM pa_project_parties pp
, oke_k_headers kh
WHERE kh.k_header_id = C_K_Header_ID
AND ( ( pp.object_type = 'OKE_K_HEADERS'
AND pp.object_id = kh.k_header_id
)
OR ( pp.object_type = 'OKE_PROGRAMS'
AND pp.object_id in (kh.program_id , 0)
)
)
AND pp.resource_type_id = 101
AND pp.resource_source_id = C_Emp_ID
AND sysdate
BETWEEN nvl( pp.start_date_active , sysdate - 1)
AND nvl( pp.end_date_active , sysdate + 1)
*/
--
-- First part of the union retrieves contract level as well as
-- site level assignment
--
SELECT Project_Role_ID
, decode(pp.object_type, 'OKE_K_HEADERS', 1, 3) Sort_Order
FROM pa_project_parties pp
WHERE ( pp.object_type , pp.object_id ) IN
( ( 'OKE_K_HEADERS' , C_K_Header_ID )
, ( 'OKE_PROGRAMS' , 0 )
)
AND pp.resource_type_id = 101
AND pp.resource_source_id = C_Emp_ID
AND trunc(sysdate)
BETWEEN nvl( trunc(pp.start_date_active) , trunc(sysdate) - 1)
AND nvl( trunc(pp.end_date_active) , trunc(sysdate) + 1)
UNION ALL
--
-- Second part of the union retrieves program level assignment.
-- This is separated from the first part because it requires a
-- join to OKE_K_HEADERS and for some reason the combined SELECT
-- results in a FTS of PA_PROJECT_PARTIES.
--
SELECT Project_Role_ID
, 2
FROM pa_project_parties pp
, oke_k_headers kh
WHERE kh.k_header_id = C_K_Header_ID
AND pp.object_type = 'OKE_PROGRAMS'
AND pp.object_id = kh.program_id
AND pp.resource_type_id = 101
AND pp.resource_source_id = C_Emp_ID
AND trunc(sysdate)
BETWEEN nvl( trunc(pp.start_date_active) , trunc(sysdate) - 1)
AND nvl( trunc(pp.end_date_active) , trunc(sysdate) + 1)
ORDER BY 2;
SELECT 'T'
FROM fnd_form_functions ff
, fnd_menu_entries me
, pa_project_role_types prt
WHERE prt.project_role_id = X_Role_ID
AND me.menu_id = prt.menu_id
AND me.grant_flag = 'Y'
AND ff.function_id = me.function_id
AND ff.function_name = X_Function_Name;