[Home] [Help]
PACKAGE BODY: APPS.AHL_UA_FLIGHT_SCHEDULES_PUB_W
Source
1 package body ahl_ua_flight_schedules_pub_w as
2 /* $Header: AHLUFSWB.pls 120.0 2005/05/26 00:59:51 appldev noship $ */
3 procedure rosetta_table_copy_in_p2(t out nocopy ahl_ua_flight_schedules_pub.flight_visit_sch_tbl_type, a0 JTF_NUMBER_TABLE
4 , a1 JTF_VARCHAR2_TABLE_100
5 , a2 JTF_VARCHAR2_TABLE_100
6 , a3 JTF_DATE_TABLE
7 , a4 JTF_DATE_TABLE
8 , a5 JTF_NUMBER_TABLE
9 , a6 JTF_VARCHAR2_TABLE_100
10 , a7 JTF_NUMBER_TABLE
11 , a8 JTF_VARCHAR2_TABLE_100
12 , a9 JTF_DATE_TABLE
13 , a10 JTF_DATE_TABLE
14 , a11 JTF_NUMBER_TABLE
15 , a12 JTF_VARCHAR2_TABLE_100
16 , a13 JTF_NUMBER_TABLE
17 , a14 JTF_VARCHAR2_TABLE_100
18 , a15 JTF_NUMBER_TABLE
19 , a16 JTF_NUMBER_TABLE
20 , a17 JTF_VARCHAR2_TABLE_100
21 , a18 JTF_NUMBER_TABLE
22 , a19 JTF_VARCHAR2_TABLE_100
23 , a20 JTF_VARCHAR2_TABLE_100
24 , a21 JTF_VARCHAR2_TABLE_100
25 , a22 JTF_VARCHAR2_TABLE_100
26 , a23 JTF_VARCHAR2_TABLE_100
27 , a24 JTF_NUMBER_TABLE
28 , a25 JTF_VARCHAR2_TABLE_100
29 , a26 JTF_VARCHAR2_TABLE_100
30 , a27 JTF_NUMBER_TABLE
31 , a28 JTF_VARCHAR2_TABLE_100
32 , a29 JTF_VARCHAR2_TABLE_100
33 , a30 JTF_VARCHAR2_TABLE_100
34 , a31 JTF_VARCHAR2_TABLE_100
35 , a32 JTF_VARCHAR2_TABLE_100
36 , a33 JTF_VARCHAR2_TABLE_200
37 , a34 JTF_VARCHAR2_TABLE_200
38 , a35 JTF_VARCHAR2_TABLE_200
39 , a36 JTF_VARCHAR2_TABLE_200
40 , a37 JTF_VARCHAR2_TABLE_200
41 , a38 JTF_VARCHAR2_TABLE_200
42 , a39 JTF_VARCHAR2_TABLE_200
43 , a40 JTF_VARCHAR2_TABLE_200
44 , a41 JTF_VARCHAR2_TABLE_200
45 , a42 JTF_VARCHAR2_TABLE_200
46 , a43 JTF_VARCHAR2_TABLE_200
47 , a44 JTF_VARCHAR2_TABLE_200
48 , a45 JTF_VARCHAR2_TABLE_200
49 , a46 JTF_VARCHAR2_TABLE_200
50 , a47 JTF_VARCHAR2_TABLE_200
51 , a48 JTF_VARCHAR2_TABLE_100
52 ) as
53 ddindx binary_integer; indx binary_integer;
54 begin
55 if a0 is not null and a0.count > 0 then
56 if a0.count > 0 then
57 indx := a0.first;
58 ddindx := 1;
59 while true loop
60 t(ddindx).unit_schedule_id := a0(indx);
61 t(ddindx).flight_number := a1(indx);
62 t(ddindx).segment := a2(indx);
63 t(ddindx).est_departure_time := a3(indx);
64 t(ddindx).actual_departure_time := a4(indx);
65 t(ddindx).departure_dept_id := a5(indx);
66 t(ddindx).departure_dept_code := a6(indx);
67 t(ddindx).departure_org_id := a7(indx);
68 t(ddindx).departure_org_code := a8(indx);
69 t(ddindx).est_arrival_time := a9(indx);
70 t(ddindx).actual_arrival_time := a10(indx);
71 t(ddindx).arrival_dept_id := a11(indx);
72 t(ddindx).arrival_dept_code := a12(indx);
73 t(ddindx).arrival_org_id := a13(indx);
74 t(ddindx).arrival_org_code := a14(indx);
75 t(ddindx).preceding_us_id := a15(indx);
76 t(ddindx).unit_config_header_id := a16(indx);
77 t(ddindx).unit_config_name := a17(indx);
78 t(ddindx).csi_instance_id := a18(indx);
79 t(ddindx).instance_number := a19(indx);
80 t(ddindx).item_number := a20(indx);
81 t(ddindx).serial_number := a21(indx);
82 t(ddindx).visit_reschedule_mode := a22(indx);
83 t(ddindx).visit_reschedule_meaning := a23(indx);
84 t(ddindx).object_version_number := a24(indx);
85 t(ddindx).is_update_allowed := a25(indx);
86 t(ddindx).is_delete_allowed := a26(indx);
87 t(ddindx).visit_id := a27(indx);
88 t(ddindx).visit_type_code := a28(indx);
89 t(ddindx).visit_type_meaning := a29(indx);
90 t(ddindx).visit_create_type := a30(indx);
91 t(ddindx).visit_create_meaning := a31(indx);
92 t(ddindx).attribute_category := a32(indx);
93 t(ddindx).attribute1 := a33(indx);
94 t(ddindx).attribute2 := a34(indx);
95 t(ddindx).attribute3 := a35(indx);
96 t(ddindx).attribute4 := a36(indx);
97 t(ddindx).attribute5 := a37(indx);
98 t(ddindx).attribute6 := a38(indx);
99 t(ddindx).attribute7 := a39(indx);
100 t(ddindx).attribute8 := a40(indx);
101 t(ddindx).attribute9 := a41(indx);
102 t(ddindx).attribute10 := a42(indx);
103 t(ddindx).attribute11 := a43(indx);
104 t(ddindx).attribute12 := a44(indx);
105 t(ddindx).attribute13 := a45(indx);
106 t(ddindx).attribute14 := a46(indx);
107 t(ddindx).attribute15 := a47(indx);
108 t(ddindx).dml_operation := a48(indx);
109 ddindx := ddindx+1;
110 if a0.last =indx
111 then exit;
112 end if;
113 indx := a0.next(indx);
114 end loop;
115 end if;
116 end if;
117 end rosetta_table_copy_in_p2;
118 procedure rosetta_table_copy_out_p2(t ahl_ua_flight_schedules_pub.flight_visit_sch_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
119 , a1 out nocopy JTF_VARCHAR2_TABLE_100
120 , a2 out nocopy JTF_VARCHAR2_TABLE_100
121 , a3 out nocopy JTF_DATE_TABLE
122 , a4 out nocopy JTF_DATE_TABLE
123 , a5 out nocopy JTF_NUMBER_TABLE
124 , a6 out nocopy JTF_VARCHAR2_TABLE_100
125 , a7 out nocopy JTF_NUMBER_TABLE
126 , a8 out nocopy JTF_VARCHAR2_TABLE_100
127 , a9 out nocopy JTF_DATE_TABLE
128 , a10 out nocopy JTF_DATE_TABLE
129 , a11 out nocopy JTF_NUMBER_TABLE
130 , a12 out nocopy JTF_VARCHAR2_TABLE_100
131 , a13 out nocopy JTF_NUMBER_TABLE
132 , a14 out nocopy JTF_VARCHAR2_TABLE_100
133 , a15 out nocopy JTF_NUMBER_TABLE
134 , a16 out nocopy JTF_NUMBER_TABLE
135 , a17 out nocopy JTF_VARCHAR2_TABLE_100
136 , a18 out nocopy JTF_NUMBER_TABLE
137 , a19 out nocopy JTF_VARCHAR2_TABLE_100
138 , a20 out nocopy JTF_VARCHAR2_TABLE_100
139 , a21 out nocopy JTF_VARCHAR2_TABLE_100
140 , a22 out nocopy JTF_VARCHAR2_TABLE_100
141 , a23 out nocopy JTF_VARCHAR2_TABLE_100
142 , a24 out nocopy JTF_NUMBER_TABLE
143 , a25 out nocopy JTF_VARCHAR2_TABLE_100
144 , a26 out nocopy JTF_VARCHAR2_TABLE_100
145 , a27 out nocopy JTF_NUMBER_TABLE
146 , a28 out nocopy JTF_VARCHAR2_TABLE_100
147 , a29 out nocopy JTF_VARCHAR2_TABLE_100
148 , a30 out nocopy JTF_VARCHAR2_TABLE_100
149 , a31 out nocopy JTF_VARCHAR2_TABLE_100
150 , a32 out nocopy JTF_VARCHAR2_TABLE_100
151 , a33 out nocopy JTF_VARCHAR2_TABLE_200
152 , a34 out nocopy JTF_VARCHAR2_TABLE_200
153 , a35 out nocopy JTF_VARCHAR2_TABLE_200
154 , a36 out nocopy JTF_VARCHAR2_TABLE_200
155 , a37 out nocopy JTF_VARCHAR2_TABLE_200
156 , a38 out nocopy JTF_VARCHAR2_TABLE_200
157 , a39 out nocopy JTF_VARCHAR2_TABLE_200
158 , a40 out nocopy JTF_VARCHAR2_TABLE_200
159 , a41 out nocopy JTF_VARCHAR2_TABLE_200
160 , a42 out nocopy JTF_VARCHAR2_TABLE_200
161 , a43 out nocopy JTF_VARCHAR2_TABLE_200
162 , a44 out nocopy JTF_VARCHAR2_TABLE_200
163 , a45 out nocopy JTF_VARCHAR2_TABLE_200
164 , a46 out nocopy JTF_VARCHAR2_TABLE_200
165 , a47 out nocopy JTF_VARCHAR2_TABLE_200
166 , a48 out nocopy JTF_VARCHAR2_TABLE_100
167 ) as
168 ddindx binary_integer; indx binary_integer;
169 begin
170 if t is null or t.count = 0 then
171 a0 := JTF_NUMBER_TABLE();
172 a1 := JTF_VARCHAR2_TABLE_100();
173 a2 := JTF_VARCHAR2_TABLE_100();
174 a3 := JTF_DATE_TABLE();
175 a4 := JTF_DATE_TABLE();
176 a5 := JTF_NUMBER_TABLE();
177 a6 := JTF_VARCHAR2_TABLE_100();
178 a7 := JTF_NUMBER_TABLE();
179 a8 := JTF_VARCHAR2_TABLE_100();
180 a9 := JTF_DATE_TABLE();
181 a10 := JTF_DATE_TABLE();
182 a11 := JTF_NUMBER_TABLE();
183 a12 := JTF_VARCHAR2_TABLE_100();
184 a13 := JTF_NUMBER_TABLE();
185 a14 := JTF_VARCHAR2_TABLE_100();
186 a15 := JTF_NUMBER_TABLE();
187 a16 := JTF_NUMBER_TABLE();
188 a17 := JTF_VARCHAR2_TABLE_100();
189 a18 := JTF_NUMBER_TABLE();
190 a19 := JTF_VARCHAR2_TABLE_100();
191 a20 := JTF_VARCHAR2_TABLE_100();
192 a21 := JTF_VARCHAR2_TABLE_100();
193 a22 := JTF_VARCHAR2_TABLE_100();
194 a23 := JTF_VARCHAR2_TABLE_100();
195 a24 := JTF_NUMBER_TABLE();
196 a25 := JTF_VARCHAR2_TABLE_100();
197 a26 := JTF_VARCHAR2_TABLE_100();
198 a27 := JTF_NUMBER_TABLE();
199 a28 := JTF_VARCHAR2_TABLE_100();
200 a29 := JTF_VARCHAR2_TABLE_100();
201 a30 := JTF_VARCHAR2_TABLE_100();
202 a31 := JTF_VARCHAR2_TABLE_100();
203 a32 := JTF_VARCHAR2_TABLE_100();
204 a33 := JTF_VARCHAR2_TABLE_200();
205 a34 := JTF_VARCHAR2_TABLE_200();
206 a35 := JTF_VARCHAR2_TABLE_200();
207 a36 := JTF_VARCHAR2_TABLE_200();
208 a37 := JTF_VARCHAR2_TABLE_200();
209 a38 := JTF_VARCHAR2_TABLE_200();
210 a39 := JTF_VARCHAR2_TABLE_200();
211 a40 := JTF_VARCHAR2_TABLE_200();
212 a41 := JTF_VARCHAR2_TABLE_200();
213 a42 := JTF_VARCHAR2_TABLE_200();
214 a43 := JTF_VARCHAR2_TABLE_200();
215 a44 := JTF_VARCHAR2_TABLE_200();
216 a45 := JTF_VARCHAR2_TABLE_200();
217 a46 := JTF_VARCHAR2_TABLE_200();
218 a47 := JTF_VARCHAR2_TABLE_200();
219 a48 := JTF_VARCHAR2_TABLE_100();
220 else
221 a0 := JTF_NUMBER_TABLE();
222 a1 := JTF_VARCHAR2_TABLE_100();
223 a2 := JTF_VARCHAR2_TABLE_100();
224 a3 := JTF_DATE_TABLE();
225 a4 := JTF_DATE_TABLE();
226 a5 := JTF_NUMBER_TABLE();
227 a6 := JTF_VARCHAR2_TABLE_100();
228 a7 := JTF_NUMBER_TABLE();
229 a8 := JTF_VARCHAR2_TABLE_100();
230 a9 := JTF_DATE_TABLE();
231 a10 := JTF_DATE_TABLE();
232 a11 := JTF_NUMBER_TABLE();
233 a12 := JTF_VARCHAR2_TABLE_100();
234 a13 := JTF_NUMBER_TABLE();
235 a14 := JTF_VARCHAR2_TABLE_100();
236 a15 := JTF_NUMBER_TABLE();
237 a16 := JTF_NUMBER_TABLE();
238 a17 := JTF_VARCHAR2_TABLE_100();
239 a18 := JTF_NUMBER_TABLE();
240 a19 := JTF_VARCHAR2_TABLE_100();
241 a20 := JTF_VARCHAR2_TABLE_100();
242 a21 := JTF_VARCHAR2_TABLE_100();
243 a22 := JTF_VARCHAR2_TABLE_100();
244 a23 := JTF_VARCHAR2_TABLE_100();
245 a24 := JTF_NUMBER_TABLE();
246 a25 := JTF_VARCHAR2_TABLE_100();
247 a26 := JTF_VARCHAR2_TABLE_100();
248 a27 := JTF_NUMBER_TABLE();
249 a28 := JTF_VARCHAR2_TABLE_100();
250 a29 := JTF_VARCHAR2_TABLE_100();
251 a30 := JTF_VARCHAR2_TABLE_100();
252 a31 := JTF_VARCHAR2_TABLE_100();
253 a32 := JTF_VARCHAR2_TABLE_100();
254 a33 := JTF_VARCHAR2_TABLE_200();
255 a34 := JTF_VARCHAR2_TABLE_200();
256 a35 := JTF_VARCHAR2_TABLE_200();
257 a36 := JTF_VARCHAR2_TABLE_200();
258 a37 := JTF_VARCHAR2_TABLE_200();
259 a38 := JTF_VARCHAR2_TABLE_200();
260 a39 := JTF_VARCHAR2_TABLE_200();
261 a40 := JTF_VARCHAR2_TABLE_200();
262 a41 := JTF_VARCHAR2_TABLE_200();
263 a42 := JTF_VARCHAR2_TABLE_200();
264 a43 := JTF_VARCHAR2_TABLE_200();
265 a44 := JTF_VARCHAR2_TABLE_200();
266 a45 := JTF_VARCHAR2_TABLE_200();
267 a46 := JTF_VARCHAR2_TABLE_200();
268 a47 := JTF_VARCHAR2_TABLE_200();
269 a48 := JTF_VARCHAR2_TABLE_100();
270 if t.count > 0 then
271 a0.extend(t.count);
272 a1.extend(t.count);
273 a2.extend(t.count);
274 a3.extend(t.count);
275 a4.extend(t.count);
276 a5.extend(t.count);
277 a6.extend(t.count);
278 a7.extend(t.count);
279 a8.extend(t.count);
280 a9.extend(t.count);
281 a10.extend(t.count);
282 a11.extend(t.count);
283 a12.extend(t.count);
284 a13.extend(t.count);
285 a14.extend(t.count);
286 a15.extend(t.count);
287 a16.extend(t.count);
288 a17.extend(t.count);
289 a18.extend(t.count);
290 a19.extend(t.count);
291 a20.extend(t.count);
292 a21.extend(t.count);
293 a22.extend(t.count);
294 a23.extend(t.count);
295 a24.extend(t.count);
296 a25.extend(t.count);
297 a26.extend(t.count);
298 a27.extend(t.count);
299 a28.extend(t.count);
300 a29.extend(t.count);
301 a30.extend(t.count);
302 a31.extend(t.count);
306 a35.extend(t.count);
303 a32.extend(t.count);
304 a33.extend(t.count);
305 a34.extend(t.count);
307 a36.extend(t.count);
308 a37.extend(t.count);
309 a38.extend(t.count);
310 a39.extend(t.count);
311 a40.extend(t.count);
312 a41.extend(t.count);
313 a42.extend(t.count);
314 a43.extend(t.count);
315 a44.extend(t.count);
316 a45.extend(t.count);
317 a46.extend(t.count);
318 a47.extend(t.count);
319 a48.extend(t.count);
320 ddindx := t.first;
321 indx := 1;
322 while true loop
323 a0(indx) := t(ddindx).unit_schedule_id;
324 a1(indx) := t(ddindx).flight_number;
325 a2(indx) := t(ddindx).segment;
326 a3(indx) := t(ddindx).est_departure_time;
327 a4(indx) := t(ddindx).actual_departure_time;
328 a5(indx) := t(ddindx).departure_dept_id;
329 a6(indx) := t(ddindx).departure_dept_code;
330 a7(indx) := t(ddindx).departure_org_id;
331 a8(indx) := t(ddindx).departure_org_code;
332 a9(indx) := t(ddindx).est_arrival_time;
333 a10(indx) := t(ddindx).actual_arrival_time;
334 a11(indx) := t(ddindx).arrival_dept_id;
335 a12(indx) := t(ddindx).arrival_dept_code;
336 a13(indx) := t(ddindx).arrival_org_id;
337 a14(indx) := t(ddindx).arrival_org_code;
338 a15(indx) := t(ddindx).preceding_us_id;
339 a16(indx) := t(ddindx).unit_config_header_id;
340 a17(indx) := t(ddindx).unit_config_name;
341 a18(indx) := t(ddindx).csi_instance_id;
342 a19(indx) := t(ddindx).instance_number;
343 a20(indx) := t(ddindx).item_number;
344 a21(indx) := t(ddindx).serial_number;
345 a22(indx) := t(ddindx).visit_reschedule_mode;
346 a23(indx) := t(ddindx).visit_reschedule_meaning;
347 a24(indx) := t(ddindx).object_version_number;
348 a25(indx) := t(ddindx).is_update_allowed;
349 a26(indx) := t(ddindx).is_delete_allowed;
350 a27(indx) := t(ddindx).visit_id;
351 a28(indx) := t(ddindx).visit_type_code;
352 a29(indx) := t(ddindx).visit_type_meaning;
353 a30(indx) := t(ddindx).visit_create_type;
354 a31(indx) := t(ddindx).visit_create_meaning;
355 a32(indx) := t(ddindx).attribute_category;
356 a33(indx) := t(ddindx).attribute1;
357 a34(indx) := t(ddindx).attribute2;
358 a35(indx) := t(ddindx).attribute3;
359 a36(indx) := t(ddindx).attribute4;
360 a37(indx) := t(ddindx).attribute5;
361 a38(indx) := t(ddindx).attribute6;
362 a39(indx) := t(ddindx).attribute7;
363 a40(indx) := t(ddindx).attribute8;
364 a41(indx) := t(ddindx).attribute9;
365 a42(indx) := t(ddindx).attribute10;
366 a43(indx) := t(ddindx).attribute11;
367 a44(indx) := t(ddindx).attribute12;
368 a45(indx) := t(ddindx).attribute13;
369 a46(indx) := t(ddindx).attribute14;
370 a47(indx) := t(ddindx).attribute15;
371 a48(indx) := t(ddindx).dml_operation;
372 indx := indx+1;
373 if t.last =ddindx
374 then exit;
375 end if;
376 ddindx := t.next(ddindx);
377 end loop;
378 end if;
379 end if;
380 end rosetta_table_copy_out_p2;
381
382 procedure get_flight_schedule_details(p_api_version NUMBER
383 , p_init_msg_list VARCHAR2
384 , p_commit VARCHAR2
385 , p_validation_level NUMBER
386 , p_default VARCHAR2
387 , p_module_type VARCHAR2
388 , x_return_status out nocopy VARCHAR2
389 , x_msg_count out nocopy NUMBER
390 , x_msg_data out nocopy VARCHAR2
391 , p9_a0 NUMBER
392 , p9_a1 VARCHAR2
393 , p9_a2 VARCHAR2
394 , p9_a3 VARCHAR2
395 , p9_a4 VARCHAR2
396 , p9_a5 VARCHAR2
397 , p9_a6 VARCHAR2
398 , p9_a7 VARCHAR2
399 , p9_a8 VARCHAR2
400 , p9_a9 DATE
401 , p9_a10 DATE
402 , p10_a0 out nocopy JTF_NUMBER_TABLE
403 , p10_a1 out nocopy JTF_VARCHAR2_TABLE_100
404 , p10_a2 out nocopy JTF_VARCHAR2_TABLE_100
405 , p10_a3 out nocopy JTF_DATE_TABLE
406 , p10_a4 out nocopy JTF_DATE_TABLE
407 , p10_a5 out nocopy JTF_NUMBER_TABLE
408 , p10_a6 out nocopy JTF_VARCHAR2_TABLE_100
409 , p10_a7 out nocopy JTF_NUMBER_TABLE
410 , p10_a8 out nocopy JTF_VARCHAR2_TABLE_100
411 , p10_a9 out nocopy JTF_DATE_TABLE
412 , p10_a10 out nocopy JTF_DATE_TABLE
413 , p10_a11 out nocopy JTF_NUMBER_TABLE
414 , p10_a12 out nocopy JTF_VARCHAR2_TABLE_100
415 , p10_a13 out nocopy JTF_NUMBER_TABLE
416 , p10_a14 out nocopy JTF_VARCHAR2_TABLE_100
417 , p10_a15 out nocopy JTF_NUMBER_TABLE
418 , p10_a16 out nocopy JTF_NUMBER_TABLE
419 , p10_a17 out nocopy JTF_VARCHAR2_TABLE_100
420 , p10_a18 out nocopy JTF_NUMBER_TABLE
421 , p10_a19 out nocopy JTF_VARCHAR2_TABLE_100
422 , p10_a20 out nocopy JTF_VARCHAR2_TABLE_100
423 , p10_a21 out nocopy JTF_VARCHAR2_TABLE_100
424 , p10_a22 out nocopy JTF_VARCHAR2_TABLE_100
425 , p10_a23 out nocopy JTF_VARCHAR2_TABLE_100
426 , p10_a24 out nocopy JTF_NUMBER_TABLE
427 , p10_a25 out nocopy JTF_VARCHAR2_TABLE_100
428 , p10_a26 out nocopy JTF_VARCHAR2_TABLE_100
429 , p10_a27 out nocopy JTF_VARCHAR2_TABLE_2000
430 , p10_a28 out nocopy JTF_VARCHAR2_TABLE_100
431 , p10_a29 out nocopy JTF_VARCHAR2_TABLE_200
432 , p10_a30 out nocopy JTF_VARCHAR2_TABLE_200
433 , p10_a31 out nocopy JTF_VARCHAR2_TABLE_200
434 , p10_a32 out nocopy JTF_VARCHAR2_TABLE_200
435 , p10_a33 out nocopy JTF_VARCHAR2_TABLE_200
439 , p10_a37 out nocopy JTF_VARCHAR2_TABLE_200
436 , p10_a34 out nocopy JTF_VARCHAR2_TABLE_200
437 , p10_a35 out nocopy JTF_VARCHAR2_TABLE_200
438 , p10_a36 out nocopy JTF_VARCHAR2_TABLE_200
440 , p10_a38 out nocopy JTF_VARCHAR2_TABLE_200
441 , p10_a39 out nocopy JTF_VARCHAR2_TABLE_200
442 , p10_a40 out nocopy JTF_VARCHAR2_TABLE_200
443 , p10_a41 out nocopy JTF_VARCHAR2_TABLE_200
444 , p10_a42 out nocopy JTF_VARCHAR2_TABLE_200
445 , p10_a43 out nocopy JTF_VARCHAR2_TABLE_200
446 , p10_a44 out nocopy JTF_VARCHAR2_TABLE_100
447 )
448
449 as
450 ddp_flight_search_rec ahl_ua_flight_schedules_pub.flight_search_rec_type;
451 ddx_flight_schedules_tbl ahl_ua_flight_schedules_pvt.flight_schedules_tbl_type;
452 ddindx binary_integer; indx binary_integer;
453 begin
454
455 -- copy data to the local IN or IN-OUT args, if any
456
457
458
459
460
461
462
463
464
465 ddp_flight_search_rec.unit_schedule_id := p9_a0;
466 ddp_flight_search_rec.unit_name := p9_a1;
467 ddp_flight_search_rec.flight_number := p9_a2;
468 ddp_flight_search_rec.item_number := p9_a3;
469 ddp_flight_search_rec.serial_number := p9_a4;
470 ddp_flight_search_rec.arrival_org_code := p9_a5;
471 ddp_flight_search_rec.arrival_dept_code := p9_a6;
472 ddp_flight_search_rec.departure_org_code := p9_a7;
473 ddp_flight_search_rec.departure_dept_code := p9_a8;
474 ddp_flight_search_rec.start_date := p9_a9;
475 ddp_flight_search_rec.end_date := p9_a10;
476
477
478 -- here's the delegated call to the old PL/SQL routine
479 ahl_ua_flight_schedules_pub.get_flight_schedule_details(p_api_version,
480 p_init_msg_list,
481 p_commit,
482 p_validation_level,
483 p_default,
484 p_module_type,
485 x_return_status,
486 x_msg_count,
487 x_msg_data,
488 ddp_flight_search_rec,
489 ddx_flight_schedules_tbl);
490
491 -- copy data back from the local variables to OUT or IN-OUT args, if any
492
493
494
495
496
497
498
499
500
501
502 ahl_ua_flight_schedules_pvt_w.rosetta_table_copy_out_p1(ddx_flight_schedules_tbl, p10_a0
503 , p10_a1
504 , p10_a2
505 , p10_a3
506 , p10_a4
507 , p10_a5
508 , p10_a6
509 , p10_a7
510 , p10_a8
511 , p10_a9
512 , p10_a10
513 , p10_a11
514 , p10_a12
515 , p10_a13
516 , p10_a14
517 , p10_a15
518 , p10_a16
519 , p10_a17
520 , p10_a18
521 , p10_a19
522 , p10_a20
523 , p10_a21
524 , p10_a22
525 , p10_a23
526 , p10_a24
527 , p10_a25
528 , p10_a26
529 , p10_a27
530 , p10_a28
531 , p10_a29
532 , p10_a30
533 , p10_a31
534 , p10_a32
535 , p10_a33
536 , p10_a34
537 , p10_a35
538 , p10_a36
539 , p10_a37
540 , p10_a38
541 , p10_a39
542 , p10_a40
543 , p10_a41
544 , p10_a42
545 , p10_a43
546 , p10_a44
547 );
548 end;
549
550 procedure process_flight_schedules(p_api_version NUMBER
551 , p_init_msg_list VARCHAR2
552 , p_commit VARCHAR2
553 , p_validation_level NUMBER
554 , p_default VARCHAR2
555 , p_module_type VARCHAR2
556 , x_return_status out nocopy VARCHAR2
557 , x_msg_count out nocopy NUMBER
558 , x_msg_data out nocopy VARCHAR2
559 , p9_a0 in out nocopy JTF_NUMBER_TABLE
560 , p9_a1 in out nocopy JTF_VARCHAR2_TABLE_100
561 , p9_a2 in out nocopy JTF_VARCHAR2_TABLE_100
562 , p9_a3 in out nocopy JTF_DATE_TABLE
563 , p9_a4 in out nocopy JTF_DATE_TABLE
564 , p9_a5 in out nocopy JTF_NUMBER_TABLE
565 , p9_a6 in out nocopy JTF_VARCHAR2_TABLE_100
566 , p9_a7 in out nocopy JTF_NUMBER_TABLE
567 , p9_a8 in out nocopy JTF_VARCHAR2_TABLE_100
568 , p9_a9 in out nocopy JTF_DATE_TABLE
569 , p9_a10 in out nocopy JTF_DATE_TABLE
570 , p9_a11 in out nocopy JTF_NUMBER_TABLE
571 , p9_a12 in out nocopy JTF_VARCHAR2_TABLE_100
572 , p9_a13 in out nocopy JTF_NUMBER_TABLE
573 , p9_a14 in out nocopy JTF_VARCHAR2_TABLE_100
574 , p9_a15 in out nocopy JTF_NUMBER_TABLE
575 , p9_a16 in out nocopy JTF_NUMBER_TABLE
576 , p9_a17 in out nocopy JTF_VARCHAR2_TABLE_100
577 , p9_a18 in out nocopy JTF_NUMBER_TABLE
578 , p9_a19 in out nocopy JTF_VARCHAR2_TABLE_100
579 , p9_a20 in out nocopy JTF_VARCHAR2_TABLE_100
580 , p9_a21 in out nocopy JTF_VARCHAR2_TABLE_100
581 , p9_a22 in out nocopy JTF_VARCHAR2_TABLE_100
582 , p9_a23 in out nocopy JTF_VARCHAR2_TABLE_100
583 , p9_a24 in out nocopy JTF_NUMBER_TABLE
584 , p9_a25 in out nocopy JTF_VARCHAR2_TABLE_100
585 , p9_a26 in out nocopy JTF_VARCHAR2_TABLE_100
586 , p9_a27 in out nocopy JTF_VARCHAR2_TABLE_2000
587 , p9_a28 in out nocopy JTF_VARCHAR2_TABLE_100
588 , p9_a29 in out nocopy JTF_VARCHAR2_TABLE_200
589 , p9_a30 in out nocopy JTF_VARCHAR2_TABLE_200
590 , p9_a31 in out nocopy JTF_VARCHAR2_TABLE_200
591 , p9_a32 in out nocopy JTF_VARCHAR2_TABLE_200
592 , p9_a33 in out nocopy JTF_VARCHAR2_TABLE_200
593 , p9_a34 in out nocopy JTF_VARCHAR2_TABLE_200
594 , p9_a35 in out nocopy JTF_VARCHAR2_TABLE_200
595 , p9_a36 in out nocopy JTF_VARCHAR2_TABLE_200
596 , p9_a37 in out nocopy JTF_VARCHAR2_TABLE_200
597 , p9_a38 in out nocopy JTF_VARCHAR2_TABLE_200
601 , p9_a42 in out nocopy JTF_VARCHAR2_TABLE_200
598 , p9_a39 in out nocopy JTF_VARCHAR2_TABLE_200
599 , p9_a40 in out nocopy JTF_VARCHAR2_TABLE_200
600 , p9_a41 in out nocopy JTF_VARCHAR2_TABLE_200
602 , p9_a43 in out nocopy JTF_VARCHAR2_TABLE_200
603 , p9_a44 in out nocopy JTF_VARCHAR2_TABLE_100
604 )
605
606 as
607 ddp_x_flight_schedules_tbl ahl_ua_flight_schedules_pvt.flight_schedules_tbl_type;
608 ddindx binary_integer; indx binary_integer;
609 begin
610
611 -- copy data to the local IN or IN-OUT args, if any
612
613
614
615
616
617
618
619
620
621 ahl_ua_flight_schedules_pvt_w.rosetta_table_copy_in_p1(ddp_x_flight_schedules_tbl, p9_a0
622 , p9_a1
623 , p9_a2
624 , p9_a3
625 , p9_a4
626 , p9_a5
627 , p9_a6
628 , p9_a7
629 , p9_a8
630 , p9_a9
631 , p9_a10
632 , p9_a11
633 , p9_a12
634 , p9_a13
635 , p9_a14
636 , p9_a15
637 , p9_a16
638 , p9_a17
639 , p9_a18
640 , p9_a19
641 , p9_a20
642 , p9_a21
643 , p9_a22
644 , p9_a23
645 , p9_a24
646 , p9_a25
647 , p9_a26
648 , p9_a27
649 , p9_a28
650 , p9_a29
651 , p9_a30
652 , p9_a31
653 , p9_a32
654 , p9_a33
655 , p9_a34
656 , p9_a35
657 , p9_a36
658 , p9_a37
659 , p9_a38
660 , p9_a39
661 , p9_a40
662 , p9_a41
663 , p9_a42
664 , p9_a43
665 , p9_a44
666 );
667
668 -- here's the delegated call to the old PL/SQL routine
669 ahl_ua_flight_schedules_pub.process_flight_schedules(p_api_version,
670 p_init_msg_list,
671 p_commit,
672 p_validation_level,
673 p_default,
674 p_module_type,
675 x_return_status,
676 x_msg_count,
677 x_msg_data,
678 ddp_x_flight_schedules_tbl);
679
680 -- copy data back from the local variables to OUT or IN-OUT args, if any
681
682
683
684
685
686
687
688
689
690 ahl_ua_flight_schedules_pvt_w.rosetta_table_copy_out_p1(ddp_x_flight_schedules_tbl, p9_a0
691 , p9_a1
692 , p9_a2
693 , p9_a3
694 , p9_a4
695 , p9_a5
696 , p9_a6
697 , p9_a7
698 , p9_a8
699 , p9_a9
700 , p9_a10
701 , p9_a11
702 , p9_a12
703 , p9_a13
704 , p9_a14
705 , p9_a15
706 , p9_a16
707 , p9_a17
708 , p9_a18
709 , p9_a19
710 , p9_a20
711 , p9_a21
712 , p9_a22
713 , p9_a23
714 , p9_a24
715 , p9_a25
716 , p9_a26
717 , p9_a27
718 , p9_a28
719 , p9_a29
720 , p9_a30
721 , p9_a31
722 , p9_a32
723 , p9_a33
724 , p9_a34
725 , p9_a35
726 , p9_a36
727 , p9_a37
728 , p9_a38
729 , p9_a39
730 , p9_a40
731 , p9_a41
732 , p9_a42
733 , p9_a43
734 , p9_a44
735 );
736 end;
737
738 procedure process_flightvisit_sch(p_api_version NUMBER
739 , p_init_msg_list VARCHAR2
740 , p_commit VARCHAR2
741 , p_validation_level NUMBER
742 , p_default VARCHAR2
743 , p_module_type VARCHAR2
744 , x_return_status out nocopy VARCHAR2
745 , x_msg_count out nocopy NUMBER
746 , x_msg_data out nocopy VARCHAR2
747 , p9_a0 in out nocopy JTF_NUMBER_TABLE
748 , p9_a1 in out nocopy JTF_VARCHAR2_TABLE_100
749 , p9_a2 in out nocopy JTF_VARCHAR2_TABLE_100
750 , p9_a3 in out nocopy JTF_DATE_TABLE
751 , p9_a4 in out nocopy JTF_DATE_TABLE
752 , p9_a5 in out nocopy JTF_NUMBER_TABLE
753 , p9_a6 in out nocopy JTF_VARCHAR2_TABLE_100
754 , p9_a7 in out nocopy JTF_NUMBER_TABLE
755 , p9_a8 in out nocopy JTF_VARCHAR2_TABLE_100
756 , p9_a9 in out nocopy JTF_DATE_TABLE
757 , p9_a10 in out nocopy JTF_DATE_TABLE
758 , p9_a11 in out nocopy JTF_NUMBER_TABLE
759 , p9_a12 in out nocopy JTF_VARCHAR2_TABLE_100
760 , p9_a13 in out nocopy JTF_NUMBER_TABLE
761 , p9_a14 in out nocopy JTF_VARCHAR2_TABLE_100
762 , p9_a15 in out nocopy JTF_NUMBER_TABLE
763 , p9_a16 in out nocopy JTF_NUMBER_TABLE
764 , p9_a17 in out nocopy JTF_VARCHAR2_TABLE_100
765 , p9_a18 in out nocopy JTF_NUMBER_TABLE
766 , p9_a19 in out nocopy JTF_VARCHAR2_TABLE_100
767 , p9_a20 in out nocopy JTF_VARCHAR2_TABLE_100
768 , p9_a21 in out nocopy JTF_VARCHAR2_TABLE_100
769 , p9_a22 in out nocopy JTF_VARCHAR2_TABLE_100
770 , p9_a23 in out nocopy JTF_VARCHAR2_TABLE_100
771 , p9_a24 in out nocopy JTF_NUMBER_TABLE
772 , p9_a25 in out nocopy JTF_VARCHAR2_TABLE_100
773 , p9_a26 in out nocopy JTF_VARCHAR2_TABLE_100
774 , p9_a27 in out nocopy JTF_NUMBER_TABLE
775 , p9_a28 in out nocopy JTF_VARCHAR2_TABLE_100
776 , p9_a29 in out nocopy JTF_VARCHAR2_TABLE_100
777 , p9_a30 in out nocopy JTF_VARCHAR2_TABLE_100
778 , p9_a31 in out nocopy JTF_VARCHAR2_TABLE_100
779 , p9_a32 in out nocopy JTF_VARCHAR2_TABLE_100
780 , p9_a33 in out nocopy JTF_VARCHAR2_TABLE_200
781 , p9_a34 in out nocopy JTF_VARCHAR2_TABLE_200
785 , p9_a38 in out nocopy JTF_VARCHAR2_TABLE_200
782 , p9_a35 in out nocopy JTF_VARCHAR2_TABLE_200
783 , p9_a36 in out nocopy JTF_VARCHAR2_TABLE_200
784 , p9_a37 in out nocopy JTF_VARCHAR2_TABLE_200
786 , p9_a39 in out nocopy JTF_VARCHAR2_TABLE_200
787 , p9_a40 in out nocopy JTF_VARCHAR2_TABLE_200
788 , p9_a41 in out nocopy JTF_VARCHAR2_TABLE_200
789 , p9_a42 in out nocopy JTF_VARCHAR2_TABLE_200
790 , p9_a43 in out nocopy JTF_VARCHAR2_TABLE_200
791 , p9_a44 in out nocopy JTF_VARCHAR2_TABLE_200
792 , p9_a45 in out nocopy JTF_VARCHAR2_TABLE_200
793 , p9_a46 in out nocopy JTF_VARCHAR2_TABLE_200
794 , p9_a47 in out nocopy JTF_VARCHAR2_TABLE_200
795 , p9_a48 in out nocopy JTF_VARCHAR2_TABLE_100
796 )
797
798 as
799 ddp_x_flight_visit_sch_tbl ahl_ua_flight_schedules_pub.flight_visit_sch_tbl_type;
800 ddindx binary_integer; indx binary_integer;
801 begin
802
803 -- copy data to the local IN or IN-OUT args, if any
804
805
806
807
808
809
810
811
812
813 ahl_ua_flight_schedules_pub_w.rosetta_table_copy_in_p2(ddp_x_flight_visit_sch_tbl, p9_a0
814 , p9_a1
815 , p9_a2
816 , p9_a3
817 , p9_a4
818 , p9_a5
819 , p9_a6
820 , p9_a7
821 , p9_a8
822 , p9_a9
823 , p9_a10
824 , p9_a11
825 , p9_a12
826 , p9_a13
827 , p9_a14
828 , p9_a15
829 , p9_a16
830 , p9_a17
831 , p9_a18
832 , p9_a19
833 , p9_a20
834 , p9_a21
835 , p9_a22
836 , p9_a23
837 , p9_a24
838 , p9_a25
839 , p9_a26
840 , p9_a27
841 , p9_a28
842 , p9_a29
843 , p9_a30
844 , p9_a31
845 , p9_a32
846 , p9_a33
847 , p9_a34
848 , p9_a35
849 , p9_a36
850 , p9_a37
851 , p9_a38
852 , p9_a39
853 , p9_a40
854 , p9_a41
855 , p9_a42
856 , p9_a43
857 , p9_a44
858 , p9_a45
859 , p9_a46
860 , p9_a47
861 , p9_a48
862 );
863
864 -- here's the delegated call to the old PL/SQL routine
865 ahl_ua_flight_schedules_pub.process_flightvisit_sch(p_api_version,
866 p_init_msg_list,
867 p_commit,
868 p_validation_level,
869 p_default,
870 p_module_type,
871 x_return_status,
872 x_msg_count,
873 x_msg_data,
874 ddp_x_flight_visit_sch_tbl);
875
876 -- copy data back from the local variables to OUT or IN-OUT args, if any
877
878
879
880
881
882
883
884
885
886 ahl_ua_flight_schedules_pub_w.rosetta_table_copy_out_p2(ddp_x_flight_visit_sch_tbl, p9_a0
887 , p9_a1
888 , p9_a2
889 , p9_a3
890 , p9_a4
891 , p9_a5
892 , p9_a6
893 , p9_a7
894 , p9_a8
895 , p9_a9
896 , p9_a10
897 , p9_a11
898 , p9_a12
899 , p9_a13
900 , p9_a14
901 , p9_a15
902 , p9_a16
903 , p9_a17
904 , p9_a18
905 , p9_a19
906 , p9_a20
907 , p9_a21
908 , p9_a22
909 , p9_a23
910 , p9_a24
911 , p9_a25
912 , p9_a26
913 , p9_a27
914 , p9_a28
915 , p9_a29
916 , p9_a30
917 , p9_a31
918 , p9_a32
919 , p9_a33
920 , p9_a34
921 , p9_a35
922 , p9_a36
923 , p9_a37
924 , p9_a38
925 , p9_a39
926 , p9_a40
927 , p9_a41
928 , p9_a42
929 , p9_a43
930 , p9_a44
931 , p9_a45
932 , p9_a46
933 , p9_a47
934 , p9_a48
935 );
936 end;
937
938 end ahl_ua_flight_schedules_pub_w;