PACKAGE BODY: APPS.IRC_APL_PROFILE_ACCESS_BK1

Source

1 package body IRC_APL_PROFILE_ACCESS_BK1 as
2 /* $Header: irapaapi.pkb 120.0.12000000.1 2007/03/23 12:08:48 generated noship $ */
3 -- Code generated by the Oracle HRMS API Hook Pre-processor
4 -- Created on 2008/11/06 00:45:20 (YYYY/MM/DD HH24:MI:SS)
5 procedure CREATE_APL_PROFILE_ACCESS_A
6 (P_PERSON_ID in NUMBER
7 ,P_APL_PROFILE_ACCESS_ID in NUMBER
8 ,P_OBJECT_VERSION_NUMBER in NUMBER
9 )is
10 l_commit_unit_number number;
11 l_legislation_code   varchar2(30);
12 begin
13 hr_utility.set_location('Entering: IRC_APL_PROFILE_ACCESS_BK1.CREATE_APL_PROFILE_ACCESS_A', 10);
14 l_commit_unit_number := hr_api.return_commit_unit;
15 if hr_api.call_app_hooks then
16 irc_apl_profile_access_be1.CREATE_APL_PROFILE_ACCESS_A
17 (P_PERSON_ID => P_PERSON_ID
18 ,P_APL_PROFILE_ACCESS_ID => P_APL_PROFILE_ACCESS_ID
19 ,P_OBJECT_VERSION_NUMBER => P_OBJECT_VERSION_NUMBER
20 );
21 end if;
22 hr_multi_message.end_validation_set;
23 hr_api.validate_commit_unit(l_commit_unit_number, 'CREATE_APL_PROFILE_ACCESS', 'AP');
24 hr_utility.set_location(' Leaving: IRC_APL_PROFILE_ACCESS_BK1.CREATE_APL_PROFILE_ACCESS_A', 20);
25 end CREATE_APL_PROFILE_ACCESS_A;
26 procedure CREATE_APL_PROFILE_ACCESS_B
27 (P_PERSON_ID in NUMBER
28 )is
29 begin
30 hr_utility.set_location('Entering: IRC_APL_PROFILE_ACCESS_BK1.CREATE_APL_PROFILE_ACCESS_B', 10);
31 hr_utility.set_location(' Leaving: IRC_APL_PROFILE_ACCESS_BK1.CREATE_APL_PROFILE_ACCESS_B', 20);
32 end CREATE_APL_PROFILE_ACCESS_B;
33 end IRC_APL_PROFILE_ACCESS_BK1;