151: --
152: begin
153: g_package := 'hr_pl_contingent_worker_api.';
154: l_proc := g_package||'create_pl_cwk old';
155: hr_utility.set_location('Entering:'|| l_proc, 5);
156: --
157: -- Check that the specified business group is valid.
158: --
159: /* 4340576 Replace code with call to new overloaded procedure
162: fetch csr_bg
163: into l_legislation_code;
164: if csr_bg%notfound then
165: close csr_bg;
166: hr_utility.set_message(801, 'HR_7208_API_BUS_GRP_INVALID');
167: hr_utility.raise_error;
168: end if;
169: close csr_bg;
170: --
163: into l_legislation_code;
164: if csr_bg%notfound then
165: close csr_bg;
166: hr_utility.set_message(801, 'HR_7208_API_BUS_GRP_INVALID');
167: hr_utility.raise_error;
168: end if;
169: close csr_bg;
170: --
171: -- Check that the legislation of the specified business group is 'PL'.
170: --
171: -- Check that the legislation of the specified business group is 'PL'.
172: --
173: if l_legislation_code <> 'PL' then
174: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
175: hr_utility.set_message_token('LEG_CODE','PL');
176: hr_utility.raise_error;
177: end if;
178:
171: -- Check that the legislation of the specified business group is 'PL'.
172: --
173: if l_legislation_code <> 'PL' then
174: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
175: hr_utility.set_message_token('LEG_CODE','PL');
176: hr_utility.raise_error;
177: end if;
178:
179:
172: --
173: if l_legislation_code <> 'PL' then
174: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
175: hr_utility.set_message_token('LEG_CODE','PL');
176: hr_utility.raise_error;
177: end if;
178:
179:
180: hr_utility.set_location(l_proc, 6);
176: hr_utility.raise_error;
177: end if;
178:
179:
180: hr_utility.set_location(l_proc, 6);
181:
182:
183: --
184: -- Call the person business process
294: ,p_assignment_number =>p_assignment_number
295: ,p_name_combination_warning =>p_name_combination_warning
296: );
297: --
298: hr_utility.set_location('Leaving: '|| l_proc, 15);
299: End create_pl_cwk;
300: --
301:
302: /*New overloaded Procedure*/
419: --
420: begin
421: g_package := 'hr_pl_contingent_worker_api.';
422: l_proc := g_package||'create_pl_cwk';
423: hr_utility.set_location('Entering:'|| l_proc, 5);
424: --
425: -- Check that the specified business group is valid.
426: --
427:
430: fetch csr_bg
431: into l_legislation_code;
432: if csr_bg%notfound then
433: close csr_bg;
434: hr_utility.set_message(801, 'HR_7208_API_BUS_GRP_INVALID');
435: hr_utility.raise_error;
436: end if;
437: close csr_bg;
438: --
431: into l_legislation_code;
432: if csr_bg%notfound then
433: close csr_bg;
434: hr_utility.set_message(801, 'HR_7208_API_BUS_GRP_INVALID');
435: hr_utility.raise_error;
436: end if;
437: close csr_bg;
438: --
439: -- Check that the legislation of the specified business group is 'PL'.
438: --
439: -- Check that the legislation of the specified business group is 'PL'.
440: --
441: if l_legislation_code <> 'PL' then
442: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
443: hr_utility.set_message_token('LEG_CODE','PL');
444: hr_utility.raise_error;
445: end if;
446:
439: -- Check that the legislation of the specified business group is 'PL'.
440: --
441: if l_legislation_code <> 'PL' then
442: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
443: hr_utility.set_message_token('LEG_CODE','PL');
444: hr_utility.raise_error;
445: end if;
446:
447:
440: --
441: if l_legislation_code <> 'PL' then
442: hr_utility.set_message(801, 'HR_7961_PER_BUS_GRP_INVALID');
443: hr_utility.set_message_token('LEG_CODE','PL');
444: hr_utility.raise_error;
445: end if;
446:
447:
448: hr_utility.set_location(l_proc, 6);
444: hr_utility.raise_error;
445: end if;
446:
447:
448: hr_utility.set_location(l_proc, 6);
449:
450:
451: --
452: -- Call the person business process