50: --
51: -- {End Of Comments}
52: -- ----------------------------------------------------------------------------
53: Procedure insert_dml
54: ( p_rec in out NOCOPY pqh_rls_shd.g_rec_type
55: ) is
56: --
57: l_proc varchar2(72) := g_package||'insert_dml';
58: --
149: Exception
150: When hr_api.check_integrity_violated Then
151: -- A check constraint has been violated
152: --
153: pqh_rls_shd.constraint_error
154: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
155: When hr_api.parent_integrity_violated Then
156: -- Parent integrity has been violated
157: --
154: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
155: When hr_api.parent_integrity_violated Then
156: -- Parent integrity has been violated
157: --
158: pqh_rls_shd.constraint_error
159: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
160: When hr_api.unique_integrity_violated Then
161: -- Unique integrity has been violated
162: --
159: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
160: When hr_api.unique_integrity_violated Then
161: -- Unique integrity has been violated
162: --
163: pqh_rls_shd.constraint_error
164: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
165: When Others Then
166: --
167: Raise;
204: --
205: -- {End Of Comments}
206: -- ----------------------------------------------------------------------------
207: Procedure pre_insert
208: ( p_rec in out NOCOPY pqh_rls_shd.g_rec_type
209: ) is
210: --
211: l_proc varchar2(72) := g_package||'pre_insert';
212: --
258: -- {End Of Comments}
259: -- ----------------------------------------------------------------------------
260: Procedure post_insert
261: (p_effective_date in date
262: ,p_rec in pqh_rls_shd.g_rec_type
263: ) is
264: --
265: l_proc varchar2(72) := g_package||'post_insert';
266: --
354: -- |---------------------------------< ins >----------------------------------|
355: -- ----------------------------------------------------------------------------
356: Procedure ins
357: (p_effective_date in date
358: ,p_rec in out NOCOPY pqh_rls_shd.g_rec_type
359: ) is
360: --
361: l_proc varchar2(72) := g_package||'ins';
362: --
433: ,p_role_id out NOCOPY number
434: ,p_object_version_number out NOCOPY number
435: ) is
436: --
437: l_rec pqh_rls_shd.g_rec_type;
438: l_proc varchar2(72) := g_package||'ins';
439: --
440: Begin
441: hr_utility.set_location('Entering:'||l_proc,5);
443: -- Call conversion function to turn arguments into the
444: -- structure.
445: --
446: l_rec :=
447: pqh_rls_shd.convert_args
448: (null
449: ,p_role_name
450: ,p_role_type_cd
451: ,p_enable_flag