PACKAGE BODY: APPS.IRC_ASG_STATUS_BK1

Source

1 package body IRC_ASG_STATUS_BK1 as
2 /* $Header: iriasapi.pkb 120.3 2008/01/17 15:23:34 generated noship $ */
3 -- Code generated by the Oracle HRMS API Hook Pre-processor
4 -- Created on 2008/11/06 00:45:26 (YYYY/MM/DD HH24:MI:SS)
5 procedure CREATE_IRC_ASG_STATUS_A
6 (P_ASSIGNMENT_ID in NUMBER
7 ,P_ASSIGNMENT_STATUS_TYPE_ID in NUMBER
8 ,P_STATUS_CHANGE_REASON in VARCHAR2
9 ,P_ASSIGNMENT_STATUS_ID in NUMBER
10 ,P_OBJECT_VERSION_NUMBER in NUMBER
11 ,P_STATUS_CHANGE_DATE in DATE
12 )is
13 l_commit_unit_number number;
14 l_legislation_code   varchar2(30);
15 begin
16 hr_utility.set_location('Entering: IRC_ASG_STATUS_BK1.CREATE_IRC_ASG_STATUS_A', 10);
17 l_commit_unit_number := hr_api.return_commit_unit;
18 if hr_api.call_app_hooks then
19 irc_asg_status_be1.CREATE_IRC_ASG_STATUS_A
20 (P_ASSIGNMENT_ID => P_ASSIGNMENT_ID
21 ,P_ASSIGNMENT_STATUS_TYPE_ID => P_ASSIGNMENT_STATUS_TYPE_ID
22 ,P_STATUS_CHANGE_REASON => P_STATUS_CHANGE_REASON
23 ,P_ASSIGNMENT_STATUS_ID => P_ASSIGNMENT_STATUS_ID
24 ,P_OBJECT_VERSION_NUMBER => P_OBJECT_VERSION_NUMBER
25 ,P_STATUS_CHANGE_DATE => P_STATUS_CHANGE_DATE
26 );
27 end if;
28 hr_multi_message.end_validation_set;
29 hr_api.validate_commit_unit(l_commit_unit_number, 'CREATE_IRC_ASG_STATUS', 'AP');
30 hr_utility.set_location(' Leaving: IRC_ASG_STATUS_BK1.CREATE_IRC_ASG_STATUS_A', 20);
31 end CREATE_IRC_ASG_STATUS_A;
32 procedure CREATE_IRC_ASG_STATUS_B
33 (P_ASSIGNMENT_ID in NUMBER
34 ,P_ASSIGNMENT_STATUS_TYPE_ID in NUMBER
35 ,P_STATUS_CHANGE_REASON in VARCHAR2
36 ,P_STATUS_CHANGE_DATE in DATE
37 )is
38 begin
39 hr_utility.set_location('Entering: IRC_ASG_STATUS_BK1.CREATE_IRC_ASG_STATUS_B', 10);
40 hr_utility.set_location(' Leaving: IRC_ASG_STATUS_BK1.CREATE_IRC_ASG_STATUS_B', 20);
41 end CREATE_IRC_ASG_STATUS_B;
42 end IRC_ASG_STATUS_BK1;