[Home] [Help]
47: l_proc varchar2(72) := g_package||'set_security_group_id';
48: --
49: begin
50: --
51: hr_utility.set_location('Entering:'|| l_proc, 10);
52: --
53: -- Ensure that all the mandatory parameter are not null
54: --
55: hr_api.mandatory_arg_error
89: (p_security_group_id => l_security_group_id
90: );
91: end if;
92: --
93: hr_utility.set_location(' Leaving:'|| l_proc, 20);
94: --
95: end set_security_group_id;
96: --
97: -- ---------------------------------------------------------------------------
126: l_proc varchar2(72) := g_package||'return_legislation_code';
127: --
128: Begin
129: --
130: hr_utility.set_location('Entering:'|| l_proc, 10);
131: --
132: -- Ensure that all the mandatory parameter are not null
133: --
134: hr_api.mandatory_arg_error
151: -- call to this function. Just return the value in the global
152: -- variable.
153: --
154: l_legislation_code := per_sls_bus.g_legislation_code;
155: hr_utility.set_location(l_proc, 20);
156: else
157: --
158: -- The ID is different to the last call to this function
159: -- or this is the first call to this function.
168: close csr_leg_code;
169: fnd_message.set_name('PAY','HR_7220_INVALID_PRIMARY_KEY');
170: fnd_message.raise_error;
171: end if;
172: hr_utility.set_location(l_proc,30);
173: --
174: -- Set the global variables so the values are
175: -- available for the next call to this function.
176: --
178: per_sls_bus.g_solution_set_name := p_solution_set_name;
179: per_sls_bus.g_user_id := p_user_id;
180: per_sls_bus.g_legislation_code := l_legislation_code;
181: end if;
182: hr_utility.set_location(' Leaving:'|| l_proc, 40);
183: return l_legislation_code;
184: end return_legislation_code;
185: --
186: -- ----------------------------------------------------------------------------
289: l_proc varchar2(72) := g_package||'chk_status';
290: l_api_updating boolean;
291: --
292: begin
293: hr_utility.set_location('Entering:'|| l_proc, 10);
294: --
295: -- Check mandatory parameters have been set
296: --
297: hr_api.mandatory_arg_error
304: -- a) The current g_old_rec is current and
305: -- b) The solution category value has changed
306: -- c) A record is being inserted
307: --
308: hr_utility.set_location(l_proc, 30);
309: l_api_updating := per_sls_shd.api_updating
310: (p_solution_set_name => p_solution_set_name
311: ,p_user_id => p_user_id
312: ,p_object_version_number => p_object_version_number
316: <> nvl(p_status,hr_api.g_varchar2))
317: or
318: (NOT l_api_updating))
319: then
320: hr_utility.set_location(l_proc, 40);
321: --
322: -- Check if solution category is set
323: --
324: if p_status is not null then
334: ,p_lookup_code => p_status
335: )
336: then
337: --
338: hr_utility.set_message(801, 'HR_EDIT');
339: hr_utility.raise_error;
340: --
341: end if;
342: hr_utility.set_location(l_proc, 50);
335: )
336: then
337: --
338: hr_utility.set_message(801, 'HR_EDIT');
339: hr_utility.raise_error;
340: --
341: end if;
342: hr_utility.set_location(l_proc, 50);
343: --
338: hr_utility.set_message(801, 'HR_EDIT');
339: hr_utility.raise_error;
340: --
341: end if;
342: hr_utility.set_location(l_proc, 50);
343: --
344: end if;
345: end if;
346: hr_utility.set_location(' Leaving:'|| l_proc, 60);
342: hr_utility.set_location(l_proc, 50);
343: --
344: end if;
345: end if;
346: hr_utility.set_location(' Leaving:'|| l_proc, 60);
347: end chk_status;
348: --
349: -- ----------------------------------------------------------------------------
350: -- |---------------------------< insert_validate >----------------------------|
356: --
357: l_proc varchar2(72) := g_package||'insert_validate';
358: --
359: Begin
360: hr_utility.set_location('Entering:'||l_proc, 5);
361: --
362: -- Call all supporting business operations
363: --
364: -- No business group context. HR_STANDARD_LOOKUPS used for validation.
372: ,p_effective_date => p_effective_date
373: ,p_object_version_number => p_rec.object_version_number
374: );
375: --
376: hr_utility.set_location(' Leaving:'||l_proc, 10);
377: End insert_validate;
378: --
379: -- ----------------------------------------------------------------------------
380: -- |---------------------------< update_validate >----------------------------|
386: --
387: l_proc varchar2(72) := g_package||'update_validate';
388: --
389: Begin
390: hr_utility.set_location('Entering:'||l_proc, 5);
391: --
392: -- Call all supporting business operations
393: --
394: -- No business group context. HR_STANDARD_LOOKUPS used for validation.
408: ,p_object_version_number => p_rec.object_version_number
409: );
410: --
411: --
412: hr_utility.set_location(' Leaving:'||l_proc, 10);
413: End update_validate;
414: --
415: -- ----------------------------------------------------------------------------
416: -- |---------------------------< delete_validate >----------------------------|
421: --
422: l_proc varchar2(72) := g_package||'delete_validate';
423: --
424: Begin
425: hr_utility.set_location('Entering:'||l_proc, 5);
426: --
427: -- Call all supporting business operations
428: --
429: hr_utility.set_location(' Leaving:'||l_proc, 10);
425: hr_utility.set_location('Entering:'||l_proc, 5);
426: --
427: -- Call all supporting business operations
428: --
429: hr_utility.set_location(' Leaving:'||l_proc, 10);
430: End delete_validate;
431: --
432: end per_sls_bus;