[Home] [Help]
PACKAGE BODY: APPS.AHL_UA_UNIT_SCHEDULES_PVT_W
Source
1 package body ahl_ua_unit_schedules_pvt_w as
2 /* $Header: AHLWUUSB.pls 120.1 2006/05/02 04:36 amsriniv noship $ */
3 rosetta_g_mistake_date date := to_date('01/01/+4713', 'MM/DD/SYYYY');
4 rosetta_g_miss_date date := to_date('01/01/-4712', 'MM/DD/SYYYY');
5 rosetta_g_mistake_date_high date := to_date('01/01/+4710', 'MM/DD/SYYYY');
6 rosetta_g_mistake_date_low date := to_date('01/01/-4710', 'MM/DD/SYYYY');
7
8 -- this is to workaround the JDBC bug regarding IN DATE of value GMiss
9 function rosetta_g_miss_date_in_map(d date) return date as
10 begin
11 if d > rosetta_g_mistake_date_high then return fnd_api.g_miss_date; end if;
12 if d < rosetta_g_mistake_date_low then return fnd_api.g_miss_date; end if;
13 return d;
14 end;
15
16 procedure rosetta_table_copy_in_p3(t out nocopy ahl_ua_unit_schedules_pvt.unit_schedules_result_tbl_type, a0 JTF_NUMBER_TABLE
17 , a1 JTF_NUMBER_TABLE
18 , a2 JTF_NUMBER_TABLE
19 , a3 JTF_VARCHAR2_TABLE_100
20 , a4 JTF_NUMBER_TABLE
21 , a5 JTF_VARCHAR2_TABLE_100
22 ) as
23 ddindx binary_integer; indx binary_integer;
24 begin
25 if a0 is not null and a0.count > 0 then
26 if a0.count > 0 then
27 indx := a0.first;
28 ddindx := 1;
29 while true loop
30 t(ddindx).result_row_num := a0(indx);
31 t(ddindx).result_col_num := a1(indx);
32 t(ddindx).unit_config_header_id := a2(indx);
33 t(ddindx).unit_name := a3(indx);
34 t(ddindx).schedule_id := a4(indx);
35 t(ddindx).schedule_type := a5(indx);
36 ddindx := ddindx+1;
37 if a0.last =indx
38 then exit;
39 end if;
40 indx := a0.next(indx);
41 end loop;
42 end if;
43 end if;
44 end rosetta_table_copy_in_p3;
45 procedure rosetta_table_copy_out_p3(t ahl_ua_unit_schedules_pvt.unit_schedules_result_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
46 , a1 out nocopy JTF_NUMBER_TABLE
47 , a2 out nocopy JTF_NUMBER_TABLE
48 , a3 out nocopy JTF_VARCHAR2_TABLE_100
49 , a4 out nocopy JTF_NUMBER_TABLE
50 , a5 out nocopy JTF_VARCHAR2_TABLE_100
51 ) as
52 ddindx binary_integer; indx binary_integer;
53 begin
54 if t is null or t.count = 0 then
55 a0 := JTF_NUMBER_TABLE();
56 a1 := JTF_NUMBER_TABLE();
57 a2 := JTF_NUMBER_TABLE();
58 a3 := JTF_VARCHAR2_TABLE_100();
59 a4 := JTF_NUMBER_TABLE();
60 a5 := JTF_VARCHAR2_TABLE_100();
61 else
62 a0 := JTF_NUMBER_TABLE();
63 a1 := JTF_NUMBER_TABLE();
64 a2 := JTF_NUMBER_TABLE();
65 a3 := JTF_VARCHAR2_TABLE_100();
66 a4 := JTF_NUMBER_TABLE();
67 a5 := JTF_VARCHAR2_TABLE_100();
68 if t.count > 0 then
69 a0.extend(t.count);
70 a1.extend(t.count);
71 a2.extend(t.count);
72 a3.extend(t.count);
73 a4.extend(t.count);
74 a5.extend(t.count);
75 ddindx := t.first;
76 indx := 1;
77 while true loop
78 a0(indx) := t(ddindx).result_row_num;
79 a1(indx) := t(ddindx).result_col_num;
80 a2(indx) := t(ddindx).unit_config_header_id;
81 a3(indx) := t(ddindx).unit_name;
82 a4(indx) := t(ddindx).schedule_id;
83 a5(indx) := t(ddindx).schedule_type;
84 indx := indx+1;
85 if t.last =ddindx
86 then exit;
87 end if;
88 ddindx := t.next(ddindx);
89 end loop;
90 end if;
91 end if;
92 end rosetta_table_copy_out_p3;
93
94 procedure rosetta_table_copy_in_p6(t out nocopy ahl_ua_unit_schedules_pvt.unit_schedule_tbl_type, a0 JTF_NUMBER_TABLE
95 , a1 JTF_NUMBER_TABLE
96 , a2 JTF_VARCHAR2_TABLE_100
97 , a3 JTF_VARCHAR2_TABLE_100
98 , a4 JTF_NUMBER_TABLE
99 , a5 JTF_VARCHAR2_TABLE_300
100 , a6 JTF_NUMBER_TABLE
101 , a7 JTF_VARCHAR2_TABLE_300
102 , a8 JTF_NUMBER_TABLE
103 , a9 JTF_VARCHAR2_TABLE_300
104 , a10 JTF_NUMBER_TABLE
105 , a11 JTF_VARCHAR2_TABLE_300
106 , a12 JTF_DATE_TABLE
107 , a13 JTF_DATE_TABLE
108 , a14 JTF_VARCHAR2_TABLE_100
109 , a15 JTF_NUMBER_TABLE
110 , a16 JTF_NUMBER_TABLE
111 , a17 JTF_VARCHAR2_TABLE_100
112 , a18 JTF_VARCHAR2_TABLE_300
113 , a19 JTF_NUMBER_TABLE
114 , a20 JTF_VARCHAR2_TABLE_300
115 , a21 JTF_DATE_TABLE
116 , a22 JTF_NUMBER_TABLE
117 , a23 JTF_VARCHAR2_TABLE_100
118 , a24 JTF_VARCHAR2_TABLE_100
119 , a25 JTF_VARCHAR2_TABLE_100
120 , a26 JTF_VARCHAR2_TABLE_2000
121 , a27 JTF_VARCHAR2_TABLE_100
122 ) as
123 ddindx binary_integer; indx binary_integer;
124 begin
125 if a0 is not null and a0.count > 0 then
126 if a0.count > 0 then
127 indx := a0.first;
128 ddindx := 1;
129 while true loop
130 t(ddindx).event_seq := a0(indx);
131 t(ddindx).unit_schedule_id := a1(indx);
132 t(ddindx).flight_number := a2(indx);
133 t(ddindx).segment := a3(indx);
134 t(ddindx).departure_org_id := a4(indx);
135 t(ddindx).departure_org_name := a5(indx);
136 t(ddindx).departure_dep_id := a6(indx);
137 t(ddindx).departure_dep_name := a7(indx);
138 t(ddindx).arrival_org_id := a8(indx);
139 t(ddindx).arrival_org_name := a9(indx);
140 t(ddindx).arrival_dep_id := a10(indx);
141 t(ddindx).arrival_dep_name := a11(indx);
142 t(ddindx).departure_time := rosetta_g_miss_date_in_map(a12(indx));
143 t(ddindx).arrival_time := rosetta_g_miss_date_in_map(a13(indx));
144 t(ddindx).prev_event_type := a14(indx);
145 t(ddindx).prev_event_id := a15(indx);
146 t(ddindx).prev_event_org_id := a16(indx);
147 t(ddindx).is_prev_org_valid := a17(indx);
148 t(ddindx).prev_event_org_name := a18(indx);
149 t(ddindx).prev_event_dep_id := a19(indx);
150 t(ddindx).prve_event_dep_name := a20(indx);
151 t(ddindx).prev_event_end_time := rosetta_g_miss_date_in_map(a21(indx));
152 t(ddindx).prev_unit_schedule_id := a22(indx);
153 t(ddindx).prev_flight_number := a23(indx);
154 t(ddindx).has_mopportunity := a24(indx);
155 t(ddindx).has_conflict := a25(indx);
156 t(ddindx).conflict_message := a26(indx);
157 t(ddindx).is_org_valid := a27(indx);
158 ddindx := ddindx+1;
159 if a0.last =indx
160 then exit;
161 end if;
162 indx := a0.next(indx);
163 end loop;
164 end if;
165 end if;
166 end rosetta_table_copy_in_p6;
167 procedure rosetta_table_copy_out_p6(t ahl_ua_unit_schedules_pvt.unit_schedule_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
168 , a1 out nocopy JTF_NUMBER_TABLE
169 , a2 out nocopy JTF_VARCHAR2_TABLE_100
170 , a3 out nocopy JTF_VARCHAR2_TABLE_100
171 , a4 out nocopy JTF_NUMBER_TABLE
172 , a5 out nocopy JTF_VARCHAR2_TABLE_300
173 , a6 out nocopy JTF_NUMBER_TABLE
174 , a7 out nocopy JTF_VARCHAR2_TABLE_300
175 , a8 out nocopy JTF_NUMBER_TABLE
176 , a9 out nocopy JTF_VARCHAR2_TABLE_300
177 , a10 out nocopy JTF_NUMBER_TABLE
178 , a11 out nocopy JTF_VARCHAR2_TABLE_300
179 , a12 out nocopy JTF_DATE_TABLE
180 , a13 out nocopy JTF_DATE_TABLE
181 , a14 out nocopy JTF_VARCHAR2_TABLE_100
182 , a15 out nocopy JTF_NUMBER_TABLE
183 , a16 out nocopy JTF_NUMBER_TABLE
184 , a17 out nocopy JTF_VARCHAR2_TABLE_100
185 , a18 out nocopy JTF_VARCHAR2_TABLE_300
186 , a19 out nocopy JTF_NUMBER_TABLE
187 , a20 out nocopy JTF_VARCHAR2_TABLE_300
188 , a21 out nocopy JTF_DATE_TABLE
189 , a22 out nocopy JTF_NUMBER_TABLE
190 , a23 out nocopy JTF_VARCHAR2_TABLE_100
191 , a24 out nocopy JTF_VARCHAR2_TABLE_100
192 , a25 out nocopy JTF_VARCHAR2_TABLE_100
193 , a26 out nocopy JTF_VARCHAR2_TABLE_2000
194 , a27 out nocopy JTF_VARCHAR2_TABLE_100
195 ) as
196 ddindx binary_integer; indx binary_integer;
197 begin
198 if t is null or t.count = 0 then
199 a0 := JTF_NUMBER_TABLE();
200 a1 := JTF_NUMBER_TABLE();
201 a2 := JTF_VARCHAR2_TABLE_100();
202 a3 := JTF_VARCHAR2_TABLE_100();
203 a4 := JTF_NUMBER_TABLE();
204 a5 := JTF_VARCHAR2_TABLE_300();
205 a6 := JTF_NUMBER_TABLE();
206 a7 := JTF_VARCHAR2_TABLE_300();
207 a8 := JTF_NUMBER_TABLE();
208 a9 := JTF_VARCHAR2_TABLE_300();
209 a10 := JTF_NUMBER_TABLE();
210 a11 := JTF_VARCHAR2_TABLE_300();
211 a12 := JTF_DATE_TABLE();
212 a13 := JTF_DATE_TABLE();
213 a14 := JTF_VARCHAR2_TABLE_100();
214 a15 := JTF_NUMBER_TABLE();
215 a16 := JTF_NUMBER_TABLE();
216 a17 := JTF_VARCHAR2_TABLE_100();
217 a18 := JTF_VARCHAR2_TABLE_300();
218 a19 := JTF_NUMBER_TABLE();
219 a20 := JTF_VARCHAR2_TABLE_300();
220 a21 := JTF_DATE_TABLE();
221 a22 := JTF_NUMBER_TABLE();
222 a23 := JTF_VARCHAR2_TABLE_100();
223 a24 := JTF_VARCHAR2_TABLE_100();
224 a25 := JTF_VARCHAR2_TABLE_100();
225 a26 := JTF_VARCHAR2_TABLE_2000();
226 a27 := JTF_VARCHAR2_TABLE_100();
227 else
228 a0 := JTF_NUMBER_TABLE();
229 a1 := JTF_NUMBER_TABLE();
230 a2 := JTF_VARCHAR2_TABLE_100();
231 a3 := JTF_VARCHAR2_TABLE_100();
232 a4 := JTF_NUMBER_TABLE();
233 a5 := JTF_VARCHAR2_TABLE_300();
234 a6 := JTF_NUMBER_TABLE();
235 a7 := JTF_VARCHAR2_TABLE_300();
236 a8 := JTF_NUMBER_TABLE();
237 a9 := JTF_VARCHAR2_TABLE_300();
238 a10 := JTF_NUMBER_TABLE();
239 a11 := JTF_VARCHAR2_TABLE_300();
240 a12 := JTF_DATE_TABLE();
241 a13 := JTF_DATE_TABLE();
242 a14 := JTF_VARCHAR2_TABLE_100();
243 a15 := JTF_NUMBER_TABLE();
244 a16 := JTF_NUMBER_TABLE();
245 a17 := JTF_VARCHAR2_TABLE_100();
246 a18 := JTF_VARCHAR2_TABLE_300();
247 a19 := JTF_NUMBER_TABLE();
248 a20 := JTF_VARCHAR2_TABLE_300();
249 a21 := JTF_DATE_TABLE();
250 a22 := JTF_NUMBER_TABLE();
251 a23 := JTF_VARCHAR2_TABLE_100();
252 a24 := JTF_VARCHAR2_TABLE_100();
253 a25 := JTF_VARCHAR2_TABLE_100();
254 a26 := JTF_VARCHAR2_TABLE_2000();
255 a27 := JTF_VARCHAR2_TABLE_100();
256 if t.count > 0 then
257 a0.extend(t.count);
258 a1.extend(t.count);
259 a2.extend(t.count);
260 a3.extend(t.count);
261 a4.extend(t.count);
262 a5.extend(t.count);
263 a6.extend(t.count);
264 a7.extend(t.count);
265 a8.extend(t.count);
266 a9.extend(t.count);
267 a10.extend(t.count);
268 a11.extend(t.count);
269 a12.extend(t.count);
270 a13.extend(t.count);
271 a14.extend(t.count);
272 a15.extend(t.count);
273 a16.extend(t.count);
274 a17.extend(t.count);
275 a18.extend(t.count);
276 a19.extend(t.count);
277 a20.extend(t.count);
278 a21.extend(t.count);
279 a22.extend(t.count);
280 a23.extend(t.count);
281 a24.extend(t.count);
282 a25.extend(t.count);
283 a26.extend(t.count);
284 a27.extend(t.count);
285 ddindx := t.first;
286 indx := 1;
287 while true loop
288 a0(indx) := t(ddindx).event_seq;
289 a1(indx) := t(ddindx).unit_schedule_id;
290 a2(indx) := t(ddindx).flight_number;
291 a3(indx) := t(ddindx).segment;
292 a4(indx) := t(ddindx).departure_org_id;
293 a5(indx) := t(ddindx).departure_org_name;
294 a6(indx) := t(ddindx).departure_dep_id;
295 a7(indx) := t(ddindx).departure_dep_name;
296 a8(indx) := t(ddindx).arrival_org_id;
297 a9(indx) := t(ddindx).arrival_org_name;
298 a10(indx) := t(ddindx).arrival_dep_id;
299 a11(indx) := t(ddindx).arrival_dep_name;
300 a12(indx) := t(ddindx).departure_time;
301 a13(indx) := t(ddindx).arrival_time;
302 a14(indx) := t(ddindx).prev_event_type;
303 a15(indx) := t(ddindx).prev_event_id;
304 a16(indx) := t(ddindx).prev_event_org_id;
305 a17(indx) := t(ddindx).is_prev_org_valid;
306 a18(indx) := t(ddindx).prev_event_org_name;
307 a19(indx) := t(ddindx).prev_event_dep_id;
308 a20(indx) := t(ddindx).prve_event_dep_name;
309 a21(indx) := t(ddindx).prev_event_end_time;
310 a22(indx) := t(ddindx).prev_unit_schedule_id;
311 a23(indx) := t(ddindx).prev_flight_number;
312 a24(indx) := t(ddindx).has_mopportunity;
313 a25(indx) := t(ddindx).has_conflict;
314 a26(indx) := t(ddindx).conflict_message;
315 a27(indx) := t(ddindx).is_org_valid;
316 indx := indx+1;
317 if t.last =ddindx
318 then exit;
319 end if;
320 ddindx := t.next(ddindx);
321 end loop;
322 end if;
323 end if;
324 end rosetta_table_copy_out_p6;
325
326 procedure rosetta_table_copy_in_p8(t out nocopy ahl_ua_unit_schedules_pvt.visit_schedule_tbl_type, a0 JTF_NUMBER_TABLE
327 , a1 JTF_NUMBER_TABLE
328 , a2 JTF_VARCHAR2_TABLE_100
329 , a3 JTF_VARCHAR2_TABLE_100
330 , a4 JTF_VARCHAR2_TABLE_100
331 , a5 JTF_VARCHAR2_TABLE_100
332 , a6 JTF_VARCHAR2_TABLE_100
333 , a7 JTF_NUMBER_TABLE
334 , a8 JTF_VARCHAR2_TABLE_300
335 , a9 JTF_NUMBER_TABLE
336 , a10 JTF_VARCHAR2_TABLE_300
337 , a11 JTF_DATE_TABLE
338 , a12 JTF_DATE_TABLE
339 , a13 JTF_VARCHAR2_TABLE_100
340 , a14 JTF_NUMBER_TABLE
341 , a15 JTF_NUMBER_TABLE
342 , a16 JTF_VARCHAR2_TABLE_100
343 , a17 JTF_VARCHAR2_TABLE_300
344 , a18 JTF_NUMBER_TABLE
345 , a19 JTF_VARCHAR2_TABLE_300
346 , a20 JTF_DATE_TABLE
347 , a21 JTF_NUMBER_TABLE
348 , a22 JTF_VARCHAR2_TABLE_100
349 , a23 JTF_VARCHAR2_TABLE_100
350 , a24 JTF_VARCHAR2_TABLE_100
351 , a25 JTF_VARCHAR2_TABLE_2000
352 , a26 JTF_VARCHAR2_TABLE_100
353 , a27 JTF_VARCHAR2_TABLE_100
354 ) as
355 ddindx binary_integer; indx binary_integer;
356 begin
357 if a0 is not null and a0.count > 0 then
358 if a0.count > 0 then
359 indx := a0.first;
360 ddindx := 1;
361 while true loop
362 t(ddindx).event_seq := a0(indx);
363 t(ddindx).visit_id := a1(indx);
364 t(ddindx).visit_number := a2(indx);
365 t(ddindx).visit_type := a3(indx);
366 t(ddindx).visit_name := a4(indx);
367 t(ddindx).visit_status_code := a5(indx);
368 t(ddindx).visit_status := a6(indx);
369 t(ddindx).visit_org_id := a7(indx);
370 t(ddindx).visit_org_name := a8(indx);
371 t(ddindx).visit_dep_id := a9(indx);
372 t(ddindx).visit_dep_name := a10(indx);
373 t(ddindx).start_time := rosetta_g_miss_date_in_map(a11(indx));
374 t(ddindx).end_time := rosetta_g_miss_date_in_map(a12(indx));
375 t(ddindx).prev_event_type := a13(indx);
376 t(ddindx).prev_event_id := a14(indx);
377 t(ddindx).prev_event_org_id := a15(indx);
378 t(ddindx).is_prev_org_valid := a16(indx);
379 t(ddindx).prev_event_org_name := a17(indx);
380 t(ddindx).prev_event_dep_id := a18(indx);
381 t(ddindx).prve_event_dep_name := a19(indx);
382 t(ddindx).prev_event_end_time := rosetta_g_miss_date_in_map(a20(indx));
383 t(ddindx).prev_unit_schedule_id := a21(indx);
384 t(ddindx).prev_flight_number := a22(indx);
385 t(ddindx).has_mopportunity := a23(indx);
386 t(ddindx).has_conflict := a24(indx);
387 t(ddindx).conflict_message := a25(indx);
388 t(ddindx).can_cancel := a26(indx);
389 t(ddindx).is_org_valid := a27(indx);
390 ddindx := ddindx+1;
391 if a0.last =indx
392 then exit;
393 end if;
394 indx := a0.next(indx);
395 end loop;
396 end if;
397 end if;
398 end rosetta_table_copy_in_p8;
399 procedure rosetta_table_copy_out_p8(t ahl_ua_unit_schedules_pvt.visit_schedule_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
400 , a1 out nocopy JTF_NUMBER_TABLE
401 , a2 out nocopy JTF_VARCHAR2_TABLE_100
402 , a3 out nocopy JTF_VARCHAR2_TABLE_100
403 , a4 out nocopy JTF_VARCHAR2_TABLE_100
404 , a5 out nocopy JTF_VARCHAR2_TABLE_100
405 , a6 out nocopy JTF_VARCHAR2_TABLE_100
406 , a7 out nocopy JTF_NUMBER_TABLE
407 , a8 out nocopy JTF_VARCHAR2_TABLE_300
408 , a9 out nocopy JTF_NUMBER_TABLE
409 , a10 out nocopy JTF_VARCHAR2_TABLE_300
410 , a11 out nocopy JTF_DATE_TABLE
411 , a12 out nocopy JTF_DATE_TABLE
412 , a13 out nocopy JTF_VARCHAR2_TABLE_100
413 , a14 out nocopy JTF_NUMBER_TABLE
414 , a15 out nocopy JTF_NUMBER_TABLE
415 , a16 out nocopy JTF_VARCHAR2_TABLE_100
419 , a20 out nocopy JTF_DATE_TABLE
416 , a17 out nocopy JTF_VARCHAR2_TABLE_300
417 , a18 out nocopy JTF_NUMBER_TABLE
418 , a19 out nocopy JTF_VARCHAR2_TABLE_300
420 , a21 out nocopy JTF_NUMBER_TABLE
421 , a22 out nocopy JTF_VARCHAR2_TABLE_100
422 , a23 out nocopy JTF_VARCHAR2_TABLE_100
423 , a24 out nocopy JTF_VARCHAR2_TABLE_100
424 , a25 out nocopy JTF_VARCHAR2_TABLE_2000
425 , a26 out nocopy JTF_VARCHAR2_TABLE_100
426 , a27 out nocopy JTF_VARCHAR2_TABLE_100
427 ) as
428 ddindx binary_integer; indx binary_integer;
429 begin
430 if t is null or t.count = 0 then
431 a0 := JTF_NUMBER_TABLE();
432 a1 := JTF_NUMBER_TABLE();
433 a2 := JTF_VARCHAR2_TABLE_100();
434 a3 := JTF_VARCHAR2_TABLE_100();
435 a4 := JTF_VARCHAR2_TABLE_100();
436 a5 := JTF_VARCHAR2_TABLE_100();
437 a6 := JTF_VARCHAR2_TABLE_100();
438 a7 := JTF_NUMBER_TABLE();
439 a8 := JTF_VARCHAR2_TABLE_300();
440 a9 := JTF_NUMBER_TABLE();
441 a10 := JTF_VARCHAR2_TABLE_300();
442 a11 := JTF_DATE_TABLE();
443 a12 := JTF_DATE_TABLE();
444 a13 := JTF_VARCHAR2_TABLE_100();
445 a14 := JTF_NUMBER_TABLE();
446 a15 := JTF_NUMBER_TABLE();
447 a16 := JTF_VARCHAR2_TABLE_100();
448 a17 := JTF_VARCHAR2_TABLE_300();
449 a18 := JTF_NUMBER_TABLE();
450 a19 := JTF_VARCHAR2_TABLE_300();
451 a20 := JTF_DATE_TABLE();
452 a21 := JTF_NUMBER_TABLE();
453 a22 := JTF_VARCHAR2_TABLE_100();
454 a23 := JTF_VARCHAR2_TABLE_100();
455 a24 := JTF_VARCHAR2_TABLE_100();
456 a25 := JTF_VARCHAR2_TABLE_2000();
457 a26 := JTF_VARCHAR2_TABLE_100();
458 a27 := JTF_VARCHAR2_TABLE_100();
459 else
460 a0 := JTF_NUMBER_TABLE();
461 a1 := JTF_NUMBER_TABLE();
462 a2 := JTF_VARCHAR2_TABLE_100();
463 a3 := JTF_VARCHAR2_TABLE_100();
464 a4 := JTF_VARCHAR2_TABLE_100();
465 a5 := JTF_VARCHAR2_TABLE_100();
466 a6 := JTF_VARCHAR2_TABLE_100();
467 a7 := JTF_NUMBER_TABLE();
468 a8 := JTF_VARCHAR2_TABLE_300();
469 a9 := JTF_NUMBER_TABLE();
470 a10 := JTF_VARCHAR2_TABLE_300();
471 a11 := JTF_DATE_TABLE();
472 a12 := JTF_DATE_TABLE();
473 a13 := JTF_VARCHAR2_TABLE_100();
474 a14 := JTF_NUMBER_TABLE();
475 a15 := JTF_NUMBER_TABLE();
476 a16 := JTF_VARCHAR2_TABLE_100();
477 a17 := JTF_VARCHAR2_TABLE_300();
478 a18 := JTF_NUMBER_TABLE();
479 a19 := JTF_VARCHAR2_TABLE_300();
480 a20 := JTF_DATE_TABLE();
481 a21 := JTF_NUMBER_TABLE();
482 a22 := JTF_VARCHAR2_TABLE_100();
483 a23 := JTF_VARCHAR2_TABLE_100();
484 a24 := JTF_VARCHAR2_TABLE_100();
485 a25 := JTF_VARCHAR2_TABLE_2000();
486 a26 := JTF_VARCHAR2_TABLE_100();
487 a27 := JTF_VARCHAR2_TABLE_100();
488 if t.count > 0 then
489 a0.extend(t.count);
490 a1.extend(t.count);
491 a2.extend(t.count);
492 a3.extend(t.count);
493 a4.extend(t.count);
494 a5.extend(t.count);
495 a6.extend(t.count);
496 a7.extend(t.count);
497 a8.extend(t.count);
498 a9.extend(t.count);
499 a10.extend(t.count);
500 a11.extend(t.count);
501 a12.extend(t.count);
502 a13.extend(t.count);
503 a14.extend(t.count);
504 a15.extend(t.count);
505 a16.extend(t.count);
506 a17.extend(t.count);
507 a18.extend(t.count);
508 a19.extend(t.count);
509 a20.extend(t.count);
510 a21.extend(t.count);
511 a22.extend(t.count);
512 a23.extend(t.count);
513 a24.extend(t.count);
514 a25.extend(t.count);
515 a26.extend(t.count);
516 a27.extend(t.count);
517 ddindx := t.first;
518 indx := 1;
519 while true loop
520 a0(indx) := t(ddindx).event_seq;
521 a1(indx) := t(ddindx).visit_id;
522 a2(indx) := t(ddindx).visit_number;
523 a3(indx) := t(ddindx).visit_type;
524 a4(indx) := t(ddindx).visit_name;
525 a5(indx) := t(ddindx).visit_status_code;
526 a6(indx) := t(ddindx).visit_status;
527 a7(indx) := t(ddindx).visit_org_id;
528 a8(indx) := t(ddindx).visit_org_name;
529 a9(indx) := t(ddindx).visit_dep_id;
530 a10(indx) := t(ddindx).visit_dep_name;
531 a11(indx) := t(ddindx).start_time;
532 a12(indx) := t(ddindx).end_time;
533 a13(indx) := t(ddindx).prev_event_type;
534 a14(indx) := t(ddindx).prev_event_id;
535 a15(indx) := t(ddindx).prev_event_org_id;
536 a16(indx) := t(ddindx).is_prev_org_valid;
537 a17(indx) := t(ddindx).prev_event_org_name;
538 a18(indx) := t(ddindx).prev_event_dep_id;
539 a19(indx) := t(ddindx).prve_event_dep_name;
540 a20(indx) := t(ddindx).prev_event_end_time;
541 a21(indx) := t(ddindx).prev_unit_schedule_id;
542 a22(indx) := t(ddindx).prev_flight_number;
543 a23(indx) := t(ddindx).has_mopportunity;
544 a24(indx) := t(ddindx).has_conflict;
545 a25(indx) := t(ddindx).conflict_message;
546 a26(indx) := t(ddindx).can_cancel;
547 a27(indx) := t(ddindx).is_org_valid;
548 indx := indx+1;
549 if t.last =ddindx
550 then exit;
551 end if;
552 ddindx := t.next(ddindx);
553 end loop;
554 end if;
555 end if;
556 end rosetta_table_copy_out_p8;
557
558 procedure search_unit_schedules(p_api_version NUMBER
559 , x_return_status out nocopy VARCHAR2
563 , p4_a1 VARCHAR2
560 , x_msg_count out nocopy NUMBER
561 , x_msg_data out nocopy VARCHAR2
562 , p4_a0 VARCHAR2
564 , p4_a2 VARCHAR2
565 , p4_a3 DATE
566 , p4_a4 NUMBER
567 , p4_a5 VARCHAR2
568 , p5_a0 out nocopy JTF_NUMBER_TABLE
569 , p5_a1 out nocopy JTF_NUMBER_TABLE
570 , p5_a2 out nocopy JTF_NUMBER_TABLE
571 , p5_a3 out nocopy JTF_VARCHAR2_TABLE_100
572 , p5_a4 out nocopy JTF_NUMBER_TABLE
573 , p5_a5 out nocopy JTF_VARCHAR2_TABLE_100
574 )
575
576 as
577 ddp_unit_schedules_search ahl_ua_unit_schedules_pvt.unit_schedules_search_rec_type;
578 ddx_unit_schedules_results ahl_ua_unit_schedules_pvt.unit_schedules_result_tbl_type;
579 ddindx binary_integer; indx binary_integer;
580 begin
581
582 -- copy data to the local IN or IN-OUT args, if any
583
584
585
586
587 ddp_unit_schedules_search.unit_name := p4_a0;
588 ddp_unit_schedules_search.item_number := p4_a1;
589 ddp_unit_schedules_search.serial_number := p4_a2;
590 ddp_unit_schedules_search.start_date_time := rosetta_g_miss_date_in_map(p4_a3);
591 ddp_unit_schedules_search.time_increment := p4_a4;
592 ddp_unit_schedules_search.time_uom := p4_a5;
593
594
595 -- here's the delegated call to the old PL/SQL routine
596 ahl_ua_unit_schedules_pvt.search_unit_schedules(p_api_version,
597 x_return_status,
598 x_msg_count,
599 x_msg_data,
600 ddp_unit_schedules_search,
601 ddx_unit_schedules_results);
602
603 -- copy data back from the local variables to OUT or IN-OUT args, if any
604
605
606
607
608
609 ahl_ua_unit_schedules_pvt_w.rosetta_table_copy_out_p3(ddx_unit_schedules_results, p5_a0
610 , p5_a1
611 , p5_a2
612 , p5_a3
613 , p5_a4
614 , p5_a5
615 );
616 end;
617
618 procedure get_mevent_details(p_api_version NUMBER
619 , p_module_type VARCHAR2
620 , x_return_status out nocopy VARCHAR2
621 , x_msg_count out nocopy NUMBER
622 , x_msg_data out nocopy VARCHAR2
623 , p5_a0 in out nocopy NUMBER
624 , p5_a1 in out nocopy VARCHAR2
625 , p5_a2 in out nocopy DATE
626 , p5_a3 in out nocopy DATE
627 , p5_a4 in out nocopy VARCHAR2
628 , p5_a5 in out nocopy VARCHAR2
629 , p5_a6 in out nocopy NUMBER
630 , p5_a7 in out nocopy VARCHAR2
631 , p5_a8 in out nocopy VARCHAR2
632 , p6_a0 out nocopy JTF_NUMBER_TABLE
633 , p6_a1 out nocopy JTF_NUMBER_TABLE
634 , p6_a2 out nocopy JTF_VARCHAR2_TABLE_100
635 , p6_a3 out nocopy JTF_VARCHAR2_TABLE_100
636 , p6_a4 out nocopy JTF_NUMBER_TABLE
637 , p6_a5 out nocopy JTF_VARCHAR2_TABLE_300
638 , p6_a6 out nocopy JTF_NUMBER_TABLE
639 , p6_a7 out nocopy JTF_VARCHAR2_TABLE_300
640 , p6_a8 out nocopy JTF_NUMBER_TABLE
641 , p6_a9 out nocopy JTF_VARCHAR2_TABLE_300
642 , p6_a10 out nocopy JTF_NUMBER_TABLE
643 , p6_a11 out nocopy JTF_VARCHAR2_TABLE_300
644 , p6_a12 out nocopy JTF_DATE_TABLE
645 , p6_a13 out nocopy JTF_DATE_TABLE
646 , p6_a14 out nocopy JTF_VARCHAR2_TABLE_100
647 , p6_a15 out nocopy JTF_NUMBER_TABLE
648 , p6_a16 out nocopy JTF_NUMBER_TABLE
649 , p6_a17 out nocopy JTF_VARCHAR2_TABLE_100
650 , p6_a18 out nocopy JTF_VARCHAR2_TABLE_300
651 , p6_a19 out nocopy JTF_NUMBER_TABLE
652 , p6_a20 out nocopy JTF_VARCHAR2_TABLE_300
653 , p6_a21 out nocopy JTF_DATE_TABLE
654 , p6_a22 out nocopy JTF_NUMBER_TABLE
655 , p6_a23 out nocopy JTF_VARCHAR2_TABLE_100
656 , p6_a24 out nocopy JTF_VARCHAR2_TABLE_100
657 , p6_a25 out nocopy JTF_VARCHAR2_TABLE_100
658 , p6_a26 out nocopy JTF_VARCHAR2_TABLE_2000
659 , p6_a27 out nocopy JTF_VARCHAR2_TABLE_100
660 , p7_a0 out nocopy JTF_NUMBER_TABLE
661 , p7_a1 out nocopy JTF_NUMBER_TABLE
662 , p7_a2 out nocopy JTF_VARCHAR2_TABLE_100
663 , p7_a3 out nocopy JTF_VARCHAR2_TABLE_100
664 , p7_a4 out nocopy JTF_VARCHAR2_TABLE_100
665 , p7_a5 out nocopy JTF_VARCHAR2_TABLE_100
666 , p7_a6 out nocopy JTF_VARCHAR2_TABLE_100
667 , p7_a7 out nocopy JTF_NUMBER_TABLE
668 , p7_a8 out nocopy JTF_VARCHAR2_TABLE_300
669 , p7_a9 out nocopy JTF_NUMBER_TABLE
670 , p7_a10 out nocopy JTF_VARCHAR2_TABLE_300
671 , p7_a11 out nocopy JTF_DATE_TABLE
672 , p7_a12 out nocopy JTF_DATE_TABLE
673 , p7_a13 out nocopy JTF_VARCHAR2_TABLE_100
674 , p7_a14 out nocopy JTF_NUMBER_TABLE
675 , p7_a15 out nocopy JTF_NUMBER_TABLE
676 , p7_a16 out nocopy JTF_VARCHAR2_TABLE_100
677 , p7_a17 out nocopy JTF_VARCHAR2_TABLE_300
678 , p7_a18 out nocopy JTF_NUMBER_TABLE
679 , p7_a19 out nocopy JTF_VARCHAR2_TABLE_300
680 , p7_a20 out nocopy JTF_DATE_TABLE
681 , p7_a21 out nocopy JTF_NUMBER_TABLE
682 , p7_a22 out nocopy JTF_VARCHAR2_TABLE_100
683 , p7_a23 out nocopy JTF_VARCHAR2_TABLE_100
684 , p7_a24 out nocopy JTF_VARCHAR2_TABLE_100
685 , p7_a25 out nocopy JTF_VARCHAR2_TABLE_2000
686 , p7_a26 out nocopy JTF_VARCHAR2_TABLE_100
687 , p7_a27 out nocopy JTF_VARCHAR2_TABLE_100
688 )
689
690 as
691 ddp_x_mevent_header_rec ahl_ua_unit_schedules_pvt.mevent_header_rec_type;
692 ddx_unit_schedule_tbl ahl_ua_unit_schedules_pvt.unit_schedule_tbl_type;
693 ddx_visit_schedule_tbl ahl_ua_unit_schedules_pvt.visit_schedule_tbl_type;
694 ddindx binary_integer; indx binary_integer;
695 begin
696
697 -- copy data to the local IN or IN-OUT args, if any
698
699
700
701
702
703 ddp_x_mevent_header_rec.unit_config_header_id := p5_a0;
704 ddp_x_mevent_header_rec.unit_name := p5_a1;
708 ddp_x_mevent_header_rec.serial_number := p5_a5;
705 ddp_x_mevent_header_rec.start_time := rosetta_g_miss_date_in_map(p5_a2);
706 ddp_x_mevent_header_rec.end_time := rosetta_g_miss_date_in_map(p5_a3);
707 ddp_x_mevent_header_rec.item_number := p5_a4;
709 ddp_x_mevent_header_rec.event_count := p5_a6;
710 ddp_x_mevent_header_rec.has_conflict := p5_a7;
711 ddp_x_mevent_header_rec.has_mopportunity := p5_a8;
712
713
714
715 -- here's the delegated call to the old PL/SQL routine
716 ahl_ua_unit_schedules_pvt.get_mevent_details(p_api_version,
717 p_module_type,
718 x_return_status,
719 x_msg_count,
720 x_msg_data,
721 ddp_x_mevent_header_rec,
722 ddx_unit_schedule_tbl,
723 ddx_visit_schedule_tbl);
724
725 -- copy data back from the local variables to OUT or IN-OUT args, if any
726
727
728
729
730
731 p5_a0 := ddp_x_mevent_header_rec.unit_config_header_id;
732 p5_a1 := ddp_x_mevent_header_rec.unit_name;
733 p5_a2 := ddp_x_mevent_header_rec.start_time;
734 p5_a3 := ddp_x_mevent_header_rec.end_time;
735 p5_a4 := ddp_x_mevent_header_rec.item_number;
736 p5_a5 := ddp_x_mevent_header_rec.serial_number;
737 p5_a6 := ddp_x_mevent_header_rec.event_count;
738 p5_a7 := ddp_x_mevent_header_rec.has_conflict;
739 p5_a8 := ddp_x_mevent_header_rec.has_mopportunity;
740
741 ahl_ua_unit_schedules_pvt_w.rosetta_table_copy_out_p6(ddx_unit_schedule_tbl, p6_a0
742 , p6_a1
743 , p6_a2
744 , p6_a3
745 , p6_a4
746 , p6_a5
747 , p6_a6
748 , p6_a7
749 , p6_a8
750 , p6_a9
751 , p6_a10
752 , p6_a11
753 , p6_a12
754 , p6_a13
755 , p6_a14
756 , p6_a15
757 , p6_a16
758 , p6_a17
759 , p6_a18
760 , p6_a19
761 , p6_a20
762 , p6_a21
763 , p6_a22
764 , p6_a23
765 , p6_a24
766 , p6_a25
767 , p6_a26
768 , p6_a27
769 );
770
771 ahl_ua_unit_schedules_pvt_w.rosetta_table_copy_out_p8(ddx_visit_schedule_tbl, p7_a0
772 , p7_a1
773 , p7_a2
774 , p7_a3
775 , p7_a4
776 , p7_a5
777 , p7_a6
778 , p7_a7
779 , p7_a8
780 , p7_a9
781 , p7_a10
782 , p7_a11
783 , p7_a12
784 , p7_a13
785 , p7_a14
786 , p7_a15
787 , p7_a16
788 , p7_a17
789 , p7_a18
790 , p7_a19
791 , p7_a20
792 , p7_a21
793 , p7_a22
794 , p7_a23
795 , p7_a24
796 , p7_a25
797 , p7_a26
798 , p7_a27
799 );
800 end;
801
802 procedure get_prec_succ_event_info(p_api_version NUMBER
803 , x_return_status out nocopy VARCHAR2
804 , x_msg_count out nocopy NUMBER
805 , x_msg_data out nocopy VARCHAR2
806 , p_unit_config_id NUMBER
807 , p_start_date_time date
808 , p_end_date_time date
809 , p7_a0 out nocopy NUMBER
810 , p7_a1 out nocopy VARCHAR2
811 , p7_a2 out nocopy NUMBER
812 , p7_a3 out nocopy NUMBER
813 , p7_a4 out nocopy DATE
814 , p7_a5 out nocopy NUMBER
815 , p7_a6 out nocopy DATE
816 , p7_a7 out nocopy NUMBER
817 , p7_a8 out nocopy NUMBER
818 , p7_a9 out nocopy NUMBER
819 , p7_a10 out nocopy VARCHAR2
820 , p7_a11 out nocopy NUMBER
821 , p7_a12 out nocopy VARCHAR2
822 , p7_a13 out nocopy NUMBER
823 , p7_a14 out nocopy VARCHAR2
824 , p7_a15 out nocopy VARCHAR2
825 , p7_a16 out nocopy VARCHAR2
826 , p7_a17 out nocopy DATE
827 , p7_a18 out nocopy NUMBER
828 , p7_a19 out nocopy NUMBER
829 , p7_a20 out nocopy DATE
830 , p7_a21 out nocopy NUMBER
831 , p7_a22 out nocopy NUMBER
832 , p7_a23 out nocopy DATE
833 , p7_a24 out nocopy DATE
834 , p7_a25 out nocopy VARCHAR2
835 , p7_a26 out nocopy VARCHAR2
836 , p7_a27 out nocopy VARCHAR2
837 , p7_a28 out nocopy VARCHAR2
838 , p7_a29 out nocopy NUMBER
839 , p7_a30 out nocopy VARCHAR2
840 , p7_a31 out nocopy NUMBER
841 , p7_a32 out nocopy VARCHAR2
842 , p7_a33 out nocopy NUMBER
843 , p7_a34 out nocopy VARCHAR2
844 , p7_a35 out nocopy NUMBER
845 , p7_a36 out nocopy NUMBER
846 , p7_a37 out nocopy VARCHAR2
847 , p7_a38 out nocopy VARCHAR2
848 , p7_a39 out nocopy VARCHAR2
849 , p7_a40 out nocopy VARCHAR2
850 , p7_a41 out nocopy VARCHAR2
851 , p7_a42 out nocopy VARCHAR2
852 , p7_a43 out nocopy NUMBER
853 , p7_a44 out nocopy NUMBER
854 , p7_a45 out nocopy VARCHAR2
855 , p7_a46 out nocopy NUMBER
856 , p7_a47 out nocopy VARCHAR2
857 , p7_a48 out nocopy VARCHAR2
858 , p7_a49 out nocopy VARCHAR2
859 , p7_a50 out nocopy VARCHAR2
860 , p7_a51 out nocopy VARCHAR2
861 , p7_a52 out nocopy VARCHAR2
862 , p7_a53 out nocopy VARCHAR2
863 , p7_a54 out nocopy VARCHAR2
864 , p7_a55 out nocopy VARCHAR2
865 , p7_a56 out nocopy VARCHAR2
866 , p7_a57 out nocopy VARCHAR2
867 , p7_a58 out nocopy VARCHAR2
868 , p7_a59 out nocopy VARCHAR2
869 , p7_a60 out nocopy VARCHAR2
870 , p7_a61 out nocopy VARCHAR2
871 , p7_a62 out nocopy VARCHAR2
872 , p7_a63 out nocopy VARCHAR2
873 , p7_a64 out nocopy VARCHAR2
874 , p7_a65 out nocopy VARCHAR2
875 , p7_a66 out nocopy VARCHAR2
879 , p7_a70 out nocopy NUMBER
876 , p7_a67 out nocopy NUMBER
877 , p7_a68 out nocopy VARCHAR2
878 , p7_a69 out nocopy VARCHAR2
880 , p7_a71 out nocopy VARCHAR2
881 , p7_a72 out nocopy VARCHAR2
882 , p7_a73 out nocopy NUMBER
883 , p7_a74 out nocopy VARCHAR2
884 , p8_a0 out nocopy NUMBER
885 , p8_a1 out nocopy VARCHAR2
886 , p8_a2 out nocopy VARCHAR2
887 , p8_a3 out nocopy DATE
888 , p8_a4 out nocopy DATE
889 , p8_a5 out nocopy NUMBER
890 , p8_a6 out nocopy VARCHAR2
891 , p8_a7 out nocopy NUMBER
892 , p8_a8 out nocopy VARCHAR2
893 , p8_a9 out nocopy DATE
894 , p8_a10 out nocopy DATE
895 , p8_a11 out nocopy NUMBER
896 , p8_a12 out nocopy VARCHAR2
897 , p8_a13 out nocopy NUMBER
898 , p8_a14 out nocopy VARCHAR2
899 , p8_a15 out nocopy NUMBER
900 , p8_a16 out nocopy NUMBER
901 , p8_a17 out nocopy VARCHAR2
902 , p8_a18 out nocopy NUMBER
903 , p8_a19 out nocopy VARCHAR2
904 , p8_a20 out nocopy VARCHAR2
905 , p8_a21 out nocopy VARCHAR2
906 , p8_a22 out nocopy VARCHAR2
907 , p8_a23 out nocopy VARCHAR2
908 , p8_a24 out nocopy NUMBER
909 , p8_a25 out nocopy VARCHAR2
910 , p8_a26 out nocopy VARCHAR2
911 , p8_a27 out nocopy VARCHAR2
912 , p8_a28 out nocopy VARCHAR2
913 , p8_a29 out nocopy VARCHAR2
914 , p8_a30 out nocopy VARCHAR2
915 , p8_a31 out nocopy VARCHAR2
916 , p8_a32 out nocopy VARCHAR2
917 , p8_a33 out nocopy VARCHAR2
918 , p8_a34 out nocopy VARCHAR2
919 , p8_a35 out nocopy VARCHAR2
920 , p8_a36 out nocopy VARCHAR2
921 , p8_a37 out nocopy VARCHAR2
922 , p8_a38 out nocopy VARCHAR2
923 , p8_a39 out nocopy VARCHAR2
924 , p8_a40 out nocopy VARCHAR2
925 , p8_a41 out nocopy VARCHAR2
926 , p8_a42 out nocopy VARCHAR2
927 , p8_a43 out nocopy VARCHAR2
928 , p8_a44 out nocopy VARCHAR2
929 , x_is_prec_conflict out nocopy VARCHAR2
930 , x_is_prec_org_in_ou out nocopy VARCHAR2
931 , p11_a0 out nocopy NUMBER
932 , p11_a1 out nocopy VARCHAR2
933 , p11_a2 out nocopy NUMBER
934 , p11_a3 out nocopy NUMBER
935 , p11_a4 out nocopy DATE
936 , p11_a5 out nocopy NUMBER
937 , p11_a6 out nocopy DATE
938 , p11_a7 out nocopy NUMBER
939 , p11_a8 out nocopy NUMBER
940 , p11_a9 out nocopy NUMBER
941 , p11_a10 out nocopy VARCHAR2
942 , p11_a11 out nocopy NUMBER
943 , p11_a12 out nocopy VARCHAR2
944 , p11_a13 out nocopy NUMBER
945 , p11_a14 out nocopy VARCHAR2
946 , p11_a15 out nocopy VARCHAR2
947 , p11_a16 out nocopy VARCHAR2
948 , p11_a17 out nocopy DATE
949 , p11_a18 out nocopy NUMBER
950 , p11_a19 out nocopy NUMBER
951 , p11_a20 out nocopy DATE
952 , p11_a21 out nocopy NUMBER
953 , p11_a22 out nocopy NUMBER
954 , p11_a23 out nocopy DATE
955 , p11_a24 out nocopy DATE
956 , p11_a25 out nocopy VARCHAR2
957 , p11_a26 out nocopy VARCHAR2
958 , p11_a27 out nocopy VARCHAR2
959 , p11_a28 out nocopy VARCHAR2
960 , p11_a29 out nocopy NUMBER
961 , p11_a30 out nocopy VARCHAR2
962 , p11_a31 out nocopy NUMBER
963 , p11_a32 out nocopy VARCHAR2
964 , p11_a33 out nocopy NUMBER
965 , p11_a34 out nocopy VARCHAR2
966 , p11_a35 out nocopy NUMBER
967 , p11_a36 out nocopy NUMBER
968 , p11_a37 out nocopy VARCHAR2
969 , p11_a38 out nocopy VARCHAR2
970 , p11_a39 out nocopy VARCHAR2
971 , p11_a40 out nocopy VARCHAR2
972 , p11_a41 out nocopy VARCHAR2
973 , p11_a42 out nocopy VARCHAR2
974 , p11_a43 out nocopy NUMBER
975 , p11_a44 out nocopy NUMBER
976 , p11_a45 out nocopy VARCHAR2
977 , p11_a46 out nocopy NUMBER
978 , p11_a47 out nocopy VARCHAR2
979 , p11_a48 out nocopy VARCHAR2
980 , p11_a49 out nocopy VARCHAR2
981 , p11_a50 out nocopy VARCHAR2
982 , p11_a51 out nocopy VARCHAR2
983 , p11_a52 out nocopy VARCHAR2
984 , p11_a53 out nocopy VARCHAR2
985 , p11_a54 out nocopy VARCHAR2
986 , p11_a55 out nocopy VARCHAR2
987 , p11_a56 out nocopy VARCHAR2
988 , p11_a57 out nocopy VARCHAR2
989 , p11_a58 out nocopy VARCHAR2
990 , p11_a59 out nocopy VARCHAR2
991 , p11_a60 out nocopy VARCHAR2
992 , p11_a61 out nocopy VARCHAR2
993 , p11_a62 out nocopy VARCHAR2
994 , p11_a63 out nocopy VARCHAR2
995 , p11_a64 out nocopy VARCHAR2
996 , p11_a65 out nocopy VARCHAR2
997 , p11_a66 out nocopy VARCHAR2
998 , p11_a67 out nocopy NUMBER
999 , p11_a68 out nocopy VARCHAR2
1000 , p11_a69 out nocopy VARCHAR2
1001 , p11_a70 out nocopy NUMBER
1002 , p11_a71 out nocopy VARCHAR2
1003 , p11_a72 out nocopy VARCHAR2
1004 , p11_a73 out nocopy NUMBER
1005 , p11_a74 out nocopy VARCHAR2
1006 , p12_a0 out nocopy NUMBER
1007 , p12_a1 out nocopy VARCHAR2
1008 , p12_a2 out nocopy VARCHAR2
1009 , p12_a3 out nocopy DATE
1010 , p12_a4 out nocopy DATE
1011 , p12_a5 out nocopy NUMBER
1012 , p12_a6 out nocopy VARCHAR2
1013 , p12_a7 out nocopy NUMBER
1014 , p12_a8 out nocopy VARCHAR2
1015 , p12_a9 out nocopy DATE
1016 , p12_a10 out nocopy DATE
1017 , p12_a11 out nocopy NUMBER
1018 , p12_a12 out nocopy VARCHAR2
1019 , p12_a13 out nocopy NUMBER
1020 , p12_a14 out nocopy VARCHAR2
1021 , p12_a15 out nocopy NUMBER
1022 , p12_a16 out nocopy NUMBER
1023 , p12_a17 out nocopy VARCHAR2
1024 , p12_a18 out nocopy NUMBER
1028 , p12_a22 out nocopy VARCHAR2
1025 , p12_a19 out nocopy VARCHAR2
1026 , p12_a20 out nocopy VARCHAR2
1027 , p12_a21 out nocopy VARCHAR2
1029 , p12_a23 out nocopy VARCHAR2
1030 , p12_a24 out nocopy NUMBER
1031 , p12_a25 out nocopy VARCHAR2
1032 , p12_a26 out nocopy VARCHAR2
1033 , p12_a27 out nocopy VARCHAR2
1034 , p12_a28 out nocopy VARCHAR2
1035 , p12_a29 out nocopy VARCHAR2
1036 , p12_a30 out nocopy VARCHAR2
1037 , p12_a31 out nocopy VARCHAR2
1038 , p12_a32 out nocopy VARCHAR2
1039 , p12_a33 out nocopy VARCHAR2
1040 , p12_a34 out nocopy VARCHAR2
1041 , p12_a35 out nocopy VARCHAR2
1042 , p12_a36 out nocopy VARCHAR2
1043 , p12_a37 out nocopy VARCHAR2
1044 , p12_a38 out nocopy VARCHAR2
1045 , p12_a39 out nocopy VARCHAR2
1046 , p12_a40 out nocopy VARCHAR2
1047 , p12_a41 out nocopy VARCHAR2
1048 , p12_a42 out nocopy VARCHAR2
1049 , p12_a43 out nocopy VARCHAR2
1050 , p12_a44 out nocopy VARCHAR2
1051 , x_is_succ_conflict out nocopy VARCHAR2
1052 , x_is_succ_org_in_ou out nocopy VARCHAR2
1053 )
1054
1055 as
1056 ddp_start_date_time date;
1057 ddp_end_date_time date;
1058 ddx_prec_visit ahl_vwp_visits_pvt.visit_rec_type;
1059 ddx_prec_flight_schedule ahl_ua_flight_schedules_pvt.flight_schedule_rec_type;
1060 ddx_succ_visit ahl_vwp_visits_pvt.visit_rec_type;
1061 ddx_succ_flight_schedule ahl_ua_flight_schedules_pvt.flight_schedule_rec_type;
1062 ddindx binary_integer; indx binary_integer;
1063 begin
1064
1065 -- copy data to the local IN or IN-OUT args, if any
1066
1067
1068
1069
1070
1071 ddp_start_date_time := rosetta_g_miss_date_in_map(p_start_date_time);
1072
1073 ddp_end_date_time := rosetta_g_miss_date_in_map(p_end_date_time);
1074
1075
1076
1077
1078
1079
1080
1081
1082
1083 -- here's the delegated call to the old PL/SQL routine
1084 ahl_ua_unit_schedules_pvt.get_prec_succ_event_info(p_api_version,
1085 x_return_status,
1086 x_msg_count,
1087 x_msg_data,
1088 p_unit_config_id,
1089 ddp_start_date_time,
1090 ddp_end_date_time,
1091 ddx_prec_visit,
1092 ddx_prec_flight_schedule,
1093 x_is_prec_conflict,
1094 x_is_prec_org_in_ou,
1095 ddx_succ_visit,
1096 ddx_succ_flight_schedule,
1097 x_is_succ_conflict,
1098 x_is_succ_org_in_ou);
1099
1100 -- copy data back from the local variables to OUT or IN-OUT args, if any
1101
1102
1103
1104
1105
1106
1107
1108 p7_a0 := ddx_prec_visit.visit_id;
1109 p7_a1 := ddx_prec_visit.visit_name;
1110 p7_a2 := ddx_prec_visit.visit_number;
1111 p7_a3 := ddx_prec_visit.object_version_number;
1112 p7_a4 := ddx_prec_visit.last_update_date;
1113 p7_a5 := ddx_prec_visit.last_updated_by;
1114 p7_a6 := ddx_prec_visit.creation_date;
1115 p7_a7 := ddx_prec_visit.created_by;
1116 p7_a8 := ddx_prec_visit.last_update_login;
1117 p7_a9 := ddx_prec_visit.organization_id;
1118 p7_a10 := ddx_prec_visit.org_name;
1119 p7_a11 := ddx_prec_visit.department_id;
1120 p7_a12 := ddx_prec_visit.dept_name;
1121 p7_a13 := ddx_prec_visit.service_request_id;
1122 p7_a14 := ddx_prec_visit.service_request_number;
1123 p7_a15 := ddx_prec_visit.space_category_code;
1124 p7_a16 := ddx_prec_visit.space_category_name;
1125 p7_a17 := ddx_prec_visit.start_date;
1126 p7_a18 := ddx_prec_visit.start_hour;
1127 p7_a19 := ddx_prec_visit.start_min;
1128 p7_a20 := ddx_prec_visit.plan_end_date;
1129 p7_a21 := ddx_prec_visit.plan_end_hour;
1130 p7_a22 := ddx_prec_visit.plan_end_min;
1131 p7_a23 := ddx_prec_visit.end_date;
1132 p7_a24 := ddx_prec_visit.due_by_date;
1133 p7_a25 := ddx_prec_visit.visit_type_code;
1134 p7_a26 := ddx_prec_visit.visit_type_name;
1135 p7_a27 := ddx_prec_visit.status_code;
1136 p7_a28 := ddx_prec_visit.status_name;
1137 p7_a29 := ddx_prec_visit.simulation_plan_id;
1138 p7_a30 := ddx_prec_visit.simulation_plan_name;
1139 p7_a31 := ddx_prec_visit.asso_primary_visit_id;
1140 p7_a32 := ddx_prec_visit.unit_name;
1141 p7_a33 := ddx_prec_visit.item_instance_id;
1142 p7_a34 := ddx_prec_visit.serial_number;
1143 p7_a35 := ddx_prec_visit.inventory_item_id;
1144 p7_a36 := ddx_prec_visit.item_organization_id;
1145 p7_a37 := ddx_prec_visit.item_name;
1146 p7_a38 := ddx_prec_visit.simulation_delete_flag;
1147 p7_a39 := ddx_prec_visit.template_flag;
1148 p7_a40 := ddx_prec_visit.out_of_sync_flag;
1149 p7_a41 := ddx_prec_visit.project_flag;
1150 p7_a42 := ddx_prec_visit.project_flag_code;
1151 p7_a43 := ddx_prec_visit.project_id;
1152 p7_a44 := ddx_prec_visit.project_number;
1153 p7_a45 := ddx_prec_visit.description;
1154 p7_a46 := ddx_prec_visit.duration;
1155 p7_a47 := ddx_prec_visit.attribute_category;
1156 p7_a48 := ddx_prec_visit.attribute1;
1157 p7_a49 := ddx_prec_visit.attribute2;
1158 p7_a50 := ddx_prec_visit.attribute3;
1159 p7_a51 := ddx_prec_visit.attribute4;
1160 p7_a52 := ddx_prec_visit.attribute5;
1161 p7_a53 := ddx_prec_visit.attribute6;
1162 p7_a54 := ddx_prec_visit.attribute7;
1163 p7_a55 := ddx_prec_visit.attribute8;
1164 p7_a56 := ddx_prec_visit.attribute9;
1165 p7_a57 := ddx_prec_visit.attribute10;
1166 p7_a58 := ddx_prec_visit.attribute11;
1167 p7_a59 := ddx_prec_visit.attribute12;
1168 p7_a60 := ddx_prec_visit.attribute13;
1169 p7_a61 := ddx_prec_visit.attribute14;
1170 p7_a62 := ddx_prec_visit.attribute15;
1171 p7_a63 := ddx_prec_visit.operation_flag;
1172 p7_a64 := ddx_prec_visit.outside_party_flag;
1176 p7_a68 := ddx_prec_visit.priority_value;
1173 p7_a65 := ddx_prec_visit.job_number;
1174 p7_a66 := ddx_prec_visit.proj_template_name;
1175 p7_a67 := ddx_prec_visit.proj_template_id;
1177 p7_a69 := ddx_prec_visit.priority_code;
1178 p7_a70 := ddx_prec_visit.unit_schedule_id;
1179 p7_a71 := ddx_prec_visit.visit_create_type;
1180 p7_a72 := ddx_prec_visit.visit_create_meaning;
1181 p7_a73 := ddx_prec_visit.unit_header_id;
1182 p7_a74 := ddx_prec_visit.flight_number;
1183
1184 p8_a0 := ddx_prec_flight_schedule.unit_schedule_id;
1185 p8_a1 := ddx_prec_flight_schedule.flight_number;
1186 p8_a2 := ddx_prec_flight_schedule.segment;
1187 p8_a3 := ddx_prec_flight_schedule.est_departure_time;
1188 p8_a4 := ddx_prec_flight_schedule.actual_departure_time;
1189 p8_a5 := ddx_prec_flight_schedule.departure_dept_id;
1190 p8_a6 := ddx_prec_flight_schedule.departure_dept_code;
1191 p8_a7 := ddx_prec_flight_schedule.departure_org_id;
1192 p8_a8 := ddx_prec_flight_schedule.departure_org_code;
1193 p8_a9 := ddx_prec_flight_schedule.est_arrival_time;
1194 p8_a10 := ddx_prec_flight_schedule.actual_arrival_time;
1195 p8_a11 := ddx_prec_flight_schedule.arrival_dept_id;
1196 p8_a12 := ddx_prec_flight_schedule.arrival_dept_code;
1197 p8_a13 := ddx_prec_flight_schedule.arrival_org_id;
1198 p8_a14 := ddx_prec_flight_schedule.arrival_org_code;
1199 p8_a15 := ddx_prec_flight_schedule.preceding_us_id;
1200 p8_a16 := ddx_prec_flight_schedule.unit_config_header_id;
1201 p8_a17 := ddx_prec_flight_schedule.unit_config_name;
1202 p8_a18 := ddx_prec_flight_schedule.csi_instance_id;
1203 p8_a19 := ddx_prec_flight_schedule.instance_number;
1204 p8_a20 := ddx_prec_flight_schedule.item_number;
1205 p8_a21 := ddx_prec_flight_schedule.serial_number;
1206 p8_a22 := ddx_prec_flight_schedule.visit_reschedule_mode;
1207 p8_a23 := ddx_prec_flight_schedule.visit_reschedule_meaning;
1208 p8_a24 := ddx_prec_flight_schedule.object_version_number;
1209 p8_a25 := ddx_prec_flight_schedule.is_update_allowed;
1210 p8_a26 := ddx_prec_flight_schedule.is_delete_allowed;
1211 p8_a27 := ddx_prec_flight_schedule.conflict_message;
1212 p8_a28 := ddx_prec_flight_schedule.attribute_category;
1213 p8_a29 := ddx_prec_flight_schedule.attribute1;
1214 p8_a30 := ddx_prec_flight_schedule.attribute2;
1215 p8_a31 := ddx_prec_flight_schedule.attribute3;
1216 p8_a32 := ddx_prec_flight_schedule.attribute4;
1217 p8_a33 := ddx_prec_flight_schedule.attribute5;
1218 p8_a34 := ddx_prec_flight_schedule.attribute6;
1219 p8_a35 := ddx_prec_flight_schedule.attribute7;
1220 p8_a36 := ddx_prec_flight_schedule.attribute8;
1221 p8_a37 := ddx_prec_flight_schedule.attribute9;
1222 p8_a38 := ddx_prec_flight_schedule.attribute10;
1223 p8_a39 := ddx_prec_flight_schedule.attribute11;
1224 p8_a40 := ddx_prec_flight_schedule.attribute12;
1225 p8_a41 := ddx_prec_flight_schedule.attribute13;
1226 p8_a42 := ddx_prec_flight_schedule.attribute14;
1227 p8_a43 := ddx_prec_flight_schedule.attribute15;
1228 p8_a44 := ddx_prec_flight_schedule.dml_operation;
1229
1230
1231
1232 p11_a0 := ddx_succ_visit.visit_id;
1233 p11_a1 := ddx_succ_visit.visit_name;
1234 p11_a2 := ddx_succ_visit.visit_number;
1235 p11_a3 := ddx_succ_visit.object_version_number;
1236 p11_a4 := ddx_succ_visit.last_update_date;
1237 p11_a5 := ddx_succ_visit.last_updated_by;
1238 p11_a6 := ddx_succ_visit.creation_date;
1239 p11_a7 := ddx_succ_visit.created_by;
1240 p11_a8 := ddx_succ_visit.last_update_login;
1241 p11_a9 := ddx_succ_visit.organization_id;
1242 p11_a10 := ddx_succ_visit.org_name;
1243 p11_a11 := ddx_succ_visit.department_id;
1244 p11_a12 := ddx_succ_visit.dept_name;
1245 p11_a13 := ddx_succ_visit.service_request_id;
1246 p11_a14 := ddx_succ_visit.service_request_number;
1247 p11_a15 := ddx_succ_visit.space_category_code;
1248 p11_a16 := ddx_succ_visit.space_category_name;
1249 p11_a17 := ddx_succ_visit.start_date;
1250 p11_a18 := ddx_succ_visit.start_hour;
1251 p11_a19 := ddx_succ_visit.start_min;
1252 p11_a20 := ddx_succ_visit.plan_end_date;
1253 p11_a21 := ddx_succ_visit.plan_end_hour;
1254 p11_a22 := ddx_succ_visit.plan_end_min;
1255 p11_a23 := ddx_succ_visit.end_date;
1256 p11_a24 := ddx_succ_visit.due_by_date;
1257 p11_a25 := ddx_succ_visit.visit_type_code;
1258 p11_a26 := ddx_succ_visit.visit_type_name;
1259 p11_a27 := ddx_succ_visit.status_code;
1260 p11_a28 := ddx_succ_visit.status_name;
1261 p11_a29 := ddx_succ_visit.simulation_plan_id;
1262 p11_a30 := ddx_succ_visit.simulation_plan_name;
1263 p11_a31 := ddx_succ_visit.asso_primary_visit_id;
1264 p11_a32 := ddx_succ_visit.unit_name;
1265 p11_a33 := ddx_succ_visit.item_instance_id;
1266 p11_a34 := ddx_succ_visit.serial_number;
1267 p11_a35 := ddx_succ_visit.inventory_item_id;
1268 p11_a36 := ddx_succ_visit.item_organization_id;
1269 p11_a37 := ddx_succ_visit.item_name;
1270 p11_a38 := ddx_succ_visit.simulation_delete_flag;
1271 p11_a39 := ddx_succ_visit.template_flag;
1272 p11_a40 := ddx_succ_visit.out_of_sync_flag;
1273 p11_a41 := ddx_succ_visit.project_flag;
1274 p11_a42 := ddx_succ_visit.project_flag_code;
1275 p11_a43 := ddx_succ_visit.project_id;
1276 p11_a44 := ddx_succ_visit.project_number;
1277 p11_a45 := ddx_succ_visit.description;
1278 p11_a46 := ddx_succ_visit.duration;
1279 p11_a47 := ddx_succ_visit.attribute_category;
1280 p11_a48 := ddx_succ_visit.attribute1;
1281 p11_a49 := ddx_succ_visit.attribute2;
1282 p11_a50 := ddx_succ_visit.attribute3;
1283 p11_a51 := ddx_succ_visit.attribute4;
1284 p11_a52 := ddx_succ_visit.attribute5;
1285 p11_a53 := ddx_succ_visit.attribute6;
1286 p11_a54 := ddx_succ_visit.attribute7;
1287 p11_a55 := ddx_succ_visit.attribute8;
1288 p11_a56 := ddx_succ_visit.attribute9;
1292 p11_a60 := ddx_succ_visit.attribute13;
1289 p11_a57 := ddx_succ_visit.attribute10;
1290 p11_a58 := ddx_succ_visit.attribute11;
1291 p11_a59 := ddx_succ_visit.attribute12;
1293 p11_a61 := ddx_succ_visit.attribute14;
1294 p11_a62 := ddx_succ_visit.attribute15;
1295 p11_a63 := ddx_succ_visit.operation_flag;
1296 p11_a64 := ddx_succ_visit.outside_party_flag;
1297 p11_a65 := ddx_succ_visit.job_number;
1298 p11_a66 := ddx_succ_visit.proj_template_name;
1299 p11_a67 := ddx_succ_visit.proj_template_id;
1300 p11_a68 := ddx_succ_visit.priority_value;
1301 p11_a69 := ddx_succ_visit.priority_code;
1302 p11_a70 := ddx_succ_visit.unit_schedule_id;
1303 p11_a71 := ddx_succ_visit.visit_create_type;
1304 p11_a72 := ddx_succ_visit.visit_create_meaning;
1305 p11_a73 := ddx_succ_visit.unit_header_id;
1306 p11_a74 := ddx_succ_visit.flight_number;
1307
1308 p12_a0 := ddx_succ_flight_schedule.unit_schedule_id;
1309 p12_a1 := ddx_succ_flight_schedule.flight_number;
1310 p12_a2 := ddx_succ_flight_schedule.segment;
1311 p12_a3 := ddx_succ_flight_schedule.est_departure_time;
1312 p12_a4 := ddx_succ_flight_schedule.actual_departure_time;
1313 p12_a5 := ddx_succ_flight_schedule.departure_dept_id;
1314 p12_a6 := ddx_succ_flight_schedule.departure_dept_code;
1315 p12_a7 := ddx_succ_flight_schedule.departure_org_id;
1316 p12_a8 := ddx_succ_flight_schedule.departure_org_code;
1317 p12_a9 := ddx_succ_flight_schedule.est_arrival_time;
1318 p12_a10 := ddx_succ_flight_schedule.actual_arrival_time;
1319 p12_a11 := ddx_succ_flight_schedule.arrival_dept_id;
1320 p12_a12 := ddx_succ_flight_schedule.arrival_dept_code;
1321 p12_a13 := ddx_succ_flight_schedule.arrival_org_id;
1322 p12_a14 := ddx_succ_flight_schedule.arrival_org_code;
1323 p12_a15 := ddx_succ_flight_schedule.preceding_us_id;
1324 p12_a16 := ddx_succ_flight_schedule.unit_config_header_id;
1325 p12_a17 := ddx_succ_flight_schedule.unit_config_name;
1326 p12_a18 := ddx_succ_flight_schedule.csi_instance_id;
1327 p12_a19 := ddx_succ_flight_schedule.instance_number;
1328 p12_a20 := ddx_succ_flight_schedule.item_number;
1329 p12_a21 := ddx_succ_flight_schedule.serial_number;
1330 p12_a22 := ddx_succ_flight_schedule.visit_reschedule_mode;
1331 p12_a23 := ddx_succ_flight_schedule.visit_reschedule_meaning;
1332 p12_a24 := ddx_succ_flight_schedule.object_version_number;
1333 p12_a25 := ddx_succ_flight_schedule.is_update_allowed;
1334 p12_a26 := ddx_succ_flight_schedule.is_delete_allowed;
1335 p12_a27 := ddx_succ_flight_schedule.conflict_message;
1336 p12_a28 := ddx_succ_flight_schedule.attribute_category;
1337 p12_a29 := ddx_succ_flight_schedule.attribute1;
1338 p12_a30 := ddx_succ_flight_schedule.attribute2;
1339 p12_a31 := ddx_succ_flight_schedule.attribute3;
1340 p12_a32 := ddx_succ_flight_schedule.attribute4;
1341 p12_a33 := ddx_succ_flight_schedule.attribute5;
1342 p12_a34 := ddx_succ_flight_schedule.attribute6;
1343 p12_a35 := ddx_succ_flight_schedule.attribute7;
1344 p12_a36 := ddx_succ_flight_schedule.attribute8;
1345 p12_a37 := ddx_succ_flight_schedule.attribute9;
1346 p12_a38 := ddx_succ_flight_schedule.attribute10;
1347 p12_a39 := ddx_succ_flight_schedule.attribute11;
1348 p12_a40 := ddx_succ_flight_schedule.attribute12;
1349 p12_a41 := ddx_succ_flight_schedule.attribute13;
1350 p12_a42 := ddx_succ_flight_schedule.attribute14;
1351 p12_a43 := ddx_succ_flight_schedule.attribute15;
1352 p12_a44 := ddx_succ_flight_schedule.dml_operation;
1353
1354
1355 end;
1356
1357 end ahl_ua_unit_schedules_pvt_w;