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