[Home] [Help]
PACKAGE BODY: APPS.AHL_UMP_NONROUTINES_PVT_W
Source
1 package body ahl_ump_nonroutines_pvt_w as
2 /* $Header: AHLWNRTB.pls 120.0 2005/07/04 03:58 tamdas noship $ */
3 procedure create_sr(p_api_version NUMBER
4 , p_init_msg_list VARCHAR2
5 , p_commit VARCHAR2
6 , p_validation_level NUMBER
7 , p_default VARCHAR2
8 , p_module_type VARCHAR2
9 , x_return_status out nocopy VARCHAR2
10 , x_msg_count out nocopy NUMBER
11 , x_msg_data out nocopy VARCHAR2
12 , p9_a0 in out nocopy NUMBER
13 , p9_a1 in out nocopy VARCHAR2
14 , p9_a2 in out nocopy NUMBER
15 , p9_a3 in out nocopy DATE
16 , p9_a4 in out nocopy NUMBER
17 , p9_a5 in out nocopy VARCHAR2
18 , p9_a6 in out nocopy NUMBER
19 , p9_a7 in out nocopy VARCHAR2
20 , p9_a8 in out nocopy NUMBER
21 , p9_a9 in out nocopy VARCHAR2
22 , p9_a10 in out nocopy NUMBER
23 , p9_a11 in out nocopy VARCHAR2
24 , p9_a12 in out nocopy VARCHAR2
25 , p9_a13 in out nocopy NUMBER
26 , p9_a14 in out nocopy VARCHAR2
27 , p9_a15 in out nocopy VARCHAR2
28 , p9_a16 in out nocopy VARCHAR2
29 , p9_a17 in out nocopy NUMBER
30 , p9_a18 in out nocopy VARCHAR2
31 , p9_a19 in out nocopy VARCHAR2
32 , p9_a20 in out nocopy NUMBER
33 , p9_a21 in out nocopy VARCHAR2
34 , p9_a22 in out nocopy VARCHAR2
35 , p9_a23 in out nocopy VARCHAR2
36 , p9_a24 in out nocopy VARCHAR2
37 , p9_a25 in out nocopy VARCHAR2
38 , p9_a26 in out nocopy VARCHAR2
39 , p9_a27 in out nocopy DATE
40 , p9_a28 in out nocopy DATE
41 , p9_a29 in out nocopy NUMBER
42 , p9_a30 in out nocopy NUMBER
43 , p9_a31 in out nocopy VARCHAR2
44 , p9_a32 in out nocopy VARCHAR2
45 , p9_a33 in out nocopy NUMBER
46 , p9_a34 in out nocopy VARCHAR2
47 , p9_a35 in out nocopy VARCHAR2
48 , p9_a36 in out nocopy VARCHAR2
49 , p9_a37 in out nocopy NUMBER
50 , p9_a38 in out nocopy VARCHAR2
51 , p9_a39 in out nocopy VARCHAR2
52 , p9_a40 in out nocopy NUMBER
53 , p9_a41 in out nocopy VARCHAR2
54 , p9_a42 in out nocopy NUMBER
55 , p9_a43 in out nocopy VARCHAR2
56 , p9_a44 in out nocopy NUMBER
57 , p9_a45 in out nocopy VARCHAR2
58 , p9_a46 in out nocopy NUMBER
59 , p9_a47 in out nocopy VARCHAR2
60 , p9_a48 in out nocopy VARCHAR2
61 , p9_a49 in out nocopy NUMBER
62 , p9_a50 in out nocopy VARCHAR2
63 )
64
65 as
66 ddp_x_nonroutine_rec ahl_ump_nonroutines_pvt.nonroutine_rec_type;
67 ddindx binary_integer; indx binary_integer;
68 begin
69
70 -- copy data to the local IN or IN-OUT args, if any
71
72
73
74
75
76
77
78
79
80 ddp_x_nonroutine_rec.incident_id := p9_a0;
81 ddp_x_nonroutine_rec.incident_number := p9_a1;
82 ddp_x_nonroutine_rec.incident_object_version_number := p9_a2;
83 ddp_x_nonroutine_rec.incident_date := p9_a3;
84 ddp_x_nonroutine_rec.type_id := p9_a4;
85 ddp_x_nonroutine_rec.type_name := p9_a5;
86 ddp_x_nonroutine_rec.status_id := p9_a6;
87 ddp_x_nonroutine_rec.status_name := p9_a7;
88 ddp_x_nonroutine_rec.severity_id := p9_a8;
89 ddp_x_nonroutine_rec.severity_name := p9_a9;
90 ddp_x_nonroutine_rec.urgency_id := p9_a10;
91 ddp_x_nonroutine_rec.urgency_name := p9_a11;
92 ddp_x_nonroutine_rec.customer_type := p9_a12;
93 ddp_x_nonroutine_rec.customer_id := p9_a13;
94 ddp_x_nonroutine_rec.customer_number := p9_a14;
95 ddp_x_nonroutine_rec.customer_name := p9_a15;
96 ddp_x_nonroutine_rec.contact_type := p9_a16;
97 ddp_x_nonroutine_rec.contact_id := p9_a17;
98 ddp_x_nonroutine_rec.contact_number := p9_a18;
99 ddp_x_nonroutine_rec.contact_name := p9_a19;
100 ddp_x_nonroutine_rec.instance_id := p9_a20;
101 ddp_x_nonroutine_rec.instance_number := p9_a21;
102 ddp_x_nonroutine_rec.problem_code := p9_a22;
103 ddp_x_nonroutine_rec.problem_meaning := p9_a23;
104 ddp_x_nonroutine_rec.problem_summary := p9_a24;
105 ddp_x_nonroutine_rec.resolution_code := p9_a25;
106 ddp_x_nonroutine_rec.resolution_meaning := p9_a26;
107 ddp_x_nonroutine_rec.expected_resolution_date := p9_a27;
108 ddp_x_nonroutine_rec.actual_resolution_date := p9_a28;
109 ddp_x_nonroutine_rec.unit_effectivity_id := p9_a29;
110 ddp_x_nonroutine_rec.ue_object_version_number := p9_a30;
111 ddp_x_nonroutine_rec.log_series_code := p9_a31;
112 ddp_x_nonroutine_rec.log_series_meaning := p9_a32;
113 ddp_x_nonroutine_rec.log_series_number := p9_a33;
114 ddp_x_nonroutine_rec.flight_number := p9_a34;
115 ddp_x_nonroutine_rec.mel_cdl_type_code := p9_a35;
116 ddp_x_nonroutine_rec.mel_cdl_type_meaning := p9_a36;
117 ddp_x_nonroutine_rec.position_path_id := p9_a37;
118 ddp_x_nonroutine_rec.ata_code := p9_a38;
119 ddp_x_nonroutine_rec.ata_meaning := p9_a39;
120 ddp_x_nonroutine_rec.clear_station_org_id := p9_a40;
121 ddp_x_nonroutine_rec.clear_station_org := p9_a41;
122 ddp_x_nonroutine_rec.clear_station_dept_id := p9_a42;
123 ddp_x_nonroutine_rec.clear_station_dept := p9_a43;
124 ddp_x_nonroutine_rec.unit_config_header_id := p9_a44;
125 ddp_x_nonroutine_rec.unit_name := p9_a45;
126 ddp_x_nonroutine_rec.inventory_item_id := p9_a46;
127 ddp_x_nonroutine_rec.item_number := p9_a47;
128 ddp_x_nonroutine_rec.serial_number := p9_a48;
129 ddp_x_nonroutine_rec.ata_sequence_id := p9_a49;
130 ddp_x_nonroutine_rec.mel_cdl_qual_flag := p9_a50;
131
132 -- here's the delegated call to the old PL/SQL routine
133 ahl_ump_nonroutines_pvt.create_sr(p_api_version,
134 p_init_msg_list,
135 p_commit,
136 p_validation_level,
137 p_default,
138 p_module_type,
139 x_return_status,
140 x_msg_count,
141 x_msg_data,
142 ddp_x_nonroutine_rec);
143
144 -- copy data back from the local variables to OUT or IN-OUT args, if any
145
146
147
148
149
150
151
152
153
154 p9_a0 := ddp_x_nonroutine_rec.incident_id;
155 p9_a1 := ddp_x_nonroutine_rec.incident_number;
156 p9_a2 := ddp_x_nonroutine_rec.incident_object_version_number;
157 p9_a3 := ddp_x_nonroutine_rec.incident_date;
158 p9_a4 := ddp_x_nonroutine_rec.type_id;
159 p9_a5 := ddp_x_nonroutine_rec.type_name;
160 p9_a6 := ddp_x_nonroutine_rec.status_id;
161 p9_a7 := ddp_x_nonroutine_rec.status_name;
162 p9_a8 := ddp_x_nonroutine_rec.severity_id;
163 p9_a9 := ddp_x_nonroutine_rec.severity_name;
164 p9_a10 := ddp_x_nonroutine_rec.urgency_id;
165 p9_a11 := ddp_x_nonroutine_rec.urgency_name;
166 p9_a12 := ddp_x_nonroutine_rec.customer_type;
167 p9_a13 := ddp_x_nonroutine_rec.customer_id;
168 p9_a14 := ddp_x_nonroutine_rec.customer_number;
169 p9_a15 := ddp_x_nonroutine_rec.customer_name;
170 p9_a16 := ddp_x_nonroutine_rec.contact_type;
171 p9_a17 := ddp_x_nonroutine_rec.contact_id;
172 p9_a18 := ddp_x_nonroutine_rec.contact_number;
173 p9_a19 := ddp_x_nonroutine_rec.contact_name;
174 p9_a20 := ddp_x_nonroutine_rec.instance_id;
175 p9_a21 := ddp_x_nonroutine_rec.instance_number;
176 p9_a22 := ddp_x_nonroutine_rec.problem_code;
177 p9_a23 := ddp_x_nonroutine_rec.problem_meaning;
178 p9_a24 := ddp_x_nonroutine_rec.problem_summary;
179 p9_a25 := ddp_x_nonroutine_rec.resolution_code;
180 p9_a26 := ddp_x_nonroutine_rec.resolution_meaning;
181 p9_a27 := ddp_x_nonroutine_rec.expected_resolution_date;
182 p9_a28 := ddp_x_nonroutine_rec.actual_resolution_date;
183 p9_a29 := ddp_x_nonroutine_rec.unit_effectivity_id;
184 p9_a30 := ddp_x_nonroutine_rec.ue_object_version_number;
185 p9_a31 := ddp_x_nonroutine_rec.log_series_code;
186 p9_a32 := ddp_x_nonroutine_rec.log_series_meaning;
187 p9_a33 := ddp_x_nonroutine_rec.log_series_number;
188 p9_a34 := ddp_x_nonroutine_rec.flight_number;
189 p9_a35 := ddp_x_nonroutine_rec.mel_cdl_type_code;
190 p9_a36 := ddp_x_nonroutine_rec.mel_cdl_type_meaning;
191 p9_a37 := ddp_x_nonroutine_rec.position_path_id;
192 p9_a38 := ddp_x_nonroutine_rec.ata_code;
193 p9_a39 := ddp_x_nonroutine_rec.ata_meaning;
194 p9_a40 := ddp_x_nonroutine_rec.clear_station_org_id;
195 p9_a41 := ddp_x_nonroutine_rec.clear_station_org;
196 p9_a42 := ddp_x_nonroutine_rec.clear_station_dept_id;
197 p9_a43 := ddp_x_nonroutine_rec.clear_station_dept;
198 p9_a44 := ddp_x_nonroutine_rec.unit_config_header_id;
199 p9_a45 := ddp_x_nonroutine_rec.unit_name;
200 p9_a46 := ddp_x_nonroutine_rec.inventory_item_id;
201 p9_a47 := ddp_x_nonroutine_rec.item_number;
202 p9_a48 := ddp_x_nonroutine_rec.serial_number;
203 p9_a49 := ddp_x_nonroutine_rec.ata_sequence_id;
204 p9_a50 := ddp_x_nonroutine_rec.mel_cdl_qual_flag;
205 end;
206
207 procedure update_sr(p_api_version NUMBER
208 , p_init_msg_list VARCHAR2
209 , p_commit VARCHAR2
210 , p_validation_level NUMBER
211 , p_default VARCHAR2
212 , p_module_type VARCHAR2
213 , x_return_status out nocopy VARCHAR2
214 , x_msg_count out nocopy NUMBER
215 , x_msg_data out nocopy VARCHAR2
216 , p9_a0 in out nocopy NUMBER
217 , p9_a1 in out nocopy VARCHAR2
218 , p9_a2 in out nocopy NUMBER
219 , p9_a3 in out nocopy DATE
220 , p9_a4 in out nocopy NUMBER
221 , p9_a5 in out nocopy VARCHAR2
222 , p9_a6 in out nocopy NUMBER
223 , p9_a7 in out nocopy VARCHAR2
224 , p9_a8 in out nocopy NUMBER
225 , p9_a9 in out nocopy VARCHAR2
226 , p9_a10 in out nocopy NUMBER
227 , p9_a11 in out nocopy VARCHAR2
228 , p9_a12 in out nocopy VARCHAR2
229 , p9_a13 in out nocopy NUMBER
230 , p9_a14 in out nocopy VARCHAR2
231 , p9_a15 in out nocopy VARCHAR2
232 , p9_a16 in out nocopy VARCHAR2
233 , p9_a17 in out nocopy NUMBER
234 , p9_a18 in out nocopy VARCHAR2
235 , p9_a19 in out nocopy VARCHAR2
236 , p9_a20 in out nocopy NUMBER
237 , p9_a21 in out nocopy VARCHAR2
238 , p9_a22 in out nocopy VARCHAR2
239 , p9_a23 in out nocopy VARCHAR2
240 , p9_a24 in out nocopy VARCHAR2
241 , p9_a25 in out nocopy VARCHAR2
242 , p9_a26 in out nocopy VARCHAR2
243 , p9_a27 in out nocopy DATE
244 , p9_a28 in out nocopy DATE
245 , p9_a29 in out nocopy NUMBER
246 , p9_a30 in out nocopy NUMBER
247 , p9_a31 in out nocopy VARCHAR2
248 , p9_a32 in out nocopy VARCHAR2
249 , p9_a33 in out nocopy NUMBER
250 , p9_a34 in out nocopy VARCHAR2
251 , p9_a35 in out nocopy VARCHAR2
252 , p9_a36 in out nocopy VARCHAR2
253 , p9_a37 in out nocopy NUMBER
254 , p9_a38 in out nocopy VARCHAR2
255 , p9_a39 in out nocopy VARCHAR2
256 , p9_a40 in out nocopy NUMBER
257 , p9_a41 in out nocopy VARCHAR2
258 , p9_a42 in out nocopy NUMBER
259 , p9_a43 in out nocopy VARCHAR2
260 , p9_a44 in out nocopy NUMBER
261 , p9_a45 in out nocopy VARCHAR2
262 , p9_a46 in out nocopy NUMBER
263 , p9_a47 in out nocopy VARCHAR2
264 , p9_a48 in out nocopy VARCHAR2
265 , p9_a49 in out nocopy NUMBER
266 , p9_a50 in out nocopy VARCHAR2
267 )
268
269 as
270 ddp_x_nonroutine_rec ahl_ump_nonroutines_pvt.nonroutine_rec_type;
271 ddindx binary_integer; indx binary_integer;
272 begin
273
274 -- copy data to the local IN or IN-OUT args, if any
275
276
277
278
279
280
281
282
283
284 ddp_x_nonroutine_rec.incident_id := p9_a0;
285 ddp_x_nonroutine_rec.incident_number := p9_a1;
286 ddp_x_nonroutine_rec.incident_object_version_number := p9_a2;
287 ddp_x_nonroutine_rec.incident_date := p9_a3;
288 ddp_x_nonroutine_rec.type_id := p9_a4;
289 ddp_x_nonroutine_rec.type_name := p9_a5;
290 ddp_x_nonroutine_rec.status_id := p9_a6;
291 ddp_x_nonroutine_rec.status_name := p9_a7;
292 ddp_x_nonroutine_rec.severity_id := p9_a8;
293 ddp_x_nonroutine_rec.severity_name := p9_a9;
294 ddp_x_nonroutine_rec.urgency_id := p9_a10;
295 ddp_x_nonroutine_rec.urgency_name := p9_a11;
296 ddp_x_nonroutine_rec.customer_type := p9_a12;
297 ddp_x_nonroutine_rec.customer_id := p9_a13;
298 ddp_x_nonroutine_rec.customer_number := p9_a14;
299 ddp_x_nonroutine_rec.customer_name := p9_a15;
300 ddp_x_nonroutine_rec.contact_type := p9_a16;
301 ddp_x_nonroutine_rec.contact_id := p9_a17;
302 ddp_x_nonroutine_rec.contact_number := p9_a18;
303 ddp_x_nonroutine_rec.contact_name := p9_a19;
304 ddp_x_nonroutine_rec.instance_id := p9_a20;
305 ddp_x_nonroutine_rec.instance_number := p9_a21;
306 ddp_x_nonroutine_rec.problem_code := p9_a22;
307 ddp_x_nonroutine_rec.problem_meaning := p9_a23;
308 ddp_x_nonroutine_rec.problem_summary := p9_a24;
309 ddp_x_nonroutine_rec.resolution_code := p9_a25;
310 ddp_x_nonroutine_rec.resolution_meaning := p9_a26;
311 ddp_x_nonroutine_rec.expected_resolution_date := p9_a27;
312 ddp_x_nonroutine_rec.actual_resolution_date := p9_a28;
313 ddp_x_nonroutine_rec.unit_effectivity_id := p9_a29;
314 ddp_x_nonroutine_rec.ue_object_version_number := p9_a30;
315 ddp_x_nonroutine_rec.log_series_code := p9_a31;
316 ddp_x_nonroutine_rec.log_series_meaning := p9_a32;
317 ddp_x_nonroutine_rec.log_series_number := p9_a33;
318 ddp_x_nonroutine_rec.flight_number := p9_a34;
319 ddp_x_nonroutine_rec.mel_cdl_type_code := p9_a35;
320 ddp_x_nonroutine_rec.mel_cdl_type_meaning := p9_a36;
321 ddp_x_nonroutine_rec.position_path_id := p9_a37;
322 ddp_x_nonroutine_rec.ata_code := p9_a38;
323 ddp_x_nonroutine_rec.ata_meaning := p9_a39;
324 ddp_x_nonroutine_rec.clear_station_org_id := p9_a40;
325 ddp_x_nonroutine_rec.clear_station_org := p9_a41;
326 ddp_x_nonroutine_rec.clear_station_dept_id := p9_a42;
327 ddp_x_nonroutine_rec.clear_station_dept := p9_a43;
328 ddp_x_nonroutine_rec.unit_config_header_id := p9_a44;
329 ddp_x_nonroutine_rec.unit_name := p9_a45;
330 ddp_x_nonroutine_rec.inventory_item_id := p9_a46;
331 ddp_x_nonroutine_rec.item_number := p9_a47;
332 ddp_x_nonroutine_rec.serial_number := p9_a48;
333 ddp_x_nonroutine_rec.ata_sequence_id := p9_a49;
334 ddp_x_nonroutine_rec.mel_cdl_qual_flag := p9_a50;
335
336 -- here's the delegated call to the old PL/SQL routine
337 ahl_ump_nonroutines_pvt.update_sr(p_api_version,
338 p_init_msg_list,
339 p_commit,
340 p_validation_level,
341 p_default,
342 p_module_type,
343 x_return_status,
344 x_msg_count,
345 x_msg_data,
346 ddp_x_nonroutine_rec);
347
348 -- copy data back from the local variables to OUT or IN-OUT args, if any
349
350
351
352
353
354
355
356
357
358 p9_a0 := ddp_x_nonroutine_rec.incident_id;
359 p9_a1 := ddp_x_nonroutine_rec.incident_number;
360 p9_a2 := ddp_x_nonroutine_rec.incident_object_version_number;
361 p9_a3 := ddp_x_nonroutine_rec.incident_date;
362 p9_a4 := ddp_x_nonroutine_rec.type_id;
363 p9_a5 := ddp_x_nonroutine_rec.type_name;
364 p9_a6 := ddp_x_nonroutine_rec.status_id;
365 p9_a7 := ddp_x_nonroutine_rec.status_name;
366 p9_a8 := ddp_x_nonroutine_rec.severity_id;
367 p9_a9 := ddp_x_nonroutine_rec.severity_name;
368 p9_a10 := ddp_x_nonroutine_rec.urgency_id;
369 p9_a11 := ddp_x_nonroutine_rec.urgency_name;
370 p9_a12 := ddp_x_nonroutine_rec.customer_type;
371 p9_a13 := ddp_x_nonroutine_rec.customer_id;
372 p9_a14 := ddp_x_nonroutine_rec.customer_number;
373 p9_a15 := ddp_x_nonroutine_rec.customer_name;
374 p9_a16 := ddp_x_nonroutine_rec.contact_type;
375 p9_a17 := ddp_x_nonroutine_rec.contact_id;
376 p9_a18 := ddp_x_nonroutine_rec.contact_number;
377 p9_a19 := ddp_x_nonroutine_rec.contact_name;
378 p9_a20 := ddp_x_nonroutine_rec.instance_id;
379 p9_a21 := ddp_x_nonroutine_rec.instance_number;
380 p9_a22 := ddp_x_nonroutine_rec.problem_code;
381 p9_a23 := ddp_x_nonroutine_rec.problem_meaning;
382 p9_a24 := ddp_x_nonroutine_rec.problem_summary;
383 p9_a25 := ddp_x_nonroutine_rec.resolution_code;
384 p9_a26 := ddp_x_nonroutine_rec.resolution_meaning;
385 p9_a27 := ddp_x_nonroutine_rec.expected_resolution_date;
386 p9_a28 := ddp_x_nonroutine_rec.actual_resolution_date;
387 p9_a29 := ddp_x_nonroutine_rec.unit_effectivity_id;
388 p9_a30 := ddp_x_nonroutine_rec.ue_object_version_number;
389 p9_a31 := ddp_x_nonroutine_rec.log_series_code;
390 p9_a32 := ddp_x_nonroutine_rec.log_series_meaning;
391 p9_a33 := ddp_x_nonroutine_rec.log_series_number;
392 p9_a34 := ddp_x_nonroutine_rec.flight_number;
393 p9_a35 := ddp_x_nonroutine_rec.mel_cdl_type_code;
394 p9_a36 := ddp_x_nonroutine_rec.mel_cdl_type_meaning;
395 p9_a37 := ddp_x_nonroutine_rec.position_path_id;
396 p9_a38 := ddp_x_nonroutine_rec.ata_code;
397 p9_a39 := ddp_x_nonroutine_rec.ata_meaning;
398 p9_a40 := ddp_x_nonroutine_rec.clear_station_org_id;
399 p9_a41 := ddp_x_nonroutine_rec.clear_station_org;
400 p9_a42 := ddp_x_nonroutine_rec.clear_station_dept_id;
401 p9_a43 := ddp_x_nonroutine_rec.clear_station_dept;
402 p9_a44 := ddp_x_nonroutine_rec.unit_config_header_id;
403 p9_a45 := ddp_x_nonroutine_rec.unit_name;
404 p9_a46 := ddp_x_nonroutine_rec.inventory_item_id;
405 p9_a47 := ddp_x_nonroutine_rec.item_number;
406 p9_a48 := ddp_x_nonroutine_rec.serial_number;
407 p9_a49 := ddp_x_nonroutine_rec.ata_sequence_id;
408 p9_a50 := ddp_x_nonroutine_rec.mel_cdl_qual_flag;
409 end;
410
411 end ahl_ump_nonroutines_pvt_w;