83: Begin
84: hr_utility.set_location('Entering:'||l_proc, 5);
85: --
86: If (p_constraint_name = 'BEN_EXT_RCD_IN_FILE_FK1') Then
87: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
88: fnd_message.set_token('PROCEDURE', l_proc);
89: fnd_message.set_token('STEP','5');
90: fnd_message.raise_error;
91: ElsIf (p_constraint_name = 'BEN_EXT_DATA_ELMT_IN_RCD_FK2') Then
84: hr_utility.set_location('Entering:'||l_proc, 5);
85: --
86: If (p_constraint_name = 'BEN_EXT_RCD_IN_FILE_FK1') Then
87: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
88: fnd_message.set_token('PROCEDURE', l_proc);
89: fnd_message.set_token('STEP','5');
90: fnd_message.raise_error;
91: ElsIf (p_constraint_name = 'BEN_EXT_DATA_ELMT_IN_RCD_FK2') Then
92: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
85: --
86: If (p_constraint_name = 'BEN_EXT_RCD_IN_FILE_FK1') Then
87: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
88: fnd_message.set_token('PROCEDURE', l_proc);
89: fnd_message.set_token('STEP','5');
90: fnd_message.raise_error;
91: ElsIf (p_constraint_name = 'BEN_EXT_DATA_ELMT_IN_RCD_FK2') Then
92: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
93: fnd_message.set_token('PROCEDURE', l_proc);
86: If (p_constraint_name = 'BEN_EXT_RCD_IN_FILE_FK1') Then
87: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
88: fnd_message.set_token('PROCEDURE', l_proc);
89: fnd_message.set_token('STEP','5');
90: fnd_message.raise_error;
91: ElsIf (p_constraint_name = 'BEN_EXT_DATA_ELMT_IN_RCD_FK2') Then
92: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
93: fnd_message.set_token('PROCEDURE', l_proc);
94: fnd_message.set_token('STEP','10');
88: fnd_message.set_token('PROCEDURE', l_proc);
89: fnd_message.set_token('STEP','5');
90: fnd_message.raise_error;
91: ElsIf (p_constraint_name = 'BEN_EXT_DATA_ELMT_IN_RCD_FK2') Then
92: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
93: fnd_message.set_token('PROCEDURE', l_proc);
94: fnd_message.set_token('STEP','10');
95: fnd_message.raise_error;
96: ElsIf (p_constraint_name = 'BEN_EXT_DATA_ELMT_IN_RCD_FK3') Then
89: fnd_message.set_token('STEP','5');
90: fnd_message.raise_error;
91: ElsIf (p_constraint_name = 'BEN_EXT_DATA_ELMT_IN_RCD_FK2') Then
92: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
93: fnd_message.set_token('PROCEDURE', l_proc);
94: fnd_message.set_token('STEP','10');
95: fnd_message.raise_error;
96: ElsIf (p_constraint_name = 'BEN_EXT_DATA_ELMT_IN_RCD_FK3') Then
97: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
90: fnd_message.raise_error;
91: ElsIf (p_constraint_name = 'BEN_EXT_DATA_ELMT_IN_RCD_FK2') Then
92: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
93: fnd_message.set_token('PROCEDURE', l_proc);
94: fnd_message.set_token('STEP','10');
95: fnd_message.raise_error;
96: ElsIf (p_constraint_name = 'BEN_EXT_DATA_ELMT_IN_RCD_FK3') Then
97: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
98: fnd_message.set_token('PROCEDURE', l_proc);
91: ElsIf (p_constraint_name = 'BEN_EXT_DATA_ELMT_IN_RCD_FK2') Then
92: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
93: fnd_message.set_token('PROCEDURE', l_proc);
94: fnd_message.set_token('STEP','10');
95: fnd_message.raise_error;
96: ElsIf (p_constraint_name = 'BEN_EXT_DATA_ELMT_IN_RCD_FK3') Then
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','15');
93: fnd_message.set_token('PROCEDURE', l_proc);
94: fnd_message.set_token('STEP','10');
95: fnd_message.raise_error;
96: ElsIf (p_constraint_name = 'BEN_EXT_DATA_ELMT_IN_RCD_FK3') Then
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','15');
100: fnd_message.raise_error;
101: ElsIf (p_constraint_name = 'BEN_EXT_DATA_ELMT_IN_RCD_PK') Then
94: fnd_message.set_token('STEP','10');
95: fnd_message.raise_error;
96: ElsIf (p_constraint_name = 'BEN_EXT_DATA_ELMT_IN_RCD_FK3') Then
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','15');
100: fnd_message.raise_error;
101: ElsIf (p_constraint_name = 'BEN_EXT_DATA_ELMT_IN_RCD_PK') Then
102: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
95: fnd_message.raise_error;
96: ElsIf (p_constraint_name = 'BEN_EXT_DATA_ELMT_IN_RCD_FK3') Then
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','15');
100: fnd_message.raise_error;
101: ElsIf (p_constraint_name = 'BEN_EXT_DATA_ELMT_IN_RCD_PK') Then
102: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
103: fnd_message.set_token('PROCEDURE', l_proc);
96: ElsIf (p_constraint_name = 'BEN_EXT_DATA_ELMT_IN_RCD_FK3') Then
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','15');
100: fnd_message.raise_error;
101: ElsIf (p_constraint_name = 'BEN_EXT_DATA_ELMT_IN_RCD_PK') Then
102: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
103: fnd_message.set_token('PROCEDURE', l_proc);
104: fnd_message.set_token('STEP','20');
98: fnd_message.set_token('PROCEDURE', l_proc);
99: fnd_message.set_token('STEP','15');
100: fnd_message.raise_error;
101: ElsIf (p_constraint_name = 'BEN_EXT_DATA_ELMT_IN_RCD_PK') Then
102: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
103: fnd_message.set_token('PROCEDURE', l_proc);
104: fnd_message.set_token('STEP','20');
105: fnd_message.raise_error;
106: ElsIf (p_constraint_name = 'BEN_EXT_INCL_CHG_FK1') Then
99: fnd_message.set_token('STEP','15');
100: fnd_message.raise_error;
101: ElsIf (p_constraint_name = 'BEN_EXT_DATA_ELMT_IN_RCD_PK') Then
102: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
103: fnd_message.set_token('PROCEDURE', l_proc);
104: fnd_message.set_token('STEP','20');
105: fnd_message.raise_error;
106: ElsIf (p_constraint_name = 'BEN_EXT_INCL_CHG_FK1') Then
107: ben_utility.child_exists_error(p_table_name => 'BEN_EXT_INCL_CHG');
100: fnd_message.raise_error;
101: ElsIf (p_constraint_name = 'BEN_EXT_DATA_ELMT_IN_RCD_PK') Then
102: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
103: fnd_message.set_token('PROCEDURE', l_proc);
104: fnd_message.set_token('STEP','20');
105: fnd_message.raise_error;
106: ElsIf (p_constraint_name = 'BEN_EXT_INCL_CHG_FK1') Then
107: ben_utility.child_exists_error(p_table_name => 'BEN_EXT_INCL_CHG');
108: ElsIf (p_constraint_name = 'BEN_EXT_WHERE_CLAUSE_FK3') Then
101: ElsIf (p_constraint_name = 'BEN_EXT_DATA_ELMT_IN_RCD_PK') Then
102: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
103: fnd_message.set_token('PROCEDURE', l_proc);
104: fnd_message.set_token('STEP','20');
105: fnd_message.raise_error;
106: ElsIf (p_constraint_name = 'BEN_EXT_INCL_CHG_FK1') Then
107: ben_utility.child_exists_error(p_table_name => 'BEN_EXT_INCL_CHG');
108: ElsIf (p_constraint_name = 'BEN_EXT_WHERE_CLAUSE_FK3') Then
109: fnd_message.set_name('BEN', 'BEN_92479_XWC_EXISTS');
105: fnd_message.raise_error;
106: ElsIf (p_constraint_name = 'BEN_EXT_INCL_CHG_FK1') Then
107: ben_utility.child_exists_error(p_table_name => 'BEN_EXT_INCL_CHG');
108: ElsIf (p_constraint_name = 'BEN_EXT_WHERE_CLAUSE_FK3') Then
109: fnd_message.set_name('BEN', 'BEN_92479_XWC_EXISTS');
110: fnd_message.raise_error;
111: ElsIf (p_constraint_name = 'BEN_EXT_RCD_IN_FILE_FK4') Then
112: open c1;
113: fetch c1 into l_name;
106: ElsIf (p_constraint_name = 'BEN_EXT_INCL_CHG_FK1') Then
107: ben_utility.child_exists_error(p_table_name => 'BEN_EXT_INCL_CHG');
108: ElsIf (p_constraint_name = 'BEN_EXT_WHERE_CLAUSE_FK3') Then
109: fnd_message.set_name('BEN', 'BEN_92479_XWC_EXISTS');
110: fnd_message.raise_error;
111: ElsIf (p_constraint_name = 'BEN_EXT_RCD_IN_FILE_FK4') Then
112: open c1;
113: fetch c1 into l_name;
114: close c1;
111: ElsIf (p_constraint_name = 'BEN_EXT_RCD_IN_FILE_FK4') Then
112: open c1;
113: fetch c1 into l_name;
114: close c1;
115: fnd_message.set_name('BEN', 'BEN_92478_ELMT_REF_IN_SORT');
116: fnd_message.set_token('FILE_NAME', l_name);
117: fnd_message.raise_error;
118: ElsIf (p_constraint_name = 'BEN_EXT_RCD_IN_FILE_FK5') Then
119: open c2;
112: open c1;
113: fetch c1 into l_name;
114: close c1;
115: fnd_message.set_name('BEN', 'BEN_92478_ELMT_REF_IN_SORT');
116: fnd_message.set_token('FILE_NAME', l_name);
117: fnd_message.raise_error;
118: ElsIf (p_constraint_name = 'BEN_EXT_RCD_IN_FILE_FK5') Then
119: open c2;
120: fetch c2 into l_name;
113: fetch c1 into l_name;
114: close c1;
115: fnd_message.set_name('BEN', 'BEN_92478_ELMT_REF_IN_SORT');
116: fnd_message.set_token('FILE_NAME', l_name);
117: fnd_message.raise_error;
118: ElsIf (p_constraint_name = 'BEN_EXT_RCD_IN_FILE_FK5') Then
119: open c2;
120: fetch c2 into l_name;
121: close c2;
118: ElsIf (p_constraint_name = 'BEN_EXT_RCD_IN_FILE_FK5') Then
119: open c2;
120: fetch c2 into l_name;
121: close c2;
122: fnd_message.set_name('BEN', 'BEN_92478_ELMT_REF_IN_SORT');
123: fnd_message.set_token('FILE_NAME', l_name);
124: fnd_message.raise_error;
125: ElsIf (p_constraint_name = 'BEN_EXT_RCD_IN_FILE_FK6') Then
126: open c3;
119: open c2;
120: fetch c2 into l_name;
121: close c2;
122: fnd_message.set_name('BEN', 'BEN_92478_ELMT_REF_IN_SORT');
123: fnd_message.set_token('FILE_NAME', l_name);
124: fnd_message.raise_error;
125: ElsIf (p_constraint_name = 'BEN_EXT_RCD_IN_FILE_FK6') Then
126: open c3;
127: fetch c3 into l_name;
120: fetch c2 into l_name;
121: close c2;
122: fnd_message.set_name('BEN', 'BEN_92478_ELMT_REF_IN_SORT');
123: fnd_message.set_token('FILE_NAME', l_name);
124: fnd_message.raise_error;
125: ElsIf (p_constraint_name = 'BEN_EXT_RCD_IN_FILE_FK6') Then
126: open c3;
127: fetch c3 into l_name;
128: close c3;
125: ElsIf (p_constraint_name = 'BEN_EXT_RCD_IN_FILE_FK6') Then
126: open c3;
127: fetch c3 into l_name;
128: close c3;
129: fnd_message.set_name('BEN', 'BEN_92478_ELMT_REF_IN_SORT');
130: fnd_message.set_token('FILE_NAME', l_name);
131: fnd_message.raise_error;
132: ElsIf (p_constraint_name = 'BEN_EXT_RCD_IN_FILE_FK7') Then
133: open c4;
126: open c3;
127: fetch c3 into l_name;
128: close c3;
129: fnd_message.set_name('BEN', 'BEN_92478_ELMT_REF_IN_SORT');
130: fnd_message.set_token('FILE_NAME', l_name);
131: fnd_message.raise_error;
132: ElsIf (p_constraint_name = 'BEN_EXT_RCD_IN_FILE_FK7') Then
133: open c4;
134: fetch c4 into l_name;
127: fetch c3 into l_name;
128: close c3;
129: fnd_message.set_name('BEN', 'BEN_92478_ELMT_REF_IN_SORT');
130: fnd_message.set_token('FILE_NAME', l_name);
131: fnd_message.raise_error;
132: ElsIf (p_constraint_name = 'BEN_EXT_RCD_IN_FILE_FK7') Then
133: open c4;
134: fetch c4 into l_name;
135: close c4;
132: ElsIf (p_constraint_name = 'BEN_EXT_RCD_IN_FILE_FK7') Then
133: open c4;
134: fetch c4 into l_name;
135: close c4;
136: fnd_message.set_name('BEN', 'BEN_92478_ELMT_REF_IN_SORT');
137: fnd_message.set_token('FILE_NAME', l_name);
138: fnd_message.raise_error;
139: ElsIf (p_constraint_name = 'BEN_EXT_WHERE_CLAUSE_FK6') Then
140: open c5;
133: open c4;
134: fetch c4 into l_name;
135: close c4;
136: fnd_message.set_name('BEN', 'BEN_92478_ELMT_REF_IN_SORT');
137: fnd_message.set_token('FILE_NAME', l_name);
138: fnd_message.raise_error;
139: ElsIf (p_constraint_name = 'BEN_EXT_WHERE_CLAUSE_FK6') Then
140: open c5;
141: fetch c5 into l_name;
134: fetch c4 into l_name;
135: close c4;
136: fnd_message.set_name('BEN', 'BEN_92478_ELMT_REF_IN_SORT');
137: fnd_message.set_token('FILE_NAME', l_name);
138: fnd_message.raise_error;
139: ElsIf (p_constraint_name = 'BEN_EXT_WHERE_CLAUSE_FK6') Then
140: open c5;
141: fetch c5 into l_name;
142: if c5%found then
140: open c5;
141: fetch c5 into l_name;
142: if c5%found then
143: close c5;
144: fnd_message.set_name('BEN', 'BEN_92480_XWC_EXISTS2');
145: fnd_message.set_token('FILE_NAME', l_name);
146: fnd_message.raise_error;
147: else
148: close c5;
141: fetch c5 into l_name;
142: if c5%found then
143: close c5;
144: fnd_message.set_name('BEN', 'BEN_92480_XWC_EXISTS2');
145: fnd_message.set_token('FILE_NAME', l_name);
146: fnd_message.raise_error;
147: else
148: close c5;
149: fnd_message.set_name('BEN', 'BEN_92479_XWC_EXISTS');
142: if c5%found then
143: close c5;
144: fnd_message.set_name('BEN', 'BEN_92480_XWC_EXISTS2');
145: fnd_message.set_token('FILE_NAME', l_name);
146: fnd_message.raise_error;
147: else
148: close c5;
149: fnd_message.set_name('BEN', 'BEN_92479_XWC_EXISTS');
150: fnd_message.raise_error;
145: fnd_message.set_token('FILE_NAME', l_name);
146: fnd_message.raise_error;
147: else
148: close c5;
149: fnd_message.set_name('BEN', 'BEN_92479_XWC_EXISTS');
150: fnd_message.raise_error;
151: end if;
152: Else
153: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
146: fnd_message.raise_error;
147: else
148: close c5;
149: fnd_message.set_name('BEN', 'BEN_92479_XWC_EXISTS');
150: fnd_message.raise_error;
151: end if;
152: Else
153: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
154: fnd_message.set_token('PROCEDURE', l_proc);
149: fnd_message.set_name('BEN', 'BEN_92479_XWC_EXISTS');
150: fnd_message.raise_error;
151: end if;
152: Else
153: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
154: fnd_message.set_token('PROCEDURE', l_proc);
155: fnd_message.set_token('CONSTRAINT_NAME', p_constraint_name);
156: fnd_message.raise_error;
157: End If;
150: fnd_message.raise_error;
151: end if;
152: Else
153: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
154: fnd_message.set_token('PROCEDURE', l_proc);
155: fnd_message.set_token('CONSTRAINT_NAME', p_constraint_name);
156: fnd_message.raise_error;
157: End If;
158: --
151: end if;
152: Else
153: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
154: fnd_message.set_token('PROCEDURE', l_proc);
155: fnd_message.set_token('CONSTRAINT_NAME', p_constraint_name);
156: fnd_message.raise_error;
157: End If;
158: --
159: hr_utility.set_location(' Leaving:'||l_proc, 10);
152: Else
153: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
154: fnd_message.set_token('PROCEDURE', l_proc);
155: fnd_message.set_token('CONSTRAINT_NAME', p_constraint_name);
156: fnd_message.raise_error;
157: End If;
158: --
159: hr_utility.set_location(' Leaving:'||l_proc, 10);
160: End constraint_error;
230: Close C_Sel1;
231: --
232: -- The primary key is invalid therefore we must error
233: --
234: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
235: fnd_message.raise_error;
236: End If;
237: Close C_Sel1;
238: If (p_object_version_number <> g_old_rec.object_version_number) Then
231: --
232: -- The primary key is invalid therefore we must error
233: --
234: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
235: fnd_message.raise_error;
236: End If;
237: Close C_Sel1;
238: If (p_object_version_number <> g_old_rec.object_version_number) Then
239: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
235: fnd_message.raise_error;
236: End If;
237: Close C_Sel1;
238: If (p_object_version_number <> g_old_rec.object_version_number) Then
239: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
240: fnd_message.raise_error;
241: End If;
242: hr_utility.set_location(l_proc, 15);
243: l_fct_ret := true;
236: End If;
237: Close C_Sel1;
238: If (p_object_version_number <> g_old_rec.object_version_number) Then
239: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
240: fnd_message.raise_error;
241: End If;
242: hr_utility.set_location(l_proc, 15);
243: l_fct_ret := true;
244: End If;
300: Close C_Sel1;
301: --
302: -- The primary key is invalid therefore we must error
303: --
304: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
305: fnd_message.raise_error;
306: End If;
307: Close C_Sel1;
308: If (p_object_version_number <> g_old_rec.object_version_number) Then
301: --
302: -- The primary key is invalid therefore we must error
303: --
304: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
305: fnd_message.raise_error;
306: End If;
307: Close C_Sel1;
308: If (p_object_version_number <> g_old_rec.object_version_number) Then
309: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
305: fnd_message.raise_error;
306: End If;
307: Close C_Sel1;
308: If (p_object_version_number <> g_old_rec.object_version_number) Then
309: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
310: fnd_message.raise_error;
311: End If;
312: --
313: hr_utility.set_location(' Leaving:'||l_proc, 10);
306: End If;
307: Close C_Sel1;
308: If (p_object_version_number <> g_old_rec.object_version_number) Then
309: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
310: fnd_message.raise_error;
311: End If;
312: --
313: hr_utility.set_location(' Leaving:'||l_proc, 10);
314: --
319: --
320: -- The object is locked therefore we need to supply a meaningful
321: -- error message.
322: --
323: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
324: fnd_message.set_token('TABLE_NAME', 'ben_ext_data_elmt_in_rcd');
325: fnd_message.raise_error;
326: End lck;
327: --
320: -- The object is locked therefore we need to supply a meaningful
321: -- error message.
322: --
323: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
324: fnd_message.set_token('TABLE_NAME', 'ben_ext_data_elmt_in_rcd');
325: fnd_message.raise_error;
326: End lck;
327: --
328: -- ----------------------------------------------------------------------------
321: -- error message.
322: --
323: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
324: fnd_message.set_token('TABLE_NAME', 'ben_ext_data_elmt_in_rcd');
325: fnd_message.raise_error;
326: End lck;
327: --
328: -- ----------------------------------------------------------------------------
329: -- |-----------------------------< convert_args >-----------------------------|