112: l_dummy varchar2(1);
113: --
114: cursor c1 is
115: select null
116: from ben_actn_typ a
117: where a.actn_typ_id = p_actn_typ_id;
118: --
119: Begin
120: --
129: and nvl(p_actn_typ_id,hr_api.g_number)
130: <> nvl(ben_pea_shd.g_old_rec.actn_typ_id,hr_api.g_number)
131: or not l_api_updating) then
132: --
133: -- check if actn_typ_id value exists in ben_actn_typ table
134: --
135: open c1;
136: --
137: fetch c1 into l_dummy;
138: if c1%notfound then
139: --
140: close c1;
141: --
142: -- raise error as FK does not relate to PK in ben_actn_typ
143: -- table.
144: --
145: ben_pea_shd.constraint_error('BEN_PRTT_ENRT_ACTN_FK2');
146: --