DBA Data[Home] [Help]

PACKAGE BODY: APPS.PQP_VEHICLE_REPOSITORY_BK1

Source


1 package body PQP_VEHICLE_REPOSITORY_BK1 as
2 /* $Header: pqvreapi.pkb 120.0 2005/05/29 02:18:02 generated noship $ */
3 -- Code generated by the Oracle HRMS API Hook Pre-processor
4 -- Created on 2007/10/22 07:23:46 (YYYY/MM/DD HH24:MI:SS)
5 procedure CREATE_VEHICLE_A
6 (P_EFFECTIVE_DATE in DATE
7 ,P_REGISTRATION_NUMBER in VARCHAR2
8 ,P_VEHICLE_TYPE in VARCHAR2
9 ,P_VEHICLE_ID_NUMBER in VARCHAR2
10 ,P_BUSINESS_GROUP_ID in NUMBER
11 ,P_MAKE in VARCHAR2
12 ,P_ENGINE_CAPACITY_IN_CC in NUMBER
13 ,P_FUEL_TYPE in VARCHAR2
14 ,P_CURRENCY_CODE in VARCHAR2
15 ,P_VEHICLE_STATUS in VARCHAR2
16 ,P_VEHICLE_INACTIVITY_REASON in VARCHAR2
17 ,P_MODEL in VARCHAR2
18 ,P_INITIAL_REGISTRATION in DATE
19 ,P_LAST_REGISTRATION_RENEW_DATE in DATE
20 ,P_LIST_PRICE in NUMBER
21 ,P_ACCESSORY_VALUE_AT_STARTDATE in NUMBER
22 ,P_ACCESSORY_VALUE_ADDED_LATER in NUMBER
23 ,P_MARKET_VALUE_CLASSIC_CAR in NUMBER
24 ,P_FISCAL_RATINGS in NUMBER
25 ,P_FISCAL_RATINGS_UOM in VARCHAR2
26 ,P_VEHICLE_PROVIDER in VARCHAR2
27 ,P_VEHICLE_OWNERSHIP in VARCHAR2
28 ,P_SHARED_VEHICLE in VARCHAR2
29 ,P_ASSET_NUMBER in VARCHAR2
30 ,P_LEASE_CONTRACT_NUMBER in VARCHAR2
31 ,P_LEASE_CONTRACT_EXPIRY_DATE in DATE
32 ,P_TAXATION_METHOD in VARCHAR2
33 ,P_FLEET_INFO in VARCHAR2
34 ,P_FLEET_TRANSFER_DATE in DATE
35 ,P_COLOR in VARCHAR2
36 ,P_SEATING_CAPACITY in NUMBER
37 ,P_WEIGHT in NUMBER
38 ,P_WEIGHT_UOM in VARCHAR2
39 ,P_MODEL_YEAR in NUMBER
40 ,P_INSURANCE_NUMBER in VARCHAR2
41 ,P_INSURANCE_EXPIRY_DATE in DATE
42 ,P_COMMENTS in VARCHAR2
43 ,P_VRE_ATTRIBUTE_CATEGORY in VARCHAR2
44 ,P_VRE_ATTRIBUTE1 in VARCHAR2
45 ,P_VRE_ATTRIBUTE2 in VARCHAR2
46 ,P_VRE_ATTRIBUTE3 in VARCHAR2
47 ,P_VRE_ATTRIBUTE4 in VARCHAR2
48 ,P_VRE_ATTRIBUTE5 in VARCHAR2
49 ,P_VRE_ATTRIBUTE6 in VARCHAR2
50 ,P_VRE_ATTRIBUTE7 in VARCHAR2
51 ,P_VRE_ATTRIBUTE8 in VARCHAR2
52 ,P_VRE_ATTRIBUTE9 in VARCHAR2
53 ,P_VRE_ATTRIBUTE10 in VARCHAR2
54 ,P_VRE_ATTRIBUTE11 in VARCHAR2
55 ,P_VRE_ATTRIBUTE12 in VARCHAR2
56 ,P_VRE_ATTRIBUTE13 in VARCHAR2
57 ,P_VRE_ATTRIBUTE14 in VARCHAR2
58 ,P_VRE_ATTRIBUTE15 in VARCHAR2
59 ,P_VRE_ATTRIBUTE16 in VARCHAR2
60 ,P_VRE_ATTRIBUTE17 in VARCHAR2
61 ,P_VRE_ATTRIBUTE18 in VARCHAR2
62 ,P_VRE_ATTRIBUTE19 in VARCHAR2
63 ,P_VRE_ATTRIBUTE20 in VARCHAR2
64 ,P_VRE_INFORMATION_CATEGORY in VARCHAR2
65 ,P_VRE_INFORMATION1 in VARCHAR2
66 ,P_VRE_INFORMATION2 in VARCHAR2
67 ,P_VRE_INFORMATION3 in VARCHAR2
68 ,P_VRE_INFORMATION4 in VARCHAR2
69 ,P_VRE_INFORMATION5 in VARCHAR2
70 ,P_VRE_INFORMATION6 in VARCHAR2
71 ,P_VRE_INFORMATION7 in VARCHAR2
72 ,P_VRE_INFORMATION8 in VARCHAR2
73 ,P_VRE_INFORMATION9 in VARCHAR2
74 ,P_VRE_INFORMATION10 in VARCHAR2
75 ,P_VRE_INFORMATION11 in VARCHAR2
76 ,P_VRE_INFORMATION12 in VARCHAR2
77 ,P_VRE_INFORMATION13 in VARCHAR2
78 ,P_VRE_INFORMATION14 in VARCHAR2
79 ,P_VRE_INFORMATION15 in VARCHAR2
80 ,P_VRE_INFORMATION16 in VARCHAR2
81 ,P_VRE_INFORMATION17 in VARCHAR2
82 ,P_VRE_INFORMATION18 in VARCHAR2
83 ,P_VRE_INFORMATION19 in VARCHAR2
84 ,P_VRE_INFORMATION20 in VARCHAR2
85 ,P_VEHICLE_REPOSITORY_ID in NUMBER
86 ,P_OBJECT_VERSION_NUMBER in NUMBER
87 ,P_EFFECTIVE_START_DATE in DATE
88 ,P_EFFECTIVE_END_DATE in DATE
89 )is
90 begin
91 hr_utility.set_location('Entering: PQP_VEHICLE_REPOSITORY_BK1.CREATE_VEHICLE_A', 10);
92 hr_utility.set_location(' Leaving: PQP_VEHICLE_REPOSITORY_BK1.CREATE_VEHICLE_A', 20);
93 end CREATE_VEHICLE_A;
94 procedure CREATE_VEHICLE_B
95 (P_EFFECTIVE_DATE in DATE
96 ,P_REGISTRATION_NUMBER in VARCHAR2
97 ,P_VEHICLE_TYPE in VARCHAR2
98 ,P_VEHICLE_ID_NUMBER in VARCHAR2
99 ,P_BUSINESS_GROUP_ID in NUMBER
100 ,P_MAKE in VARCHAR2
101 ,P_ENGINE_CAPACITY_IN_CC in NUMBER
102 ,P_FUEL_TYPE in VARCHAR2
103 ,P_CURRENCY_CODE in VARCHAR2
104 ,P_VEHICLE_STATUS in VARCHAR2
105 ,P_VEHICLE_INACTIVITY_REASON in VARCHAR2
106 ,P_MODEL in VARCHAR2
107 ,P_INITIAL_REGISTRATION in DATE
108 ,P_LAST_REGISTRATION_RENEW_DATE in DATE
109 ,P_LIST_PRICE in NUMBER
110 ,P_ACCESSORY_VALUE_AT_STARTDATE in NUMBER
111 ,P_ACCESSORY_VALUE_ADDED_LATER in NUMBER
112 ,P_MARKET_VALUE_CLASSIC_CAR in NUMBER
113 ,P_FISCAL_RATINGS in NUMBER
114 ,P_FISCAL_RATINGS_UOM in VARCHAR2
115 ,P_VEHICLE_PROVIDER in VARCHAR2
116 ,P_VEHICLE_OWNERSHIP in VARCHAR2
117 ,P_SHARED_VEHICLE in VARCHAR2
118 ,P_ASSET_NUMBER in VARCHAR2
119 ,P_LEASE_CONTRACT_NUMBER in VARCHAR2
120 ,P_LEASE_CONTRACT_EXPIRY_DATE in DATE
121 ,P_TAXATION_METHOD in VARCHAR2
122 ,P_FLEET_INFO in VARCHAR2
123 ,P_FLEET_TRANSFER_DATE in DATE
124 ,P_COLOR in VARCHAR2
125 ,P_SEATING_CAPACITY in NUMBER
126 ,P_WEIGHT in NUMBER
127 ,P_WEIGHT_UOM in VARCHAR2
128 ,P_MODEL_YEAR in NUMBER
129 ,P_INSURANCE_NUMBER in VARCHAR2
130 ,P_INSURANCE_EXPIRY_DATE in DATE
131 ,P_COMMENTS in VARCHAR2
132 ,P_VRE_ATTRIBUTE_CATEGORY in VARCHAR2
133 ,P_VRE_ATTRIBUTE1 in VARCHAR2
134 ,P_VRE_ATTRIBUTE2 in VARCHAR2
135 ,P_VRE_ATTRIBUTE3 in VARCHAR2
136 ,P_VRE_ATTRIBUTE4 in VARCHAR2
137 ,P_VRE_ATTRIBUTE5 in VARCHAR2
138 ,P_VRE_ATTRIBUTE6 in VARCHAR2
139 ,P_VRE_ATTRIBUTE7 in VARCHAR2
140 ,P_VRE_ATTRIBUTE8 in VARCHAR2
141 ,P_VRE_ATTRIBUTE9 in VARCHAR2
142 ,P_VRE_ATTRIBUTE10 in VARCHAR2
143 ,P_VRE_ATTRIBUTE11 in VARCHAR2
144 ,P_VRE_ATTRIBUTE12 in VARCHAR2
145 ,P_VRE_ATTRIBUTE13 in VARCHAR2
146 ,P_VRE_ATTRIBUTE14 in VARCHAR2
147 ,P_VRE_ATTRIBUTE15 in VARCHAR2
148 ,P_VRE_ATTRIBUTE16 in VARCHAR2
149 ,P_VRE_ATTRIBUTE17 in VARCHAR2
150 ,P_VRE_ATTRIBUTE18 in VARCHAR2
151 ,P_VRE_ATTRIBUTE19 in VARCHAR2
152 ,P_VRE_ATTRIBUTE20 in VARCHAR2
153 ,P_VRE_INFORMATION_CATEGORY in VARCHAR2
154 ,P_VRE_INFORMATION1 in VARCHAR2
155 ,P_VRE_INFORMATION2 in VARCHAR2
156 ,P_VRE_INFORMATION3 in VARCHAR2
157 ,P_VRE_INFORMATION4 in VARCHAR2
158 ,P_VRE_INFORMATION5 in VARCHAR2
159 ,P_VRE_INFORMATION6 in VARCHAR2
160 ,P_VRE_INFORMATION7 in VARCHAR2
161 ,P_VRE_INFORMATION8 in VARCHAR2
162 ,P_VRE_INFORMATION9 in VARCHAR2
163 ,P_VRE_INFORMATION10 in VARCHAR2
164 ,P_VRE_INFORMATION11 in VARCHAR2
165 ,P_VRE_INFORMATION12 in VARCHAR2
166 ,P_VRE_INFORMATION13 in VARCHAR2
167 ,P_VRE_INFORMATION14 in VARCHAR2
168 ,P_VRE_INFORMATION15 in VARCHAR2
169 ,P_VRE_INFORMATION16 in VARCHAR2
170 ,P_VRE_INFORMATION17 in VARCHAR2
171 ,P_VRE_INFORMATION18 in VARCHAR2
172 ,P_VRE_INFORMATION19 in VARCHAR2
173 ,P_VRE_INFORMATION20 in VARCHAR2
174 )is
175 l_commit_unit_number number;
176 l_legislation_code   varchar2(30);
177 begin
178 hr_utility.set_location('Entering: PQP_VEHICLE_REPOSITORY_BK1.CREATE_VEHICLE_B', 10);
179 l_commit_unit_number := hr_api.return_commit_unit;
180 if hr_api.call_leg_hooks then
181 l_legislation_code := hr_api.return_legislation_code(p_business_group_id => P_BUSINESS_GROUP_ID);
182 if l_legislation_code = 'PL' then
183 PQP_PL_VEHICLE_REPOSITORY.CREATE_PL_VEHICLE
184 (P_EFFECTIVE_DATE => P_EFFECTIVE_DATE
185 ,P_REGISTRATION_NUMBER => P_REGISTRATION_NUMBER
186 ,P_VEHICLE_TYPE => P_VEHICLE_TYPE
187 ,P_VEHICLE_ID_NUMBER => P_VEHICLE_ID_NUMBER
188 ,P_BUSINESS_GROUP_ID => P_BUSINESS_GROUP_ID
189 ,P_MAKE => P_MAKE
190 ,P_ENGINE_CAPACITY_IN_CC => P_ENGINE_CAPACITY_IN_CC
191 ,P_FUEL_TYPE => P_FUEL_TYPE
192 ,P_CURRENCY_CODE => P_CURRENCY_CODE
193 ,P_VEHICLE_STATUS => P_VEHICLE_STATUS
194 ,P_VEHICLE_INACTIVITY_REASON => P_VEHICLE_INACTIVITY_REASON
195 ,P_MODEL => P_MODEL
196 ,P_INITIAL_REGISTRATION => P_INITIAL_REGISTRATION
197 ,P_LAST_REGISTRATION_RENEW_DATE => P_LAST_REGISTRATION_RENEW_DATE
198 ,P_LIST_PRICE => P_LIST_PRICE
199 ,P_ACCESSORY_VALUE_AT_STARTDATE => P_ACCESSORY_VALUE_AT_STARTDATE
200 ,P_ACCESSORY_VALUE_ADDED_LATER => P_ACCESSORY_VALUE_ADDED_LATER
201 ,P_MARKET_VALUE_CLASSIC_CAR => P_MARKET_VALUE_CLASSIC_CAR
202 ,P_FISCAL_RATINGS => P_FISCAL_RATINGS
203 ,P_FISCAL_RATINGS_UOM => P_FISCAL_RATINGS_UOM
204 ,P_VEHICLE_PROVIDER => P_VEHICLE_PROVIDER
205 ,P_VEHICLE_OWNERSHIP => P_VEHICLE_OWNERSHIP
206 ,P_SHARED_VEHICLE => P_SHARED_VEHICLE
207 ,P_ASSET_NUMBER => P_ASSET_NUMBER
208 ,P_LEASE_CONTRACT_NUMBER => P_LEASE_CONTRACT_NUMBER
209 ,P_LEASE_CONTRACT_EXPIRY_DATE => P_LEASE_CONTRACT_EXPIRY_DATE
210 ,P_TAXATION_METHOD => P_TAXATION_METHOD
211 ,P_FLEET_INFO => P_FLEET_INFO
212 ,P_FLEET_TRANSFER_DATE => P_FLEET_TRANSFER_DATE
213 ,P_COLOR => P_COLOR
214 ,P_SEATING_CAPACITY => P_SEATING_CAPACITY
215 ,P_WEIGHT => P_WEIGHT
216 ,P_WEIGHT_UOM => P_WEIGHT_UOM
217 ,P_MODEL_YEAR => P_MODEL_YEAR
218 ,P_INSURANCE_NUMBER => P_INSURANCE_NUMBER
219 ,P_INSURANCE_EXPIRY_DATE => P_INSURANCE_EXPIRY_DATE
220 ,P_COMMENTS => P_COMMENTS
221 ,P_VRE_ATTRIBUTE_CATEGORY => P_VRE_ATTRIBUTE_CATEGORY
222 ,P_VRE_INFORMATION_CATEGORY => P_VRE_INFORMATION_CATEGORY
223 ,P_VRE_INFORMATION1 => P_VRE_INFORMATION1
224 ,P_VRE_INFORMATION2 => P_VRE_INFORMATION2
225 ,P_VRE_INFORMATION3 => P_VRE_INFORMATION3
226 ,P_VRE_INFORMATION4 => P_VRE_INFORMATION4
227 ,P_VRE_INFORMATION5 => P_VRE_INFORMATION5
228 ,P_VRE_INFORMATION6 => P_VRE_INFORMATION6
229 ,P_VRE_INFORMATION7 => P_VRE_INFORMATION7
230 ,P_VRE_INFORMATION8 => P_VRE_INFORMATION8
231 ,P_VRE_INFORMATION9 => P_VRE_INFORMATION9
232 ,P_VRE_INFORMATION10 => P_VRE_INFORMATION10
233 ,P_VRE_INFORMATION11 => P_VRE_INFORMATION11
234 ,P_VRE_INFORMATION12 => P_VRE_INFORMATION12
235 ,P_VRE_INFORMATION13 => P_VRE_INFORMATION13
236 ,P_VRE_INFORMATION14 => P_VRE_INFORMATION14
237 ,P_VRE_INFORMATION15 => P_VRE_INFORMATION15
238 ,P_VRE_INFORMATION16 => P_VRE_INFORMATION16
239 ,P_VRE_INFORMATION17 => P_VRE_INFORMATION17
240 ,P_VRE_INFORMATION18 => P_VRE_INFORMATION18
241 ,P_VRE_INFORMATION19 => P_VRE_INFORMATION19
242 ,P_VRE_INFORMATION20 => P_VRE_INFORMATION20
243 );
244 end if;
245 end if;
246 hr_api.validate_commit_unit(l_commit_unit_number, 'CREATE_VEHICLE', 'BP');
247 hr_utility.set_location(' Leaving: PQP_VEHICLE_REPOSITORY_BK1.CREATE_VEHICLE_B', 20);
248 end CREATE_VEHICLE_B;
249 end PQP_VEHICLE_REPOSITORY_BK1;