DBA Data[Home] [Help]

APPS.PAY_PBA_BUS dependencies on HR_UTILITY

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

37: l_proc varchar2(72) := g_package||'set_security_group_id';
38: --
39: begin
40: --
41: hr_utility.set_location('Entering:'|| l_proc, 10);
42: --
43: -- Ensure that all the mandatory parameter are not null
44: --
45: hr_api.mandatory_arg_error

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

72: (p_security_group_id => l_security_group_id
73: );
74: end if;
75: --
76: hr_utility.set_location(' Leaving:'|| l_proc, 20);
77: --
78: end set_security_group_id;
79: --
80: -- ---------------------------------------------------------------------------

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

101: l_proc varchar2(72) := g_package||'return_legislation_code';
102: --
103: Begin
104: --
105: hr_utility.set_location('Entering:'|| l_proc, 10);
106: --
107: -- Ensure that all the mandatory parameter are not null
108: --
109: hr_api.mandatory_arg_error

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

119: -- call to this function. Just return the value in the global
120: -- variable.
121: --
122: l_legislation_code := pay_pba_bus.g_legislation_code;
123: hr_utility.set_location(l_proc, 20);
124: else
125: --
126: -- The ID is different to the last call to this function
127: -- or this is the first call to this function.

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

136: close csr_leg_code;
137: fnd_message.set_name('PAY','HR_7220_INVALID_PRIMARY_KEY');
138: fnd_message.raise_error;
139: end if;
140: hr_utility.set_location(l_proc,30);
141: --
142: -- Set the global variables so the values are
143: -- available for the next call to this function.
144: --

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

145: close csr_leg_code;
146: pay_pba_bus.g_balance_attribute_id := p_balance_attribute_id;
147: pay_pba_bus.g_legislation_code := l_legislation_code;
148: end if;
149: hr_utility.set_location(' Leaving:'|| l_proc, 40);
150: return l_legislation_code;
151: end return_legislation_code;
152: --
153: -- ----------------------------------------------------------------------------

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

211: l_leg pay_bal_attribute_definitions.legislation_code%type;
212: l_allow_ins_del boolean;
213: --
214: BEGIN
215: hr_utility.set_location('Entering '||l_proc, 5);
216: --
217: IF hr_startup_data_api_support.g_startup_mode = 'USER' THEN
218: hr_utility.set_location(l_proc, 10);
219: --

Line 218: hr_utility.set_location(l_proc, 10);

214: BEGIN
215: hr_utility.set_location('Entering '||l_proc, 5);
216: --
217: IF hr_startup_data_api_support.g_startup_mode = 'USER' THEN
218: hr_utility.set_location(l_proc, 10);
219: --
220: open csr_get_alterable(p_attribute_id);
221: fetch csr_get_alterable into l_alt, l_bg, l_leg;
222: if csr_get_alterable%notfound then

Line 224: hr_utility.set_location(l_proc, 15);

220: open csr_get_alterable(p_attribute_id);
221: fetch csr_get_alterable into l_alt, l_bg, l_leg;
222: if csr_get_alterable%notfound then
223: close csr_get_alterable;
224: hr_utility.set_location(l_proc, 15);
225: hr_utility.set_message(801, 'PAY_34242_INV_ATTID');
226: hr_utility.raise_error;
227: else
228: if l_leg is null then

Line 225: hr_utility.set_message(801, 'PAY_34242_INV_ATTID');

221: fetch csr_get_alterable into l_alt, l_bg, l_leg;
222: if csr_get_alterable%notfound then
223: close csr_get_alterable;
224: hr_utility.set_location(l_proc, 15);
225: hr_utility.set_message(801, 'PAY_34242_INV_ATTID');
226: hr_utility.raise_error;
227: else
228: if l_leg is null then
229: if l_bg is not null then

Line 226: hr_utility.raise_error;

222: if csr_get_alterable%notfound then
223: close csr_get_alterable;
224: hr_utility.set_location(l_proc, 15);
225: hr_utility.set_message(801, 'PAY_34242_INV_ATTID');
226: hr_utility.raise_error;
227: else
228: if l_leg is null then
229: if l_bg is not null then
230: if l_alt = 'Y' then

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

