30: Begin
31: --
32: If (p_constraint_name = 'PAY_PAYROLLS_F_FK2') Then
33: --
34: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
35: fnd_message.set_token('PROCEDURE', l_proc);
36: fnd_message.set_token('STEP','5');
37: fnd_message.raise_error;
38: --
31: --
32: If (p_constraint_name = 'PAY_PAYROLLS_F_FK2') Then
33: --
34: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
35: fnd_message.set_token('PROCEDURE', l_proc);
36: fnd_message.set_token('STEP','5');
37: fnd_message.raise_error;
38: --
39: ElsIf (p_constraint_name = 'PAY_PAYROLLS_F_FK3') Then
32: If (p_constraint_name = 'PAY_PAYROLLS_F_FK2') Then
33: --
34: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
35: fnd_message.set_token('PROCEDURE', l_proc);
36: fnd_message.set_token('STEP','5');
37: fnd_message.raise_error;
38: --
39: ElsIf (p_constraint_name = 'PAY_PAYROLLS_F_FK3') Then
40: --
33: --
34: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
35: fnd_message.set_token('PROCEDURE', l_proc);
36: fnd_message.set_token('STEP','5');
37: fnd_message.raise_error;
38: --
39: ElsIf (p_constraint_name = 'PAY_PAYROLLS_F_FK3') Then
40: --
41: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
37: fnd_message.raise_error;
38: --
39: ElsIf (p_constraint_name = 'PAY_PAYROLLS_F_FK3') Then
40: --
41: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
42: fnd_message.set_token('PROCEDURE', l_proc);
43: fnd_message.set_token('STEP','10');
44: fnd_message.raise_error;
45: --
38: --
39: ElsIf (p_constraint_name = 'PAY_PAYROLLS_F_FK3') Then
40: --
41: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
42: fnd_message.set_token('PROCEDURE', l_proc);
43: fnd_message.set_token('STEP','10');
44: fnd_message.raise_error;
45: --
46: ElsIf (p_constraint_name = 'PAY_PAYROLLS_F_FK4') Then
39: ElsIf (p_constraint_name = 'PAY_PAYROLLS_F_FK3') Then
40: --
41: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
42: fnd_message.set_token('PROCEDURE', l_proc);
43: fnd_message.set_token('STEP','10');
44: fnd_message.raise_error;
45: --
46: ElsIf (p_constraint_name = 'PAY_PAYROLLS_F_FK4') Then
47: --
40: --
41: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
42: fnd_message.set_token('PROCEDURE', l_proc);
43: fnd_message.set_token('STEP','10');
44: fnd_message.raise_error;
45: --
46: ElsIf (p_constraint_name = 'PAY_PAYROLLS_F_FK4') Then
47: --
48: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
44: fnd_message.raise_error;
45: --
46: ElsIf (p_constraint_name = 'PAY_PAYROLLS_F_FK4') Then
47: --
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','15');
51: fnd_message.raise_error;
52: --
45: --
46: ElsIf (p_constraint_name = 'PAY_PAYROLLS_F_FK4') Then
47: --
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','15');
51: fnd_message.raise_error;
52: --
53: ElsIf (p_constraint_name = 'PAY_PAYROLLS_F_FK5') Then
46: ElsIf (p_constraint_name = 'PAY_PAYROLLS_F_FK4') Then
47: --
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','15');
51: fnd_message.raise_error;
52: --
53: ElsIf (p_constraint_name = 'PAY_PAYROLLS_F_FK5') Then
54: --
47: --
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','15');
51: fnd_message.raise_error;
52: --
53: ElsIf (p_constraint_name = 'PAY_PAYROLLS_F_FK5') Then
54: --
55: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
51: fnd_message.raise_error;
52: --
53: ElsIf (p_constraint_name = 'PAY_PAYROLLS_F_FK5') Then
54: --
55: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
56: fnd_message.set_token('PROCEDURE', l_proc);
57: fnd_message.set_token('STEP','20');
58: fnd_message.raise_error;
59: --
52: --
53: ElsIf (p_constraint_name = 'PAY_PAYROLLS_F_FK5') Then
54: --
55: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
56: fnd_message.set_token('PROCEDURE', l_proc);
57: fnd_message.set_token('STEP','20');
58: fnd_message.raise_error;
59: --
60: ElsIf (p_constraint_name = 'PAY_PAYROLLS_F_FK6') Then
53: ElsIf (p_constraint_name = 'PAY_PAYROLLS_F_FK5') Then
54: --
55: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
56: fnd_message.set_token('PROCEDURE', l_proc);
57: fnd_message.set_token('STEP','20');
58: fnd_message.raise_error;
59: --
60: ElsIf (p_constraint_name = 'PAY_PAYROLLS_F_FK6') Then
61: --
54: --
55: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
56: fnd_message.set_token('PROCEDURE', l_proc);
57: fnd_message.set_token('STEP','20');
58: fnd_message.raise_error;
59: --
60: ElsIf (p_constraint_name = 'PAY_PAYROLLS_F_FK6') Then
61: --
62: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
58: fnd_message.raise_error;
59: --
60: ElsIf (p_constraint_name = 'PAY_PAYROLLS_F_FK6') Then
61: --
62: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
63: fnd_message.set_token('PROCEDURE', l_proc);
64: fnd_message.set_token('STEP','25');
65: fnd_message.raise_error;
66: --
59: --
60: ElsIf (p_constraint_name = 'PAY_PAYROLLS_F_FK6') Then
61: --
62: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
63: fnd_message.set_token('PROCEDURE', l_proc);
64: fnd_message.set_token('STEP','25');
65: fnd_message.raise_error;
66: --
67: ElsIf (p_constraint_name = 'PAY_PAYROLLS_F_FK7') Then
60: ElsIf (p_constraint_name = 'PAY_PAYROLLS_F_FK6') Then
61: --
62: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
63: fnd_message.set_token('PROCEDURE', l_proc);
64: fnd_message.set_token('STEP','25');
65: fnd_message.raise_error;
66: --
67: ElsIf (p_constraint_name = 'PAY_PAYROLLS_F_FK7') Then
68: --
61: --
62: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
63: fnd_message.set_token('PROCEDURE', l_proc);
64: fnd_message.set_token('STEP','25');
65: fnd_message.raise_error;
66: --
67: ElsIf (p_constraint_name = 'PAY_PAYROLLS_F_FK7') Then
68: --
69: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
65: fnd_message.raise_error;
66: --
67: ElsIf (p_constraint_name = 'PAY_PAYROLLS_F_FK7') Then
68: --
69: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
70: fnd_message.set_token('PROCEDURE', l_proc);
71: fnd_message.set_token('STEP','30');
72: fnd_message.raise_error;
73: --
66: --
67: ElsIf (p_constraint_name = 'PAY_PAYROLLS_F_FK7') Then
68: --
69: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
70: fnd_message.set_token('PROCEDURE', l_proc);
71: fnd_message.set_token('STEP','30');
72: fnd_message.raise_error;
73: --
74: ElsIf (p_constraint_name = 'PAY_PAYROLLS_F_FK8') Then
67: ElsIf (p_constraint_name = 'PAY_PAYROLLS_F_FK7') Then
68: --
69: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
70: fnd_message.set_token('PROCEDURE', l_proc);
71: fnd_message.set_token('STEP','30');
72: fnd_message.raise_error;
73: --
74: ElsIf (p_constraint_name = 'PAY_PAYROLLS_F_FK8') Then
75: --
68: --
69: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
70: fnd_message.set_token('PROCEDURE', l_proc);
71: fnd_message.set_token('STEP','30');
72: fnd_message.raise_error;
73: --
74: ElsIf (p_constraint_name = 'PAY_PAYROLLS_F_FK8') Then
75: --
76: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
72: fnd_message.raise_error;
73: --
74: ElsIf (p_constraint_name = 'PAY_PAYROLLS_F_FK8') Then
75: --
76: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
77: fnd_message.set_token('PROCEDURE', l_proc);
78: fnd_message.set_token('STEP','35');
79: fnd_message.raise_error;
80: --
73: --
74: ElsIf (p_constraint_name = 'PAY_PAYROLLS_F_FK8') Then
75: --
76: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
77: fnd_message.set_token('PROCEDURE', l_proc);
78: fnd_message.set_token('STEP','35');
79: fnd_message.raise_error;
80: --
81: ElsIf (p_constraint_name = 'PAY_PAYROLLS_F_PK') Then
74: ElsIf (p_constraint_name = 'PAY_PAYROLLS_F_FK8') Then
75: --
76: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
77: fnd_message.set_token('PROCEDURE', l_proc);
78: fnd_message.set_token('STEP','35');
79: fnd_message.raise_error;
80: --
81: ElsIf (p_constraint_name = 'PAY_PAYROLLS_F_PK') Then
82: --
75: --
76: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
77: fnd_message.set_token('PROCEDURE', l_proc);
78: fnd_message.set_token('STEP','35');
79: fnd_message.raise_error;
80: --
81: ElsIf (p_constraint_name = 'PAY_PAYROLLS_F_PK') Then
82: --
83: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
79: fnd_message.raise_error;
80: --
81: ElsIf (p_constraint_name = 'PAY_PAYROLLS_F_PK') Then
82: --
83: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
84: fnd_message.set_token('PROCEDURE', l_proc);
85: fnd_message.set_token('STEP','40');
86: fnd_message.raise_error;
87: --
80: --
81: ElsIf (p_constraint_name = 'PAY_PAYROLLS_F_PK') Then
82: --
83: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
84: fnd_message.set_token('PROCEDURE', l_proc);
85: fnd_message.set_token('STEP','40');
86: fnd_message.raise_error;
87: --
88: ElsIf (p_constraint_name = 'PAY_PAYROLL_NEGATIVE_PAY_A_CHK') Then
81: ElsIf (p_constraint_name = 'PAY_PAYROLLS_F_PK') Then
82: --
83: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
84: fnd_message.set_token('PROCEDURE', l_proc);
85: fnd_message.set_token('STEP','40');
86: fnd_message.raise_error;
87: --
88: ElsIf (p_constraint_name = 'PAY_PAYROLL_NEGATIVE_PAY_A_CHK') Then
89: --
82: --
83: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
84: fnd_message.set_token('PROCEDURE', l_proc);
85: fnd_message.set_token('STEP','40');
86: fnd_message.raise_error;
87: --
88: ElsIf (p_constraint_name = 'PAY_PAYROLL_NEGATIVE_PAY_A_CHK') Then
89: --
90: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
86: fnd_message.raise_error;
87: --
88: ElsIf (p_constraint_name = 'PAY_PAYROLL_NEGATIVE_PAY_A_CHK') Then
89: --
90: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
91: fnd_message.set_token('PROCEDURE', l_proc);
92: fnd_message.set_token('STEP','45');
93: fnd_message.raise_error;
94: --
87: --
88: ElsIf (p_constraint_name = 'PAY_PAYROLL_NEGATIVE_PAY_A_CHK') Then
89: --
90: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
91: fnd_message.set_token('PROCEDURE', l_proc);
92: fnd_message.set_token('STEP','45');
93: fnd_message.raise_error;
94: --
95: ElsIf (p_constraint_name = 'PAY_PAYROLL_WORKLOAD_SHIFT_CHK') Then
88: ElsIf (p_constraint_name = 'PAY_PAYROLL_NEGATIVE_PAY_A_CHK') Then
89: --
90: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
91: fnd_message.set_token('PROCEDURE', l_proc);
92: fnd_message.set_token('STEP','45');
93: fnd_message.raise_error;
94: --
95: ElsIf (p_constraint_name = 'PAY_PAYROLL_WORKLOAD_SHIFT_CHK') Then
96: --
89: --
90: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
91: fnd_message.set_token('PROCEDURE', l_proc);
92: fnd_message.set_token('STEP','45');
93: fnd_message.raise_error;
94: --
95: ElsIf (p_constraint_name = 'PAY_PAYROLL_WORKLOAD_SHIFT_CHK') Then
96: --
97: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
93: fnd_message.raise_error;
94: --
95: ElsIf (p_constraint_name = 'PAY_PAYROLL_WORKLOAD_SHIFT_CHK') Then
96: --
97: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
98: fnd_message.set_token('PROCEDURE', l_proc);
99: fnd_message.set_token('STEP','50');
100: fnd_message.raise_error;
101: --
94: --
95: ElsIf (p_constraint_name = 'PAY_PAYROLL_WORKLOAD_SHIFT_CHK') Then
96: --
97: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
98: fnd_message.set_token('PROCEDURE', l_proc);
99: fnd_message.set_token('STEP','50');
100: fnd_message.raise_error;
101: --
102: Else
95: ElsIf (p_constraint_name = 'PAY_PAYROLL_WORKLOAD_SHIFT_CHK') Then
96: --
97: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
98: fnd_message.set_token('PROCEDURE', l_proc);
99: fnd_message.set_token('STEP','50');
100: fnd_message.raise_error;
101: --
102: Else
103: --
96: --
97: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
98: fnd_message.set_token('PROCEDURE', l_proc);
99: fnd_message.set_token('STEP','50');
100: fnd_message.raise_error;
101: --
102: Else
103: --
104: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
100: fnd_message.raise_error;
101: --
102: Else
103: --
104: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
105: fnd_message.set_token('PROCEDURE', l_proc);
106: fnd_message.set_token('CONSTRAINT_NAME', p_constraint_name);
107: fnd_message.raise_error;
108: --
101: --
102: Else
103: --
104: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
105: fnd_message.set_token('PROCEDURE', l_proc);
106: fnd_message.set_token('CONSTRAINT_NAME', p_constraint_name);
107: fnd_message.raise_error;
108: --
109: End If;
102: Else
103: --
104: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
105: fnd_message.set_token('PROCEDURE', l_proc);
106: fnd_message.set_token('CONSTRAINT_NAME', p_constraint_name);
107: fnd_message.raise_error;
108: --
109: End If;
110: --
103: --
104: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
105: fnd_message.set_token('PROCEDURE', l_proc);
106: fnd_message.set_token('CONSTRAINT_NAME', p_constraint_name);
107: fnd_message.raise_error;
108: --
109: End If;
110: --
111: End constraint_error;
246: Close C_Sel1;
247: --
248: -- The primary key is invalid therefore we must error
249: --
250: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
251: fnd_message.raise_error;
252: --
253: End If;
254: Close C_Sel1;
247: --
248: -- The primary key is invalid therefore we must error
249: --
250: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
251: fnd_message.raise_error;
252: --
253: End If;
254: Close C_Sel1;
255: If (p_object_version_number <> pay_pay_shd.g_old_rec.object_version_number) Then
253: End If;
254: Close C_Sel1;
255: If (p_object_version_number <> pay_pay_shd.g_old_rec.object_version_number) Then
256: --
257: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
258: fnd_message.raise_error;
259: --
260: End If;
261: l_fct_ret := true;
254: Close C_Sel1;
255: If (p_object_version_number <> pay_pay_shd.g_old_rec.object_version_number) Then
256: --
257: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
258: fnd_message.raise_error;
259: --
260: End If;
261: l_fct_ret := true;
262: --
332:
333: If C_Sel1%NOTFOUND then
334: --
335: Close C_Sel1;
336: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
337: fnd_message.set_token('PROCEDURE',l_proc);
338: fnd_message.set_token('STEP','10');
339: fnd_message.raise_error;
340: --
333: If C_Sel1%NOTFOUND then
334: --
335: Close C_Sel1;
336: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
337: fnd_message.set_token('PROCEDURE',l_proc);
338: fnd_message.set_token('STEP','10');
339: fnd_message.raise_error;
340: --
341: End If;
334: --
335: Close C_Sel1;
336: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
337: fnd_message.set_token('PROCEDURE',l_proc);
338: fnd_message.set_token('STEP','10');
339: fnd_message.raise_error;
340: --
341: End If;
342: Close C_Sel1;
335: Close C_Sel1;
336: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
337: fnd_message.set_token('PROCEDURE',l_proc);
338: fnd_message.set_token('STEP','10');
339: fnd_message.raise_error;
340: --
341: End If;
342: Close C_Sel1;
343: --
587: Close C_Sel1;
588: --
589: -- The primary key is invalid therefore we must error
590: --
591: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
592: fnd_message.raise_error;
593: --
594: End If;
595: Close C_Sel1;
588: --
589: -- The primary key is invalid therefore we must error
590: --
591: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
592: fnd_message.raise_error;
593: --
594: End If;
595: Close C_Sel1;
596:
603:
604: If (p_object_version_number <> pay_pay_shd.g_old_rec.object_version_number and
605: pay_pay_shd.g_old_rec.object_version_number is not null) Then
606: --
607: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
608: fnd_message.raise_error;
609: --
610: End If;
611: --
604: If (p_object_version_number <> pay_pay_shd.g_old_rec.object_version_number and
605: pay_pay_shd.g_old_rec.object_version_number is not null) Then
606: --
607: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
608: fnd_message.raise_error;
609: --
610: End If;
611: --
612: -- Providing we are doing an update and a comment_id exists then
625: -- The comments for the specified comment_id does not exist.
626: -- We must error due to data integrity problems.
627: --
628: Close C_Sel3;
629: fnd_message.set_name('PAY', 'HR_7202_COMMENT_TEXT_NOT_EXIST');
630: fnd_message.raise_error;
631: --
632: End If;
633: Close C_Sel3;
626: -- We must error due to data integrity problems.
627: --
628: Close C_Sel3;
629: fnd_message.set_name('PAY', 'HR_7202_COMMENT_TEXT_NOT_EXIST');
630: fnd_message.raise_error;
631: --
632: End If;
633: Close C_Sel3;
634: --
669: -- We are doing a datetrack 'INSERT' which is illegal within this
670: -- procedure therefore we must error (note: to lck on insert the
671: -- private procedure ins_lck should be called).
672: --
673: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
674: fnd_message.set_token('PROCEDURE', l_proc);
675: fnd_message.set_token('STEP','20');
676: fnd_message.raise_error;
677: --
670: -- procedure therefore we must error (note: to lck on insert the
671: -- private procedure ins_lck should be called).
672: --
673: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
674: fnd_message.set_token('PROCEDURE', l_proc);
675: fnd_message.set_token('STEP','20');
676: fnd_message.raise_error;
677: --
678: End If;
671: -- private procedure ins_lck should be called).
672: --
673: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
674: fnd_message.set_token('PROCEDURE', l_proc);
675: fnd_message.set_token('STEP','20');
676: fnd_message.raise_error;
677: --
678: End If;
679: --
672: --
673: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
674: fnd_message.set_token('PROCEDURE', l_proc);
675: fnd_message.set_token('STEP','20');
676: fnd_message.raise_error;
677: --
678: End If;
679: --
680: -- Set the validation start and end date OUT arguments
691: --
692: -- The object is locked therefore we need to supply a meaningful
693: -- error message.
694: --
695: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
696: fnd_message.set_token('TABLE_NAME', 'pay_all_payrolls_f');
697: fnd_message.raise_error;
698: --
699: End lck;
692: -- The object is locked therefore we need to supply a meaningful
693: -- error message.
694: --
695: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
696: fnd_message.set_token('TABLE_NAME', 'pay_all_payrolls_f');
697: fnd_message.raise_error;
698: --
699: End lck;
700: --
693: -- error message.
694: --
695: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
696: fnd_message.set_token('TABLE_NAME', 'pay_all_payrolls_f');
697: fnd_message.raise_error;
698: --
699: End lck;
700: --
701: -- ----------------------------------------------------------------------------