DBA Data[Home] [Help]

APPS.HXC_HRR_BUS dependencies on HR_UTILITY

Line 9: g_debug boolean :=hr_utility.debug_enabled;

5: -- | Private Global Definitions |
6: -- ----------------------------------------------------------------------------
7: --
8: g_package varchar2(33) := ' hxc_hrr_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: --

Line 47: g_debug:=hr_utility.debug_enabled;

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;

Line 50: hr_utility.set_location('Entering:'|| l_proc, 10);

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: --
53: -- Ensure that all the mandatory parameter are not null
54: --

Line 83: hr_utility.set_location(' Leaving:'|| l_proc, 20);

79: (p_security_group_id => l_security_group_id
80: );
81: --
82: if g_debug then
83: hr_utility.set_location(' Leaving:'|| l_proc, 20);
84: end if;
85: --
86: end set_security_group_id;
87: --

Line 119: g_debug:=hr_utility.debug_enabled;

115: l_proc varchar2(72);
116: --
117: Begin
118: --
119: g_debug:=hr_utility.debug_enabled;
120: if g_debug then
121: l_proc := g_package||'return_legislation_code';
122: hr_utility.set_location('Entering:'|| l_proc, 10);
123: end if;

Line 122: hr_utility.set_location('Entering:'|| l_proc, 10);

118: --
119: g_debug:=hr_utility.debug_enabled;
120: if g_debug then
121: l_proc := g_package||'return_legislation_code';
122: hr_utility.set_location('Entering:'|| l_proc, 10);
123: end if;
124: --
125: -- Ensure that all the mandatory parameter are not null
126: --

Line 142: hr_utility.set_location(l_proc, 20);

138: -- variable.
139: --
140: l_legislation_code := hxc_hrr_bus.g_legislation_code;
141: if g_debug then
142: hr_utility.set_location(l_proc, 20);
143: end if;
144: else
145: --
146: -- The ID is different to the last call to this function

Line 161: hr_utility.set_location(l_proc,30);

157: fnd_message.set_name('PAY','HR_7220_INVALID_PRIMARY_KEY');
158: fnd_message.raise_error;
159: end if;
160: if g_debug then
161: hr_utility.set_location(l_proc,30);
162: end if;
163: --
164: -- Set the global variables so the values are
165: -- available for the next call to this function.

Line 172: hr_utility.set_location(' Leaving:'|| l_proc, 40);

168: hxc_hrr_bus.g_resource_rule_id := p_resource_rule_id;
169: hxc_hrr_bus.g_legislation_code := l_legislation_code;
170: end if;
171: if g_debug then
172: hr_utility.set_location(' Leaving:'|| l_proc, 40);
173: end if;
174: return l_legislation_code;
175: end return_legislation_code;
176: --

Line 288: g_debug:=hr_utility.debug_enabled;

284: --
285: l_error varchar2(5) := NULL;
286: --
287: BEGIN
288: g_debug:=hr_utility.debug_enabled;
289: if g_debug then
290: l_proc := g_package||'chk_name';
291: hr_utility.set_location('Entering:'||l_proc, 5);
292: end if;

Line 291: hr_utility.set_location('Entering:'||l_proc, 5);

287: BEGIN
288: g_debug:=hr_utility.debug_enabled;
289: if g_debug then
290: l_proc := g_package||'chk_name';
291: hr_utility.set_location('Entering:'||l_proc, 5);
292: end if;
293: --
294: -- Raise error if name is NULL as it is a mandatory field.
295: --

Line 299: hr_utility.set_message(809, 'HXC_0083_HRR_RULE_NAME_MAND');

295: --
296: IF p_name IS NULL
297: THEN
298: --
299: hr_utility.set_message(809, 'HXC_0083_HRR_RULE_NAME_MAND');
300: hr_utility.raise_error;
301: --
302: END IF;
303: if g_debug then

Line 300: hr_utility.raise_error;

296: IF p_name IS NULL
297: THEN
298: --
299: hr_utility.set_message(809, 'HXC_0083_HRR_RULE_NAME_MAND');
300: hr_utility.raise_error;
301: --
302: END IF;
303: if g_debug then
304: hr_utility.set_location('Processing:'||l_proc, 10);

Line 304: hr_utility.set_location('Processing:'||l_proc, 10);

300: hr_utility.raise_error;
301: --
302: END IF;
303: if g_debug then
304: hr_utility.set_location('Processing:'||l_proc, 10);
305: end if;
306: --
307: -- Raise an error if the resource rule name is not unique
308: --

Line 316: hr_utility.set_message(809, 'HXC_0084_HRR_DUP_RESC_RL_NAME');

312: --
313: IF l_error IS NOT NULL
314: THEN
315: --
316: hr_utility.set_message(809, 'HXC_0084_HRR_DUP_RESC_RL_NAME');
317: hr_utility.raise_error;
318: --
319: END IF;
320: --

Line 317: hr_utility.raise_error;

