194: FROM per_business_groups pbg
195: WHERE pbg.business_group_id = p_business_group_id;
196: --
197: BEGIN
198: hr_utility.set_location('Entering:'|| l_proc, 10);
199: --
200: -- Validation IN addition to Row Handlers
201: --
202: -- Check that the specified business group is valid.
205: FETCH csr_bg
206: INTO l_legislation_code;
207: IF csr_bg%notfound THEN
208: CLOSE csr_bg;
209: hr_utility.set_message(801, 'HR_7208_API_BUS_GRP_INVALID');
210: hr_utility.raise_error;
211: END IF;
212: CLOSE csr_bg;
213: hr_utility.set_location(l_proc, 20);
206: INTO l_legislation_code;
207: IF csr_bg%notfound THEN
208: CLOSE csr_bg;
209: hr_utility.set_message(801, 'HR_7208_API_BUS_GRP_INVALID');
210: hr_utility.raise_error;
211: END IF;
212: CLOSE csr_bg;
213: hr_utility.set_location(l_proc, 20);
214: --
209: hr_utility.set_message(801, 'HR_7208_API_BUS_GRP_INVALID');
210: hr_utility.raise_error;
211: END IF;
212: CLOSE csr_bg;
213: hr_utility.set_location(l_proc, 20);
214: --
215: -- Check that the legislation of the specified business group is 'AU'.
216: --
217: IF l_legislation_code <> 'AU' THEN
214: --
215: -- Check that the legislation of the specified business group is 'AU'.
216: --
217: IF l_legislation_code <> 'AU' THEN
218: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
219: hr_utility.set_message_token('LEG_CODE','AU');
220: hr_utility.raise_error;
221: END IF;
222: hr_utility.set_location(l_proc, 30);
215: -- Check that the legislation of the specified business group is 'AU'.
216: --
217: IF l_legislation_code <> 'AU' THEN
218: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
219: hr_utility.set_message_token('LEG_CODE','AU');
220: hr_utility.raise_error;
221: END IF;
222: hr_utility.set_location(l_proc, 30);
223: --
216: --
217: IF l_legislation_code <> 'AU' THEN
218: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
219: hr_utility.set_message_token('LEG_CODE','AU');
220: hr_utility.raise_error;
221: END IF;
222: hr_utility.set_location(l_proc, 30);
223: --
224: -- Call the person business process
218: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
219: hr_utility.set_message_token('LEG_CODE','AU');
220: hr_utility.raise_error;
221: END IF;
222: hr_utility.set_location(l_proc, 30);
223: --
224: -- Call the person business process
225: --
226: hr_employee_api.create_employee
334: ,p_assign_payroll_warning => p_assign_payroll_warning
335: ,p_orig_hire_warning => p_orig_hire_warning
336: );
337: --
338: hr_utility.set_location(' Leaving:'||l_proc, 40);
339: --
340: END create_au_employee;
341:
342: /* Overloaded procedure for create_au_employee without p_orig_hire_warning parameter */
467: FROM per_business_groups pbg
468: WHERE pbg.business_group_id = p_business_group_id;
469: --
470: BEGIN
471: hr_utility.set_location('Entering:'|| l_proc, 10);
472: --
473: -- Validation IN addition to Row Handlers
474: --
475: -- Check that the specified business group is valid.
478: FETCH csr_bg
479: INTO l_legislation_code;
480: IF csr_bg%notfound THEN
481: CLOSE csr_bg;
482: hr_utility.set_message(801, 'HR_7208_API_BUS_GRP_INVALID');
483: hr_utility.raise_error;
484: END IF;
485: CLOSE csr_bg;
486: hr_utility.set_location(l_proc, 20);
479: INTO l_legislation_code;
480: IF csr_bg%notfound THEN
481: CLOSE csr_bg;
482: hr_utility.set_message(801, 'HR_7208_API_BUS_GRP_INVALID');
483: hr_utility.raise_error;
484: END IF;
485: CLOSE csr_bg;
486: hr_utility.set_location(l_proc, 20);
487: --
482: hr_utility.set_message(801, 'HR_7208_API_BUS_GRP_INVALID');
483: hr_utility.raise_error;
484: END IF;
485: CLOSE csr_bg;
486: hr_utility.set_location(l_proc, 20);
487: --
488: -- Check that the legislation of the specified business group is 'AU'.
489: --
490: IF l_legislation_code <> 'AU' THEN
487: --
488: -- Check that the legislation of the specified business group is 'AU'.
489: --
490: IF l_legislation_code <> 'AU' THEN
491: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
492: hr_utility.set_message_token('LEG_CODE','AU');
493: hr_utility.raise_error;
494: END IF;
495: hr_utility.set_location(l_proc, 30);
488: -- Check that the legislation of the specified business group is 'AU'.
489: --
490: IF l_legislation_code <> 'AU' THEN
491: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
492: hr_utility.set_message_token('LEG_CODE','AU');
493: hr_utility.raise_error;
494: END IF;
495: hr_utility.set_location(l_proc, 30);
496: --
489: --
490: IF l_legislation_code <> 'AU' THEN
491: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
492: hr_utility.set_message_token('LEG_CODE','AU');
493: hr_utility.raise_error;
494: END IF;
495: hr_utility.set_location(l_proc, 30);
496: --
497: -- Call the person business process
491: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
492: hr_utility.set_message_token('LEG_CODE','AU');
493: hr_utility.raise_error;
494: END IF;
495: hr_utility.set_location(l_proc, 30);
496: --
497: -- Call the person business process
498: --
499: hr_employee_api.create_employee
606: ,p_name_combination_warning => p_name_combination_warning
607: ,p_assign_payroll_warning => p_assign_payroll_warning
608: );
609: --
610: hr_utility.set_location(' Leaving:'||l_proc, 40);
611: --
612: END create_au_employee;
613:
614: