81: --
82: -- {End Of Comments}
83: -- ----------------------------------------------------------------------------
84: Procedure insert_dml
85: (p_rec in out nocopy ota_ftu_shd.g_rec_type
86: ) is
87: --
88: l_proc varchar2(72) := g_package||'insert_dml';
89: --
122: Exception
123: When hr_api.check_integrity_violated Then
124: -- A check constraint has been violated
125: --
126: ota_ftu_shd.constraint_error
127: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
128: When hr_api.parent_integrity_violated Then
129: -- Parent integrity has been violated
130: --
127: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
128: When hr_api.parent_integrity_violated Then
129: -- Parent integrity has been violated
130: --
131: ota_ftu_shd.constraint_error
132: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
133: When hr_api.unique_integrity_violated Then
134: -- Unique integrity has been violated
135: --
132: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
133: When hr_api.unique_integrity_violated Then
134: -- Unique integrity has been violated
135: --
136: ota_ftu_shd.constraint_error
137: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
138: When Others Then
139: --
140: Raise;
177: --
178: -- {End Of Comments}
179: -- ----------------------------------------------------------------------------
180: Procedure pre_insert
181: (p_rec in out nocopy ota_ftu_shd.g_rec_type
182: ) is
183: --
184: /*
185: Cursor C_Sel1 is select ota_pvt_frm_thread_users_s.nextval from sys.dual;
287: -- {End Of Comments}
288: -- ----------------------------------------------------------------------------
289: Procedure post_insert
290: (p_effective_date in date
291: ,p_rec in ota_ftu_shd.g_rec_type
292: ) is
293: --
294: l_proc varchar2(72) := g_package||'post_insert';
295: --
334: -- |---------------------------------< ins >----------------------------------|
335: -- ----------------------------------------------------------------------------
336: Procedure ins
337: (p_effective_date in date
338: ,p_rec in out nocopy ota_ftu_shd.g_rec_type
339: ) is
340: --
341: l_proc varchar2(72) := g_package||'ins';
342: l_forum_id ota_pvt_frm_thread_users.forum_id%TYPE;
417: --,p_contact_id out nocopy number
418: ,p_object_version_number out nocopy number
419: ) is
420: --
421: l_rec ota_ftu_shd.g_rec_type;
422: l_proc varchar2(72) := g_package||'ins';
423: --
424: Begin
425: hr_utility.set_location('Entering:'||l_proc, 5);
427: -- Call conversion function to turn arguments into the
428: -- p_rec structure.
429: --
430: l_rec :=
431: ota_ftu_shd.convert_args
432: (--null
433: --,null
434: p_forum_thread_id
435: ,p_forum_id