29: --
30: Begin
31: --
32: If (p_constraint_name = 'PER_PAYBAS_PAY_BASIS_CHK') Then
33: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
34: fnd_message.set_token('PROCEDURE', l_proc);
35: fnd_message.set_token('STEP','5');
36: fnd_message.raise_error;
37: ElsIf (p_constraint_name = 'PER_PAYBAS_RATE_BASIS_CHK') Then
30: Begin
31: --
32: If (p_constraint_name = 'PER_PAYBAS_PAY_BASIS_CHK') Then
33: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
34: fnd_message.set_token('PROCEDURE', l_proc);
35: fnd_message.set_token('STEP','5');
36: fnd_message.raise_error;
37: ElsIf (p_constraint_name = 'PER_PAYBAS_RATE_BASIS_CHK') Then
38: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
31: --
32: If (p_constraint_name = 'PER_PAYBAS_PAY_BASIS_CHK') Then
33: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
34: fnd_message.set_token('PROCEDURE', l_proc);
35: fnd_message.set_token('STEP','5');
36: fnd_message.raise_error;
37: ElsIf (p_constraint_name = 'PER_PAYBAS_RATE_BASIS_CHK') Then
38: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
39: fnd_message.set_token('PROCEDURE', l_proc);
32: If (p_constraint_name = 'PER_PAYBAS_PAY_BASIS_CHK') Then
33: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
34: fnd_message.set_token('PROCEDURE', l_proc);
35: fnd_message.set_token('STEP','5');
36: fnd_message.raise_error;
37: ElsIf (p_constraint_name = 'PER_PAYBAS_RATE_BASIS_CHK') Then
38: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
39: fnd_message.set_token('PROCEDURE', l_proc);
40: fnd_message.set_token('STEP','10');
34: fnd_message.set_token('PROCEDURE', l_proc);
35: fnd_message.set_token('STEP','5');
36: fnd_message.raise_error;
37: ElsIf (p_constraint_name = 'PER_PAYBAS_RATE_BASIS_CHK') Then
38: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
39: fnd_message.set_token('PROCEDURE', l_proc);
40: fnd_message.set_token('STEP','10');
41: fnd_message.raise_error;
42: ElsIf (p_constraint_name = 'PER_PAY_BASES_FK2') Then
35: fnd_message.set_token('STEP','5');
36: fnd_message.raise_error;
37: ElsIf (p_constraint_name = 'PER_PAYBAS_RATE_BASIS_CHK') Then
38: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
39: fnd_message.set_token('PROCEDURE', l_proc);
40: fnd_message.set_token('STEP','10');
41: fnd_message.raise_error;
42: ElsIf (p_constraint_name = 'PER_PAY_BASES_FK2') Then
43: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
36: fnd_message.raise_error;
37: ElsIf (p_constraint_name = 'PER_PAYBAS_RATE_BASIS_CHK') Then
38: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
39: fnd_message.set_token('PROCEDURE', l_proc);
40: fnd_message.set_token('STEP','10');
41: fnd_message.raise_error;
42: ElsIf (p_constraint_name = 'PER_PAY_BASES_FK2') Then
43: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
44: fnd_message.set_token('PROCEDURE', l_proc);
37: ElsIf (p_constraint_name = 'PER_PAYBAS_RATE_BASIS_CHK') Then
38: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
39: fnd_message.set_token('PROCEDURE', l_proc);
40: fnd_message.set_token('STEP','10');
41: fnd_message.raise_error;
42: ElsIf (p_constraint_name = 'PER_PAY_BASES_FK2') Then
43: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
44: fnd_message.set_token('PROCEDURE', l_proc);
45: fnd_message.set_token('STEP','15');
39: fnd_message.set_token('PROCEDURE', l_proc);
40: fnd_message.set_token('STEP','10');
41: fnd_message.raise_error;
42: ElsIf (p_constraint_name = 'PER_PAY_BASES_FK2') Then
43: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
44: fnd_message.set_token('PROCEDURE', l_proc);
45: fnd_message.set_token('STEP','15');
46: fnd_message.raise_error;
47: ElsIf (p_constraint_name = 'PER_PAY_BASES_FK3') Then
40: fnd_message.set_token('STEP','10');
41: fnd_message.raise_error;
42: ElsIf (p_constraint_name = 'PER_PAY_BASES_FK2') Then
43: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
44: fnd_message.set_token('PROCEDURE', l_proc);
45: fnd_message.set_token('STEP','15');
46: fnd_message.raise_error;
47: ElsIf (p_constraint_name = 'PER_PAY_BASES_FK3') Then
48: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
41: fnd_message.raise_error;
42: ElsIf (p_constraint_name = 'PER_PAY_BASES_FK2') Then
43: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
44: fnd_message.set_token('PROCEDURE', l_proc);
45: fnd_message.set_token('STEP','15');
46: fnd_message.raise_error;
47: ElsIf (p_constraint_name = 'PER_PAY_BASES_FK3') Then
48: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
49: fnd_message.set_token('PROCEDURE', l_proc);
42: ElsIf (p_constraint_name = 'PER_PAY_BASES_FK2') Then
43: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
44: fnd_message.set_token('PROCEDURE', l_proc);
45: fnd_message.set_token('STEP','15');
46: fnd_message.raise_error;
47: ElsIf (p_constraint_name = 'PER_PAY_BASES_FK3') Then
48: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
49: fnd_message.set_token('PROCEDURE', l_proc);
50: fnd_message.set_token('STEP','20');
44: fnd_message.set_token('PROCEDURE', l_proc);
45: fnd_message.set_token('STEP','15');
46: fnd_message.raise_error;
47: ElsIf (p_constraint_name = 'PER_PAY_BASES_FK3') Then
48: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
49: fnd_message.set_token('PROCEDURE', l_proc);
50: fnd_message.set_token('STEP','20');
51: fnd_message.raise_error;
52: ElsIf (p_constraint_name = 'PER_PAY_BASES_PK') Then
45: fnd_message.set_token('STEP','15');
46: fnd_message.raise_error;
47: ElsIf (p_constraint_name = 'PER_PAY_BASES_FK3') Then
48: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
49: fnd_message.set_token('PROCEDURE', l_proc);
50: fnd_message.set_token('STEP','20');
51: fnd_message.raise_error;
52: ElsIf (p_constraint_name = 'PER_PAY_BASES_PK') Then
53: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
46: fnd_message.raise_error;
47: ElsIf (p_constraint_name = 'PER_PAY_BASES_FK3') Then
48: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
49: fnd_message.set_token('PROCEDURE', l_proc);
50: fnd_message.set_token('STEP','20');
51: fnd_message.raise_error;
52: ElsIf (p_constraint_name = 'PER_PAY_BASES_PK') Then
53: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
54: fnd_message.set_token('PROCEDURE', l_proc);
47: ElsIf (p_constraint_name = 'PER_PAY_BASES_FK3') Then
48: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
49: fnd_message.set_token('PROCEDURE', l_proc);
50: fnd_message.set_token('STEP','20');
51: fnd_message.raise_error;
52: ElsIf (p_constraint_name = 'PER_PAY_BASES_PK') Then
53: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
54: fnd_message.set_token('PROCEDURE', l_proc);
55: fnd_message.set_token('STEP','25');
49: fnd_message.set_token('PROCEDURE', l_proc);
50: fnd_message.set_token('STEP','20');
51: fnd_message.raise_error;
52: ElsIf (p_constraint_name = 'PER_PAY_BASES_PK') Then
53: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
54: fnd_message.set_token('PROCEDURE', l_proc);
55: fnd_message.set_token('STEP','25');
56: fnd_message.raise_error;
57: ElsIf (p_constraint_name = 'PER_PAY_BASES_UK2') Then
50: fnd_message.set_token('STEP','20');
51: fnd_message.raise_error;
52: ElsIf (p_constraint_name = 'PER_PAY_BASES_PK') Then
53: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
54: fnd_message.set_token('PROCEDURE', l_proc);
55: fnd_message.set_token('STEP','25');
56: fnd_message.raise_error;
57: ElsIf (p_constraint_name = 'PER_PAY_BASES_UK2') Then
58: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
51: fnd_message.raise_error;
52: ElsIf (p_constraint_name = 'PER_PAY_BASES_PK') Then
53: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
54: fnd_message.set_token('PROCEDURE', l_proc);
55: fnd_message.set_token('STEP','25');
56: fnd_message.raise_error;
57: ElsIf (p_constraint_name = 'PER_PAY_BASES_UK2') Then
58: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
59: fnd_message.set_token('PROCEDURE', l_proc);
52: ElsIf (p_constraint_name = 'PER_PAY_BASES_PK') Then
53: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
54: fnd_message.set_token('PROCEDURE', l_proc);
55: fnd_message.set_token('STEP','25');
56: fnd_message.raise_error;
57: ElsIf (p_constraint_name = 'PER_PAY_BASES_UK2') Then
58: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
59: fnd_message.set_token('PROCEDURE', l_proc);
60: fnd_message.set_token('STEP','30');
54: fnd_message.set_token('PROCEDURE', l_proc);
55: fnd_message.set_token('STEP','25');
56: fnd_message.raise_error;
57: ElsIf (p_constraint_name = 'PER_PAY_BASES_UK2') Then
58: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
59: fnd_message.set_token('PROCEDURE', l_proc);
60: fnd_message.set_token('STEP','30');
61: fnd_message.raise_error;
62: ElsIf (p_constraint_name = 'PER_PAY_BASES_UK3') Then
55: fnd_message.set_token('STEP','25');
56: fnd_message.raise_error;
57: ElsIf (p_constraint_name = 'PER_PAY_BASES_UK2') Then
58: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
59: fnd_message.set_token('PROCEDURE', l_proc);
60: fnd_message.set_token('STEP','30');
61: fnd_message.raise_error;
62: ElsIf (p_constraint_name = 'PER_PAY_BASES_UK3') Then
63: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
56: fnd_message.raise_error;
57: ElsIf (p_constraint_name = 'PER_PAY_BASES_UK2') Then
58: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
59: fnd_message.set_token('PROCEDURE', l_proc);
60: fnd_message.set_token('STEP','30');
61: fnd_message.raise_error;
62: ElsIf (p_constraint_name = 'PER_PAY_BASES_UK3') Then
63: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
64: fnd_message.set_token('PROCEDURE', l_proc);
57: ElsIf (p_constraint_name = 'PER_PAY_BASES_UK2') Then
58: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
59: fnd_message.set_token('PROCEDURE', l_proc);
60: fnd_message.set_token('STEP','30');
61: fnd_message.raise_error;
62: ElsIf (p_constraint_name = 'PER_PAY_BASES_UK3') Then
63: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
64: fnd_message.set_token('PROCEDURE', l_proc);
65: fnd_message.set_token('STEP','35');
59: fnd_message.set_token('PROCEDURE', l_proc);
60: fnd_message.set_token('STEP','30');
61: fnd_message.raise_error;
62: ElsIf (p_constraint_name = 'PER_PAY_BASES_UK3') Then
63: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
64: fnd_message.set_token('PROCEDURE', l_proc);
65: fnd_message.set_token('STEP','35');
66: fnd_message.raise_error;
67: Else
60: fnd_message.set_token('STEP','30');
61: fnd_message.raise_error;
62: ElsIf (p_constraint_name = 'PER_PAY_BASES_UK3') Then
63: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
64: fnd_message.set_token('PROCEDURE', l_proc);
65: fnd_message.set_token('STEP','35');
66: fnd_message.raise_error;
67: Else
68: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
61: fnd_message.raise_error;
62: ElsIf (p_constraint_name = 'PER_PAY_BASES_UK3') Then
63: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
64: fnd_message.set_token('PROCEDURE', l_proc);
65: fnd_message.set_token('STEP','35');
66: fnd_message.raise_error;
67: Else
68: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
69: fnd_message.set_token('PROCEDURE', l_proc);
62: ElsIf (p_constraint_name = 'PER_PAY_BASES_UK3') Then
63: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
64: fnd_message.set_token('PROCEDURE', l_proc);
65: fnd_message.set_token('STEP','35');
66: fnd_message.raise_error;
67: Else
68: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
69: fnd_message.set_token('PROCEDURE', l_proc);
70: fnd_message.set_token('CONSTRAINT_NAME', p_constraint_name);
64: fnd_message.set_token('PROCEDURE', l_proc);
65: fnd_message.set_token('STEP','35');
66: fnd_message.raise_error;
67: Else
68: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
69: fnd_message.set_token('PROCEDURE', l_proc);
70: fnd_message.set_token('CONSTRAINT_NAME', p_constraint_name);
71: fnd_message.raise_error;
72: End If;
65: fnd_message.set_token('STEP','35');
66: fnd_message.raise_error;
67: Else
68: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
69: fnd_message.set_token('PROCEDURE', l_proc);
70: fnd_message.set_token('CONSTRAINT_NAME', p_constraint_name);
71: fnd_message.raise_error;
72: End If;
73: --
66: fnd_message.raise_error;
67: Else
68: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
69: fnd_message.set_token('PROCEDURE', l_proc);
70: fnd_message.set_token('CONSTRAINT_NAME', p_constraint_name);
71: fnd_message.raise_error;
72: End If;
73: --
74: End constraint_error;
67: Else
68: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
69: fnd_message.set_token('PROCEDURE', l_proc);
70: fnd_message.set_token('CONSTRAINT_NAME', p_constraint_name);
71: fnd_message.raise_error;
72: End If;
73: --
74: End constraint_error;
75: --
176: Close C_Sel1;
177: --
178: -- The primary key is invalid therefore we must error
179: --
180: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
181: fnd_message.raise_error;
182: End If;
183: Close C_Sel1;
184: If (p_object_version_number
177: --
178: -- The primary key is invalid therefore we must error
179: --
180: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
181: fnd_message.raise_error;
182: End If;
183: Close C_Sel1;
184: If (p_object_version_number
185: <> per_ppb_shd.g_old_rec.object_version_number) Then
182: End If;
183: Close C_Sel1;
184: If (p_object_version_number
185: <> per_ppb_shd.g_old_rec.object_version_number) Then
186: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
187: fnd_message.raise_error;
188: End If;
189: l_fct_ret := true;
190: End If;
183: Close C_Sel1;
184: If (p_object_version_number
185: <> per_ppb_shd.g_old_rec.object_version_number) Then
186: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
187: fnd_message.raise_error;
188: End If;
189: l_fct_ret := true;
190: End If;
191: End If;
285: Close C_Sel1;
286: --
287: -- The primary key is invalid therefore we must error
288: --
289: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
290: fnd_message.raise_error;
291: End If;
292: Close C_Sel1;
293: If (p_object_version_number
286: --
287: -- The primary key is invalid therefore we must error
288: --
289: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
290: fnd_message.raise_error;
291: End If;
292: Close C_Sel1;
293: If (p_object_version_number
294: <> per_ppb_shd.g_old_rec.object_version_number) Then
291: End If;
292: Close C_Sel1;
293: If (p_object_version_number
294: <> per_ppb_shd.g_old_rec.object_version_number) Then
295: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
296: fnd_message.raise_error;
297: End If;
298: --
299: hr_utility.set_location(' Leaving:'||l_proc, 10);
292: Close C_Sel1;
293: If (p_object_version_number
294: <> per_ppb_shd.g_old_rec.object_version_number) Then
295: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
296: fnd_message.raise_error;
297: End If;
298: --
299: hr_utility.set_location(' Leaving:'||l_proc, 10);
300: --
305: --
306: -- The object is locked therefore we need to supply a meaningful
307: -- error message.
308: --
309: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
310: fnd_message.set_token('TABLE_NAME', 'per_pay_bases');
311: fnd_message.raise_error;
312: End lck;
313: --
306: -- The object is locked therefore we need to supply a meaningful
307: -- error message.
308: --
309: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
310: fnd_message.set_token('TABLE_NAME', 'per_pay_bases');
311: fnd_message.raise_error;
312: End lck;
313: --
314: -- ----------------------------------------------------------------------------
307: -- error message.
308: --
309: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
310: fnd_message.set_token('TABLE_NAME', 'per_pay_bases');
311: fnd_message.raise_error;
312: End lck;
313: --
314: -- ----------------------------------------------------------------------------
315: -- |-----------------------------< convert_args >-----------------------------|