1: Package Body hr_pft_bus as
2: /* $Header: hrpftrhi.pkb 120.0 2005/05/31 02:07:40 appldev noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
6: -- ----------------------------------------------------------------------------
7: --
8: g_package varchar2(33) := ' hr_pft_bus.'; -- Global package name
9: --
10: -- The following two global variables are only to be
11: -- used by the return_legislation_code function.
12: --
143: ,p_argument_value => p_position_id
144: );
145: --
146: --
147: if (( nvl(hr_pft_bus.g_position_id, hr_api.g_number)
148: = p_position_id)
149: and ( nvl(hr_pft_bus.g_language, hr_api.g_varchar2)
150: = p_language)) then
151: --
145: --
146: --
147: if (( nvl(hr_pft_bus.g_position_id, hr_api.g_number)
148: = p_position_id)
149: and ( nvl(hr_pft_bus.g_language, hr_api.g_varchar2)
150: = p_language)) then
151: --
152: -- The legislation code has already been found with a previous
153: -- call to this function. Just return the value in the global
152: -- The legislation code has already been found with a previous
153: -- call to this function. Just return the value in the global
154: -- variable.
155: --
156: l_legislation_code := hr_pft_bus.g_legislation_code;
157: hr_utility.set_location(l_proc, 20);
158: else
159: --
160: -- The ID is different to the last call to this function
176: -- Set the global variables so the values are
177: -- available for the next call to this function.
178: --
179: close csr_leg_code;
180: hr_pft_bus.g_position_id := p_position_id;
181: hr_pft_bus.g_language := p_language;
182: hr_pft_bus.g_legislation_code := l_legislation_code;
183: end if;
184: hr_utility.set_location(' Leaving:'|| l_proc, 40);
177: -- available for the next call to this function.
178: --
179: close csr_leg_code;
180: hr_pft_bus.g_position_id := p_position_id;
181: hr_pft_bus.g_language := p_language;
182: hr_pft_bus.g_legislation_code := l_legislation_code;
183: end if;
184: hr_utility.set_location(' Leaving:'|| l_proc, 40);
185: return l_legislation_code;
178: --
179: close csr_leg_code;
180: hr_pft_bus.g_position_id := p_position_id;
181: hr_pft_bus.g_language := p_language;
182: hr_pft_bus.g_legislation_code := l_legislation_code;
183: end if;
184: hr_utility.set_location(' Leaving:'|| l_proc, 40);
185: return l_legislation_code;
186: end return_legislation_code;
316: --
317: hr_utility.set_location(' Leaving:'||l_proc, 10);
318: End delete_validate;
319: --
320: end hr_pft_bus;