33: Begin
34: hr_utility.set_location('Entering:'||l_proc, 5);
35: --
36: If (p_constraint_name = 'BEN_ELIG_PSTL_CD_R_RNG_CVG_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: Else
34: hr_utility.set_location('Entering:'||l_proc, 5);
35: --
36: If (p_constraint_name = 'BEN_ELIG_PSTL_CD_R_RNG_CVG_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: Else
42: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
35: --
36: If (p_constraint_name = 'BEN_ELIG_PSTL_CD_R_RNG_CVG_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: Else
42: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
43: fnd_message.set_token('PROCEDURE', l_proc);
36: If (p_constraint_name = 'BEN_ELIG_PSTL_CD_R_RNG_CVG_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: Else
42: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
43: fnd_message.set_token('PROCEDURE', l_proc);
44: fnd_message.set_token('CONSTRAINT_NAME', p_constraint_name);
38: fnd_message.set_token('PROCEDURE', l_proc);
39: fnd_message.set_token('STEP','5');
40: fnd_message.raise_error;
41: Else
42: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
43: fnd_message.set_token('PROCEDURE', l_proc);
44: fnd_message.set_token('CONSTRAINT_NAME', p_constraint_name);
45: fnd_message.raise_error;
46: End If;
39: fnd_message.set_token('STEP','5');
40: fnd_message.raise_error;
41: Else
42: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
43: fnd_message.set_token('PROCEDURE', l_proc);
44: fnd_message.set_token('CONSTRAINT_NAME', p_constraint_name);
45: fnd_message.raise_error;
46: End If;
47: --
40: fnd_message.raise_error;
41: Else
42: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
43: fnd_message.set_token('PROCEDURE', l_proc);
44: fnd_message.set_token('CONSTRAINT_NAME', p_constraint_name);
45: fnd_message.raise_error;
46: End If;
47: --
48: hr_utility.set_location(' Leaving:'||l_proc, 10);
41: Else
42: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
43: fnd_message.set_token('PROCEDURE', l_proc);
44: fnd_message.set_token('CONSTRAINT_NAME', p_constraint_name);
45: fnd_message.raise_error;
46: End If;
47: --
48: hr_utility.set_location(' Leaving:'||l_proc, 10);
49: End constraint_error;
140: Close C_Sel1;
141: --
142: -- The primary key is invalid therefore we must error
143: --
144: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
145: fnd_message.raise_error;
146: End If;
147: Close C_Sel1;
148: If (p_object_version_number <> g_old_rec.object_version_number) Then
141: --
142: -- The primary key is invalid therefore we must error
143: --
144: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
145: fnd_message.raise_error;
146: End If;
147: Close C_Sel1;
148: If (p_object_version_number <> g_old_rec.object_version_number) Then
149: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
145: fnd_message.raise_error;
146: End If;
147: Close C_Sel1;
148: If (p_object_version_number <> g_old_rec.object_version_number) Then
149: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
150: fnd_message.raise_error;
151: End If;
152: hr_utility.set_location(l_proc, 15);
153: l_fct_ret := true;
146: End If;
147: Close C_Sel1;
148: If (p_object_version_number <> g_old_rec.object_version_number) Then
149: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
150: fnd_message.raise_error;
151: End If;
152: hr_utility.set_location(l_proc, 15);
153: l_fct_ret := true;
154: End If;
188: Fetch C_Sel1 Into l_parent_key_value1,
189: l_parent_key_value2;
190: If C_Sel1%notfound then
191: Close C_Sel1;
192: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
193: fnd_message.set_token('PROCEDURE', l_proc);
194: fnd_message.set_token('STEP','10');
195: fnd_message.raise_error;
196: End If;
189: l_parent_key_value2;
190: If C_Sel1%notfound then
191: Close C_Sel1;
192: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
193: fnd_message.set_token('PROCEDURE', l_proc);
194: fnd_message.set_token('STEP','10');
195: fnd_message.raise_error;
196: End If;
197: Close C_Sel1;
190: If C_Sel1%notfound then
191: Close C_Sel1;
192: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
193: fnd_message.set_token('PROCEDURE', l_proc);
194: fnd_message.set_token('STEP','10');
195: fnd_message.raise_error;
196: End If;
197: Close C_Sel1;
198: --
191: Close C_Sel1;
192: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
193: fnd_message.set_token('PROCEDURE', l_proc);
194: fnd_message.set_token('STEP','10');
195: fnd_message.raise_error;
196: End If;
197: Close C_Sel1;
198: --
199: -- Call the corresponding datetrack api
400: Close C_Sel1;
401: --
402: -- The primary key is invalid therefore we must error
403: --
404: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
405: fnd_message.raise_error;
406: End If;
407: Close C_Sel1;
408: If (p_object_version_number <> g_old_rec.object_version_number) Then
401: --
402: -- The primary key is invalid therefore we must error
403: --
404: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
405: fnd_message.raise_error;
406: End If;
407: Close C_Sel1;
408: If (p_object_version_number <> g_old_rec.object_version_number) Then
409: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
405: fnd_message.raise_error;
406: End If;
407: Close C_Sel1;
408: If (p_object_version_number <> g_old_rec.object_version_number) Then
409: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
410: fnd_message.raise_error;
411: End If;
412: hr_utility.set_location(l_proc, 15);
413: --
406: End If;
407: Close C_Sel1;
408: If (p_object_version_number <> g_old_rec.object_version_number) Then
409: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
410: fnd_message.raise_error;
411: End If;
412: hr_utility.set_location(l_proc, 15);
413: --
414: --
435: -- We are doing a datetrack 'INSERT' which is illegal within this
436: -- procedure therefore we must error (note: to lck on insert the
437: -- private procedure ins_lck should be called).
438: --
439: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
440: fnd_message.set_token('PROCEDURE', l_proc);
441: fnd_message.set_token('STEP','20');
442: fnd_message.raise_error;
443: End If;
436: -- procedure therefore we must error (note: to lck on insert the
437: -- private procedure ins_lck should be called).
438: --
439: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
440: fnd_message.set_token('PROCEDURE', l_proc);
441: fnd_message.set_token('STEP','20');
442: fnd_message.raise_error;
443: End If;
444: --
437: -- private procedure ins_lck should be called).
438: --
439: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
440: fnd_message.set_token('PROCEDURE', l_proc);
441: fnd_message.set_token('STEP','20');
442: fnd_message.raise_error;
443: End If;
444: --
445: -- Set the validation start and end date OUT arguments
438: --
439: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
440: fnd_message.set_token('PROCEDURE', l_proc);
441: fnd_message.set_token('STEP','20');
442: fnd_message.raise_error;
443: End If;
444: --
445: -- Set the validation start and end date OUT arguments
446: --
456: --
457: -- The object is locked therefore we need to supply a meaningful
458: -- error message.
459: --
460: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
461: fnd_message.set_token('TABLE_NAME', 'ben_elig_pstl_cd_r_rng_cvg_f');
462: fnd_message.raise_error;
463: When l_object_invalid then
464: --
457: -- The object is locked therefore we need to supply a meaningful
458: -- error message.
459: --
460: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
461: fnd_message.set_token('TABLE_NAME', 'ben_elig_pstl_cd_r_rng_cvg_f');
462: fnd_message.raise_error;
463: When l_object_invalid then
464: --
465: -- The object doesn't exist or is invalid
458: -- error message.
459: --
460: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
461: fnd_message.set_token('TABLE_NAME', 'ben_elig_pstl_cd_r_rng_cvg_f');
462: fnd_message.raise_error;
463: When l_object_invalid then
464: --
465: -- The object doesn't exist or is invalid
466: --
463: When l_object_invalid then
464: --
465: -- The object doesn't exist or is invalid
466: --
467: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
468: fnd_message.set_token('TABLE_NAME', 'ben_elig_pstl_cd_r_rng_cvg_f');
469: fnd_message.raise_error;
470: End lck;
471: --
464: --
465: -- The object doesn't exist or is invalid
466: --
467: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
468: fnd_message.set_token('TABLE_NAME', 'ben_elig_pstl_cd_r_rng_cvg_f');
469: fnd_message.raise_error;
470: End lck;
471: --
472: -- ----------------------------------------------------------------------------
465: -- The object doesn't exist or is invalid
466: --
467: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
468: fnd_message.set_token('TABLE_NAME', 'ben_elig_pstl_cd_r_rng_cvg_f');
469: fnd_message.raise_error;
470: End lck;
471: --
472: -- ----------------------------------------------------------------------------
473: -- |-----------------------------< convert_args >-----------------------------|