25: x_grant_guid OUT NOCOPY RAW
26: )
27: IS
28:
29: --x_grant_guid fnd_grants.grant_guid%TYPE;
30: l_grantee_type hz_parties.party_type%TYPE;
31: l_instance_type fnd_grants.instance_type%TYPE;
32: l_grantee_key fnd_grants.grantee_key%TYPE;
33: l_dummy VARCHAR2(1);
27: IS
28:
29: --x_grant_guid fnd_grants.grant_guid%TYPE;
30: l_grantee_type hz_parties.party_type%TYPE;
31: l_instance_type fnd_grants.instance_type%TYPE;
32: l_grantee_key fnd_grants.grantee_key%TYPE;
33: l_dummy VARCHAR2(1);
34: CURSOR get_party_type (cp_party_id NUMBER)
35: IS
28:
29: --x_grant_guid fnd_grants.grant_guid%TYPE;
30: l_grantee_type hz_parties.party_type%TYPE;
31: l_instance_type fnd_grants.instance_type%TYPE;
32: l_grantee_key fnd_grants.grantee_key%TYPE;
33: l_dummy VARCHAR2(1);
34: CURSOR get_party_type (cp_party_id NUMBER)
35: IS
36: SELECT party_type
51: cp_start_date DATE,
52: cp_end_date DATE) IS
53:
54: SELECT 'X'
55: FROM fnd_grants grants,
56: fnd_objects obj,
57: fnd_menus menus
58: WHERE grants.grantee_key=cp_grantee_key
59: AND grants.grantee_type=cp_grantee_type
128: cp_end_date => p_end_date);
129:
130: FETCH check_fnd_grant_exist INTO l_dummy;
131: IF( check_fnd_grant_exist%NOTFOUND) THEN
132: fnd_grants_pkg.grant_function(
133: p_api_version => 1.0,
134: p_menu_name => p_role_name ,
135: p_object_name => p_object_name,
136: p_instance_type => l_instance_type,
479: l_assignee_role_id NUMBER; */
480: l_requestor_role_name VARCHAR2(30);
481: l_assignee_role_name VARCHAR2(30);
482: l_errorcode NUMBER;
483: l_grant_guid fnd_grants.grant_guid%TYPE;
484:
485: stmt_num NUMBER := 0;
486:
487: l_ri_exists NUMBER := 0;