256: end if;
257: else
258: return true;
259: end if;
260: hr_utility.set_location('Leaving: '||l_proc, 20);
261: --
262: END chk_alterable;
263: -- ----------------------------------------------------------------------------
264: -- |---------------------------< chk_attribute_id >---------------------------|

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

343: l_exists number;
344: l_legislation_code pay_balance_attributes.legislation_code%type;
345: Begin
346: --
347: hr_utility.set_location('Entering: '||l_proc,5);
348: --
349: -- Only execute the cursor if absolutely necessary.
350: -- a) During update, the attribute_name has actually changed to another not
351: -- null value, i,e, the value passed to this procedure is different to the

Line 364: hr_utility.set_location(l_proc, 10);

360: nvl(p_attribute_id, hr_api.g_number))
361: or
362: (p_balance_attribute_id is null)) then
363: --
364: hr_utility.set_location(l_proc, 10);
365: --
366: -- Only need to open the cursor if attribute_id is not null
367: --
368: if p_attribute_id is not null then

Line 371: hr_utility.set_location(l_proc, 15);

367: --
368: if p_attribute_id is not null then
369: --
370: IF hr_startup_data_api_support.g_startup_mode = 'GENERIC' THEN
371: hr_utility.set_location(l_proc, 15);
372: --
373: OPEN csr_chk_attribute_id_g;
374: FETCH csr_chk_attribute_id_g into l_exists;
375: IF csr_chk_attribute_id_g%NOTFOUND THEN

Line 378: hr_utility.set_message(801, 'PAY_34243_INV_ATTID_4_MODEG');

374: FETCH csr_chk_attribute_id_g into l_exists;
375: IF csr_chk_attribute_id_g%NOTFOUND THEN
376: --
377: CLOSE csr_chk_attribute_id_g;
378: hr_utility.set_message(801, 'PAY_34243_INV_ATTID_4_MODEG');
379: hr_utility.raise_error;
380: END IF;
381: CLOSE csr_chk_attribute_id_g;
382: --

Line 379: hr_utility.raise_error;

375: IF csr_chk_attribute_id_g%NOTFOUND THEN
376: --
377: CLOSE csr_chk_attribute_id_g;
378: hr_utility.set_message(801, 'PAY_34243_INV_ATTID_4_MODEG');
379: hr_utility.raise_error;
380: END IF;
381: CLOSE csr_chk_attribute_id_g;
382: --
383: elsif hr_startup_data_api_support.g_startup_mode = 'STARTUP' THEN

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

380: END IF;
381: CLOSE csr_chk_attribute_id_g;
382: --
383: elsif hr_startup_data_api_support.g_startup_mode = 'STARTUP' THEN
384: hr_utility.set_location(l_proc, 20);
385: --
386: OPEN csr_chk_attribute_id_s(p_legislation_code);
387: FETCH csr_chk_attribute_id_s into l_exists;
388: IF csr_chk_attribute_id_s%NOTFOUND THEN

Line 391: hr_utility.set_message(801, 'PAY_34244_INV_ATTID_4_MODES');

387: FETCH csr_chk_attribute_id_s into l_exists;
388: IF csr_chk_attribute_id_s%NOTFOUND THEN
389: --
390: CLOSE csr_chk_attribute_id_s;
391: hr_utility.set_message(801, 'PAY_34244_INV_ATTID_4_MODES');
392: hr_utility.raise_error;
393: END IF;
394: CLOSE csr_chk_attribute_id_s;
395: --

Line 392: hr_utility.raise_error;

388: IF csr_chk_attribute_id_s%NOTFOUND THEN
389: --
390: CLOSE csr_chk_attribute_id_s;
391: hr_utility.set_message(801, 'PAY_34244_INV_ATTID_4_MODES');
392: hr_utility.raise_error;
393: END IF;
394: CLOSE csr_chk_attribute_id_s;
395: --
396: ELSIF hr_startup_data_api_support.g_startup_mode = 'USER' THEN

Line 397: hr_utility.set_location(l_proc, 25);

393: END IF;
394: CLOSE csr_chk_attribute_id_s;
395: --
396: ELSIF hr_startup_data_api_support.g_startup_mode = 'USER' THEN
397: hr_utility.set_location(l_proc, 25);
398: --
399: if p_balance_attribute_id is not null then
400: l_legislation_code := pay_pba_bus.return_legislation_code
401: (p_balance_attribute_id);

