33: Begin
34: hr_utility.set_location('Entering:'||l_proc, 5);
35: --
36: If (p_constraint_name = 'BEN_ELIG_PER_F_PK') 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_ELIG_PER_OPT_FK1') Then
34: hr_utility.set_location('Entering:'||l_proc, 5);
35: --
36: If (p_constraint_name = 'BEN_ELIG_PER_F_PK') 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_ELIG_PER_OPT_FK1') Then
42: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
35: --
36: If (p_constraint_name = 'BEN_ELIG_PER_F_PK') 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_ELIG_PER_OPT_FK1') 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_ELIG_PER_F_PK') 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_ELIG_PER_OPT_FK1') 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_ELIG_PER_OPT_FK1') 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_ELIG_PER_OPT_FK1') 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_ELIG_PER_OPT_FK1') 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_ELIG_PER_OPT_FK1') 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;
197: Close C_Sel1;
198: --
199: -- The primary key is invalid therefore we must error
200: --
201: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
202: fnd_message.raise_error;
203: End If;
204: Close C_Sel1;
205: If (p_object_version_number <> g_old_rec.object_version_number) Then
198: --
199: -- The primary key is invalid therefore we must error
200: --
201: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
202: fnd_message.raise_error;
203: End If;
204: Close C_Sel1;
205: If (p_object_version_number <> g_old_rec.object_version_number) Then
206: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
202: fnd_message.raise_error;
203: End If;
204: Close C_Sel1;
205: If (p_object_version_number <> g_old_rec.object_version_number) Then
206: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
207: fnd_message.raise_error;
208: End If;
209: /*
210: hr_utility.set_location(l_proc, 15);
203: End If;
204: Close C_Sel1;
205: If (p_object_version_number <> g_old_rec.object_version_number) Then
206: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
207: fnd_message.raise_error;
208: End If;
209: /*
210: hr_utility.set_location(l_proc, 15);
211: */
249: Fetch C_Sel1 Into l_parent_key_value1,
250: l_parent_key_value2;
251: If C_Sel1%notfound then
252: Close C_Sel1;
253: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
254: fnd_message.set_token('PROCEDURE', l_proc);
255: fnd_message.set_token('STEP','10');
256: fnd_message.raise_error;
257: End If;
250: l_parent_key_value2;
251: If C_Sel1%notfound then
252: Close C_Sel1;
253: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
254: fnd_message.set_token('PROCEDURE', l_proc);
255: fnd_message.set_token('STEP','10');
256: fnd_message.raise_error;
257: End If;
258: Close C_Sel1;
251: If C_Sel1%notfound then
252: Close C_Sel1;
253: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
254: fnd_message.set_token('PROCEDURE', l_proc);
255: fnd_message.set_token('STEP','10');
256: fnd_message.raise_error;
257: End If;
258: Close C_Sel1;
259: --
252: Close C_Sel1;
253: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
254: fnd_message.set_token('PROCEDURE', l_proc);
255: fnd_message.set_token('STEP','10');
256: fnd_message.raise_error;
257: End If;
258: Close C_Sel1;
259: --
260: -- Call the corresponding datetrack api
509: Close C_Sel1;
510: --
511: -- The primary key is invalid therefore we must error
512: --
513: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
514: fnd_message.raise_error;
515: End If;
516: Close C_Sel1;
517: If (p_object_version_number <> g_old_rec.object_version_number) Then
510: --
511: -- The primary key is invalid therefore we must error
512: --
513: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
514: fnd_message.raise_error;
515: End If;
516: Close C_Sel1;
517: If (p_object_version_number <> g_old_rec.object_version_number) Then
518: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
514: fnd_message.raise_error;
515: End If;
516: Close C_Sel1;
517: If (p_object_version_number <> g_old_rec.object_version_number) Then
518: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
519: fnd_message.raise_error;
520: End If;
521: hr_utility.set_location(l_proc, 15);
522: --
515: End If;
516: Close C_Sel1;
517: If (p_object_version_number <> g_old_rec.object_version_number) Then
518: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
519: fnd_message.raise_error;
520: End If;
521: hr_utility.set_location(l_proc, 15);
522: --
523: --
545: -- We are doing a datetrack 'INSERT' which is illegal within this
546: -- procedure therefore we must error (note: to lck on insert the
547: -- private procedure ins_lck should be called).
548: --
549: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
550: fnd_message.set_token('PROCEDURE', l_proc);
551: fnd_message.set_token('STEP','20');
552: fnd_message.raise_error;
553: End If;
546: -- procedure therefore we must error (note: to lck on insert the
547: -- private procedure ins_lck should be called).
548: --
549: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
550: fnd_message.set_token('PROCEDURE', l_proc);
551: fnd_message.set_token('STEP','20');
552: fnd_message.raise_error;
553: End If;
554: --
547: -- private procedure ins_lck should be called).
548: --
549: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
550: fnd_message.set_token('PROCEDURE', l_proc);
551: fnd_message.set_token('STEP','20');
552: fnd_message.raise_error;
553: End If;
554: --
555: -- Set the validation start and end date OUT arguments
548: --
549: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
550: fnd_message.set_token('PROCEDURE', l_proc);
551: fnd_message.set_token('STEP','20');
552: fnd_message.raise_error;
553: End If;
554: --
555: -- Set the validation start and end date OUT arguments
556: --
566: --
567: -- The object is locked therefore we need to supply a meaningful
568: -- error message.
569: --
570: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
571: fnd_message.set_token('TABLE_NAME', 'ben_elig_per_opt_f');
572: fnd_message.raise_error;
573: When l_object_invalid then
574: --
567: -- The object is locked therefore we need to supply a meaningful
568: -- error message.
569: --
570: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
571: fnd_message.set_token('TABLE_NAME', 'ben_elig_per_opt_f');
572: fnd_message.raise_error;
573: When l_object_invalid then
574: --
575: -- The object doesn't exist or is invalid
568: -- error message.
569: --
570: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
571: fnd_message.set_token('TABLE_NAME', 'ben_elig_per_opt_f');
572: fnd_message.raise_error;
573: When l_object_invalid then
574: --
575: -- The object doesn't exist or is invalid
576: --
573: When l_object_invalid then
574: --
575: -- The object doesn't exist or is invalid
576: --
577: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
578: fnd_message.set_token('TABLE_NAME', 'ben_elig_per_opt_f');
579: fnd_message.raise_error;
580: End lck;
581: --
574: --
575: -- The object doesn't exist or is invalid
576: --
577: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
578: fnd_message.set_token('TABLE_NAME', 'ben_elig_per_opt_f');
579: fnd_message.raise_error;
580: End lck;
581: --
582: -- ----------------------------------------------------------------------------
575: -- The object doesn't exist or is invalid
576: --
577: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
578: fnd_message.set_token('TABLE_NAME', 'ben_elig_per_opt_f');
579: fnd_message.raise_error;
580: End lck;
581: --
582: -- ----------------------------------------------------------------------------
583: -- |-----------------------------< convert_args >-----------------------------|