[Home] [Help]
20: --
21: l_proc varchar2(72) := g_package||'set_base_key_value';
22: --
23: Begin
24: hr_utility.set_location('Entering:'||l_proc, 10);
25: --
26: pay_pgr_ins.g_grade_rule_id_i := p_grade_rule_id;
27: --
28: hr_utility.set_location(' Leaving:'||l_proc, 20);
24: hr_utility.set_location('Entering:'||l_proc, 10);
25: --
26: pay_pgr_ins.g_grade_rule_id_i := p_grade_rule_id;
27: --
28: hr_utility.set_location(' Leaving:'||l_proc, 20);
29: End set_base_key_value;
30: --
31: --
32: -- ----------------------------------------------------------------------------
101: l_last_updated_by pay_grade_rules_f.last_updated_by%TYPE;
102: l_last_update_login pay_grade_rules_f.last_update_login%TYPE;
103: --
104: Begin
105: hr_utility.set_location('Entering:'||l_proc, 5);
106: --
107: -- Get the object version number for the insert
108: --
109: p_rec.object_version_number :=
112: ,p_base_key_column => 'grade_rule_id'
113: ,p_base_key_value => p_rec.grade_rule_id
114: );
115: --
116: hr_utility.set_location(l_proc, 10);
117: --
118: -- Set the effective start and end dates to the corresponding
119: -- validation start and end dates
120: --
125: -- columns with the 'old' creation values and 'new' updated values.
126: --
127: If (p_datetrack_mode <> hr_api.g_insert) then
128: --
129: hr_utility.set_location(l_proc, 30);
130: --
131: -- Select the 'old' created values
132: --
133: Open C_Sel1;
155: pay_pgr_shd.g_api_dml := true; -- Set the api dml status
156: --
157: -- Insert the row into: pay_grade_rules_f
158: --
159: hr_utility.set_location(l_proc, 30);
160: --
161: insert into pay_grade_rules_f
162: (grade_rule_id
163: ,effective_start_date
209: ,l_last_update_login
210: );
211: --
212: pay_pgr_shd.g_api_dml := false; -- Unset the api dml status
213: hr_utility.set_location(' Leaving:'||l_proc, 15);
214: --
215: Exception
216: When hr_api.check_integrity_violated Then
217: -- A check constraint has been violated
241: --
242: l_proc varchar2(72) := g_package||'insert_dml';
243: --
244: Begin
245: hr_utility.set_location('Entering:'||l_proc, 5);
246: --
247: pay_pgr_ins.dt_insert_dml
248: (p_rec => p_rec
249: ,p_effective_date => p_effective_date
251: ,p_validation_start_date => p_validation_start_date
252: ,p_validation_end_date => p_validation_end_date
253: );
254: --
255: hr_utility.set_location(' Leaving:'||l_proc, 10);
256: End insert_dml;
257: --
258: -- ----------------------------------------------------------------------------
259: -- |------------------------------< pre_insert >------------------------------|
323: l_proc varchar2(72) := g_package||'pre_insert';
324: l_exists varchar2(1);
325: --
326: Begin
327: hr_utility.set_location('Entering:'||l_proc, 5);
328: --
329: If (pay_pgr_ins.g_grade_rule_id_i is not null) Then
330: --
331: -- Verify registered primary key values not already in use
364: -- If (p_rec.sequence is NULL) Then
365: --Checking if the user has entered value for the sequence field.
366: If p_rec.rate_type = 'G' Then
367: --
368: hr_utility.set_location(l_proc,20);
369: --
370: open C_Grade_Sequence;
371: Fetch C_Grade_Sequence Into p_rec.sequence;
372: Close C_Grade_Sequence;
372: Close C_Grade_Sequence;
373: --
374: Elsif p_rec.rate_type = 'SP' Then
375: --
376: hr_utility.set_location(l_proc,30);
377: --
378: Open C_Spinal_Point_Sequence;
379: Fetch C_Spinal_Point_Sequence Into p_rec.sequence;
380: Close C_Spinal_Point_Sequence;
382: End if;
383: --
384: -- End If;
385: --
386: hr_utility.set_location(' Leaving:'||l_proc, 999);
387: --
388: End pre_insert;
389: --
390: -- ----------------------------------------------------------------------------
429: --
430: l_proc varchar2(72) := g_package||'post_insert';
431: --
432: Begin
433: hr_utility.set_location('Entering:'||l_proc, 5);
434: begin
435: --
436: pay_pgr_rki.after_insert
437: (p_effective_date
487: ,p_hook_type => 'AI');
488: --
489: end;
490: --
491: hr_utility.set_location(' Leaving:'||l_proc, 10);
492: End post_insert;
493: --
494: -- ----------------------------------------------------------------------------
495: -- |-------------------------------< ins_lck >--------------------------------|
539: l_validation_start_date date;
540: l_validation_end_date date;
541: --
542: Begin
543: hr_utility.set_location('Entering:'||l_proc, 5);
544: --
545: -- Validate the datetrack mode mode getting the validation start
546: -- and end dates for the specified datetrack operation.
547: --
560: --
561: p_validation_start_date := l_validation_start_date;
562: p_validation_end_date := l_validation_end_date;
563: --
564: hr_utility.set_location(' Leaving:'||l_proc, 10);
565: --
566: End ins_lck;
567: --
568: -- ----------------------------------------------------------------------------
578: l_validation_start_date date;
579: l_validation_end_date date;
580: --
581: Begin
582: hr_utility.set_location('Entering:'||l_proc, 5);
583: --
584: -- Call the lock operation
585: --
586: pay_pgr_ins.ins_lck
636: --
637: -- Call to raise any errors on multi-message list
638: hr_multi_message.end_validation_set;
639: --
640: hr_utility.set_location('Leaving:'||l_proc,10);
641: end ins;
642: --
643: -- ----------------------------------------------------------------------------
644: -- |---------------------------------< ins >----------------------------------|
664: l_rec pay_pgr_shd.g_rec_type;
665: l_proc varchar2(72) := g_package||'ins';
666: --
667: Begin
668: hr_utility.set_location('Entering:'||l_proc, 5);
669: --
670: -- Call conversion function to turn arguments into the
671: -- p_rec structure.
672: --
708: p_effective_end_date := l_rec.effective_end_date;
709: p_object_version_number := l_rec.object_version_number;
710: --
711: --
712: hr_utility.set_location(' Leaving:'||l_proc, 10);
713: End ins;
714: --
715: end pay_pgr_ins;