[Home] [Help]
904: )
905: IS
906:
907: l_grant_id FND_GRANTS.GRANT_GUID%TYPE;
908: l_object_name FND_OBJECTS.OBJ_NAME%TYPE;
909: l_role_id FND_GRANTS.MENU_ID%TYPE;
910: l_return_status VARCHAR2(30);
911: l_msg_data VARCHAR2(2000); -- Changed from 30 to 2000 to avoid ora 6502 error
912: l_msg_count NUMBER;
1040: IS
1041:
1042: l_set_id FND_GRANTS.INSTANCE_SET_ID%TYPE;
1043: l_set_name FND_OBJECT_INSTANCE_SETS.INSTANCE_SET_NAME%TYPE;
1044: l_object_name FND_OBJECTS.OBJ_NAME%TYPE;
1045: l_role_id FND_GRANTS.MENU_ID%TYPE;
1046: l_return_status VARCHAR2(30);
1047: l_msg_data VARCHAR2(2000); -- Changed from 30 to 2000 to avoid ora 6502 error
1048: l_msg_count NUMBER;
1407:
1408: -- pick the Object id for the organization
1409: SELECT distinct object_id
1410: INTO v_objid
1411: FROM fnd_objects
1412: WHERE obj_name = v_objname;
1413:
1414: -- get the roleid for the Responsibility of type 'Resource Authority');
1415: v_roleid := pa_security_pvt.get_menu_id(v_rolename);
1857:
1858: -- pick the Object id for the organization (seeded data)
1859: SELECT distinct object_id
1860: INTO x_objid
1861: FROM fnd_objects
1862: WHERE obj_name = P_objname;
1863:
1864:
1865: -- reset the error stack
2943: pep.person_id
2944: INTO l_primary_contact_name,
2945: l_primary_contact_id
2946: FROM fnd_grants fg,
2947: fnd_objects fob,
2948: per_all_people_f pep, -- Bug 4684198 - use base table not secure view
2949: wf_roles wfr
2950: /* Bug# 2499051 - Moved the function call to fetch to a local variable at the start of the procedure
2951: (select pa_security_pvt.get_menu_id(p_prim_role_name) menu_id from dual) temp */
3611: CURSOR check_staff_mgr IS
3612: SELECT 'Y'
3613: FROM pa_resources_denorm res,
3614: fnd_grants fg,
3615: fnd_objects fob,
3616: per_all_people_f per,
3617: wf_roles wfr,
3618: (select pa_security_pvt.get_menu_id('PA_PRM_RES_AUTH') menu_id
3619: from dual) res_auth_menu