15: --
16: l_proc varchar2(72) := g_package||'constraint_error';
17: --
18: Begin
19: hr_utility.set_location('Entering:'||l_proc, 5);
20: --
21: If (p_constraint_name = 'HR_API_HOOKS_CK1') Then
22: hr_utility.set_message(800, 'PER_52127_AHK_HOOK_TYPE_INV');
23: hr_utility.raise_error;
18: Begin
19: hr_utility.set_location('Entering:'||l_proc, 5);
20: --
21: If (p_constraint_name = 'HR_API_HOOKS_CK1') Then
22: hr_utility.set_message(800, 'PER_52127_AHK_HOOK_TYPE_INV');
23: hr_utility.raise_error;
24: ElsIf (p_constraint_name = 'HR_API_HOOKS_CK2') Then
25: hr_utility.set_message(800, 'PER_52133_AHK_LEG_PACK_FUN_INV');
26: hr_utility.raise_error;
19: hr_utility.set_location('Entering:'||l_proc, 5);
20: --
21: If (p_constraint_name = 'HR_API_HOOKS_CK1') Then
22: hr_utility.set_message(800, 'PER_52127_AHK_HOOK_TYPE_INV');
23: hr_utility.raise_error;
24: ElsIf (p_constraint_name = 'HR_API_HOOKS_CK2') Then
25: hr_utility.set_message(800, 'PER_52133_AHK_LEG_PACK_FUN_INV');
26: hr_utility.raise_error;
27: ElsIf (p_constraint_name = 'HR_API_HOOKS_FK1') Then
21: If (p_constraint_name = 'HR_API_HOOKS_CK1') Then
22: hr_utility.set_message(800, 'PER_52127_AHK_HOOK_TYPE_INV');
23: hr_utility.raise_error;
24: ElsIf (p_constraint_name = 'HR_API_HOOKS_CK2') Then
25: hr_utility.set_message(800, 'PER_52133_AHK_LEG_PACK_FUN_INV');
26: hr_utility.raise_error;
27: ElsIf (p_constraint_name = 'HR_API_HOOKS_FK1') Then
28: hr_utility.set_message(800, 'PER_52154_AHK_MOD_ID_INV');
29: hr_utility.raise_error;
22: hr_utility.set_message(800, 'PER_52127_AHK_HOOK_TYPE_INV');
23: hr_utility.raise_error;
24: ElsIf (p_constraint_name = 'HR_API_HOOKS_CK2') Then
25: hr_utility.set_message(800, 'PER_52133_AHK_LEG_PACK_FUN_INV');
26: hr_utility.raise_error;
27: ElsIf (p_constraint_name = 'HR_API_HOOKS_FK1') Then
28: hr_utility.set_message(800, 'PER_52154_AHK_MOD_ID_INV');
29: hr_utility.raise_error;
30: ElsIf (p_constraint_name = 'HR_API_HOOKS_PK') Then
24: ElsIf (p_constraint_name = 'HR_API_HOOKS_CK2') Then
25: hr_utility.set_message(800, 'PER_52133_AHK_LEG_PACK_FUN_INV');
26: hr_utility.raise_error;
27: ElsIf (p_constraint_name = 'HR_API_HOOKS_FK1') Then
28: hr_utility.set_message(800, 'PER_52154_AHK_MOD_ID_INV');
29: hr_utility.raise_error;
30: ElsIf (p_constraint_name = 'HR_API_HOOKS_PK') Then
31: hr_utility.set_message(800, 'HR_6153_ALL_PROCEDURE_FAIL');
32: hr_utility.set_message_token('PROCEDURE', l_proc);
25: hr_utility.set_message(800, 'PER_52133_AHK_LEG_PACK_FUN_INV');
26: hr_utility.raise_error;
27: ElsIf (p_constraint_name = 'HR_API_HOOKS_FK1') Then
28: hr_utility.set_message(800, 'PER_52154_AHK_MOD_ID_INV');
29: hr_utility.raise_error;
30: ElsIf (p_constraint_name = 'HR_API_HOOKS_PK') Then
31: hr_utility.set_message(800, 'HR_6153_ALL_PROCEDURE_FAIL');
32: hr_utility.set_message_token('PROCEDURE', l_proc);
33: hr_utility.set_message_token('STEP','20');
27: ElsIf (p_constraint_name = 'HR_API_HOOKS_FK1') Then
28: hr_utility.set_message(800, 'PER_52154_AHK_MOD_ID_INV');
29: hr_utility.raise_error;
30: ElsIf (p_constraint_name = 'HR_API_HOOKS_PK') Then
31: hr_utility.set_message(800, 'HR_6153_ALL_PROCEDURE_FAIL');
32: hr_utility.set_message_token('PROCEDURE', l_proc);
33: hr_utility.set_message_token('STEP','20');
34: hr_utility.raise_error;
35: ElsIf (p_constraint_name = 'HR_API_HOOKS_UK1') Then
28: hr_utility.set_message(800, 'PER_52154_AHK_MOD_ID_INV');
29: hr_utility.raise_error;
30: ElsIf (p_constraint_name = 'HR_API_HOOKS_PK') Then
31: hr_utility.set_message(800, 'HR_6153_ALL_PROCEDURE_FAIL');
32: hr_utility.set_message_token('PROCEDURE', l_proc);
33: hr_utility.set_message_token('STEP','20');
34: hr_utility.raise_error;
35: ElsIf (p_constraint_name = 'HR_API_HOOKS_UK1') Then
36: hr_utility.set_message(800, 'PER_52128_AHK_DUP_HOOK_TYPE');
29: hr_utility.raise_error;
30: ElsIf (p_constraint_name = 'HR_API_HOOKS_PK') Then
31: hr_utility.set_message(800, 'HR_6153_ALL_PROCEDURE_FAIL');
32: hr_utility.set_message_token('PROCEDURE', l_proc);
33: hr_utility.set_message_token('STEP','20');
34: hr_utility.raise_error;
35: ElsIf (p_constraint_name = 'HR_API_HOOKS_UK1') Then
36: hr_utility.set_message(800, 'PER_52128_AHK_DUP_HOOK_TYPE');
37: hr_utility.raise_error;
30: ElsIf (p_constraint_name = 'HR_API_HOOKS_PK') Then
31: hr_utility.set_message(800, 'HR_6153_ALL_PROCEDURE_FAIL');
32: hr_utility.set_message_token('PROCEDURE', l_proc);
33: hr_utility.set_message_token('STEP','20');
34: hr_utility.raise_error;
35: ElsIf (p_constraint_name = 'HR_API_HOOKS_UK1') Then
36: hr_utility.set_message(800, 'PER_52128_AHK_DUP_HOOK_TYPE');
37: hr_utility.raise_error;
38: ElsIf (p_constraint_name = 'HR_API_HOOKS_UK2') Then
32: hr_utility.set_message_token('PROCEDURE', l_proc);
33: hr_utility.set_message_token('STEP','20');
34: hr_utility.raise_error;
35: ElsIf (p_constraint_name = 'HR_API_HOOKS_UK1') Then
36: hr_utility.set_message(800, 'PER_52128_AHK_DUP_HOOK_TYPE');
37: hr_utility.raise_error;
38: ElsIf (p_constraint_name = 'HR_API_HOOKS_UK2') Then
39: hr_utility.set_message(800, 'PER_52130_AHK_HOOK_PROC_INV');
40: hr_utility.raise_error;
33: hr_utility.set_message_token('STEP','20');
34: hr_utility.raise_error;
35: ElsIf (p_constraint_name = 'HR_API_HOOKS_UK1') Then
36: hr_utility.set_message(800, 'PER_52128_AHK_DUP_HOOK_TYPE');
37: hr_utility.raise_error;
38: ElsIf (p_constraint_name = 'HR_API_HOOKS_UK2') Then
39: hr_utility.set_message(800, 'PER_52130_AHK_HOOK_PROC_INV');
40: hr_utility.raise_error;
41: Else
35: ElsIf (p_constraint_name = 'HR_API_HOOKS_UK1') Then
36: hr_utility.set_message(800, 'PER_52128_AHK_DUP_HOOK_TYPE');
37: hr_utility.raise_error;
38: ElsIf (p_constraint_name = 'HR_API_HOOKS_UK2') Then
39: hr_utility.set_message(800, 'PER_52130_AHK_HOOK_PROC_INV');
40: hr_utility.raise_error;
41: Else
42: hr_utility.set_message(800, 'HR_7877_API_INVALID_CONSTRAINT');
43: hr_utility.set_message_token('PROCEDURE', l_proc);
36: hr_utility.set_message(800, 'PER_52128_AHK_DUP_HOOK_TYPE');
37: hr_utility.raise_error;
38: ElsIf (p_constraint_name = 'HR_API_HOOKS_UK2') Then
39: hr_utility.set_message(800, 'PER_52130_AHK_HOOK_PROC_INV');
40: hr_utility.raise_error;
41: Else
42: hr_utility.set_message(800, 'HR_7877_API_INVALID_CONSTRAINT');
43: hr_utility.set_message_token('PROCEDURE', l_proc);
44: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
38: ElsIf (p_constraint_name = 'HR_API_HOOKS_UK2') Then
39: hr_utility.set_message(800, 'PER_52130_AHK_HOOK_PROC_INV');
40: hr_utility.raise_error;
41: Else
42: hr_utility.set_message(800, 'HR_7877_API_INVALID_CONSTRAINT');
43: hr_utility.set_message_token('PROCEDURE', l_proc);
44: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
45: hr_utility.raise_error;
46: End If;
39: hr_utility.set_message(800, 'PER_52130_AHK_HOOK_PROC_INV');
40: hr_utility.raise_error;
41: Else
42: hr_utility.set_message(800, 'HR_7877_API_INVALID_CONSTRAINT');
43: hr_utility.set_message_token('PROCEDURE', l_proc);
44: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
45: hr_utility.raise_error;
46: End If;
47: --
40: hr_utility.raise_error;
41: Else
42: hr_utility.set_message(800, 'HR_7877_API_INVALID_CONSTRAINT');
43: hr_utility.set_message_token('PROCEDURE', l_proc);
44: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
45: hr_utility.raise_error;
46: End If;
47: --
48: hr_utility.set_location(' Leaving:'||l_proc, 10);
41: Else
42: hr_utility.set_message(800, 'HR_7877_API_INVALID_CONSTRAINT');
43: hr_utility.set_message_token('PROCEDURE', l_proc);
44: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
45: hr_utility.raise_error;
46: End If;
47: --
48: hr_utility.set_location(' Leaving:'||l_proc, 10);
49: End constraint_error;
44: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
45: hr_utility.raise_error;
46: End If;
47: --
48: hr_utility.set_location(' Leaving:'||l_proc, 10);
49: End constraint_error;
50: --
51: -- ----------------------------------------------------------------------------
52: -- |-----------------------------< api_updating >-----------------------------|
76: l_proc varchar2(72) := g_package||'api_updating';
77: l_fct_ret boolean;
78: --
79: Begin
80: hr_utility.set_location('Entering:'||l_proc, 5);
81: --
82: If (
83: p_api_hook_id is null
84: ) Then
90: Else
91: If (
92: p_api_hook_id = g_old_rec.api_hook_id
93: ) Then
94: hr_utility.set_location(l_proc, 10);
95: --
96: -- The g_old_rec is current therefore we must
97: -- set the returning function to true
98: --
107: Close C_Sel1;
108: --
109: -- The primary key is invalid therefore we must error
110: --
111: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
112: hr_utility.raise_error;
113: End If;
114: Close C_Sel1;
115: --
108: --
109: -- The primary key is invalid therefore we must error
110: --
111: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
112: hr_utility.raise_error;
113: End If;
114: Close C_Sel1;
115: --
116: hr_utility.set_location(l_proc, 15);
112: hr_utility.raise_error;
113: End If;
114: Close C_Sel1;
115: --
116: hr_utility.set_location(l_proc, 15);
117: l_fct_ret := true;
118: End If;
119: End If;
120: hr_utility.set_location(' Leaving:'||l_proc, 20);
116: hr_utility.set_location(l_proc, 15);
117: l_fct_ret := true;
118: End If;
119: End If;
120: hr_utility.set_location(' Leaving:'||l_proc, 20);
121: Return (l_fct_ret);
122: --
123: End api_updating;
124: --
148: --
149: l_proc varchar2(72) := g_package||'lck';
150: --
151: Begin
152: hr_utility.set_location('Entering:'||l_proc, 5);
153: --
154: -- Add any mandatory argument checking here:
155: -- Example:
156: -- hr_api.mandatory_arg_error
164: Close C_Sel1;
165: --
166: -- The primary key is invalid therefore we must error
167: --
168: hr_utility.set_message(800, 'HR_7220_INVALID_PRIMARY_KEY');
169: hr_utility.raise_error;
170: End If;
171: Close C_Sel1;
172: --
165: --
166: -- The primary key is invalid therefore we must error
167: --
168: hr_utility.set_message(800, 'HR_7220_INVALID_PRIMARY_KEY');
169: hr_utility.raise_error;
170: End If;
171: Close C_Sel1;
172: --
173: --
170: End If;
171: Close C_Sel1;
172: --
173: --
174: hr_utility.set_location(' Leaving:'||l_proc, 10);
175: --
176: -- We need to trap the ORA LOCK exception
177: --
178: Exception
180: --
181: -- The object is locked therefore we need to supply a meaningful
182: -- error message.
183: --
184: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
185: hr_utility.set_message_token('TABLE_NAME', 'hr_api_hooks');
186: hr_utility.raise_error;
187: End lck;
188: --
181: -- The object is locked therefore we need to supply a meaningful
182: -- error message.
183: --
184: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
185: hr_utility.set_message_token('TABLE_NAME', 'hr_api_hooks');
186: hr_utility.raise_error;
187: End lck;
188: --
189: -- ----------------------------------------------------------------------------
182: -- error message.
183: --
184: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
185: hr_utility.set_message_token('TABLE_NAME', 'hr_api_hooks');
186: hr_utility.raise_error;
187: End lck;
188: --
189: -- ----------------------------------------------------------------------------
190: -- |-----------------------------< convert_args >-----------------------------|
207: l_proc varchar2(72) := g_package||'convert_args';
208: --
209: Begin
210: --
211: hr_utility.set_location('Entering:'||l_proc, 5);
212: --
213: -- Convert arguments into local l_rec structure.
214: --
215: -- mjh_webform.h3heading_createdefault('conv_arg: pkey = '||p_api_hook_id);
224: l_rec.encoded_error := p_encoded_error;
225: --
226: -- Return the plsql record structure.
227: --
228: hr_utility.set_location(' Leaving:'||l_proc, 10);
229: Return(l_rec);
230: --
231: End convert_args;
232: --