[Home] [Help]
41: l_legislation_code varchar2(150);
42: --
43: begin
44: --
45: hr_utility.set_location('Entering:'|| l_proc, 10);
46: --
47: -- Ensure that all the mandatory parameter are not null
48: --
49: hr_api.mandatory_arg_error
81: --
82: hr_api.set_legislation_context(l_legislation_code);
83: end if;
84: --
85: hr_utility.set_location(' Leaving:'|| l_proc, 20);
86: --
87: end set_security_group_id;
88: --
89: -- ---------------------------------------------------------------------------
112: l_proc varchar2(72) := g_package||'return_legislation_code';
113: --
114: Begin
115: --
116: hr_utility.set_location('Entering:'|| l_proc, 10);
117: --
118: -- Ensure that all the mandatory parameter are not null
119: --
120: hr_api.mandatory_arg_error
130: -- call to this function. Just return the value in the global
131: -- variable.
132: --
133: l_legislation_code := irc_aps_bus.g_legislation_code;
134: hr_utility.set_location(l_proc, 20);
135: else
136: --
137: -- The ID is different to the last call to this function
138: -- or this is the first call to this function.
147: close csr_leg_code;
148: fnd_message.set_name('PAY','HR_7220_INVALID_PRIMARY_KEY');
149: fnd_message.raise_error;
150: end if;
151: hr_utility.set_location(l_proc,30);
152: --
153: -- Set the global variables so the values are
154: -- available for the next call to this function.
155: --
156: close csr_leg_code;
157: irc_aps_bus.g_profile_snapshot_id := p_profile_snapshot_id;
158: irc_aps_bus.g_legislation_code := l_legislation_code;
159: end if;
160: hr_utility.set_location(' Leaving:'|| l_proc, 40);
161: return l_legislation_code;
162: end return_legislation_code;
163: --
164: -- ----------------------------------------------------------------------------
258: where person_id = p_person_id;
259: --
260: Begin
261: --
262: hr_utility.set_location('Entering:'|| l_proc, 10);
263: --
264: l_api_updating := irc_aps_shd.api_updating
265: (p_profile_snapshot_id => p_profile_snapshot_id
266: ,p_object_version_number => p_object_version_number
269: if ((l_api_updating and
270: nvl(irc_aps_shd.g_old_rec.person_id, hr_api.g_number) <>
271: nvl(p_person_id, hr_api.g_number)) or
272: (NOT l_api_updating)) then
273: hr_utility.set_location(l_proc, 20);
274: --
275: -- Check if p_person_id is not null
276: --
277: if p_person_id IS NOT NULL then
282: fetch person_exists into l_dummy;
283: --
284: if person_exists%notfound then
285: close person_exists;
286: hr_utility.set_location(l_proc, 30);
287: fnd_message.set_name('PER', 'IRC_412233_INV_OTA_ATTEMPT');
288: fnd_message.raise_error;
289: else
290: close person_exists;
291: end if;
292: --
293: end if;
294: end if;
295: hr_utility.set_location('Leaving: '||l_proc, 50);
296: exception
297: when app_exception.application_exception then
298: if hr_multi_message.exception_add
299: (p_associated_column1 => 'IRC_APL_PROFILE_SNAPSHOTS.PERSON_ID'
312: --
313: l_proc varchar2(72) := g_package||'insert_validate';
314: --
315: Begin
316: hr_utility.set_location('Entering:'||l_proc, 5);
317: --
318: -- Call all supporting business operations
319: --
320: --
327: ,p_profile_snapshot_id => p_rec.profile_snapshot_id
328: ,p_object_version_number => p_rec.object_version_number
329: );
330: --
331: hr_utility.set_location(' Leaving:'||l_proc, 10);
332: End insert_validate;
333: --
334: -- ----------------------------------------------------------------------------
335: -- |---------------------------< update_validate >----------------------------|
341: --
342: l_proc varchar2(72) := g_package||'update_validate';
343: --
344: Begin
345: hr_utility.set_location('Entering:'||l_proc, 5);
346: --
347: -- Call all supporting business operations
348: --
349: --
355: (p_effective_date => p_effective_date
356: ,p_rec => p_rec
357: );
358: --
359: hr_utility.set_location(' Leaving:'||l_proc, 10);
360: --
361: chk_person_id
362: (p_person_id => p_rec.person_id
363: ,p_profile_snapshot_id => p_rec.profile_snapshot_id
363: ,p_profile_snapshot_id => p_rec.profile_snapshot_id
364: ,p_object_version_number => p_rec.object_version_number
365: );
366: --
367: hr_utility.set_location(' Leaving:'||l_proc, 20);
368: End update_validate;
369: --
370: -- ----------------------------------------------------------------------------
371: -- |---------------------------< delete_validate >----------------------------|
376: --
377: l_proc varchar2(72) := g_package||'delete_validate';
378: --
379: Begin
380: hr_utility.set_location('Entering:'||l_proc, 5);
381: --
382: -- Call all supporting business operations
383: --
384: hr_utility.set_location(' Leaving:'||l_proc, 10);
380: hr_utility.set_location('Entering:'||l_proc, 5);
381: --
382: -- Call all supporting business operations
383: --
384: hr_utility.set_location(' Leaving:'||l_proc, 10);
385: End delete_validate;
386: --
387: end irc_aps_bus;