1: Package Body per_jgr_ins as
2: /* $Header: pejgrrhi.pkb 115.9 2004/09/09 08:11:45 smparame noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
6: -- ----------------------------------------------------------------------------
7: --
8: g_package varchar2(33) := ' per_jgr_ins.'; -- Global package name
9: --
10: -- The following global variables are only to be used by
11: -- the set_base_key_value and pre_insert procedures.
12: --
22: --
23: Begin
24: hr_utility.set_location('Entering:'||l_proc, 10);
25: --
26: per_jgr_ins.g_job_group_id_i := p_job_group_id;
27: --
28: hr_utility.set_location(' Leaving:'||l_proc, 20);
29: End set_base_key_value;
30: --
286: );
287: --
288: -- Call the supporting pre-insert operation
289: --
290: per_jgr_ins.pre_insert(p_rec);
291: --
292: -- Insert the row
293: --
294: per_jgr_ins.insert_dml(p_rec);
290: per_jgr_ins.pre_insert(p_rec);
291: --
292: -- Insert the row
293: --
294: per_jgr_ins.insert_dml(p_rec);
295: --
296: -- Call the supporting post-insert operation
297: --
298: per_jgr_ins.post_insert
294: per_jgr_ins.insert_dml(p_rec);
295: --
296: -- Call the supporting post-insert operation
297: --
298: per_jgr_ins.post_insert
299: (p_effective_date
300: ,p_rec
301: );
302: --
341: --
342: -- Having converted the arguments into the per_jgr_rec
343: -- plsql record structure we call the corresponding record business process.
344: --
345: per_jgr_ins.ins
346: (p_effective_date
347: ,l_rec
348: );
349: --
355: --
356: hr_utility.set_location(' Leaving:'||l_proc, 10);
357: End ins;
358: --
359: end per_jgr_ins;