39: Begin
40: hr_utility.set_location('Entering:'||l_proc, 5);
41: --
42: If (p_constraint_name = 'BEN_EXT_FILE_FK1') 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','5');
46: fnd_message.raise_error;
47: ElsIf (p_constraint_name = 'BEN_EXT_FILE_PK') Then
40: hr_utility.set_location('Entering:'||l_proc, 5);
41: --
42: If (p_constraint_name = 'BEN_EXT_FILE_FK1') 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','5');
46: fnd_message.raise_error;
47: ElsIf (p_constraint_name = 'BEN_EXT_FILE_PK') Then
48: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
41: --
42: If (p_constraint_name = 'BEN_EXT_FILE_FK1') 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','5');
46: fnd_message.raise_error;
47: ElsIf (p_constraint_name = 'BEN_EXT_FILE_PK') Then
48: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
49: fnd_message.set_token('PROCEDURE', l_proc);
42: If (p_constraint_name = 'BEN_EXT_FILE_FK1') 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','5');
46: fnd_message.raise_error;
47: ElsIf (p_constraint_name = 'BEN_EXT_FILE_PK') 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','10');
44: fnd_message.set_token('PROCEDURE', l_proc);
45: fnd_message.set_token('STEP','5');
46: fnd_message.raise_error;
47: ElsIf (p_constraint_name = 'BEN_EXT_FILE_PK') 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','10');
51: fnd_message.raise_error;
52: ElsIf (p_constraint_name = 'BEN_EXT_RCD_IN_FILE_FK1') Then
45: fnd_message.set_token('STEP','5');
46: fnd_message.raise_error;
47: ElsIf (p_constraint_name = 'BEN_EXT_FILE_PK') 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','10');
51: fnd_message.raise_error;
52: ElsIf (p_constraint_name = 'BEN_EXT_RCD_IN_FILE_FK1') Then
53: fnd_message.set_name('BEN', 'BEN_92485_XRF_EXISTS2');
46: fnd_message.raise_error;
47: ElsIf (p_constraint_name = 'BEN_EXT_FILE_PK') 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','10');
51: fnd_message.raise_error;
52: ElsIf (p_constraint_name = 'BEN_EXT_RCD_IN_FILE_FK1') Then
53: fnd_message.set_name('BEN', 'BEN_92485_XRF_EXISTS2');
54: fnd_message.raise_error;
47: ElsIf (p_constraint_name = 'BEN_EXT_FILE_PK') 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','10');
51: fnd_message.raise_error;
52: ElsIf (p_constraint_name = 'BEN_EXT_RCD_IN_FILE_FK1') Then
53: fnd_message.set_name('BEN', 'BEN_92485_XRF_EXISTS2');
54: fnd_message.raise_error;
55: ElsIf (p_constraint_name = 'BEN_EXT_DFN_FK2') Then
49: fnd_message.set_token('PROCEDURE', l_proc);
50: fnd_message.set_token('STEP','10');
51: fnd_message.raise_error;
52: ElsIf (p_constraint_name = 'BEN_EXT_RCD_IN_FILE_FK1') Then
53: fnd_message.set_name('BEN', 'BEN_92485_XRF_EXISTS2');
54: fnd_message.raise_error;
55: ElsIf (p_constraint_name = 'BEN_EXT_DFN_FK2') Then
56: open c1;
57: fetch c1 into l_name;
50: fnd_message.set_token('STEP','10');
51: fnd_message.raise_error;
52: ElsIf (p_constraint_name = 'BEN_EXT_RCD_IN_FILE_FK1') Then
53: fnd_message.set_name('BEN', 'BEN_92485_XRF_EXISTS2');
54: fnd_message.raise_error;
55: ElsIf (p_constraint_name = 'BEN_EXT_DFN_FK2') Then
56: open c1;
57: fetch c1 into l_name;
58: close c1;
55: ElsIf (p_constraint_name = 'BEN_EXT_DFN_FK2') Then
56: open c1;
57: fetch c1 into l_name;
58: close c1;
59: fnd_message.set_name('BEN', 'BEN_92484_XDF_EXISTS');
60: fnd_message.set_token('EXT_NAME', l_name);
61: fnd_message.raise_error;
62: Else
63: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
56: open c1;
57: fetch c1 into l_name;
58: close c1;
59: fnd_message.set_name('BEN', 'BEN_92484_XDF_EXISTS');
60: fnd_message.set_token('EXT_NAME', l_name);
61: fnd_message.raise_error;
62: Else
63: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
64: fnd_message.set_token('PROCEDURE', l_proc);
57: fetch c1 into l_name;
58: close c1;
59: fnd_message.set_name('BEN', 'BEN_92484_XDF_EXISTS');
60: fnd_message.set_token('EXT_NAME', l_name);
61: fnd_message.raise_error;
62: Else
63: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
64: fnd_message.set_token('PROCEDURE', l_proc);
65: fnd_message.set_token('CONSTRAINT_NAME', p_constraint_name);
59: fnd_message.set_name('BEN', 'BEN_92484_XDF_EXISTS');
60: fnd_message.set_token('EXT_NAME', l_name);
61: fnd_message.raise_error;
62: Else
63: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
64: fnd_message.set_token('PROCEDURE', l_proc);
65: fnd_message.set_token('CONSTRAINT_NAME', p_constraint_name);
66: fnd_message.raise_error;
67: End If;
60: fnd_message.set_token('EXT_NAME', l_name);
61: fnd_message.raise_error;
62: Else
63: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
64: fnd_message.set_token('PROCEDURE', l_proc);
65: fnd_message.set_token('CONSTRAINT_NAME', p_constraint_name);
66: fnd_message.raise_error;
67: End If;
68: --
61: fnd_message.raise_error;
62: Else
63: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
64: fnd_message.set_token('PROCEDURE', l_proc);
65: fnd_message.set_token('CONSTRAINT_NAME', p_constraint_name);
66: fnd_message.raise_error;
67: End If;
68: --
69: hr_utility.set_location(' Leaving:'||l_proc, 10);
62: Else
63: fnd_message.set_name('PAY', 'HR_7877_API_INVALID_CONSTRAINT');
64: fnd_message.set_token('PROCEDURE', l_proc);
65: fnd_message.set_token('CONSTRAINT_NAME', p_constraint_name);
66: fnd_message.raise_error;
67: End If;
68: --
69: hr_utility.set_location(' Leaving:'||l_proc, 10);
70: End constraint_error;
167: Close C_Sel1;
168: --
169: -- The primary key is invalid therefore we must error
170: --
171: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
172: fnd_message.raise_error;
173: End If;
174: Close C_Sel1;
175: If (p_object_version_number <> g_old_rec.object_version_number) Then
168: --
169: -- The primary key is invalid therefore we must error
170: --
171: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
172: fnd_message.raise_error;
173: End If;
174: Close C_Sel1;
175: If (p_object_version_number <> g_old_rec.object_version_number) Then
176: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
172: fnd_message.raise_error;
173: End If;
174: Close C_Sel1;
175: If (p_object_version_number <> g_old_rec.object_version_number) Then
176: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
177: fnd_message.raise_error;
178: End If;
179: hr_utility.set_location(l_proc, 15);
180: l_fct_ret := true;
173: End If;
174: Close C_Sel1;
175: If (p_object_version_number <> g_old_rec.object_version_number) Then
176: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
177: fnd_message.raise_error;
178: End If;
179: hr_utility.set_location(l_proc, 15);
180: l_fct_ret := true;
181: End If;
264: Close C_Sel1;
265: --
266: -- The primary key is invalid therefore we must error
267: --
268: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
269: fnd_message.raise_error;
270: End If;
271: Close C_Sel1;
272: If (p_object_version_number <> g_old_rec.object_version_number) Then
265: --
266: -- The primary key is invalid therefore we must error
267: --
268: fnd_message.set_name('PAY', 'HR_7220_INVALID_PRIMARY_KEY');
269: fnd_message.raise_error;
270: End If;
271: Close C_Sel1;
272: If (p_object_version_number <> g_old_rec.object_version_number) Then
273: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
269: fnd_message.raise_error;
270: End If;
271: Close C_Sel1;
272: If (p_object_version_number <> g_old_rec.object_version_number) Then
273: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
274: fnd_message.raise_error;
275: End If;
276: --
277: hr_utility.set_location(' Leaving:'||l_proc, 10);
270: End If;
271: Close C_Sel1;
272: If (p_object_version_number <> g_old_rec.object_version_number) Then
273: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
274: fnd_message.raise_error;
275: End If;
276: --
277: hr_utility.set_location(' Leaving:'||l_proc, 10);
278: --
283: --
284: -- The object is locked therefore we need to supply a meaningful
285: -- error message.
286: --
287: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
288: fnd_message.set_token('TABLE_NAME', 'ben_ext_file');
289: fnd_message.raise_error;
290: End lck;
291: --
284: -- The object is locked therefore we need to supply a meaningful
285: -- error message.
286: --
287: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
288: fnd_message.set_token('TABLE_NAME', 'ben_ext_file');
289: fnd_message.raise_error;
290: End lck;
291: --
292: -- ----------------------------------------------------------------------------
285: -- error message.
286: --
287: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
288: fnd_message.set_token('TABLE_NAME', 'ben_ext_file');
289: fnd_message.raise_error;
290: End lck;
291: --
292: -- ----------------------------------------------------------------------------
293: -- |-----------------------------< convert_args >-----------------------------|