33: Begin
34: hr_utility.set_location('Entering:'||l_proc, 5);
35: --
36: If (p_constraint_name = 'BEN_PGM_FK1') Then
37: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
38: fnd_message.set_token('PROCEDURE', l_proc);
39: fnd_message.set_token('STEP','5');
40: fnd_message.raise_error;
41: ElsIf (p_constraint_name = 'BEN_PGM_F_PK') Then
34: hr_utility.set_location('Entering:'||l_proc, 5);
35: --
36: If (p_constraint_name = 'BEN_PGM_FK1') Then
37: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
38: fnd_message.set_token('PROCEDURE', l_proc);
39: fnd_message.set_token('STEP','5');
40: fnd_message.raise_error;
41: ElsIf (p_constraint_name = 'BEN_PGM_F_PK') Then
42: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
35: --
36: If (p_constraint_name = 'BEN_PGM_FK1') Then
37: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
38: fnd_message.set_token('PROCEDURE', l_proc);
39: fnd_message.set_token('STEP','5');
40: fnd_message.raise_error;
41: ElsIf (p_constraint_name = 'BEN_PGM_F_PK') Then
42: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
43: fnd_message.set_token('PROCEDURE', l_proc);
36: If (p_constraint_name = 'BEN_PGM_FK1') Then
37: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
38: fnd_message.set_token('PROCEDURE', l_proc);
39: fnd_message.set_token('STEP','5');
40: fnd_message.raise_error;
41: ElsIf (p_constraint_name = 'BEN_PGM_F_PK') Then
42: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
43: fnd_message.set_token('PROCEDURE', l_proc);
44: fnd_message.set_token('STEP','10');
38: fnd_message.set_token('PROCEDURE', l_proc);
39: fnd_message.set_token('STEP','5');
40: fnd_message.raise_error;
41: ElsIf (p_constraint_name = 'BEN_PGM_F_PK') Then
42: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
43: fnd_message.set_token('PROCEDURE', l_proc);
44: fnd_message.set_token('STEP','10');
45: fnd_message.raise_error;
46: Else
39: fnd_message.set_token('STEP','5');
40: fnd_message.raise_error;
41: ElsIf (p_constraint_name = 'BEN_PGM_F_PK') Then
42: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
43: fnd_message.set_token('PROCEDURE', l_proc);
44: fnd_message.set_token('STEP','10');
45: fnd_message.raise_error;
46: Else
47: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
40: fnd_message.raise_error;
41: ElsIf (p_constraint_name = 'BEN_PGM_F_PK') Then
42: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
43: fnd_message.set_token('PROCEDURE', l_proc);
44: fnd_message.set_token('STEP','10');
45: fnd_message.raise_error;
46: Else
47: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
48: fnd_message.set_token('PROCEDURE', l_proc);
41: ElsIf (p_constraint_name = 'BEN_PGM_F_PK') Then
42: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
43: fnd_message.set_token('PROCEDURE', l_proc);
44: fnd_message.set_token('STEP','10');
45: fnd_message.raise_error;
46: Else
47: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
48: fnd_message.set_token('PROCEDURE', l_proc);
49: fnd_message.set_token('CONSTRAINT_NAME', p_constraint_name);
43: fnd_message.set_token('PROCEDURE', l_proc);
44: fnd_message.set_token('STEP','10');
45: fnd_message.raise_error;
46: Else
47: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
48: fnd_message.set_token('PROCEDURE', l_proc);
49: fnd_message.set_token('CONSTRAINT_NAME', p_constraint_name);
50: fnd_message.raise_error;
51: End If;
44: fnd_message.set_token('STEP','10');
45: fnd_message.raise_error;
46: Else
47: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
48: fnd_message.set_token('PROCEDURE', l_proc);
49: fnd_message.set_token('CONSTRAINT_NAME', p_constraint_name);
50: fnd_message.raise_error;
51: End If;
52: --
45: fnd_message.raise_error;
46: Else
47: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
48: fnd_message.set_token('PROCEDURE', l_proc);
49: fnd_message.set_token('CONSTRAINT_NAME', p_constraint_name);
50: fnd_message.raise_error;
51: End If;
52: --
53: hr_utility.set_location(' Leaving:'||l_proc, 10);
46: Else
47: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
48: fnd_message.set_token('PROCEDURE', l_proc);
49: fnd_message.set_token('CONSTRAINT_NAME', p_constraint_name);
50: fnd_message.raise_error;
51: End If;
52: --
53: hr_utility.set_location(' Leaving:'||l_proc, 10);
54: End constraint_error;
216: Close C_Sel1;
217: --
218: -- The primary key is invalid therefore we must error
219: --
220: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
221: fnd_message.raise_error;
222: End If;
223: Close C_Sel1;
224: If (p_object_version_number <> g_old_rec.object_version_number) Then
217: --
218: -- The primary key is invalid therefore we must error
219: --
220: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
221: fnd_message.raise_error;
222: End If;
223: Close C_Sel1;
224: If (p_object_version_number <> g_old_rec.object_version_number) Then
225: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
221: fnd_message.raise_error;
222: End If;
223: Close C_Sel1;
224: If (p_object_version_number <> g_old_rec.object_version_number) Then
225: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
226: fnd_message.raise_error;
227: End If;
228: hr_utility.set_location(l_proc, 15);
229: l_fct_ret := true;
222: End If;
223: Close C_Sel1;
224: If (p_object_version_number <> g_old_rec.object_version_number) Then
225: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
226: fnd_message.raise_error;
227: End If;
228: hr_utility.set_location(l_proc, 15);
229: l_fct_ret := true;
230: End If;
276: l_parent_key_value5,
277: l_parent_key_value6;
278: If C_Sel1%notfound then
279: Close C_Sel1;
280: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
281: fnd_message.set_token('PROCEDURE', l_proc);
282: fnd_message.set_token('STEP','10');
283: fnd_message.raise_error;
284: End If;
277: l_parent_key_value6;
278: If C_Sel1%notfound then
279: Close C_Sel1;
280: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
281: fnd_message.set_token('PROCEDURE', l_proc);
282: fnd_message.set_token('STEP','10');
283: fnd_message.raise_error;
284: End If;
285: Close C_Sel1;
278: If C_Sel1%notfound then
279: Close C_Sel1;
280: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
281: fnd_message.set_token('PROCEDURE', l_proc);
282: fnd_message.set_token('STEP','10');
283: fnd_message.raise_error;
284: End If;
285: Close C_Sel1;
286: --
279: Close C_Sel1;
280: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
281: fnd_message.set_token('PROCEDURE', l_proc);
282: fnd_message.set_token('STEP','10');
283: fnd_message.raise_error;
284: End If;
285: Close C_Sel1;
286: --
287: -- Call the corresponding datetrack api
571: Close C_Sel1;
572: --
573: -- The primary key is invalid therefore we must error
574: --
575: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
576: fnd_message.raise_error;
577: End If;
578: Close C_Sel1;
579: If (p_object_version_number <> g_old_rec.object_version_number) Then
572: --
573: -- The primary key is invalid therefore we must error
574: --
575: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
576: fnd_message.raise_error;
577: End If;
578: Close C_Sel1;
579: If (p_object_version_number <> g_old_rec.object_version_number) Then
580: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
576: fnd_message.raise_error;
577: End If;
578: Close C_Sel1;
579: If (p_object_version_number <> g_old_rec.object_version_number) Then
580: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
581: fnd_message.raise_error;
582: End If;
583: hr_utility.set_location(l_proc, 15);
584: --
577: End If;
578: Close C_Sel1;
579: If (p_object_version_number <> g_old_rec.object_version_number) Then
580: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
581: fnd_message.raise_error;
582: End If;
583: hr_utility.set_location(l_proc, 15);
584: --
585: --
671: -- We are doing a datetrack 'INSERT' which is illegal within this
672: -- procedure therefore we must error (note: to lck on insert the
673: -- private procedure ins_lck should be called).
674: --
675: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
676: fnd_message.set_token('PROCEDURE', l_proc);
677: fnd_message.set_token('STEP','20');
678: fnd_message.raise_error;
679: End If;
672: -- procedure therefore we must error (note: to lck on insert the
673: -- private procedure ins_lck should be called).
674: --
675: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
676: fnd_message.set_token('PROCEDURE', l_proc);
677: fnd_message.set_token('STEP','20');
678: fnd_message.raise_error;
679: End If;
680: --
673: -- private procedure ins_lck should be called).
674: --
675: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
676: fnd_message.set_token('PROCEDURE', l_proc);
677: fnd_message.set_token('STEP','20');
678: fnd_message.raise_error;
679: End If;
680: --
681: -- Set the validation start and end date OUT arguments
674: --
675: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
676: fnd_message.set_token('PROCEDURE', l_proc);
677: fnd_message.set_token('STEP','20');
678: fnd_message.raise_error;
679: End If;
680: --
681: -- Set the validation start and end date OUT arguments
682: --
692: --
693: -- The object is locked therefore we need to supply a meaningful
694: -- error message.
695: --
696: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
697: fnd_message.set_token('TABLE_NAME', 'ben_pgm_f');
698: fnd_message.raise_error;
699: When l_object_invalid then
700: --
693: -- The object is locked therefore we need to supply a meaningful
694: -- error message.
695: --
696: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
697: fnd_message.set_token('TABLE_NAME', 'ben_pgm_f');
698: fnd_message.raise_error;
699: When l_object_invalid then
700: --
701: -- The object doesn't exist or is invalid
694: -- error message.
695: --
696: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
697: fnd_message.set_token('TABLE_NAME', 'ben_pgm_f');
698: fnd_message.raise_error;
699: When l_object_invalid then
700: --
701: -- The object doesn't exist or is invalid
702: --
699: When l_object_invalid then
700: --
701: -- The object doesn't exist or is invalid
702: --
703: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
704: fnd_message.set_token('TABLE_NAME', 'ben_pgm_f');
705: fnd_message.raise_error;
706: End lck;
707: --
700: --
701: -- The object doesn't exist or is invalid
702: --
703: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
704: fnd_message.set_token('TABLE_NAME', 'ben_pgm_f');
705: fnd_message.raise_error;
706: End lck;
707: --
708: -- ----------------------------------------------------------------------------
701: -- The object doesn't exist or is invalid
702: --
703: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
704: fnd_message.set_token('TABLE_NAME', 'ben_pgm_f');
705: fnd_message.raise_error;
706: End lck;
707: --
708: -- ----------------------------------------------------------------------------
709: -- |-----------------------------< convert_args >-----------------------------|