1: Package Body per_pji_bus as
2: /* $Header: pepjirhi.pkb 115.8 2002/12/03 15:41:52 eumenyio ship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
6: -- ----------------------------------------------------------------------------
7: --
8: g_package varchar2(33) := ' per_pji_bus.'; -- Global package name
9: --
10: -- The following two global variables are only to be
11: -- used by the return_legislation_code function.
12: --
264: ,p_argument => 'previous_job_extra_info_id'
265: ,p_argument_value => p_previous_job_extra_info_id
266: );
267: --
268: if ( nvl(per_pji_bus.g_previous_job_extra_info_id, hr_api.g_number)
269: = p_previous_job_extra_info_id) then
270: --
271: -- The legislation code has already been found with a previous
272: -- call to this function. Just return the value in the global
271: -- The legislation code has already been found with a previous
272: -- call to this function. Just return the value in the global
273: -- variable.
274: --
275: l_legislation_code := per_pji_bus.g_legislation_code;
276: hr_utility.set_location(l_proc, 20);
277: else
278: --
279: -- The ID is different to the last call to this function
295: -- Set the global variables so the values are
296: -- available for the next call to this function.
297: --
298: close csr_leg_code;
299: per_pji_bus.g_previous_job_extra_info_id := p_previous_job_extra_info_id;
300: per_pji_bus.g_legislation_code := l_legislation_code;
301: end if;
302: hr_utility.set_location(' Leaving:'|| l_proc, 40);
303: return l_legislation_code;
296: -- available for the next call to this function.
297: --
298: close csr_leg_code;
299: per_pji_bus.g_previous_job_extra_info_id := p_previous_job_extra_info_id;
300: per_pji_bus.g_legislation_code := l_legislation_code;
301: end if;
302: hr_utility.set_location(' Leaving:'|| l_proc, 40);
303: return l_legislation_code;
304: end return_legislation_code;
766: ,p_information_type
767: => p_rec.information_type);
768: -- Call all supporting business operations
769: hr_utility.set_location(l_proc, 20);
770: per_pji_bus.chk_ddf(p_rec);
771: --
772: hr_utility.set_location(l_proc, 25);
773: per_pji_bus.chk_df(p_rec);
774: --
769: hr_utility.set_location(l_proc, 20);
770: per_pji_bus.chk_ddf(p_rec);
771: --
772: hr_utility.set_location(l_proc, 25);
773: per_pji_bus.chk_df(p_rec);
774: --
775: hr_utility.set_location(' Leaving:'||l_proc, 30);
776: End insert_validate;
777: --
812: ,p_information_type
813: => p_rec.information_type);
814: --
815: hr_utility.set_location(l_proc, 25);
816: per_pji_bus.chk_ddf(p_rec);
817: --
818: hr_utility.set_location(l_proc, 30);
819: per_pji_bus.chk_df(p_rec);
820: --
815: hr_utility.set_location(l_proc, 25);
816: per_pji_bus.chk_ddf(p_rec);
817: --
818: hr_utility.set_location(l_proc, 30);
819: per_pji_bus.chk_df(p_rec);
820: --
821: hr_utility.set_location(' Leaving:'||l_proc, 35);
822: End update_validate;
823: --
837: --
838: hr_utility.set_location(' Leaving:'||l_proc, 10);
839: End delete_validate;
840: --
841: end per_pji_bus;