75: --
76: -- {End Of Comments}
77: -- ----------------------------------------------------------------------------
78: Procedure insert_dml
79: (p_rec in out nocopy ff_ffp_shd.g_rec_type
80: ) is
81: --
82: l_proc varchar2(72) := g_package||'insert_dml';
83: --
84: Begin
85: hr_utility.set_location('Entering:'||l_proc, 5);
86: p_rec.object_version_number := 1; -- Initialise the object version
87: --
88: ff_ffp_shd.g_api_dml := true; -- Set the api dml status
89: --
90: -- Insert the row into: ff_function_parameters
91: --
92: insert into ff_function_parameters
109: ,p_rec.optional
110: ,p_rec.object_version_number
111: );
112: --
113: ff_ffp_shd.g_api_dml := false; -- Unset the api dml status
114: --
115: hr_utility.set_location(' Leaving:'||l_proc, 10);
116: Exception
117: When hr_api.check_integrity_violated Then
115: hr_utility.set_location(' Leaving:'||l_proc, 10);
116: Exception
117: When hr_api.check_integrity_violated Then
118: -- A check constraint has been violated
119: ff_ffp_shd.g_api_dml := false; -- Unset the api dml status
120: ff_ffp_shd.constraint_error
121: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
122: When hr_api.parent_integrity_violated Then
123: -- Parent integrity has been violated
116: Exception
117: When hr_api.check_integrity_violated Then
118: -- A check constraint has been violated
119: ff_ffp_shd.g_api_dml := false; -- Unset the api dml status
120: ff_ffp_shd.constraint_error
121: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
122: When hr_api.parent_integrity_violated Then
123: -- Parent integrity has been violated
124: ff_ffp_shd.g_api_dml := false; -- Unset the api dml status
120: ff_ffp_shd.constraint_error
121: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
122: When hr_api.parent_integrity_violated Then
123: -- Parent integrity has been violated
124: ff_ffp_shd.g_api_dml := false; -- Unset the api dml status
125: ff_ffp_shd.constraint_error
126: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
127: When hr_api.unique_integrity_violated Then
128: -- Unique integrity has been violated
121: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
122: When hr_api.parent_integrity_violated Then
123: -- Parent integrity has been violated
124: ff_ffp_shd.g_api_dml := false; -- Unset the api dml status
125: ff_ffp_shd.constraint_error
126: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
127: When hr_api.unique_integrity_violated Then
128: -- Unique integrity has been violated
129: ff_ffp_shd.g_api_dml := false; -- Unset the api dml status
125: ff_ffp_shd.constraint_error
126: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
127: When hr_api.unique_integrity_violated Then
128: -- Unique integrity has been violated
129: ff_ffp_shd.g_api_dml := false; -- Unset the api dml status
130: ff_ffp_shd.constraint_error
131: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
132: When Others Then
133: ff_ffp_shd.g_api_dml := false; -- Unset the api dml status
126: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
127: When hr_api.unique_integrity_violated Then
128: -- Unique integrity has been violated
129: ff_ffp_shd.g_api_dml := false; -- Unset the api dml status
130: ff_ffp_shd.constraint_error
131: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
132: When Others Then
133: ff_ffp_shd.g_api_dml := false; -- Unset the api dml status
134: Raise;
129: ff_ffp_shd.g_api_dml := false; -- Unset the api dml status
130: ff_ffp_shd.constraint_error
131: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
132: When Others Then
133: ff_ffp_shd.g_api_dml := false; -- Unset the api dml status
134: Raise;
135: End insert_dml;
136: --
137: -- ----------------------------------------------------------------------------
171: --
172: -- {End Of Comments}
173: -- ----------------------------------------------------------------------------
174: Procedure pre_insert
175: (p_rec in out nocopy ff_ffp_shd.g_rec_type
176: ) is
177: --
178: Cursor C_Sel1 is
179: select nvl(max(sequence_number) + 1, 1)
268: -- {End Of Comments}
269: -- ----------------------------------------------------------------------------
270: Procedure post_insert
271: (p_effective_date in date
272: ,p_rec in ff_ffp_shd.g_rec_type
273: ) is
274: --
275: l_proc varchar2(72) := g_package||'post_insert';
276: --
315: -- |---------------------------------< ins >----------------------------------|
316: -- ----------------------------------------------------------------------------
317: Procedure ins
318: (p_effective_date in date
319: ,p_rec in out nocopy ff_ffp_shd.g_rec_type
320: ) is
321: --
322: l_proc varchar2(72) := g_package||'ins';
323: --
369: ,p_sequence_number out nocopy number
370: ,p_object_version_number out nocopy number
371: ) is
372: --
373: l_rec ff_ffp_shd.g_rec_type;
374: l_proc varchar2(72) := g_package||'ins';
375: --
376: Begin
377: hr_utility.set_location('Entering:'||l_proc, 5);
379: -- Call conversion function to turn arguments into the
380: -- p_rec structure.
381: --
382: l_rec :=
383: ff_ffp_shd.convert_args
384: (p_function_id
385: ,null
386: ,p_class
387: ,p_continuing_parameter