1: Package Body hxc_dru_bus as
2: /* $Header: hxcdrurhi.pkb 120.2 2005/09/23 08:07:21 sechandr noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
6: -- ----------------------------------------------------------------------------
7: --
8: g_package varchar2(33) := ' hxc_dru_bus.'; -- Global package name
9: g_debug boolean :=hr_utility.debug_enabled;
10: --
11: -- The following two global variables are only to be
12: -- used by the return_legislation_code function.
128: ,p_argument => 'data_app_rule_usage_id'
129: ,p_argument_value => p_data_app_rule_usage_id
130: );
131: --
132: if ( nvl(hxc_dru_bus.g_data_app_rule_usage_id, hr_api.g_number)
133: = p_data_app_rule_usage_id) then
134: --
135: -- The legislation code has already been found with a previous
136: -- call to this function. Just return the value in the global
135: -- The legislation code has already been found with a previous
136: -- call to this function. Just return the value in the global
137: -- variable.
138: --
139: l_legislation_code := hxc_dru_bus.g_legislation_code;
140: if g_debug then
141: hr_utility.set_location(l_proc, 20);
142: end if;
143: else
163: -- Set the global variables so the values are
164: -- available for the next call to this function.
165: --
166: close csr_leg_code;
167: hxc_dru_bus.g_data_app_rule_usage_id := p_data_app_rule_usage_id;
168: hxc_dru_bus.g_legislation_code := l_legislation_code;
169: end if;
170: if g_debug then
171: hr_utility.set_location(' Leaving:'|| l_proc, 40);
164: -- available for the next call to this function.
165: --
166: close csr_leg_code;
167: hxc_dru_bus.g_data_app_rule_usage_id := p_data_app_rule_usage_id;
168: hxc_dru_bus.g_legislation_code := l_legislation_code;
169: end if;
170: if g_debug then
171: hr_utility.set_location(' Leaving:'|| l_proc, 40);
172: end if;
431: hr_utility.set_location(' Leaving:'||l_proc, 10);
432: end if;
433: End delete_validate;
434: --
435: end hxc_dru_bus;