Line 413: hr_utility.set_message(801, 'PAY_34245_INV_ATTID_4MODEU');

409: FETCH csr_chk_attribute_id_u into l_exists;
410: IF csr_chk_attribute_id_u%NOTFOUND THEN
411: --
412: CLOSE csr_chk_attribute_id_u;
413: hr_utility.set_message(801, 'PAY_34245_INV_ATTID_4MODEU');
414: hr_utility.raise_error;
415: END IF;
416: CLOSE csr_chk_attribute_id_u;
417: --

Line 414: hr_utility.raise_error;

410: IF csr_chk_attribute_id_u%NOTFOUND THEN
411: --
412: CLOSE csr_chk_attribute_id_u;
413: hr_utility.set_message(801, 'PAY_34245_INV_ATTID_4MODEU');
414: hr_utility.raise_error;
415: END IF;
416: CLOSE csr_chk_attribute_id_u;
417: --
418: END IF;

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

420: end if;
421: --
422: end if;
423: --
424: hr_utility.set_location('Leaving: '||l_proc, 20);
425: --
426: END chk_attribute_id;
427: -- ----------------------------------------------------------------------------
428: -- |-----------------------------< chk_def_bal_id >---------------------------|

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

506: l_exists number;
507: l_legislation_code pay_balance_attributes.legislation_code%type;
508: Begin
509: --
510: hr_utility.set_location('Entering: '||l_proc,5);
511: --
512: -- Only execute the cursor if absolutely necessary.
513: --
514: IF (((p_balance_attribute_id is not null) and

Line 520: hr_utility.set_location(l_proc, 10);

516: nvl(p_defined_balance_id, hr_api.g_number))
517: or
518: (p_balance_attribute_id is null)) then
519: --
520: hr_utility.set_location(l_proc, 10);
521: --
522: -- Only need to open the cursor if defined_balance_id is not null
523: --
524: if p_defined_balance_id is not null then

Line 527: hr_utility.set_location(l_proc, 15);

523: --
524: if p_defined_balance_id is not null then
525: --
526: IF hr_startup_data_api_support.g_startup_mode = 'GENERIC' THEN
527: hr_utility.set_location(l_proc, 15);
528: --
529: OPEN csr_chk_def_bal_id_g;
530: FETCH csr_chk_def_bal_id_g into l_exists;
531: IF csr_chk_def_bal_id_g%NOTFOUND THEN

Line 534: hr_utility.set_message(801, 'PAY_34246_INV_DEFBAL_4_MODEG');

530: FETCH csr_chk_def_bal_id_g into l_exists;
531: IF csr_chk_def_bal_id_g%NOTFOUND THEN
532: --
533: CLOSE csr_chk_def_bal_id_g;
534: hr_utility.set_message(801, 'PAY_34246_INV_DEFBAL_4_MODEG');
535: hr_utility.raise_error;
536: END IF;
537: CLOSE csr_chk_def_bal_id_g;
538: --

Line 535: hr_utility.raise_error;

531: IF csr_chk_def_bal_id_g%NOTFOUND THEN
532: --
533: CLOSE csr_chk_def_bal_id_g;
534: hr_utility.set_message(801, 'PAY_34246_INV_DEFBAL_4_MODEG');
535: hr_utility.raise_error;
536: END IF;
537: CLOSE csr_chk_def_bal_id_g;
538: --
539: elsif hr_startup_data_api_support.g_startup_mode = 'STARTUP' THEN

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

536: END IF;
537: CLOSE csr_chk_def_bal_id_g;
538: --
539: elsif hr_startup_data_api_support.g_startup_mode = 'STARTUP' THEN
540: hr_utility.set_location(l_proc, 20);
541: --
542: OPEN csr_chk_def_bal_id_s(p_legislation_code);
543: FETCH csr_chk_def_bal_id_s into l_exists;
544: IF csr_chk_def_bal_id_s%NOTFOUND THEN

Line 547: hr_utility.set_message(801, 'PAY_34247_INV_DEFBAL_4_MODES');

543: FETCH csr_chk_def_bal_id_s into l_exists;
544: IF csr_chk_def_bal_id_s%NOTFOUND THEN
545: --
546: CLOSE csr_chk_def_bal_id_s;
547: hr_utility.set_message(801, 'PAY_34247_INV_DEFBAL_4_MODES');
548: hr_utility.raise_error;
549: END IF;
550: CLOSE csr_chk_def_bal_id_s;
551: --

