72: --
73: -- {End Of Comments}
74: -- ----------------------------------------------------------------------------
75: Procedure insert_dml
76: (p_rec in out nocopy pqh_txh_shd.g_rec_type
77: ) is
78: --
79: l_proc varchar2(72) := g_package||'insert_dml';
80: --
125: Exception
126: When hr_api.check_integrity_violated Then
127: -- A check constraint has been violated
128: --
129: pqh_txh_shd.constraint_error
130: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
131: When hr_api.parent_integrity_violated Then
132: -- Parent integrity has been violated
133: --
130: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
131: When hr_api.parent_integrity_violated Then
132: -- Parent integrity has been violated
133: --
134: pqh_txh_shd.constraint_error
135: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
136: When hr_api.unique_integrity_violated Then
137: -- Unique integrity has been violated
138: --
135: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
136: When hr_api.unique_integrity_violated Then
137: -- Unique integrity has been violated
138: --
139: pqh_txh_shd.constraint_error
140: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
141: When Others Then
142: --
143: Raise;
180: --
181: -- {End Of Comments}
182: -- ----------------------------------------------------------------------------
183: Procedure pre_insert
184: (p_rec in out nocopy pqh_txh_shd.g_rec_type
185: ) is
186: --
187: -- Cursor C_Sel1 is select pqh_ss_transaction_history_s.nextval from sys.dual;
188: --
268: --
269: -- {End Of Comments}
270: -- ----------------------------------------------------------------------------
271: Procedure post_insert
272: (p_rec in pqh_txh_shd.g_rec_type
273: ) is
274: --
275: l_proc varchar2(72) := g_package||'post_insert';
276: --
296: -- ----------------------------------------------------------------------------
297: -- |---------------------------------< ins >----------------------------------|
298: -- ----------------------------------------------------------------------------
299: Procedure ins
300: (p_rec in out nocopy pqh_txh_shd.g_rec_type
301: ) is
302: --
303: l_proc varchar2(72) := g_package||'ins';
304: --
353: ,p_transaction_identifier in varchar2 default null
354: ,p_transaction_history_id out nocopy number
355: ) is
356: --
357: l_rec pqh_txh_shd.g_rec_type;
358: l_proc varchar2(72) := g_package||'ins';
359: --
360: Begin
361: hr_utility.set_location('Entering:'||l_proc, 5);
363: -- Call conversion function to turn arguments into the
364: -- p_rec structure.
365: --
366: l_rec :=
367: pqh_txh_shd.convert_args
368: (null
369: ,p_creator_person_id
370: ,p_assignment_id
371: ,p_selected_person_id