54: --
55: -- {End Of Comments}
56: -- ----------------------------------------------------------------------------
57: Procedure dt_insert_dml
58: (p_rec in out nocopy ghr_dut_shd.g_rec_type,
59: p_effective_date in date,
60: p_datetrack_mode in varchar2,
61: p_validation_start_date in date,
62: p_validation_end_date in date) is
68: t.creation_date
69: from ghr_duty_stations_f t
70: where t.duty_station_id = p_rec.duty_station_id
71: and t.effective_start_date =
72: ghr_dut_shd.g_old_rec.effective_start_date
73: and t.effective_end_date = (p_validation_start_date - 1);
74: --
75: l_proc varchar2(72) := g_package||'dt_insert_dml';
76: l_created_by ghr_duty_stations_f.created_by%TYPE;
126: l_last_updated_by := fnd_global.user_id;
127: l_last_update_login := fnd_global.login_id;
128: End If;
129: --
130: ghr_dut_shd.g_api_dml := true; -- Set the api dml status
131: --
132: -- Insert the row into: ghr_duty_stations_f
133: --
134: insert into ghr_duty_stations_f
171: l_last_updated_by,
172: l_last_update_login
173: );
174: --
175: ghr_dut_shd.g_api_dml := false; -- Unset the api dml status
176: hr_utility.set_location(' Leaving:'||l_proc, 15);
177: --
178: Exception
179: When hr_api.check_integrity_violated Then
177: --
178: Exception
179: When hr_api.check_integrity_violated Then
180: -- A check constraint has been violated
181: ghr_dut_shd.g_api_dml := false; -- Unset the api dml status
182: ghr_dut_shd.constraint_error
183: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
184: When hr_api.unique_integrity_violated Then
185: -- Unique integrity has been violated
178: Exception
179: When hr_api.check_integrity_violated Then
180: -- A check constraint has been violated
181: ghr_dut_shd.g_api_dml := false; -- Unset the api dml status
182: ghr_dut_shd.constraint_error
183: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
184: When hr_api.unique_integrity_violated Then
185: -- Unique integrity has been violated
186: ghr_dut_shd.g_api_dml := false; -- Unset the api dml status
182: ghr_dut_shd.constraint_error
183: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
184: When hr_api.unique_integrity_violated Then
185: -- Unique integrity has been violated
186: ghr_dut_shd.g_api_dml := false; -- Unset the api dml status
187: ghr_dut_shd.constraint_error
188: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
189: When Others Then
190: ghr_dut_shd.g_api_dml := false; -- Unset the api dml status
183: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
184: When hr_api.unique_integrity_violated Then
185: -- Unique integrity has been violated
186: ghr_dut_shd.g_api_dml := false; -- Unset the api dml status
187: ghr_dut_shd.constraint_error
188: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
189: When Others Then
190: ghr_dut_shd.g_api_dml := false; -- Unset the api dml status
191: Raise;
186: ghr_dut_shd.g_api_dml := false; -- Unset the api dml status
187: ghr_dut_shd.constraint_error
188: (p_constraint_name => hr_api.strip_constraint_name(SQLERRM));
189: When Others Then
190: ghr_dut_shd.g_api_dml := false; -- Unset the api dml status
191: Raise;
192: End dt_insert_dml;
193: --
194: -- ----------------------------------------------------------------------------
194: -- ----------------------------------------------------------------------------
195: -- |------------------------------< insert_dml >------------------------------|
196: -- ----------------------------------------------------------------------------
197: Procedure insert_dml
198: (p_rec in out nocopy ghr_dut_shd.g_rec_type,
199: p_effective_date in date,
200: p_datetrack_mode in varchar2,
201: p_validation_start_date in date,
202: p_validation_end_date in date) is
254: --
255: -- {End Of Comments}
256: -- ----------------------------------------------------------------------------
257: Procedure pre_insert
258: (p_rec in out nocopy ghr_dut_shd.g_rec_type,
259: p_effective_date in date,
260: p_datetrack_mode in varchar2,
261: p_validation_start_date in date,
262: p_validation_end_date in date) is
311: --
312: -- {End Of Comments}
313: -- ----------------------------------------------------------------------------
314: Procedure post_insert
315: (p_rec in ghr_dut_shd.g_rec_type,
316: p_effective_date in date,
317: p_datetrack_mode in varchar2,
318: p_validation_start_date in date,
319: p_validation_end_date in date) is
380: -- ----------------------------------------------------------------------------
381: Procedure ins_lck
382: (p_effective_date in date,
383: p_datetrack_mode in varchar2,
384: p_rec in ghr_dut_shd.g_rec_type,
385: p_validation_start_date out nocopy date,
386: p_validation_end_date out nocopy date) is
387: --
388: l_proc varchar2(72) := g_package||'ins_lck';
418: -- |---------------------------------< ins >----------------------------------|
419: -- ----------------------------------------------------------------------------
420: Procedure ins
421: (
422: p_rec in out nocopy ghr_dut_shd.g_rec_type,
423: p_effective_date in date
424: ) is
425: --
426: l_proc varchar2(72) := g_package||'ins';
499: p_object_version_number in out nocopy number,
500: p_effective_date in date
501: ) is
502: --
503: l_rec ghr_dut_shd.g_rec_type;
504: l_proc varchar2(72) := g_package||'ins';
505: --
506: Begin
507: hr_utility.set_location('Entering:'||l_proc, 5);
509: -- Call conversion function to turn arguments into the
510: -- p_rec structure.
511: --
512: l_rec :=
513: ghr_dut_shd.convert_args
514: (
515: null
516: ,null
517: ,null