49: -- Internal Row Handler Use Only.
50: --
51: -- {End Of Comments}
52: -- ----------------------------------------------------------------------------
53: Procedure insert_dml(p_rec in out nocopy per_ssm_shd.g_rec_type) is
54: --
55: l_proc varchar2(72) := g_package||'insert_dml';
56: --
57: Begin
57: Begin
58: hr_utility.set_location('Entering:'||l_proc, 5);
59: p_rec.object_version_number := 1; -- Initialise the object version
60: --
61: per_ssm_shd.g_api_dml := true; -- Set the api dml status
62: --
63: -- Insert the row into: per_salary_survey_mappings
64: --
65: insert into per_salary_survey_mappings
128: p_rec.attribute19,
129: p_rec.attribute20
130: );
131: --
132: per_ssm_shd.g_api_dml := false; -- Unset the api dml status
133: --
134: hr_utility.set_location(' Leaving:'||l_proc, 10);
135: Exception
136: When hr_api.check_integrity_violated Then
135: Exception
136: When hr_api.check_integrity_violated Then
137: -- A check constraint has been violated
138: hr_utility.set_location(l_proc, 6);
139: per_ssm_shd.g_api_dml := false; -- Unset the api dml status
140: per_ssm_shd.constraint_error
141: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
142: When hr_api.parent_integrity_violated Then
143: hr_utility.set_location(l_proc, 7);
136: When hr_api.check_integrity_violated Then
137: -- A check constraint has been violated
138: hr_utility.set_location(l_proc, 6);
139: per_ssm_shd.g_api_dml := false; -- Unset the api dml status
140: per_ssm_shd.constraint_error
141: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
142: When hr_api.parent_integrity_violated Then
143: hr_utility.set_location(l_proc, 7);
144: -- Parent integrity has been violated
141: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
142: When hr_api.parent_integrity_violated Then
143: hr_utility.set_location(l_proc, 7);
144: -- Parent integrity has been violated
145: per_ssm_shd.g_api_dml := false; -- Unset the api dml status
146: per_ssm_shd.constraint_error
147: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
148: When hr_api.unique_integrity_violated Then
149: hr_utility.set_location(l_proc, 8);
142: When hr_api.parent_integrity_violated Then
143: hr_utility.set_location(l_proc, 7);
144: -- Parent integrity has been violated
145: per_ssm_shd.g_api_dml := false; -- Unset the api dml status
146: per_ssm_shd.constraint_error
147: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
148: When hr_api.unique_integrity_violated Then
149: hr_utility.set_location(l_proc, 8);
150: -- Unique integrity has been violated
147: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
148: When hr_api.unique_integrity_violated Then
149: hr_utility.set_location(l_proc, 8);
150: -- Unique integrity has been violated
151: per_ssm_shd.g_api_dml := false; -- Unset the api dml status
152: per_ssm_shd.constraint_error
153: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
154: When Others Then
155: hr_utility.set_location(l_proc, 9);
148: When hr_api.unique_integrity_violated Then
149: hr_utility.set_location(l_proc, 8);
150: -- Unique integrity has been violated
151: per_ssm_shd.g_api_dml := false; -- Unset the api dml status
152: per_ssm_shd.constraint_error
153: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
154: When Others Then
155: hr_utility.set_location(l_proc, 9);
156: per_ssm_shd.g_api_dml := false; -- Unset the api dml status
152: per_ssm_shd.constraint_error
153: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
154: When Others Then
155: hr_utility.set_location(l_proc, 9);
156: per_ssm_shd.g_api_dml := false; -- Unset the api dml status
157: Raise;
158: End insert_dml;
159: --
160: -- ----------------------------------------------------------------------------
193: -- Internal Row Handler Use Only.
194: --
195: -- {End Of Comments}
196: -- ----------------------------------------------------------------------------
197: Procedure pre_insert(p_rec in out nocopy per_ssm_shd.g_rec_type) is
198: --
199: l_proc varchar2(72) := g_package||'pre_insert';
200: --
201: Cursor C_Sel1 is select per_salary_survey_mappings_s.nextval from sys.dual;
244: -- Internal Row Handler Use Only.
245: --
246: -- {End Of Comments}
247: -- ----------------------------------------------------------------------------
248: Procedure post_insert(p_rec in per_ssm_shd.g_rec_type,
249: p_effective_date in date) is
250: --
251: l_proc varchar2(72) := g_package||'post_insert';
252: --
306: -- |---------------------------------< ins >----------------------------------|
307: -- ----------------------------------------------------------------------------
308: Procedure ins
309: (
310: p_rec in out nocopy per_ssm_shd.g_rec_type,
311: p_effective_date in date
312: ) is
313: --
314: l_proc varchar2(72) := g_package||'ins';
371: p_attribute20 in varchar2 default null,
372: p_effective_date in date
373: ) is
374: --
375: l_rec per_ssm_shd.g_rec_type;
376: l_proc varchar2(72) := g_package||'ins';
377: --
378: Begin
379: hr_utility.set_location('Entering:'||l_proc, 5);
381: -- Call conversion function to turn arguments into the
382: -- p_rec structure.
383: --
384: l_rec :=
385: per_ssm_shd.convert_args
386: (
387: null,
388: null,
389: p_parent_id,