313: IF l_error IS NOT NULL
314: THEN
315: --
316: hr_utility.set_message(809, 'HXC_0084_HRR_DUP_RESC_RL_NAME');
317: hr_utility.raise_error;
318: --
319: END IF;
320: --
321: if g_debug then

Line 322: hr_utility.set_location('Leaving:'||l_proc, 20);

318: --
319: END IF;
320: --
321: if g_debug then
322: hr_utility.set_location('Leaving:'||l_proc, 20);
323: end if;
324: --
325: END chk_name;
326: --

Line 385: hr_utility.set_message

381: -- check that the start date is not greater than the end date
382: --
383: IF p_start_date > NVL(p_end_date, hr_general.END_OF_TIME) THEN
384: --
385: hr_utility.set_message
386: (809
387: ,'HXC_0085_HRR_START_DT_ERR'
388: );
389: hr_utility.raise_error;

Line 389: hr_utility.raise_error;

385: hr_utility.set_message
386: (809
387: ,'HXC_0085_HRR_START_DT_ERR'
388: );
389: hr_utility.raise_error;
390: --
391: END IF;
392: --
393: END chk_dates;

Line 445: g_debug:=hr_utility.debug_enabled;

441: --
442: l_error varchar2(5) := NULL;
443: --
444: BEGIN
445: g_debug:=hr_utility.debug_enabled;
446: if g_debug then
447: hr_utility.set_location('Entering:'||l_proc, 5);
448: end if;
449: --

Line 447: hr_utility.set_location('Entering:'||l_proc, 5);

443: --
444: BEGIN
445: g_debug:=hr_utility.debug_enabled;
446: if g_debug then
447: hr_utility.set_location('Entering:'||l_proc, 5);
448: end if;
449: --
450: -- Raise an error if the rule evaluation order is not unique
451: --

Line 461: hr_utility.set_message(809, 'HXC_0129_HRR_DUP_RL_EVL_ORD');

457: --
458: IF l_error IS NOT NULL
459: THEN
460: --
461: hr_utility.set_message(809, 'HXC_0129_HRR_DUP_RL_EVL_ORD');
462: hr_utility.raise_error;
463: --
464: END IF;
465: --

Line 462: hr_utility.raise_error;

458: IF l_error IS NOT NULL
459: THEN
460: --
461: hr_utility.set_message(809, 'HXC_0129_HRR_DUP_RL_EVL_ORD');
462: hr_utility.raise_error;
463: --
464: END IF;
465: --
466: if g_debug then

Line 467: hr_utility.set_location('Leaving:'||l_proc, 10);

463: --
464: END IF;
465: --
466: if g_debug then
467: hr_utility.set_location('Leaving:'||l_proc, 10);
468: end if;
469: --
470: END chk_rule_evaluation_order;
471: --

Line 522: g_debug:=hr_utility.debug_enabled;

518:
519: --
520: --
521: begin
522: g_debug:=hr_utility.debug_enabled;
523: if g_debug then
524: l_proc := g_package||'chk_legislation_code';
525: hr_utility.set_location('Entering: '||l_proc,5);
526: end if;

Line 525: hr_utility.set_location('Entering: '||l_proc,5);

521: begin
522: g_debug:=hr_utility.debug_enabled;
523: if g_debug then
524: l_proc := g_package||'chk_legislation_code';
525: hr_utility.set_location('Entering: '||l_proc,5);
526: end if;
527: --------------------------------
528: -- Check legislation code is valid --
529: --------------------------------

Line 536: hr_utility.set_message(800,'PER_52123_AMD_LEG_CODE_INV');

532: open csr_valid_legislation_code;
533: fetch csr_valid_legislation_code into l_territory_code;
534: if csr_valid_legislation_code%notfound then
535: close csr_valid_legislation_code;
536: hr_utility.set_message(800,'PER_52123_AMD_LEG_CODE_INV');
537: hr_utility.raise_error;
538: end if; -- End cursor if
539: close csr_valid_legislation_code;
540:

Line 537: hr_utility.raise_error;

533: fetch csr_valid_legislation_code into l_territory_code;
534: if csr_valid_legislation_code%notfound then
535: close csr_valid_legislation_code;
536: hr_utility.set_message(800,'PER_52123_AMD_LEG_CODE_INV');
537: hr_utility.raise_error;
538: end if; -- End cursor if
539: close csr_valid_legislation_code;
540:
541: if p_business_group_id is not null then

Line 546: hr_utility.set_message(800,'PER_52123_AMD_LEG_CODE_INV');

542: open csr_valid_bg_lc;
543: fetch csr_valid_bg_lc into l_lc;
544: if csr_valid_bg_lc%notfound then
545: close csr_valid_bg_lc;
546: hr_utility.set_message(800,'PER_52123_AMD_LEG_CODE_INV');
547: hr_utility.raise_error;
548: end if; -- End cursor if
549: close csr_valid_bg_lc;
550: end if;

Line 547: hr_utility.raise_error;

543: fetch csr_valid_bg_lc into l_lc;
544: if csr_valid_bg_lc%notfound then
545: close csr_valid_bg_lc;
546: hr_utility.set_message(800,'PER_52123_AMD_LEG_CODE_INV');
547: hr_utility.raise_error;
548: end if; -- End cursor if
549: close csr_valid_bg_lc;
550: end if;
551:

