69: end if;
70: x_instance_set_id := l_instance_set_id;
71: x_ret_code := l_grant_exists;
72: x_grant_id := null;
73: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
74: FND_LOG.String(
75: FND_LOG.LEVEL_PROCEDURE,
76: 'FPA_SECURITY_PVT.Get_Grant',
77: x_instance_set_id||','||x_ret_code||','||x_ret_code);
70: x_instance_set_id := l_instance_set_id;
71: x_ret_code := l_grant_exists;
72: x_grant_id := null;
73: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
74: FND_LOG.String(
75: FND_LOG.LEVEL_PROCEDURE,
76: 'FPA_SECURITY_PVT.Get_Grant',
77: x_instance_set_id||','||x_ret_code||','||x_ret_code);
78: raise;
71: x_ret_code := l_grant_exists;
72: x_grant_id := null;
73: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
74: FND_LOG.String(
75: FND_LOG.LEVEL_PROCEDURE,
76: 'FPA_SECURITY_PVT.Get_Grant',
77: x_instance_set_id||','||x_ret_code||','||x_ret_code);
78: raise;
79: end if;
121: return l_ret_code;
122:
123: EXCEPTION
124: WHEN OTHERS THEN
125: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
126: FND_LOG.String(
127: FND_LOG.LEVEL_PROCEDURE,
128: 'FPA_SECURITY_PVT.Check_User_Previlege',
129: p_privilege||','||p_object_name||','||p_object_id);
122:
123: EXCEPTION
124: WHEN OTHERS THEN
125: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
126: FND_LOG.String(
127: FND_LOG.LEVEL_PROCEDURE,
128: 'FPA_SECURITY_PVT.Check_User_Previlege',
129: p_privilege||','||p_object_name||','||p_object_id);
130: end if;
123: EXCEPTION
124: WHEN OTHERS THEN
125: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
126: FND_LOG.String(
127: FND_LOG.LEVEL_PROCEDURE,
128: 'FPA_SECURITY_PVT.Check_User_Previlege',
129: p_privilege||','||p_object_name||','||p_object_id);
130: end if;
131: return 'U';
177: end if;
178:
179: EXCEPTION
180: WHEN OTHERS THEN
181: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
182: FND_LOG.String(
183: FND_LOG.LEVEL_PROCEDURE,
184: 'FPA_SECURITY_PVT.Check_User_Previlege',
185: p_privilege||','||p_object_name||','||p_object_id);
178:
179: EXCEPTION
180: WHEN OTHERS THEN
181: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
182: FND_LOG.String(
183: FND_LOG.LEVEL_PROCEDURE,
184: 'FPA_SECURITY_PVT.Check_User_Previlege',
185: p_privilege||','||p_object_name||','||p_object_id);
186: end if;
179: EXCEPTION
180: WHEN OTHERS THEN
181: if (FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
182: FND_LOG.String(
183: FND_LOG.LEVEL_PROCEDURE,
184: 'FPA_SECURITY_PVT.Check_User_Previlege',
185: p_privilege||','||p_object_name||','||p_object_id);
186: end if;
187: return 'U';