DBA Data[Home] [Help]

APPS.IRC_ITA_BUS dependencies on IRC_TEMPLATE_ASSOCIATIONS

Line 28: -- irc_template_associations and PER_BUSINESS_GROUPS_PERF

24: --
25: -- Declare cursor
26: --
27: -- EDIT_HERE In the following cursor statement add join(s) between
28: -- irc_template_associations and PER_BUSINESS_GROUPS_PERF
29: -- so that the security_group_id for
30: -- the current business group context can be derived.
31: -- Remove this comment when the edit has been completed.
32: cursor csr_sec_grp is

Line 36: , irc_template_associations ita

32: cursor csr_sec_grp is
33: select pbg.security_group_id,
34: pbg.legislation_code
35: from per_business_groups_perf pbg
36: , irc_template_associations ita
37: -- , EDIT_HERE table_name(s) 333
38: where ita.template_association_id = p_template_association_id;
39: -- and pbg.business_group_id = EDIT_HERE 333.business_group_id;
40: --

Line 105: -- irc_template_associations and PER_BUSINESS_GROUPS_PERF

101: --
102: -- Declare cursor
103: --
104: -- EDIT_HERE In the following cursor statement add join(s) between
105: -- irc_template_associations and PER_BUSINESS_GROUPS_PERF
106: -- so that the legislation_code for
107: -- the current business group context can be derived.
108: -- Remove this comment when the edit has been completed.
109: cursor csr_leg_code is

Line 112: , irc_template_associations ita

108: -- Remove this comment when the edit has been completed.
109: cursor csr_leg_code is
110: select pbg.legislation_code
111: from per_business_groups_perf pbg
112: , irc_template_associations ita
113: -- , EDIT_HERE table_name(s) 333
114: where ita.template_association_id = p_template_association_id;
115: -- and pbg.business_group_id = EDIT_HERE 333.business_group_id;
116: --

