[Home] [Help]
39: l_legislation_code varchar2(150);
40: --
41: begin
42: --
43: hr_utility.set_location('Entering:'|| l_proc, 10);
44: --
45: -- Ensure that all the mandatory parameter are not null
46: --
47: hr_api.mandatory_arg_error
79: --
80: hr_api.set_legislation_context(l_legislation_code);
81: end if;
82: --
83: hr_utility.set_location(' Leaving:'|| l_proc, 20);
84: --
85: end set_security_group_id;
86: --
87: -- ---------------------------------------------------------------------------
108: l_proc varchar2(72) := g_package||'return_legislation_code';
109: --
110: Begin
111: --
112: hr_utility.set_location('Entering:'|| l_proc, 10);
113: --
114: -- Ensure that all the mandatory parameter are not null
115: --
116: hr_api.mandatory_arg_error
126: -- call to this function. Just return the value in the global
127: -- variable.
128: --
129: l_legislation_code := ff_ffn_bus.g_legislation_code;
130: hr_utility.set_location(l_proc, 20);
131: else
132: --
133: -- The ID is different to the last call to this function
134: -- or this is the first call to this function.
143: close csr_leg_code;
144: fnd_message.set_name('PAY','HR_7220_INVALID_PRIMARY_KEY');
145: fnd_message.raise_error;
146: end if;
147: hr_utility.set_location(l_proc,30);
148: --
149: -- Set the global variables so the values are
150: -- available for the next call to this function.
151: --
152: close csr_leg_code;
153: ff_ffn_bus.g_function_id := p_function_id;
154: ff_ffn_bus.g_legislation_code := l_legislation_code;
155: end if;
156: hr_utility.set_location(' Leaving:'|| l_proc, 40);
157: return l_legislation_code;
158: end return_legislation_code;
159: --
160: --
196: l_exists varchar2(1);
197: l_proc varchar2(100) := g_package || 'chk_legislation_code';
198: begin
199: --
200: hr_utility.set_location('Entering:'|| l_proc, 10);
201:
202: open csr_legislation_code;
203: fetch csr_legislation_code into l_exists ;
204:
208: fnd_message.raise_error;
209: end if;
210: close csr_legislation_code;
211:
212: hr_utility.set_location(' Leaving:'|| l_proc, 20);
213: --
214: exception
215: when app_exception.application_exception then
216: if hr_multi_message.exception_add
236: l_proc varchar2(100) := g_package || 'chk_class';
237: --
238: begin
239: --
240: hr_utility.set_location('Entering:'|| l_proc, 10);
241: --
242: -- CLASS is mandatory.
243: --
244: hr_api.mandatory_arg_error
245: (p_api_name => l_proc
246: ,p_argument => 'CLASS'
247: ,p_argument_value => p_class
248: );
249: hr_utility.set_location('Entering:'|| l_proc, 20);
250: if hr_api.not_exists_in_hrstanlookups
251: (p_effective_date => p_effective_date
252: ,p_lookup_type => 'FUNCTION_CLASS'
253: ,p_lookup_code => p_class
254: ) then
255: ff_ffn_shd.constraint_error('FF_FUNC_CLASS_CHK');
256: end if;
257: --
258: hr_utility.set_location('Entering:'|| l_proc, 30);
259: -- User defined functions are not allowed.
260: if (p_class = 'U') then
261: ff_ffn_shd.constraint_error('FF_FUNC_CLASS_CHK');
262: end if;
260: if (p_class = 'U') then
261: ff_ffn_shd.constraint_error('FF_FUNC_CLASS_CHK');
262: end if;
263: --
264: hr_utility.set_location('Entering:'|| l_proc, 40);
265: --
266: exception
267: when app_exception.application_exception then
268: if hr_multi_message.exception_add
283: l_proc varchar2(100) := g_package || 'chk_data_type';
284: --
285: begin
286: --
287: hr_utility.set_location('Entering:'|| l_proc, 10);
288: --
289: -- DATA_TYPE is mandatory.
290: --
291: hr_api.mandatory_arg_error
301: ) then
302: ff_ffn_shd.constraint_error('FF_FUNC_DATA_TYPE_CHK');
303: end if;
304: --
305: hr_utility.set_location('Entering:'|| l_proc, 20);
306: --
307: exception
308: when app_exception.application_exception then
309: if hr_multi_message.exception_add
325: l_name varchar2(80);
326: --
327: begin
328: --
329: hr_utility.set_location('Entering:'|| l_proc, 10);
330: --
331: -- NAME is mandatory.
332: --
333: hr_api.mandatory_arg_error
347: dummy,
348: null);
349: end if;
350: --
351: hr_utility.set_location('Entering:'|| l_proc, 20);
352: --
353: exception
354: when app_exception.application_exception then
355: if hr_multi_message.exception_add
540: --
541: l_proc varchar2(72) := g_package||'insert_validate';
542: --
543: Begin
544: hr_utility.set_location('Entering:'||l_proc, 5);
545: --
546: -- Call all supporting business operations
547: --
548: --
599: ,p_name => p_rec.name
600: );
601: -----------------------------------------------------------------------------
602: --
603: hr_utility.set_location(' Leaving:'||l_proc, 10);
604:
605: End insert_validate;
606: --
607: -- ----------------------------------------------------------------------------
614: --
615: l_proc varchar2(72) := g_package||'update_validate';
616: --
617: Begin
618: hr_utility.set_location('Entering:'||l_proc, 5);
619: --
620: -- Call all supporting business operations
621: --
622: --
665: ,p_name => p_rec.name
666: );
667: -----------------------------------------------------------------------------
668: --
669: hr_utility.set_location(' Leaving:'||l_proc, 10);
670: End update_validate;
671: --
672: -- ----------------------------------------------------------------------------
673: -- |---------------------------< delete_validate >----------------------------|
678: --
679: l_proc varchar2(72) := g_package||'delete_validate';
680: --
681: Begin
682: hr_utility.set_location('Entering:'||l_proc, 5);
683: --
684: --
685: chk_startup_action(false
686: ,ff_ffn_shd.g_old_rec.business_group_id
700: END IF;
701: --
702: -- Call all supporting business operations
703: --
704: hr_utility.set_location(' Leaving:'||l_proc, 10);
705: End delete_validate;
706: --
707: end ff_ffn_bus;