37: l_proc varchar2(72) := g_package||'return_legislation_code';
38: --
39: Begin
40: --
41: hr_utility.set_location('Entering:'|| l_proc, 10);
42: --
43: -- Ensure that all the mandatory parameter are not null
44: --
45: hr_api.mandatory_arg_error
55: -- call to this function. Just return the value in the global
56: -- variable.
57: --
58: l_legislation_code := ben_eiv_bus.g_legislation_code;
59: hr_utility.set_location(l_proc, 20);
60: else
61: --
62: -- The ID is different to the last call to this function
63: -- or this is the first call to this function.
72: close csr_leg_code;
73: fnd_message.set_name('PAY','HR_7220_INVALID_PRIMARY_KEY');
74: fnd_message.raise_error;
75: end if;
76: hr_utility.set_location(l_proc,30);
77: --
78: -- Set the global variables so the values are
79: -- available for the next call to this function.
80: --
81: close csr_leg_code;
82: ben_eiv_bus.g_extra_input_value_id := p_extra_input_value_id;
83: ben_eiv_bus.g_legislation_code := l_legislation_code;
84: end if;
85: hr_utility.set_location(' Leaving:'|| l_proc, 40);
86: return l_legislation_code;
87: end return_legislation_code;
88: --
89: -- ---------------------------------------------------------------------------
125: and acty_base_rt_id = p_acty_base_rt_id
126: and input_value_id = p_input_value_id;
127: --
128: Begin
129: hr_utility.set_location('Entering:'||l_proc, 5);
130: --
131: l_api_updating := ben_eiv_shd.api_updating
132: (p_extra_input_value_id => p_extra_input_value_id,
133: p_object_version_number => p_object_version_number);
145: fnd_message.raise_error;
146: end if;
147: end if;
148: --
149: hr_utility.set_location('Leaving:'||l_proc, 15);
150: End chk_inp_val_unique;
151: --
152: -- ---------------------------------------------------------------------------
153: -- |------------------------< chk_rl_exists >----------------------------|
186: and p_effective_date between
187: effective_start_date and effective_end_date;
188: --
189: Begin
190: hr_utility.set_location('Entering:'||l_proc, 5);
191: --
192: open c1;
193: fetch c1 into l_input_va_calc_rl;
194: close c1;
198: fnd_message.set_name('BEN','BEN_93187_INP_VAL_NOT_ALLOWED');
199: fnd_message.raise_error;
200: end if;
201: --
202: hr_utility.set_location('Leaving:'||l_proc, 15);
203: End chk_rl_exists;
204: --
205: -- ----------------------------------------------------------------------------
206: -- |---------------------------< insert_validate >----------------------------|
212: --
213: l_proc varchar2(72) := g_package||'insert_validate';
214: --
215: Begin
216: hr_utility.set_location('Entering:'||l_proc, 5);
217: --
218: -- Call all supporting business operations
219: --
220: hr_api.validate_bus_grp_id
235: ,p_rec.input_value_id
236: ,p_rec.object_version_number
237: );
238: --
239: hr_utility.set_location(' Leaving:'||l_proc, 10);
240: End insert_validate;
241: --
242: -- ----------------------------------------------------------------------------
243: -- |---------------------------< update_validate >----------------------------|
249: --
250: l_proc varchar2(72) := g_package||'update_validate';
251: --
252: Begin
253: hr_utility.set_location('Entering:'||l_proc, 5);
254: --
255: -- Call all supporting business operations
256: --
257: hr_api.validate_bus_grp_id
265: ,p_rec.input_value_id
266: ,p_rec.object_version_number
267: );
268: --
269: hr_utility.set_location(' Leaving:'||l_proc, 10);
270: End update_validate;
271: --
272: -- ----------------------------------------------------------------------------
273: -- |---------------------------< delete_validate >----------------------------|
279: --
280: l_proc varchar2(72) := g_package||'delete_validate';
281: --
282: Begin
283: hr_utility.set_location('Entering:'||l_proc, 5);
284: --
285: -- Call all supporting business operations
286: --
287: hr_utility.set_location(' Leaving:'||l_proc, 10);
283: hr_utility.set_location('Entering:'||l_proc, 5);
284: --
285: -- Call all supporting business operations
286: --
287: hr_utility.set_location(' Leaving:'||l_proc, 10);
288: End delete_validate;
289: --
290: end ben_eiv_bus;