20: --
21: l_proc varchar2(72) ;
22: --
23: Begin
24: g_debug := hr_utility.debug_enabled;
25: if g_debug then
26: l_proc := g_package||'set_base_key_value';
27: hr_utility.set_location('Entering:'||l_proc, 10);
28: end if;
23: Begin
24: g_debug := hr_utility.debug_enabled;
25: if g_debug then
26: l_proc := g_package||'set_base_key_value';
27: hr_utility.set_location('Entering:'||l_proc, 10);
28: end if;
29: --
30: hr_psf_ins.g_position_id_i := p_position_id;
31: --
29: --
30: hr_psf_ins.g_position_id_i := p_position_id;
31: --
32: if g_debug then
33: hr_utility.set_location(' Leaving:'||l_proc, 20);
34: end if;
35: End set_base_key_value;
36: --
37: -- ----------------------------------------------------------------------------
102: --
103: Begin
104: if g_debug then
105: l_proc := g_package||'dt_insert_dml';
106: hr_utility.set_location('Entering:'||l_proc, 5);
107: end if;
108: --
109: -- Get the object version number for the insert
110: --
124: -- columns with the 'old' creation values and 'new' updated values.
125: --
126: If (p_datetrack_mode <> 'INSERT') then
127: if g_debug then
128: hr_utility.set_location(l_proc, 10);
129: end if;
130: --
131: -- Select the 'old' created values
132: --
137: -- The previous 'old' created row has not been found. We need
138: -- to error as an internal datetrack problem exists.
139: --
140: Close C_Sel1;
141: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
142: hr_utility.set_message_token('PROCEDURE', l_proc);
143: hr_utility.set_message_token('STEP','10');
144: hr_utility.raise_error;
145: End If;
138: -- to error as an internal datetrack problem exists.
139: --
140: Close C_Sel1;
141: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
142: hr_utility.set_message_token('PROCEDURE', l_proc);
143: hr_utility.set_message_token('STEP','10');
144: hr_utility.raise_error;
145: End If;
146: Close C_Sel1;
139: --
140: Close C_Sel1;
141: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
142: hr_utility.set_message_token('PROCEDURE', l_proc);
143: hr_utility.set_message_token('STEP','10');
144: hr_utility.raise_error;
145: End If;
146: Close C_Sel1;
147: --
140: Close C_Sel1;
141: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
142: hr_utility.set_message_token('PROCEDURE', l_proc);
143: hr_utility.set_message_token('STEP','10');
144: hr_utility.raise_error;
145: End If;
146: Close C_Sel1;
147: --
148: -- Set the AOL updated WHO values
432: l_last_update_login
433: );
434: --
435: if g_debug then
436: hr_utility.set_location(' Leaving:'||l_proc, 15);
437: end if;
438: --
439: Exception
440: When hr_api.check_integrity_violated Then
461: --
462: l_proc varchar2(72) ;
463: --
464: Begin
465: g_debug := hr_utility.debug_enabled;
466: if g_debug then
467: l_proc := g_package||'insert_dml';
468: hr_utility.set_location('Entering:'||l_proc, 5);
469: end if;
464: Begin
465: g_debug := hr_utility.debug_enabled;
466: if g_debug then
467: l_proc := g_package||'insert_dml';
468: hr_utility.set_location('Entering:'||l_proc, 5);
469: end if;
470: --
471: dt_insert_dml(p_rec => p_rec,
472: p_effective_date => p_effective_date,
474: p_validation_start_date => p_validation_start_date,
475: p_validation_end_date => p_validation_end_date);
476: --
477: if g_debug then
478: hr_utility.set_location(' Leaving:'||l_proc, 10);
479: end if;
480: End insert_dml;
481: --
482: -- ----------------------------------------------------------------------------
532: --
533: Begin
534: if g_debug then
535: l_proc := g_package||'pre_insert';
536: hr_utility.set_location('Entering:'||l_proc, 5);
537: end if;
538: --
539: --
540: -- Select the next sequence number
544: Close C_Sel1;
545: --
546: --
547: if g_debug then
548: hr_utility.set_location(' Leaving:'||l_proc, 10);
549: end if;
550: End pre_insert;
551: --
552: -- ----------------------------------------------------------------------------
592: --
593: Begin
594: if g_debug then
595: l_proc := g_package||'post_insert';
596: hr_utility.set_location('Entering:'||l_proc, 5);
597: end if;
598: -- Start of API User Hook for post_insert.
599: begin
600: hr_psf_rki.after_insert(
745: , p_eff_start_date => p_rec.effective_start_date
746: , p_eff_end_date => p_rec.effective_end_date );
747: --
748: if g_debug then
749: hr_utility.set_location(' Leaving:'||l_proc, 10);
750: end if;
751: End post_insert;
752: --
753: -- ----------------------------------------------------------------------------
806: --
807: Begin
808: if g_debug then
809: l_proc := g_package||'ins_lck';
810: hr_utility.set_location('Entering:'||l_proc, 5);
811: end if;
812: --
813: -- Validate the datetrack mode mode getting the validation start
814: -- and end dates for the specified datetrack operation.
856: end if;
857: end if;
858: */
859: if g_debug then
860: hr_utility.set_location(' Leaving:'||l_proc, 10);
861: end if;
862: --
863: End ins_lck;
864: --
876: l_datetrack_mode varchar2(30) := 'INSERT';
877: l_validation_start_date date;
878: l_validation_end_date date;
879: Begin
880: g_debug := hr_utility.debug_enabled;
881: if g_debug then
882: l_proc := g_package||'ins';
883: hr_utility.set_location('Entering:'||l_proc, 5);
884: end if;
879: Begin
880: g_debug := hr_utility.debug_enabled;
881: if g_debug then
882: l_proc := g_package||'ins';
883: hr_utility.set_location('Entering:'||l_proc, 5);
884: end if;
885: --
886: -- Determine if the business process is to be validated.
887: --
959: End If;
960: --
961: --
962: if g_debug then
963: hr_utility.set_location(' Leaving:'||l_proc, 10);
964: end if;
965:
966: Exception
967: When HR_Api.Validate_Enabled Then
1117: l_rec hr_psf_shd.g_rec_type;
1118: l_proc varchar2(72) ;
1119: --
1120: Begin
1121: g_debug := hr_utility.debug_enabled;
1122: if g_debug then
1123: l_proc := g_package||'ins';
1124: hr_utility.set_location('Entering:'||l_proc, 5);
1125: end if;
1120: Begin
1121: g_debug := hr_utility.debug_enabled;
1122: if g_debug then
1123: l_proc := g_package||'ins';
1124: hr_utility.set_location('Entering:'||l_proc, 5);
1125: end if;
1126: --
1127: -- Call conversion function to turn arguments into the
1128: -- p_rec structure.
1278: p_object_version_number := l_rec.object_version_number;
1279: --
1280: --
1281: if g_debug then
1282: hr_utility.set_location(' Leaving:'||l_proc, 10);
1283: end if;
1284: End ins;
1285: --
1286: end hr_psf_ins;