1: Package Body per_cnt_bus as
2: /* $Header: pecntrhi.pkb 120.1 2005/11/03 15:07 dgarg noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
6: -- ----------------------------------------------------------------------------
7: --
8: g_package varchar2(33) := ' per_cnt_bus.'; -- Global package name
9: --
10: -- The following two global variables are only to be
11: -- used by the return_legislation_code function.
12: --
135: ,p_argument_value => p_configuration_code
136: );
137: --
138: --
139: if (( nvl(per_cnt_bus.g_configuration_code, hr_api.g_varchar2)
140: = p_configuration_code)
141: and ( nvl(per_cnt_bus.g_language, hr_api.g_varchar2)
142: = p_language)) then
143: --
137: --
138: --
139: if (( nvl(per_cnt_bus.g_configuration_code, hr_api.g_varchar2)
140: = p_configuration_code)
141: and ( nvl(per_cnt_bus.g_language, hr_api.g_varchar2)
142: = p_language)) then
143: --
144: -- The legislation code has already been found with a previous
145: -- call to this function. Just return the value in the global
144: -- The legislation code has already been found with a previous
145: -- call to this function. Just return the value in the global
146: -- variable.
147: --
148: l_legislation_code := per_cnt_bus.g_legislation_code;
149: hr_utility.set_location(l_proc, 20);
150: else
151: --
152: -- The ID is different to the last call to this function
168: -- Set the global variables so the values are
169: -- available for the next call to this function.
170: --
171: close csr_leg_code;
172: per_cnt_bus.g_configuration_code := p_configuration_code;
173: per_cnt_bus.g_language := p_language;
174: per_cnt_bus.g_legislation_code := l_legislation_code;
175: end if;
176: hr_utility.set_location(' Leaving:'|| l_proc, 40);
169: -- available for the next call to this function.
170: --
171: close csr_leg_code;
172: per_cnt_bus.g_configuration_code := p_configuration_code;
173: per_cnt_bus.g_language := p_language;
174: per_cnt_bus.g_legislation_code := l_legislation_code;
175: end if;
176: hr_utility.set_location(' Leaving:'|| l_proc, 40);
177: return l_legislation_code;
170: --
171: close csr_leg_code;
172: per_cnt_bus.g_configuration_code := p_configuration_code;
173: per_cnt_bus.g_language := p_language;
174: per_cnt_bus.g_legislation_code := l_legislation_code;
175: end if;
176: hr_utility.set_location(' Leaving:'|| l_proc, 40);
177: return l_legislation_code;
178: end return_legislation_code;
310: --
311: hr_utility.set_location(' Leaving:'||l_proc, 10);
312: End delete_validate;
313: --
314: end per_cnt_bus;