Line 548: hr_utility.raise_error;

544: IF csr_chk_def_bal_id_s%NOTFOUND THEN
545: --
546: CLOSE csr_chk_def_bal_id_s;
547: hr_utility.set_message(801, 'PAY_34247_INV_DEFBAL_4_MODES');
548: hr_utility.raise_error;
549: END IF;
550: CLOSE csr_chk_def_bal_id_s;
551: --
552: ELSIF hr_startup_data_api_support.g_startup_mode = 'USER' THEN

Line 553: hr_utility.set_location(l_proc, 25);

549: END IF;
550: CLOSE csr_chk_def_bal_id_s;
551: --
552: ELSIF hr_startup_data_api_support.g_startup_mode = 'USER' THEN
553: hr_utility.set_location(l_proc, 25);
554: --
555: if p_balance_attribute_id is not null then
556: l_legislation_code := pay_pba_bus.return_legislation_code
557: (p_balance_attribute_id);

Line 569: hr_utility.set_message(801, 'PAY_34248_INV_DEFBAL_4_MODEU');

565: FETCH csr_chk_def_bal_id_u into l_exists;
566: IF csr_chk_def_bal_id_u%NOTFOUND THEN
567: --
568: CLOSE csr_chk_def_bal_id_u;
569: hr_utility.set_message(801, 'PAY_34248_INV_DEFBAL_4_MODEU');
570: hr_utility.raise_error;
571: END IF;
572: CLOSE csr_chk_def_bal_id_u;
573: --

Line 570: hr_utility.raise_error;

566: IF csr_chk_def_bal_id_u%NOTFOUND THEN
567: --
568: CLOSE csr_chk_def_bal_id_u;
569: hr_utility.set_message(801, 'PAY_34248_INV_DEFBAL_4_MODEU');
570: hr_utility.raise_error;
571: END IF;
572: CLOSE csr_chk_def_bal_id_u;
573: --
574: END IF;

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

575: --
576: end if;
577: --
578: end if;
579: hr_utility.set_location('Leaving: '||l_proc, 20);
580: --
581: END chk_def_bal_id;
582: -- ----------------------------------------------------------------------------
583: -- |-----------------------< chk_non_updateable_args >------------------------|

Line 636: hr_utility.set_location(l_proc, 15);

632: nvl(pay_pba_shd.g_old_rec.business_group_id, hr_api.g_number) then
633: l_argument := 'business_group_id';
634: raise l_error;
635: end if;
636: hr_utility.set_location(l_proc, 15);
637: --
638: if p_rec.balance_attribute_id <> pay_pba_shd.g_old_rec.balance_attribute_id
639: then
640: l_argument := 'balance_attribute_id';

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

639: then
640: l_argument := 'balance_attribute_id';
641: raise l_error;
642: end if;
643: hr_utility.set_location(l_proc, 20);
644: --
645: if p_rec.attribute_id <> pay_pba_shd.g_old_rec.attribute_id
646: then
647: l_argument := 'attribute_id';

Line 650: hr_utility.set_location(l_proc, 25);

646: then
647: l_argument := 'attribute_id';
648: raise l_error;
649: end if;
650: hr_utility.set_location(l_proc, 25);
651: --
652: if p_rec.legislation_code <> pay_pba_shd.g_old_rec.legislation_code then
653: l_argument := 'legislation_code';
654: raise l_error;

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

652: if p_rec.legislation_code <> pay_pba_shd.g_old_rec.legislation_code then
653: l_argument := 'legislation_code';
654: raise l_error;
655: end if;
656: hr_utility.set_location(l_proc, 30);
657: --
658: if p_rec.defined_balance_id <> pay_pba_shd.g_old_rec.defined_balance_id then
659: l_argument := 'defined_balance_id';
660: raise l_error;

Line 662: hr_utility.set_location(l_proc, 35);

658: if p_rec.defined_balance_id <> pay_pba_shd.g_old_rec.defined_balance_id then
659: l_argument := 'defined_balance_id';
660: raise l_error;
661: end if;
662: hr_utility.set_location(l_proc, 35);
663: --
664: End chk_non_updateable_args;
665: --
666: -- ----------------------------------------------------------------------------

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

