43: l_proc varchar2(72) := g_package||'set_security_group_id';
44: --
45: begin
46: --
47: hr_utility.set_location('Entering:'|| l_proc, 10);
48: --
49: -- Ensure that all the mandatory parameter are not null
50: --
51: hr_api.mandatory_arg_error
78: (p_security_group_id => l_security_group_id
79: );
80: end if;
81: --
82: hr_utility.set_location(' Leaving:'|| l_proc, 20);
83: --
84: end set_security_group_id;
85: --
86: -- ---------------------------------------------------------------------------
113: l_proc varchar2(72) := g_package||'return_legislation_code';
114: --
115: Begin
116: --
117: hr_utility.set_location('Entering:'|| l_proc, 10);
118: --
119: -- Ensure that all the mandatory parameter are not null
120: --
121: hr_api.mandatory_arg_error
131: -- call to this function. Just return the value in the global
132: -- variable.
133: --
134: l_legislation_code := pqh_gvn_bus.g_legislation_code;
135: hr_utility.set_location(l_proc, 20);
136: else
137: --
138: -- The ID is different to the last call to this function
139: -- or this is the first call to this function.
148: close csr_leg_code;
149: fnd_message.set_name('PAY','HR_7220_INVALID_PRIMARY_KEY');
150: fnd_message.raise_error;
151: end if;
152: hr_utility.set_location(l_proc,30);
153: --
154: -- Set the global variables so the values are
155: -- available for the next call to this function.
156: --
157: close csr_leg_code;
158: pqh_gvn_bus.g_level_number_id := p_level_number_id;
159: pqh_gvn_bus.g_legislation_code := l_legislation_code;
160: end if;
161: hr_utility.set_location(' Leaving:'|| l_proc, 40);
162: return l_legislation_code;
163: end return_legislation_code;
164: --
165: -- ----------------------------------------------------------------------------
214:
215:
216: IF nvl(p_rec.level_NUMBER, hr_api.g_varchar2) <>
217: nvl(pqh_gvn_shd.g_old_rec.level_NUMBER, hr_api.g_varchar2) THEN
218: hr_utility.set_message(8302, 'PQH_DE_NONUPD_LEVEL_NUMBER');
219: fnd_message.raise_error;
220:
221: END IF;
222: --
242:
243:
244: Begin
245:
246: hr_utility.set_location(l_proc, 10);
247: Open c_LEVEL_NUMBER;
248: Fetch c_LEVEL_NUMBER into l_LEVEL_NUMBER;
249: If c_LEVEL_NUMBER%ROWCOUNT > 0 Then
250: hr_utility.set_message(8302, 'PQH_DE_DUPVAL_LVL_NUM');
246: hr_utility.set_location(l_proc, 10);
247: Open c_LEVEL_NUMBER;
248: Fetch c_LEVEL_NUMBER into l_LEVEL_NUMBER;
249: If c_LEVEL_NUMBER%ROWCOUNT > 0 Then
250: hr_utility.set_message(8302, 'PQH_DE_DUPVAL_LVL_NUM');
251: Close c_LEVEL_NUMBER;
252: fnd_message.raise_error;
253: End If;
254: Close c_LEVEL_NUMBER;
256: when app_exception.application_exception then
257: if hr_multi_message.exception_add
258: (p_associated_column1 => 'PQH_DE_LEVEL_NUMBERS.LEVEL_NUMBER'
259: ) then
260: hr_utility.set_location(' Leaving:'||l_proc,60);
261: raise;
262: end if;
263: hr_utility.set_location(' Leaving:'||l_proc,70);
264:
259: ) then
260: hr_utility.set_location(' Leaving:'||l_proc,60);
261: raise;
262: end if;
263: hr_utility.set_location(' Leaving:'||l_proc,70);
264:
265: End Chk_Unique_LEVEL_NUMBER;
266: -- ----------------------------------------------------------------------------
267: -- |---------------------------< Chk_WRKPLC_VLDTN_LVLNUMS >-------------------|
278: Open Del;
279: Fetch Del into l_Status;
280: If Del%Found Then
281: Close Del;
282: hr_utility.set_message(8302, 'PQH_WRKPLC_LVLNUM_PRE_DEL');
283: hr_utility.raise_error;
284: End If;
285: Close Del;
286: Exception
279: Fetch Del into l_Status;
280: If Del%Found Then
281: Close Del;
282: hr_utility.set_message(8302, 'PQH_WRKPLC_LVLNUM_PRE_DEL');
283: hr_utility.raise_error;
284: End If;
285: Close Del;
286: Exception
287: when app_exception.application_exception then
287: when app_exception.application_exception then
288: if hr_multi_message.exception_add
289: (p_associated_column1 => 'PQH_DE_WRKPLC_VLDTN_LVLNUMS.LEVEL_CODE_ID'
290: ) then
291: hr_utility.set_location(' Leaving:'||l_proc,60);
292: raise;
293: end if;
294: hr_utility.set_location(' Leaving:'||l_proc,70);
295: End Chk_WRKPLC_VLDTN_LVLNUMS;
290: ) then
291: hr_utility.set_location(' Leaving:'||l_proc,60);
292: raise;
293: end if;
294: hr_utility.set_location(' Leaving:'||l_proc,70);
295: End Chk_WRKPLC_VLDTN_LVLNUMS;
296: -- ----------------------------------------------------------------------------
297: -- |---------------------------< Chk_delete >---------------------------------|
298: -- ----------------------------------------------------------------------------
309: Open Del;
310: Fetch Del into l_Status;
311: If Del%Found Then
312: Close Del;
313: hr_utility.set_message(8302, 'PQH_LEVEL_NUMBERS_PRE_DEL');
314: hr_utility.raise_error;
315: End If;
316: Close Del;
317: Exception
310: Fetch Del into l_Status;
311: If Del%Found Then
312: Close Del;
313: hr_utility.set_message(8302, 'PQH_LEVEL_NUMBERS_PRE_DEL');
314: hr_utility.raise_error;
315: End If;
316: Close Del;
317: Exception
318: when app_exception.application_exception then
318: when app_exception.application_exception then
319: if hr_multi_message.exception_add
320: (p_associated_column1 => 'PQH_DE_LEVEL_NUMBERS.LEVEL_NUMBER'
321: ) then
322: hr_utility.set_location(' Leaving:'||l_proc,60);
323: raise;
324: end if;
325: hr_utility.set_location(' Leaving:'||l_proc,70);
326: End Chk_Delete;
321: ) then
322: hr_utility.set_location(' Leaving:'||l_proc,60);
323: raise;
324: end if;
325: hr_utility.set_location(' Leaving:'||l_proc,70);
326: End Chk_Delete;
327: -- ----------------------------------------------------------------------------
328: -- |---------------------------< insert_validate >----------------------------|
329: -- ----------------------------------------------------------------------------
334: --
335: l_proc varchar2(72) := g_package||'insert_validate';
336: --
337: Begin
338: hr_utility.set_location('Entering:'||l_proc, 5);
339: --
340: -- Call all supporting business operations
341: --
342: --
351: --
352: -- Validate Dependent Attributes
353: --
354: --
355: hr_utility.set_location(' Leaving:'||l_proc, 10);
356: End insert_validate;
357: --
358: -- ----------------------------------------------------------------------------
359: -- |---------------------------< update_validate >----------------------------|
365: --
366: l_proc varchar2(72) := g_package||'update_validate';
367: --
368: Begin
369: hr_utility.set_location('Entering:'||l_proc, 5);
370: --
371: -- Call all supporting business operations
372: --
373: --
390: ,p_rec => p_rec
391: );
392: --
393: --
394: hr_utility.set_location(' Leaving:'||l_proc, 10);
395: End update_validate;
396: --
397: -- ----------------------------------------------------------------------------
398: -- |---------------------------< delete_validate >----------------------------|
403: --
404: l_proc varchar2(72) := g_package||'delete_validate';
405: --
406: Begin
407: hr_utility.set_location('Entering:'||l_proc, 5);
408: --
409: -- Call all supporting business operations
410: --
411: Chk_delete(P_Rec);
410: --
411: Chk_delete(P_Rec);
412: Chk_WRKPLC_VLDTN_LVLNUMS(P_Rec);
413:
414: hr_utility.set_location(' Leaving:'||l_proc, 10);
415: End delete_validate;
416: --
417: end pqh_gvn_bus;