50: --
51: -- {End Of Comments}
52: -- ----------------------------------------------------------------------------
53: Procedure insert_dml
54: (p_rec in out nocopy per_eco_shd.g_rec_type
55: ) is
56: --
57: l_proc varchar2(72) := g_package||'insert_dml';
58: l_created_by per_election_constituencys.created_by%TYPE;
64: Begin
65: hr_utility.set_location('Entering:'||l_proc, 5);
66: p_rec.object_version_number := 1; -- Initialise the object version
67: --
68: per_eco_shd.g_api_dml := true; -- Set the api dml status
69: --
70: -- Set the who columns
71: --
72: l_creation_date := sysdate;
164: ,l_last_updated_by
165: ,l_last_update_login
166: );
167: --
168: per_eco_shd.g_api_dml := false; -- Unset the api dml status
169: --
170: hr_utility.set_location(' Leaving:'||l_proc, 10);
171: Exception
172: When hr_api.check_integrity_violated Then
171: Exception
172: When hr_api.check_integrity_violated Then
173: hr_utility.set_location(' Leaving:'||l_proc, 11);
174: -- A check constraint has been violated
175: per_eco_shd.g_api_dml := false; -- Unset the api dml status
176: per_eco_shd.constraint_error
177: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
178: When hr_api.parent_integrity_violated Then
179: hr_utility.set_location(' Leaving:'||l_proc, 12);
172: When hr_api.check_integrity_violated Then
173: hr_utility.set_location(' Leaving:'||l_proc, 11);
174: -- A check constraint has been violated
175: per_eco_shd.g_api_dml := false; -- Unset the api dml status
176: per_eco_shd.constraint_error
177: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
178: When hr_api.parent_integrity_violated Then
179: hr_utility.set_location(' Leaving:'||l_proc, 12);
180: -- Parent integrity has been violated
177: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
178: When hr_api.parent_integrity_violated Then
179: hr_utility.set_location(' Leaving:'||l_proc, 12);
180: -- Parent integrity has been violated
181: per_eco_shd.g_api_dml := false; -- Unset the api dml status
182: per_eco_shd.constraint_error
183: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
184: When hr_api.unique_integrity_violated Then
185: hr_utility.set_location(' Leaving:'||l_proc, 13);
178: When hr_api.parent_integrity_violated Then
179: hr_utility.set_location(' Leaving:'||l_proc, 12);
180: -- Parent integrity has been violated
181: per_eco_shd.g_api_dml := false; -- Unset the api dml status
182: per_eco_shd.constraint_error
183: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
184: When hr_api.unique_integrity_violated Then
185: hr_utility.set_location(' Leaving:'||l_proc, 13);
186: -- Unique integrity has been violated
183: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
184: When hr_api.unique_integrity_violated Then
185: hr_utility.set_location(' Leaving:'||l_proc, 13);
186: -- Unique integrity has been violated
187: per_eco_shd.g_api_dml := false; -- Unset the api dml status
188: per_eco_shd.constraint_error
189: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
190: When Others Then
191: hr_utility.set_location(' Leaving:'||l_proc, 14);
184: When hr_api.unique_integrity_violated Then
185: hr_utility.set_location(' Leaving:'||l_proc, 13);
186: -- Unique integrity has been violated
187: per_eco_shd.g_api_dml := false; -- Unset the api dml status
188: per_eco_shd.constraint_error
189: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
190: When Others Then
191: hr_utility.set_location(' Leaving:'||l_proc, 14);
192: per_eco_shd.g_api_dml := false; -- Unset the api dml status
188: per_eco_shd.constraint_error
189: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
190: When Others Then
191: hr_utility.set_location(' Leaving:'||l_proc, 14);
192: per_eco_shd.g_api_dml := false; -- Unset the api dml status
193: Raise;
194: End insert_dml;
195: --
196: -- ----------------------------------------------------------------------------
230: --
231: -- {End Of Comments}
232: -- ----------------------------------------------------------------------------
233: Procedure pre_insert
234: (p_rec in out nocopy per_eco_shd.g_rec_type
235: ) is
236: --
237: l_proc varchar2(72) := g_package||'pre_insert';
238: --
284: -- {End Of Comments}
285: -- ----------------------------------------------------------------------------
286: Procedure post_insert
287: (p_effective_date in date
288: ,p_rec in per_eco_shd.g_rec_type
289: ) is
290: --
291: l_proc varchar2(72) := g_package||'post_insert';
292: --
388: -- ----------------------------------------------------------------------------
389: Procedure ins
390: (p_effective_date in date
391: ,p_validate in boolean default false
392: ,p_rec in out nocopy per_eco_shd.g_rec_type
393: ) is
394: --
395: l_proc varchar2(72) := g_package||'ins';
396: --
490: ,p_election_constituency_id out nocopy number
491: ,p_object_version_number out nocopy number
492: ) is
493: --
494: l_rec per_eco_shd.g_rec_type;
495: l_proc varchar2(72) := g_package||'ins';
496: --
497: Begin
498: hr_utility.set_location('Entering:'||l_proc, 5);
500: -- Call conversion function to turn arguments into the
501: -- p_rec structure.
502: --
503: l_rec :=
504: per_eco_shd.convert_args
505: (null
506: ,p_election_id
507: ,p_business_group_id
508: ,p_constituency_id