Line 555: hr_utility.set_location('Leaving: '||l_proc,10);

551:
552: end if; -- end check
553:
554: if g_debug then
555: hr_utility.set_location('Leaving: '||l_proc,10);
556: end if;
557: end chk_legislation_code;
558: --
559: -- ----------------------------------------------------------------------------

Line 570: g_debug:=hr_utility.debug_enabled;

566: --
567: l_proc varchar2(72);
568: --
569: Begin
570: g_debug:=hr_utility.debug_enabled;
571: if g_debug then
572: l_proc := g_package||'insert_validate';
573: hr_utility.set_location('Entering:'||l_proc, 5);
574: end if;

Line 573: hr_utility.set_location('Entering:'||l_proc, 5);

569: Begin
570: g_debug:=hr_utility.debug_enabled;
571: if g_debug then
572: l_proc := g_package||'insert_validate';
573: hr_utility.set_location('Entering:'||l_proc, 5);
574: end if;
575: --
576: -- Call all supporting business operations
577: --

Line 579: hr_utility.set_location('Processing:'||l_proc, 10);

575: --
576: -- Call all supporting business operations
577: --
578: if g_debug then
579: hr_utility.set_location('Processing:'||l_proc, 10);
580: end if;
581: --
582: -- Do checks for the unique resource rule name
583: --

Line 589: hr_utility.set_location(' Leaving:'||l_proc, 10);

585: p_business_group_id => p_rec.business_group_id,
586: p_object_version_number => p_rec.object_version_number );
587: --
588: if g_debug then
589: hr_utility.set_location(' Leaving:'||l_proc, 10);
590: end if;
591: --
592: --
593: -- Do checks on the dates of the resource rule

Line 625: hr_utility.set_location(' Leaving:'||l_proc, 10);

621: p_legislation_code => p_rec.legislation_code);
622: --
623: --
624: if g_debug then
625: hr_utility.set_location(' Leaving:'||l_proc, 10);
626: end if;
627: End insert_validate;
628: --
629: -- ----------------------------------------------------------------------------

Line 640: g_debug:=hr_utility.debug_enabled;

636: --
637: l_proc varchar2(72);
638: --
639: Begin
640: g_debug:=hr_utility.debug_enabled;
641: if g_debug then
642: l_proc := g_package||'update_validate';
643: hr_utility.set_location('Entering:'||l_proc, 5);
644: end if;

Line 643: hr_utility.set_location('Entering:'||l_proc, 5);

639: Begin
640: g_debug:=hr_utility.debug_enabled;
641: if g_debug then
642: l_proc := g_package||'update_validate';
643: hr_utility.set_location('Entering:'||l_proc, 5);
644: end if;
645: --
646: -- Call all supporting business operations
647: --

Line 664: hr_utility.set_location('Processing:'||l_proc, 10);

660: --
661: -- Do check for duplicate resource rule name
662: --
663: if g_debug then
664: hr_utility.set_location('Processing:'||l_proc, 10);
665: end if;
666: --
667: chk_name ( p_name => p_rec.name,
668: p_business_group_id => p_rec.business_group_id,

Line 672: hr_utility.set_location(' Leaving:'||l_proc, 10);

668: p_business_group_id => p_rec.business_group_id,
669: p_object_version_number => p_rec.object_version_number );
670: --
671: if g_debug then
672: hr_utility.set_location(' Leaving:'||l_proc, 10);
673: end if;
674: --
675: -- Do checks on the dates of the resource rule
676: --

Line 699: hr_utility.set_location(' Leaving:'||l_proc, 10);

695: (p_business_group_id => p_rec.business_group_id,
696: p_legislation_code => p_rec.legislation_code);
697: --
698: if g_debug then
699: hr_utility.set_location(' Leaving:'||l_proc, 10);
700: end if;
701: End update_validate;
702: --
703: -- ----------------------------------------------------------------------------

Line 713: g_debug:=hr_utility.debug_enabled;

709: --
710: l_proc varchar2(72);
711: --
712: Begin
713: g_debug:=hr_utility.debug_enabled;
714: if g_debug then
715: l_proc := g_package||'delete_validate';
716: hr_utility.set_location('Entering:'||l_proc, 5);
717: end if;

Line 716: hr_utility.set_location('Entering:'||l_proc, 5);

712: Begin
713: g_debug:=hr_utility.debug_enabled;
714: if g_debug then
715: l_proc := g_package||'delete_validate';
716: hr_utility.set_location('Entering:'||l_proc, 5);
717: end if;
718: --
719: -- Call all supporting business operations
720: --

Line 722: hr_utility.set_location(' Leaving:'||l_proc, 10);

718: --
719: -- Call all supporting business operations
720: --
721: if g_debug then
722: hr_utility.set_location(' Leaving:'||l_proc, 10);
723: end if;
724: End delete_validate;
725: --
726: end hxc_hrr_bus;