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.
13: --
43: l_proc varchar2(72);
44: --
45: begin
46: --
47: g_debug:=hr_utility.debug_enabled;
48: if g_debug then
49: l_proc := g_package||'set_security_group_id';
50: hr_utility.set_location('Entering:'|| l_proc, 10);
51: end if;--
46: --
47: g_debug:=hr_utility.debug_enabled;
48: if g_debug then
49: l_proc := g_package||'set_security_group_id';
50: hr_utility.set_location('Entering:'|| l_proc, 10);
51: end if;--
52: -- Ensure that all the mandatory parameter are not null
53: --
54: hr_api.mandatory_arg_error
78: (p_security_group_id => l_security_group_id
79: );
80: --
81: if g_debug then
82: hr_utility.set_location(' Leaving:'|| l_proc, 20);
83: end if;
84: --
85: end set_security_group_id;
86: --
114: l_proc varchar2(72);
115: --
116: Begin
117: --
118: g_debug:=hr_utility.debug_enabled;
119: if g_debug then
120: l_proc := g_package||'return_legislation_code';
121: hr_utility.set_location('Entering:'|| l_proc, 10);
122: end if;
117: --
118: g_debug:=hr_utility.debug_enabled;
119: if g_debug then
120: l_proc := g_package||'return_legislation_code';
121: hr_utility.set_location('Entering:'|| l_proc, 10);
122: end if;
123: --
124: -- Ensure that all the mandatory parameter are not null
125: --
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
144: --
145: -- The ID is different to the last call to this function
156: fnd_message.set_name('PAY','HR_7220_INVALID_PRIMARY_KEY');
157: fnd_message.raise_error;
158: end if;
159: if g_debug then
160: hr_utility.set_location(l_proc,30);
161: end if;
162: --
163: -- Set the global variables so the values are
164: -- available for the next call to this function.
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;
173: return l_legislation_code;
174: end return_legislation_code;
175: --
290: --
291: BEGIN
292: if g_debug then
293: l_proc := g_package||'chk_dependency_rule';
294: hr_utility.set_location('Entering:'||l_proc, 5);
295: end if;
296: --
297: -- Raise an error if the rule is not unique
298: --
302: --
303: IF l_error IS NOT NULL
304: THEN
305: --
306: hr_utility.set_message(809, 'HXC_0189_DRU_APL_RULE_EXISTS');
307: hr_utility.raise_error;
308: --
309: END IF;
310: --
303: IF l_error IS NOT NULL
304: THEN
305: --
306: hr_utility.set_message(809, 'HXC_0189_DRU_APL_RULE_EXISTS');
307: hr_utility.raise_error;
308: --
309: END IF;
310: --
311: if g_debug then
308: --
309: END IF;
310: --
311: if g_debug then
312: hr_utility.set_location('Leaving:'||l_proc, 10);
313: end if;
314: --
315: END chk_dependency_rule;
316: --
324: --
325: l_proc varchar2(72);
326: --
327: Begin
328: g_debug:=hr_utility.debug_enabled;
329: if g_debug then
330: l_proc := g_package||'insert_validate';
331: hr_utility.set_location('Entering:'||l_proc, 5);
332: end if;
327: Begin
328: g_debug:=hr_utility.debug_enabled;
329: if g_debug then
330: l_proc := g_package||'insert_validate';
331: hr_utility.set_location('Entering:'||l_proc, 5);
332: end if;
333: --
334: -- Call all supporting business operations
335: --
333: --
334: -- Call all supporting business operations
335: --
336: if g_debug then
337: hr_utility.set_location('Processing:'||l_proc, 10);
338: end if;
339: --
340: chk_dependency_rule (p_approval_style_id => p_rec.approval_style_id,
341: p_time_entry_rule_id => p_rec.time_entry_rule_id,
342: p_time_recipient_id => p_rec.time_recipient_id,
343: p_object_version_number => p_rec.object_version_number );
344: --
345: if g_debug then
346: hr_utility.set_location(' Leaving:'||l_proc, 10);
347: end if;
348: --
349: -- EDIT_HERE: As this table does not have a mandatory business_group_id
350: -- column, ensure client_info is populated by calling a suitable
354: -- "-- CLIENT_INFO not set. No lookup validation or joins to HR_LOOKUPS."
355: --
356: --
357: if g_debug then
358: hr_utility.set_location(' Leaving:'||l_proc, 10);
359: end if;
360: End insert_validate;
361: --
362: -- ----------------------------------------------------------------------------
369: --
370: l_proc varchar2(72);
371: --
372: Begin
373: g_debug:=hr_utility.debug_enabled;
374: if g_debug then
375: l_proc := g_package||'update_validate';
376: hr_utility.set_location('Entering:'||l_proc, 5);
377: end if;
372: Begin
373: g_debug:=hr_utility.debug_enabled;
374: if g_debug then
375: l_proc := g_package||'update_validate';
376: hr_utility.set_location('Entering:'||l_proc, 5);
377: end if;
378: --
379: -- Call all supporting business operations
380: --
378: --
379: -- Call all supporting business operations
380: --
381: if g_debug then
382: hr_utility.set_location('Processing:'||l_proc, 10);
383: end if;
384: --
385: chk_dependency_rule (p_approval_style_id => p_rec.approval_style_id,
386: p_time_entry_rule_id => p_rec.time_entry_rule_id,
387: p_time_recipient_id => p_rec.time_recipient_id,
388: p_object_version_number => p_rec.object_version_number );
389: --
390: if g_debug then
391: hr_utility.set_location(' Leaving:'||l_proc, 10);
392: end if;
393: --
394: -- EDIT_HERE: As this table does not have a mandatory business_group_id
395: -- column, ensure client_info is populated by calling a suitable
404: );
405: --
406: --
407: if g_debug then
408: hr_utility.set_location(' Leaving:'||l_proc, 10);
409: end if;
410: End update_validate;
411: --
412: -- ----------------------------------------------------------------------------
418: --
419: l_proc varchar2(72);
420: --
421: Begin
422: g_debug:=hr_utility.debug_enabled;
423: if g_debug then
424: l_proc := g_package||'delete_validate';
425: hr_utility.set_location('Entering:'||l_proc, 5);
426: end if;
421: Begin
422: g_debug:=hr_utility.debug_enabled;
423: if g_debug then
424: l_proc := g_package||'delete_validate';
425: hr_utility.set_location('Entering:'||l_proc, 5);
426: end if;
427: --
428: -- Call all supporting business operations
429: --
427: --
428: -- Call all supporting business operations
429: --
430: if g_debug then
431: hr_utility.set_location(' Leaving:'||l_proc, 10);
432: end if;
433: End delete_validate;
434: --
435: end hxc_dru_bus;