186: l_dummy varchar2(1);
187: --
188: cursor c1 is
189: select null
190: from pqh_roles a
191: where a.role_id = p_role_id;
192: --
193: cursor c2 is
194: select null
211: <> nvl(pqh_rlm_shd.g_old_rec.user_id,hr_api.g_number) )
212: or not l_api_updating) and
213: (p_role_id is not null) then
214: --
215: -- check if role_id value exists in pqh_roles table and user is assigned to role
216: --
217: open c1;
218: --
219: fetch c1 into l_dummy;
220: if c1%notfound then
221: --
222: close c1;
223: --
224: -- raise error as FK does not relate to PK in pqh_roles
225: -- table.
226: --
227: hr_utility.set_message(8302,'PQH_INVALID_ROLE');
228: hr_utility.raise_error;
541: where routing_list_id = p_routing_list_id;
542: --
543: cursor c_role_enable_flag(p_role_id number) is
544: select enable_flag
545: from pqh_roles
546: where role_id = p_role_id;
547: --
548: cursor c_role_user_enable_flag(p_role_id number, p_user_id number) is
549: select 'x'