33: Begin
34: hr_utility.set_location('Entering:'||l_proc, 5);
35: --
36: If (p_constraint_name = 'BEN_PL_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_PL_F_PK') Then
34: hr_utility.set_location('Entering:'||l_proc, 5);
35: --
36: If (p_constraint_name = 'BEN_PL_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_PL_F_PK') Then
42: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
35: --
36: If (p_constraint_name = 'BEN_PL_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_PL_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_PL_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_PL_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_PL_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_PL_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_PL_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_PL_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;
301: Close C_Sel1;
302: --
303: -- The primary key is invalid therefore we must error
304: --
305: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
306: fnd_message.raise_error;
307: End If;
308: Close C_Sel1;
309: If (p_object_version_number <> g_old_rec.object_version_number) Then
302: --
303: -- The primary key is invalid therefore we must error
304: --
305: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
306: fnd_message.raise_error;
307: End If;
308: Close C_Sel1;
309: If (p_object_version_number <> g_old_rec.object_version_number) Then
310: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
306: fnd_message.raise_error;
307: End If;
308: Close C_Sel1;
309: If (p_object_version_number <> g_old_rec.object_version_number) Then
310: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
311: fnd_message.raise_error;
312: End If;
313: hr_utility.set_location(l_proc, 15);
314: l_fct_ret := true;
307: End If;
308: Close C_Sel1;
309: If (p_object_version_number <> g_old_rec.object_version_number) Then
310: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
311: fnd_message.raise_error;
312: End If;
313: hr_utility.set_location(l_proc, 15);
314: l_fct_ret := true;
315: End If;
400: l_parent_key_value15,
401: l_parent_key_value16;
402: If C_Sel1%notfound then
403: Close C_Sel1;
404: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
405: fnd_message.set_token('PROCEDURE', l_proc);
406: fnd_message.set_token('STEP','10');
407: fnd_message.raise_error;
408: End If;
401: l_parent_key_value16;
402: If C_Sel1%notfound then
403: Close C_Sel1;
404: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
405: fnd_message.set_token('PROCEDURE', l_proc);
406: fnd_message.set_token('STEP','10');
407: fnd_message.raise_error;
408: End If;
409: Close C_Sel1;
402: If C_Sel1%notfound then
403: Close C_Sel1;
404: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
405: fnd_message.set_token('PROCEDURE', l_proc);
406: fnd_message.set_token('STEP','10');
407: fnd_message.raise_error;
408: End If;
409: Close C_Sel1;
410: --
403: Close C_Sel1;
404: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
405: fnd_message.set_token('PROCEDURE', l_proc);
406: fnd_message.set_token('STEP','10');
407: fnd_message.raise_error;
408: End If;
409: Close C_Sel1;
410: --
411: -- Call the corresponding datetrack api
871: Close C_Sel1;
872: --
873: -- The primary key is invalid therefore we must error
874: --
875: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
876: fnd_message.raise_error;
877: End If;
878: Close C_Sel1;
879: If (p_object_version_number <> g_old_rec.object_version_number) Then
872: --
873: -- The primary key is invalid therefore we must error
874: --
875: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
876: fnd_message.raise_error;
877: End If;
878: Close C_Sel1;
879: If (p_object_version_number <> g_old_rec.object_version_number) Then
880: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
876: fnd_message.raise_error;
877: End If;
878: Close C_Sel1;
879: If (p_object_version_number <> g_old_rec.object_version_number) Then
880: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
881: fnd_message.raise_error;
882: End If;
883: hr_utility.set_location(l_proc, 15);
884: --
877: End If;
878: Close C_Sel1;
879: If (p_object_version_number <> g_old_rec.object_version_number) Then
880: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
881: fnd_message.raise_error;
882: End If;
883: hr_utility.set_location(l_proc, 15);
884: --
885: -- Validate the datetrack mode mode getting the validation start
1023: -- We are doing a datetrack 'INSERT' which is illegal within this
1024: -- procedure therefore we must error (note: to lck on insert the
1025: -- private procedure ins_lck should be called).
1026: --
1027: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
1028: fnd_message.set_token('PROCEDURE', l_proc);
1029: fnd_message.set_token('STEP','20');
1030: fnd_message.raise_error;
1031: End If;
1024: -- procedure therefore we must error (note: to lck on insert the
1025: -- private procedure ins_lck should be called).
1026: --
1027: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
1028: fnd_message.set_token('PROCEDURE', l_proc);
1029: fnd_message.set_token('STEP','20');
1030: fnd_message.raise_error;
1031: End If;
1032: --
1025: -- private procedure ins_lck should be called).
1026: --
1027: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
1028: fnd_message.set_token('PROCEDURE', l_proc);
1029: fnd_message.set_token('STEP','20');
1030: fnd_message.raise_error;
1031: End If;
1032: --
1033: -- Set the validation start and end date OUT arguments
1026: --
1027: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
1028: fnd_message.set_token('PROCEDURE', l_proc);
1029: fnd_message.set_token('STEP','20');
1030: fnd_message.raise_error;
1031: End If;
1032: --
1033: -- Set the validation start and end date OUT arguments
1034: --
1093: --
1094: -- The object is locked therefore we need to supply a meaningful
1095: -- error message.
1096: --
1097: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
1098: fnd_message.set_token('TABLE_NAME', 'ben_pl_f');
1099: fnd_message.raise_error;
1100: When l_object_invalid then
1101: --
1094: -- The object is locked therefore we need to supply a meaningful
1095: -- error message.
1096: --
1097: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
1098: fnd_message.set_token('TABLE_NAME', 'ben_pl_f');
1099: fnd_message.raise_error;
1100: When l_object_invalid then
1101: --
1102: -- The object doesn't exist or is invalid
1095: -- error message.
1096: --
1097: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
1098: fnd_message.set_token('TABLE_NAME', 'ben_pl_f');
1099: fnd_message.raise_error;
1100: When l_object_invalid then
1101: --
1102: -- The object doesn't exist or is invalid
1103: --
1100: When l_object_invalid then
1101: --
1102: -- The object doesn't exist or is invalid
1103: --
1104: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
1105: fnd_message.set_token('TABLE_NAME', 'ben_pl_f');
1106: fnd_message.raise_error;
1107: End lck;
1108: -- ----------------------------------------------------------------------------
1101: --
1102: -- The object doesn't exist or is invalid
1103: --
1104: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
1105: fnd_message.set_token('TABLE_NAME', 'ben_pl_f');
1106: fnd_message.raise_error;
1107: End lck;
1108: -- ----------------------------------------------------------------------------
1109: -- |-----------------------------< convert_args >-----------------------------|
1102: -- The object doesn't exist or is invalid
1103: --
1104: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
1105: fnd_message.set_token('TABLE_NAME', 'ben_pl_f');
1106: fnd_message.raise_error;
1107: End lck;
1108: -- ----------------------------------------------------------------------------
1109: -- |-----------------------------< convert_args >-----------------------------|
1110: -- ----------------------------------------------------------------------------