Line 265: (p_template_association_id in irc_template_associations.template_association_id%TYPE

261: --
262: -- {End Of Comments}
263: -- ----------------------------------------------------------------------------
264: Procedure chk_template_id
265: (p_template_association_id in irc_template_associations.template_association_id%TYPE
266: ,p_template_id in irc_template_associations.template_id%TYPE
267: ,p_object_version_number in irc_template_associations.object_version_number%TYPE
268: ) IS
269: --

Line 266: ,p_template_id in irc_template_associations.template_id%TYPE

262: -- {End Of Comments}
263: -- ----------------------------------------------------------------------------
264: Procedure chk_template_id
265: (p_template_association_id in irc_template_associations.template_association_id%TYPE
266: ,p_template_id in irc_template_associations.template_id%TYPE
267: ,p_object_version_number in irc_template_associations.object_version_number%TYPE
268: ) IS
269: --
270: l_proc varchar2(72) := g_package || 'chk_template_id';

Line 267: ,p_object_version_number in irc_template_associations.object_version_number%TYPE

263: -- ----------------------------------------------------------------------------
264: Procedure chk_template_id
265: (p_template_association_id in irc_template_associations.template_association_id%TYPE
266: ,p_template_id in irc_template_associations.template_id%TYPE
267: ,p_object_version_number in irc_template_associations.object_version_number%TYPE
268: ) IS
269: --
270: l_proc varchar2(72) := g_package || 'chk_template_id';
271: l_template_id varchar2(1);

Line 303: (p_associated_column1 => 'IRC_TEMPLATE_ASSOCIATIONS.TEMPLATE_ID'

299: then
300: close csr_template;
301: fnd_message.set_name('PER','IRC_412326_OFFER_INV_TEMPLT_ID');
302: hr_multi_message.add
303: (p_associated_column1 => 'IRC_TEMPLATE_ASSOCIATIONS.TEMPLATE_ID'
304: );
305: else
306: close csr_template;
307: end if;

Line 311: (p_associated_column1 => 'IRC_TEMPLATE_ASSOCIATIONS.TEMPLATE_ID'

307: end if;
308: else
309: fnd_message.set_name('PER','IRC_412327_OFFER_NULL_TMPLT_ID');
310: hr_multi_message.add
311: (p_associated_column1 => 'IRC_TEMPLATE_ASSOCIATIONS.TEMPLATE_ID'
312: );
313:
314: end if;
315: end if;

Line 322: (p_associated_column1 => 'IRC_TEMPLATE_ASSOCIATIONS.TEMPLATE_ID'

318: --
319: exception
320: when app_exception.application_exception then
321: if hr_multi_message.exception_add
322: (p_associated_column1 => 'IRC_TEMPLATE_ASSOCIATIONS.TEMPLATE_ID'
323: ) then
324: hr_utility.set_location(' Leaving:'|| l_proc, 50);
325: raise;
326: end if;

Line 357: (p_organization_id in irc_template_associations.organization_id%TYPE

353: --
354: -- {End Of Comments}
355: -- ----------------------------------------------------------------------------
356: procedure chk_organization_id
357: (p_organization_id in irc_template_associations.organization_id%TYPE
358: )
359: is
360: --
361: l_proc varchar2(72) := g_package||'chk_organization_id';

Line 373: (p_check_column1 => 'IRC_TEMPLATE_ASSOCIATIONS.TEMPLATE_ID'

369: begin
370: hr_utility.set_location('Entering:'|| l_proc, 10);
371: --
372: if hr_multi_message.no_exclusive_error
373: (p_check_column1 => 'IRC_TEMPLATE_ASSOCIATIONS.TEMPLATE_ID'
374: ) then
375: --
376:
377: if ((irc_ita_shd.g_old_rec.template_association_id is null and p_organization_id is not null)

Line 407: (p_associated_column1 => 'IRC_TEMPLATE_ASSOCIATIONS.ORGANIZATION_ID'

403: --
404: exception
405: when app_exception.application_exception then
406: if hr_multi_message.exception_add
407: (p_associated_column1 => 'IRC_TEMPLATE_ASSOCIATIONS.ORGANIZATION_ID'
408: ) then
409: hr_utility.set_location(' Leaving:'|| l_proc, 50);
410: raise;
411: end if;

Line 442: (p_job_id in irc_template_associations.job_id%TYPE

438: --
439: -- {End Of Comments}
440: -- ----------------------------------------------------------------------------
441: procedure chk_job_id
442: (p_job_id in irc_template_associations.job_id%TYPE
443: )
444: is
445: --
446: l_proc varchar2(72) := g_package||'chk_job_id';

Line 457: (p_check_column1 => 'IRC_TEMPLATE_ASSOCIATIONS.TEMPLATE_ID'

453: begin
454: hr_utility.set_location('Entering:'|| l_proc, 10);
455: --
456: if hr_multi_message.no_exclusive_error
457: (p_check_column1 => 'IRC_TEMPLATE_ASSOCIATIONS.TEMPLATE_ID'
458: ) then
459: --
460:
461: if ((irc_ita_shd.g_old_rec.template_association_id is null and p_job_id is not null)

Line 493: (p_associated_column1 => 'IRC_TEMPLATE_ASSOCIATIONS.JOB_ID'

489: --
490: exception
491: when app_exception.application_exception then
492: if hr_multi_message.exception_add
493: (p_associated_column1 => 'IRC_TEMPLATE_ASSOCIATIONS.JOB_ID'
494: ) then
495: hr_utility.set_location(' Leaving:'|| l_proc, 50);
496: raise;
497: end if;

Line 528: (p_position_id in irc_template_associations.position_id%TYPE

524: --
525: -- {End Of Comments}
526: -- ----------------------------------------------------------------------------
527: procedure chk_position_id
528: (p_position_id in irc_template_associations.position_id%TYPE
529: )
530: is
531: --
532: l_proc varchar2(72) := g_package||'chk_position_id';

Line 545: (p_check_column1 => 'IRC_TEMPLATE_ASSOCIATIONS.TEMPLATE_ID'

541: begin
542: hr_utility.set_location('Entering:'|| l_proc, 10);
543: --
544: if hr_multi_message.no_exclusive_error
545: (p_check_column1 => 'IRC_TEMPLATE_ASSOCIATIONS.TEMPLATE_ID'
546: ) then
547: --
548:
549: if ((irc_ita_shd.g_old_rec.template_association_id is null and p_position_id is not null)

Line 581: (p_associated_column1 => 'IRC_TEMPLATE_ASSOCIATIONS.POSITION_ID'

577: --
578: exception
579: when app_exception.application_exception then
580: if hr_multi_message.exception_add
581: (p_associated_column1 => 'IRC_TEMPLATE_ASSOCIATIONS.POSITION_ID'
582: ) then
583: hr_utility.set_location(' Leaving:'|| l_proc, 50);
584: raise;
585: end if;

Line 617: (p_job_id in irc_template_associations.job_id%TYPE

613: --
614: -- {End Of Comments}
615: -- ----------------------------------------------------------------------------
616: procedure chk_job_position_organization
617: (p_job_id in irc_template_associations.job_id%TYPE
618: ,p_organization_id in irc_template_associations.organization_id%TYPE
619: ,p_position_id in irc_template_associations.position_id%TYPE
620: )
621: is

Line 618: ,p_organization_id in irc_template_associations.organization_id%TYPE

614: -- {End Of Comments}
615: -- ----------------------------------------------------------------------------
616: procedure chk_job_position_organization
617: (p_job_id in irc_template_associations.job_id%TYPE
618: ,p_organization_id in irc_template_associations.organization_id%TYPE
619: ,p_position_id in irc_template_associations.position_id%TYPE
620: )
621: is
622: --

Line 619: ,p_position_id in irc_template_associations.position_id%TYPE

615: -- ----------------------------------------------------------------------------
616: procedure chk_job_position_organization
617: (p_job_id in irc_template_associations.job_id%TYPE
618: ,p_organization_id in irc_template_associations.organization_id%TYPE
619: ,p_position_id in irc_template_associations.position_id%TYPE
620: )
621: is
622: --
623: l_proc varchar2(72) := g_package||'chk_job_position_organization';

Line 631: (p_check_column1 => 'IRC_TEMPLATE_ASSOCIATIONS.TEMPLATE_ID'

627: begin
628: hr_utility.set_location('Entering:'|| l_proc, 10);
629: --
630: if hr_multi_message.no_exclusive_error
631: (p_check_column1 => 'IRC_TEMPLATE_ASSOCIATIONS.TEMPLATE_ID'
632: ) then
633: --
634:
635: l_flag := 0;

Line 660: (p_associated_column1 => 'IRC_TEMPLATE_ASSOCIATIONS.JOB_ID'

656: --
657: exception
658: when app_exception.application_exception then
659: if hr_multi_message.exception_add
660: (p_associated_column1 => 'IRC_TEMPLATE_ASSOCIATIONS.JOB_ID'
661: ,p_associated_column2 => 'IRC_TEMPLATE_ASSOCIATIONS.ORGANIZATION_ID'
662: ,p_associated_column3 => 'IRC_TEMPLATE_ASSOCIATIONS.POSITION_ID'
663: ) then
664: hr_utility.set_location(' Leaving:'|| l_proc, 50);

Line 661: ,p_associated_column2 => 'IRC_TEMPLATE_ASSOCIATIONS.ORGANIZATION_ID'

657: exception
658: when app_exception.application_exception then
659: if hr_multi_message.exception_add
660: (p_associated_column1 => 'IRC_TEMPLATE_ASSOCIATIONS.JOB_ID'
661: ,p_associated_column2 => 'IRC_TEMPLATE_ASSOCIATIONS.ORGANIZATION_ID'
662: ,p_associated_column3 => 'IRC_TEMPLATE_ASSOCIATIONS.POSITION_ID'
663: ) then
664: hr_utility.set_location(' Leaving:'|| l_proc, 50);
665: raise;

Line 662: ,p_associated_column3 => 'IRC_TEMPLATE_ASSOCIATIONS.POSITION_ID'

658: when app_exception.application_exception then
659: if hr_multi_message.exception_add
660: (p_associated_column1 => 'IRC_TEMPLATE_ASSOCIATIONS.JOB_ID'
661: ,p_associated_column2 => 'IRC_TEMPLATE_ASSOCIATIONS.ORGANIZATION_ID'
662: ,p_associated_column3 => 'IRC_TEMPLATE_ASSOCIATIONS.POSITION_ID'
663: ) then
664: hr_utility.set_location(' Leaving:'|| l_proc, 50);
665: raise;
666: end if;

Line 699: (p_template_id in irc_template_associations.template_id%TYPE

695: --
696: -- {End Of Comments}
697: -- ----------------------------------------------------------------------------
698: procedure chk_duplicate_template_id
699: (p_template_id in irc_template_associations.template_id%TYPE
700: ,p_job_id in irc_template_associations.job_id%TYPE
701: ,p_organization_id in irc_template_associations.organization_id%TYPE
702: ,p_position_id in irc_template_associations.position_id%TYPE
703: )

Line 700: ,p_job_id in irc_template_associations.job_id%TYPE

696: -- {End Of Comments}
697: -- ----------------------------------------------------------------------------
698: procedure chk_duplicate_template_id
699: (p_template_id in irc_template_associations.template_id%TYPE
700: ,p_job_id in irc_template_associations.job_id%TYPE
701: ,p_organization_id in irc_template_associations.organization_id%TYPE
702: ,p_position_id in irc_template_associations.position_id%TYPE
703: )
704: is

Line 701: ,p_organization_id in irc_template_associations.organization_id%TYPE

697: -- ----------------------------------------------------------------------------
698: procedure chk_duplicate_template_id
699: (p_template_id in irc_template_associations.template_id%TYPE
700: ,p_job_id in irc_template_associations.job_id%TYPE
701: ,p_organization_id in irc_template_associations.organization_id%TYPE
702: ,p_position_id in irc_template_associations.position_id%TYPE
703: )
704: is
705: --

Line 702: ,p_position_id in irc_template_associations.position_id%TYPE

698: procedure chk_duplicate_template_id
699: (p_template_id in irc_template_associations.template_id%TYPE
700: ,p_job_id in irc_template_associations.job_id%TYPE
701: ,p_organization_id in irc_template_associations.organization_id%TYPE
702: ,p_position_id in irc_template_associations.position_id%TYPE
703: )
704: is
705: --
706: l_proc varchar2(72) := g_package||'chk_duplicate_template_id';

Line 711: from irc_template_associations ita

707: l_flag varchar2(1);
708: --
709: cursor csr_org is
710: select null
711: from irc_template_associations ita
712: where ita.organization_id = p_organization_id
713: and ita.template_id = p_template_id;
714: --
715: cursor csr_pos is

Line 717: from irc_template_associations ita

713: and ita.template_id = p_template_id;
714: --
715: cursor csr_pos is
716: select null
717: from irc_template_associations ita
718: where ita.position_id = p_position_id
719: and ita.template_id = p_template_id;
720: --
721: cursor csr_job is

Line 723: from irc_template_associations ita

719: and ita.template_id = p_template_id;
720: --
721: cursor csr_job is
722: select null
723: from irc_template_associations ita
724: where ita.job_id = p_job_id
725: and ita.template_id = p_template_id;
726: --
727:

Line 732: (p_check_column1 => 'IRC_TEMPLATE_ASSOCIATIONS.TEMPLATE_ID'

728: begin
729: hr_utility.set_location('Entering:'|| l_proc, 10);
730: --
731: if hr_multi_message.no_exclusive_error
732: (p_check_column1 => 'IRC_TEMPLATE_ASSOCIATIONS.TEMPLATE_ID'
733: ) then
734: --
735: --
736: if (p_job_id is not null) then

Line 789: (p_associated_column1 => 'IRC_TEMPLATE_ASSOCIATIONS.JOB_ID'

785: --
786: exception
787: when app_exception.application_exception then
788: if hr_multi_message.exception_add
789: (p_associated_column1 => 'IRC_TEMPLATE_ASSOCIATIONS.JOB_ID'
790: ,p_associated_column2 => 'IRC_TEMPLATE_ASSOCIATIONS.ORGANIZATION_ID'
791: ,p_associated_column3 => 'IRC_TEMPLATE_ASSOCIATIONS.POSITION_ID'
792: ) then
793: hr_utility.set_location(' Leaving:'|| l_proc, 50);

Line 790: ,p_associated_column2 => 'IRC_TEMPLATE_ASSOCIATIONS.ORGANIZATION_ID'

786: exception
787: when app_exception.application_exception then
788: if hr_multi_message.exception_add
789: (p_associated_column1 => 'IRC_TEMPLATE_ASSOCIATIONS.JOB_ID'
790: ,p_associated_column2 => 'IRC_TEMPLATE_ASSOCIATIONS.ORGANIZATION_ID'
791: ,p_associated_column3 => 'IRC_TEMPLATE_ASSOCIATIONS.POSITION_ID'
792: ) then
793: hr_utility.set_location(' Leaving:'|| l_proc, 50);
794: raise;

Line 791: ,p_associated_column3 => 'IRC_TEMPLATE_ASSOCIATIONS.POSITION_ID'

787: when app_exception.application_exception then
788: if hr_multi_message.exception_add
789: (p_associated_column1 => 'IRC_TEMPLATE_ASSOCIATIONS.JOB_ID'
790: ,p_associated_column2 => 'IRC_TEMPLATE_ASSOCIATIONS.ORGANIZATION_ID'
791: ,p_associated_column3 => 'IRC_TEMPLATE_ASSOCIATIONS.POSITION_ID'
792: ) then
793: hr_utility.set_location(' Leaving:'|| l_proc, 50);
794: raise;
795: end if;

Line 828: ( p_template_association_id in irc_template_associations.template_association_id%TYPE

824: --
825: -- {End Of Comments}
826: -- ----------------------------------------------------------------------------
827: Procedure chk_default_association
828: ( p_template_association_id in irc_template_associations.template_association_id%TYPE
829: ,p_object_version_number in irc_template_associations.object_version_number%TYPE
830: ,p_creation_date in irc_template_associations.creation_date%TYPE
831: ,p_default_association in irc_template_associations.default_association%TYPE
832: ) IS

Line 829: ,p_object_version_number in irc_template_associations.object_version_number%TYPE

825: -- {End Of Comments}
826: -- ----------------------------------------------------------------------------
827: Procedure chk_default_association
828: ( p_template_association_id in irc_template_associations.template_association_id%TYPE
829: ,p_object_version_number in irc_template_associations.object_version_number%TYPE
830: ,p_creation_date in irc_template_associations.creation_date%TYPE
831: ,p_default_association in irc_template_associations.default_association%TYPE
832: ) IS
833:

Line 830: ,p_creation_date in irc_template_associations.creation_date%TYPE

826: -- ----------------------------------------------------------------------------
827: Procedure chk_default_association
828: ( p_template_association_id in irc_template_associations.template_association_id%TYPE
829: ,p_object_version_number in irc_template_associations.object_version_number%TYPE
830: ,p_creation_date in irc_template_associations.creation_date%TYPE
831: ,p_default_association in irc_template_associations.default_association%TYPE
832: ) IS
833:
834: -- Local declarations

Line 831: ,p_default_association in irc_template_associations.default_association%TYPE

827: Procedure chk_default_association
828: ( p_template_association_id in irc_template_associations.template_association_id%TYPE
829: ,p_object_version_number in irc_template_associations.object_version_number%TYPE
830: ,p_creation_date in irc_template_associations.creation_date%TYPE
831: ,p_default_association in irc_template_associations.default_association%TYPE
832: ) IS
833:
834: -- Local declarations
835: l_proc VARCHAR2(72) := g_package||'chk_default_association';

Line 842: (p_check_column1 => 'IRC_TEMPLATE_ASSOCIATIONS.TEMPLATE_ID'

838: --
839: hr_utility.set_location('Entering:'|| l_proc, 10);
840: --
841: if hr_multi_message.no_exclusive_error
842: (p_check_column1 => 'IRC_TEMPLATE_ASSOCIATIONS.TEMPLATE_ID'
843: ) then
844: --
845: l_api_updating := irc_ita_shd.api_updating
846: (p_template_association_id => p_template_association_id

Line 884: (p_associated_column1 => 'IRC_TEMPLATE_ASSOCIATIONS.DEFAULT_ASSOCIATION'

880: --
881: exception
882: when app_exception.application_exception then
883: if hr_multi_message.exception_add
884: (p_associated_column1 => 'IRC_TEMPLATE_ASSOCIATIONS.DEFAULT_ASSOCIATION'
885: ) then
886: hr_utility.set_location(' Leaving:'|| l_proc, 60);
887: raise;
888: end if;

Line 918: (p_template_association_id in irc_template_associations.template_association_id%TYPE

914: --
915: -- {End Of Comments}
916: -- ----------------------------------------------------------------------------
917: Procedure chk_dates
918: (p_template_association_id in irc_template_associations.template_association_id%TYPE
919: ,p_object_version_number in irc_template_associations.object_version_number%TYPE
920: ,p_start_date in irc_template_associations.start_date%TYPE
921: ,p_end_date in irc_template_associations.end_date%TYPE
922: ) IS

Line 919: ,p_object_version_number in irc_template_associations.object_version_number%TYPE

915: -- {End Of Comments}
916: -- ----------------------------------------------------------------------------
917: Procedure chk_dates
918: (p_template_association_id in irc_template_associations.template_association_id%TYPE
919: ,p_object_version_number in irc_template_associations.object_version_number%TYPE
920: ,p_start_date in irc_template_associations.start_date%TYPE
921: ,p_end_date in irc_template_associations.end_date%TYPE
922: ) IS
923: --

Line 920: ,p_start_date in irc_template_associations.start_date%TYPE

916: -- ----------------------------------------------------------------------------
917: Procedure chk_dates
918: (p_template_association_id in irc_template_associations.template_association_id%TYPE
919: ,p_object_version_number in irc_template_associations.object_version_number%TYPE
920: ,p_start_date in irc_template_associations.start_date%TYPE
921: ,p_end_date in irc_template_associations.end_date%TYPE
922: ) IS
923: --
924: l_proc varchar2(72) := g_package || 'chk_dates';

Line 921: ,p_end_date in irc_template_associations.end_date%TYPE

917: Procedure chk_dates
918: (p_template_association_id in irc_template_associations.template_association_id%TYPE
919: ,p_object_version_number in irc_template_associations.object_version_number%TYPE
920: ,p_start_date in irc_template_associations.start_date%TYPE
921: ,p_end_date in irc_template_associations.end_date%TYPE
922: ) IS
923: --
924: l_proc varchar2(72) := g_package || 'chk_dates';
925: l_api_updating boolean;

Line 931: (p_check_column1 => 'IRC_TEMPLATE_ASSOCIATIONS.TEMPLATE_ID'

927: Begin
928: hr_utility.set_location('Entering:'||l_proc,10);
929: --
930: if hr_multi_message.no_exclusive_error
931: (p_check_column1 => 'IRC_TEMPLATE_ASSOCIATIONS.TEMPLATE_ID'
932: ) then
933: --
934: l_api_updating := irc_ita_shd.api_updating
935: (p_template_association_id => p_template_association_id

Line 957: (p_associated_column1 => 'IRC_TEMPLATE_ASSOCIATIONS.START_DATE'

953: if (p_start_date > nvl(p_end_date,hr_api.g_eot))
954: then
955: fnd_message.set_name('PER','IRC_ALL_DATE_START_END');
956: hr_multi_message.add
957: (p_associated_column1 => 'IRC_TEMPLATE_ASSOCIATIONS.START_DATE'
958: ,p_associated_column2 => 'IRC_TEMPLATE_ASSOCIATIONS.END_DATE'
959: );
960: end if;
961: end if;

Line 958: ,p_associated_column2 => 'IRC_TEMPLATE_ASSOCIATIONS.END_DATE'

954: then
955: fnd_message.set_name('PER','IRC_ALL_DATE_START_END');
956: hr_multi_message.add
957: (p_associated_column1 => 'IRC_TEMPLATE_ASSOCIATIONS.START_DATE'
958: ,p_associated_column2 => 'IRC_TEMPLATE_ASSOCIATIONS.END_DATE'
959: );
960: end if;
961: end if;
962: end if;

Line 970: (p_associated_column1 => 'IRC_TEMPLATE_ASSOCIATIONS.START_DATE'

966: --
967: exception
968: when app_exception.application_exception then
969: if hr_multi_message.exception_add
970: (p_associated_column1 => 'IRC_TEMPLATE_ASSOCIATIONS.START_DATE'
971: ,p_associated_column2 => 'IRC_TEMPLATE_ASSOCIATIONS.END_DATE'
972: ) then
973: hr_utility.set_location(' Leaving:'|| l_proc, 60);
974: raise;

Line 971: ,p_associated_column2 => 'IRC_TEMPLATE_ASSOCIATIONS.END_DATE'

967: exception
968: when app_exception.application_exception then
969: if hr_multi_message.exception_add
970: (p_associated_column1 => 'IRC_TEMPLATE_ASSOCIATIONS.START_DATE'
971: ,p_associated_column2 => 'IRC_TEMPLATE_ASSOCIATIONS.END_DATE'
972: ) then
973: hr_utility.set_location(' Leaving:'|| l_proc, 60);
974: raise;
975: end if;