714: --
715: l_proc varchar2(72) := g_package||'insert_validate';
716: --
717: Begin
718: hr_utility.set_location('Entering:'||l_proc, 5);
719: --
720: -- Call all supporting business operations
721: --
722: --

Line 753: hr_utility.set_location(l_proc, 10);

749: ,p_business_group_id => p_rec.business_group_id
750: ,p_legislation_code => p_rec.legislation_code
751: );
752: --
753: hr_utility.set_location(l_proc, 10);
754: --
755: if not pay_pba_bus.chk_alterable
756: (p_balance_attribute_id => p_rec.balance_attribute_id
757: ,p_attribute_id => p_rec.attribute_id

Line 761: hr_utility.set_message(801, 'PAY_34249_INS_NOT_ALLOWED_ALT');

757: ,p_attribute_id => p_rec.attribute_id
758: ,p_business_group_id => p_rec.business_group_id
759: ,p_legislation_code => p_rec.legislation_code
760: ) then
761: hr_utility.set_message(801, 'PAY_34249_INS_NOT_ALLOWED_ALT');
762: hr_utility.raise_error;
763: end if;
764: --
765: hr_utility.set_location(l_proc, 15);

Line 762: hr_utility.raise_error;

758: ,p_business_group_id => p_rec.business_group_id
759: ,p_legislation_code => p_rec.legislation_code
760: ) then
761: hr_utility.set_message(801, 'PAY_34249_INS_NOT_ALLOWED_ALT');
762: hr_utility.raise_error;
763: end if;
764: --
765: hr_utility.set_location(l_proc, 15);
766: --

Line 765: hr_utility.set_location(l_proc, 15);

761: hr_utility.set_message(801, 'PAY_34249_INS_NOT_ALLOWED_ALT');
762: hr_utility.raise_error;
763: end if;
764: --
765: hr_utility.set_location(l_proc, 15);
766: --
767: pay_pba_bus.chk_def_bal_id
768: (p_balance_attribute_id => p_rec.balance_attribute_id
769: ,p_defined_balance_id => p_rec.defined_balance_id

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

770: ,p_business_group_id => p_rec.business_group_id
771: ,p_legislation_code => p_rec.legislation_code
772: );
773: --
774: hr_utility.set_location(' Leaving:'||l_proc, 20);
775: End insert_validate;
776: --
777: -- ----------------------------------------------------------------------------
778: -- |---------------------------< delete_validate >----------------------------|

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

783: --
784: l_proc varchar2(72) := g_package||'delete_validate';
785: --
786: Begin
787: hr_utility.set_location('Entering:'||l_proc, 5);
788: --
789: -- NB. need to use g_old_rec, as p_rec is not pupulated with all the columns
790: -- for delete mode.
791: --

Line 817: hr_utility.set_message(801, 'PAY_34250_DEL_NOT_ALLOWED_ALT');

813: ,p_attribute_id => pay_pba_shd.g_old_rec.attribute_id
814: ,p_business_group_id => pay_pba_shd.g_old_rec.business_group_id
815: ,p_legislation_code => pay_pba_shd.g_old_rec.legislation_code
816: ) then
817: hr_utility.set_message(801, 'PAY_34250_DEL_NOT_ALLOWED_ALT');
818: hr_utility.raise_error;
819: end if;
820: --
821: hr_utility.set_location(' Leaving:'||l_proc, 10);

Line 818: hr_utility.raise_error;

814: ,p_business_group_id => pay_pba_shd.g_old_rec.business_group_id
815: ,p_legislation_code => pay_pba_shd.g_old_rec.legislation_code
816: ) then
817: hr_utility.set_message(801, 'PAY_34250_DEL_NOT_ALLOWED_ALT');
818: hr_utility.raise_error;
819: end if;
820: --
821: hr_utility.set_location(' Leaving:'||l_proc, 10);
822: End delete_validate;

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

817: hr_utility.set_message(801, 'PAY_34250_DEL_NOT_ALLOWED_ALT');
818: hr_utility.raise_error;
819: end if;
820: --
821: hr_utility.set_location(' Leaving:'||l_proc, 10);
822: End delete_validate;
823: --
824: end pay_pba_bus;