PACKAGE BODY: APPS.PQP_VEHICLE_ALLOCATIONS_BK3

Source

1 package body PQP_VEHICLE_ALLOCATIONS_BK3 as
2 /* $Header: pqvalapi.pkb 120.0 2005/05/29 02:16:50 generated noship $ */
3 -- Code generated by the Oracle HRMS API Hook Pre-processor
4 -- Created on 2007/10/22 07:23:47 (YYYY/MM/DD HH24:MI:SS)
5 procedure DELETE_VEHICLE_ALLOCATION_A
6 (P_VALIDATE in BOOLEAN
7 ,P_EFFECTIVE_DATE in DATE
8 ,P_DATETRACK_MODE in VARCHAR2
9 ,P_VEHICLE_ALLOCATION_ID in NUMBER
10 ,P_OBJECT_VERSION_NUMBER in NUMBER
11 ,P_EFFECTIVE_START_DATE in DATE
12 ,P_EFFECTIVE_END_DATE in DATE
13 )is
14 l_commit_unit_number number;
15 l_legislation_code   varchar2(30);
16 begin
17 hr_utility.set_location('Entering: PQP_VEHICLE_ALLOCATIONS_BK3.DELETE_VEHICLE_ALLOCATION_A', 10);
18 l_commit_unit_number := hr_api.return_commit_unit;
19 if hr_api.call_leg_hooks then
20 l_legislation_code := PQP_VAL_BUS.RETURN_LEGISLATION_CODE(P_VEHICLE_ALLOCATION_ID => P_VEHICLE_ALLOCATION_ID
21 );
22 if l_legislation_code = 'IE' then
23 PER_IE_VEHICLE_ALLOC_RULES.ELEMENT_END_DATE_UPDATE
24 (P_VEHICLE_ALLOCATION_ID => P_VEHICLE_ALLOCATION_ID
25 ,P_EFFECTIVE_DATE => P_EFFECTIVE_DATE
26 );
27 end if;
28 end if;
29 hr_multi_message.end_validation_set;
30 hr_api.validate_commit_unit(l_commit_unit_number, 'DELETE_VEHICLE_ALLOCATION', 'AP');
31 hr_utility.set_location(' Leaving: PQP_VEHICLE_ALLOCATIONS_BK3.DELETE_VEHICLE_ALLOCATION_A', 20);
32 end DELETE_VEHICLE_ALLOCATION_A;
33 procedure DELETE_VEHICLE_ALLOCATION_B
34 (P_VALIDATE in BOOLEAN
35 ,P_EFFECTIVE_DATE in DATE
36 ,P_DATETRACK_MODE in VARCHAR2
37 ,P_VEHICLE_ALLOCATION_ID in NUMBER
38 ,P_OBJECT_VERSION_NUMBER in NUMBER
39 )is
40 l_commit_unit_number number;
41 l_legislation_code   varchar2(30);
42 begin
43 hr_utility.set_location('Entering: PQP_VEHICLE_ALLOCATIONS_BK3.DELETE_VEHICLE_ALLOCATION_B', 10);
44 l_commit_unit_number := hr_api.return_commit_unit;
45 if hr_api.call_leg_hooks then
46 l_legislation_code := PQP_VAL_BUS.RETURN_LEGISLATION_CODE(P_VEHICLE_ALLOCATION_ID => P_VEHICLE_ALLOCATION_ID
47 );
48 if l_legislation_code = 'PL' then
49 PQP_PL_VEHICLE_ALLOCATIONS.DELETE_PL_VEHICLE_ALLOCATION
50 (P_VALIDATE => P_VALIDATE
51 ,P_EFFECTIVE_DATE => P_EFFECTIVE_DATE
52 ,P_DATETRACK_MODE => P_DATETRACK_MODE
53 ,P_VEHICLE_ALLOCATION_ID => P_VEHICLE_ALLOCATION_ID
54 ,P_OBJECT_VERSION_NUMBER => P_OBJECT_VERSION_NUMBER
55 );
56 end if;
57 end if;
58 hr_api.validate_commit_unit(l_commit_unit_number, 'DELETE_VEHICLE_ALLOCATION', 'BP');
59 hr_utility.set_location(' Leaving: PQP_VEHICLE_ALLOCATIONS_BK3.DELETE_VEHICLE_ALLOCATION_B', 20);
60 end DELETE_VEHICLE_ALLOCATION_B;
61 end PQP_VEHICLE_ALLOCATIONS_BK3;