[Home] [Help]
PACKAGE BODY: APPS.AHL_PRD_WORKORDER_PVT_W
Source
1 package body ahl_prd_workorder_pvt_w as
2 /* $Header: AHLWPRJB.pls 120.8.12020000.2 2012/12/14 05:53:26 shnatu ship $ */
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_p1(t out nocopy ahl_prd_workorder_pvt.prd_workoper_tbl, a0 JTF_NUMBER_TABLE
17 , a1 JTF_NUMBER_TABLE
18 , a2 JTF_NUMBER_TABLE
19 , a3 JTF_VARCHAR2_TABLE_500
20 , a4 JTF_NUMBER_TABLE
21 , a5 JTF_NUMBER_TABLE
22 , a6 JTF_NUMBER_TABLE
23 , a7 JTF_NUMBER_TABLE
24 , a8 JTF_DATE_TABLE
25 , a9 JTF_NUMBER_TABLE
26 , a10 JTF_DATE_TABLE
27 , a11 JTF_NUMBER_TABLE
28 , a12 JTF_NUMBER_TABLE
29 , a13 JTF_NUMBER_TABLE
30 , a14 JTF_VARCHAR2_TABLE_300
31 , a15 JTF_VARCHAR2_TABLE_100
32 , a16 JTF_VARCHAR2_TABLE_100
33 , a17 JTF_NUMBER_TABLE
34 , a18 JTF_VARCHAR2_TABLE_500
35 , a19 JTF_VARCHAR2_TABLE_100
36 , a20 JTF_VARCHAR2_TABLE_100
37 , a21 JTF_VARCHAR2_TABLE_100
38 , a22 JTF_NUMBER_TABLE
39 , a23 JTF_NUMBER_TABLE
40 , a24 JTF_DATE_TABLE
41 , a25 JTF_NUMBER_TABLE
42 , a26 JTF_NUMBER_TABLE
43 , a27 JTF_DATE_TABLE
44 , a28 JTF_NUMBER_TABLE
45 , a29 JTF_NUMBER_TABLE
46 , a30 JTF_DATE_TABLE
47 , a31 JTF_NUMBER_TABLE
48 , a32 JTF_NUMBER_TABLE
49 , a33 JTF_DATE_TABLE
50 , a34 JTF_NUMBER_TABLE
51 , a35 JTF_NUMBER_TABLE
52 , a36 JTF_NUMBER_TABLE
53 , a37 JTF_NUMBER_TABLE
54 , a38 JTF_VARCHAR2_TABLE_100
55 , a39 JTF_NUMBER_TABLE
56 , a40 JTF_VARCHAR2_TABLE_100
57 , a41 JTF_VARCHAR2_TABLE_200
58 , a42 JTF_VARCHAR2_TABLE_200
59 , a43 JTF_VARCHAR2_TABLE_200
60 , a44 JTF_VARCHAR2_TABLE_200
61 , a45 JTF_VARCHAR2_TABLE_200
62 , a46 JTF_VARCHAR2_TABLE_200
63 , a47 JTF_VARCHAR2_TABLE_200
64 , a48 JTF_VARCHAR2_TABLE_200
65 , a49 JTF_VARCHAR2_TABLE_200
66 , a50 JTF_VARCHAR2_TABLE_200
67 , a51 JTF_VARCHAR2_TABLE_200
68 , a52 JTF_VARCHAR2_TABLE_200
69 , a53 JTF_VARCHAR2_TABLE_200
70 , a54 JTF_VARCHAR2_TABLE_200
71 , a55 JTF_VARCHAR2_TABLE_200
72 , a56 JTF_VARCHAR2_TABLE_100
73 ) as
74 ddindx binary_integer; indx binary_integer;
75 begin
76 if a0 is not null and a0.count > 0 then
77 if a0.count > 0 then
78 indx := a0.first;
79 ddindx := 1;
80 while true loop
81 t(ddindx).workorder_operation_id := a0(indx);
82 t(ddindx).organization_id := a1(indx);
83 t(ddindx).operation_sequence_num := a2(indx);
84 t(ddindx).operation_description := a3(indx);
85 t(ddindx).workorder_id := a4(indx);
86 t(ddindx).wip_entity_id := a5(indx);
87 t(ddindx).route_id := a6(indx);
88 t(ddindx).object_version_number := a7(indx);
89 t(ddindx).last_update_date := rosetta_g_miss_date_in_map(a8(indx));
90 t(ddindx).last_updated_by := a9(indx);
91 t(ddindx).creation_date := rosetta_g_miss_date_in_map(a10(indx));
92 t(ddindx).created_by := a11(indx);
93 t(ddindx).last_update_login := a12(indx);
94 t(ddindx).department_id := a13(indx);
95 t(ddindx).department_name := a14(indx);
96 t(ddindx).status_code := a15(indx);
97 t(ddindx).status_meaning := a16(indx);
98 t(ddindx).operation_id := a17(indx);
99 t(ddindx).operation_code := a18(indx);
100 t(ddindx).operation_type_code := a19(indx);
101 t(ddindx).operation_type := a20(indx);
102 t(ddindx).replenish := a21(indx);
103 t(ddindx).minimum_transfer_quantity := a22(indx);
104 t(ddindx).count_point_type := a23(indx);
105 t(ddindx).scheduled_start_date := rosetta_g_miss_date_in_map(a24(indx));
106 t(ddindx).scheduled_start_hr := a25(indx);
107 t(ddindx).scheduled_start_mi := a26(indx);
108 t(ddindx).scheduled_end_date := rosetta_g_miss_date_in_map(a27(indx));
109 t(ddindx).scheduled_end_hr := a28(indx);
110 t(ddindx).scheduled_end_mi := a29(indx);
111 t(ddindx).actual_start_date := rosetta_g_miss_date_in_map(a30(indx));
112 t(ddindx).actual_start_hr := a31(indx);
113 t(ddindx).actual_start_mi := a32(indx);
114 t(ddindx).actual_end_date := rosetta_g_miss_date_in_map(a33(indx));
115 t(ddindx).actual_end_hr := a34(indx);
116 t(ddindx).actual_end_mi := a35(indx);
117 t(ddindx).plan_id := a36(indx);
118 t(ddindx).collection_id := a37(indx);
119 t(ddindx).propagate_flag := a38(indx);
120 t(ddindx).security_group_id := a39(indx);
121 t(ddindx).attribute_category := a40(indx);
122 t(ddindx).attribute1 := a41(indx);
123 t(ddindx).attribute2 := a42(indx);
124 t(ddindx).attribute3 := a43(indx);
125 t(ddindx).attribute4 := a44(indx);
126 t(ddindx).attribute5 := a45(indx);
127 t(ddindx).attribute6 := a46(indx);
128 t(ddindx).attribute7 := a47(indx);
129 t(ddindx).attribute8 := a48(indx);
130 t(ddindx).attribute9 := a49(indx);
131 t(ddindx).attribute10 := a50(indx);
132 t(ddindx).attribute11 := a51(indx);
133 t(ddindx).attribute12 := a52(indx);
134 t(ddindx).attribute13 := a53(indx);
135 t(ddindx).attribute14 := a54(indx);
136 t(ddindx).attribute15 := a55(indx);
137 t(ddindx).dml_operation := a56(indx);
138 ddindx := ddindx+1;
139 if a0.last =indx
140 then exit;
141 end if;
142 indx := a0.next(indx);
143 end loop;
144 end if;
145 end if;
146 end rosetta_table_copy_in_p1;
147 procedure rosetta_table_copy_out_p1(t ahl_prd_workorder_pvt.prd_workoper_tbl, a0 out nocopy JTF_NUMBER_TABLE
148 , a1 out nocopy JTF_NUMBER_TABLE
149 , a2 out nocopy JTF_NUMBER_TABLE
150 , a3 out nocopy JTF_VARCHAR2_TABLE_500
151 , a4 out nocopy JTF_NUMBER_TABLE
152 , a5 out nocopy JTF_NUMBER_TABLE
153 , a6 out nocopy JTF_NUMBER_TABLE
154 , a7 out nocopy JTF_NUMBER_TABLE
155 , a8 out nocopy JTF_DATE_TABLE
156 , a9 out nocopy JTF_NUMBER_TABLE
157 , a10 out nocopy JTF_DATE_TABLE
158 , a11 out nocopy JTF_NUMBER_TABLE
159 , a12 out nocopy JTF_NUMBER_TABLE
160 , a13 out nocopy JTF_NUMBER_TABLE
161 , a14 out nocopy JTF_VARCHAR2_TABLE_300
162 , a15 out nocopy JTF_VARCHAR2_TABLE_100
163 , a16 out nocopy JTF_VARCHAR2_TABLE_100
164 , a17 out nocopy JTF_NUMBER_TABLE
165 , a18 out nocopy JTF_VARCHAR2_TABLE_500
166 , a19 out nocopy JTF_VARCHAR2_TABLE_100
167 , a20 out nocopy JTF_VARCHAR2_TABLE_100
168 , a21 out nocopy JTF_VARCHAR2_TABLE_100
169 , a22 out nocopy JTF_NUMBER_TABLE
170 , a23 out nocopy JTF_NUMBER_TABLE
171 , a24 out nocopy JTF_DATE_TABLE
172 , a25 out nocopy JTF_NUMBER_TABLE
173 , a26 out nocopy JTF_NUMBER_TABLE
174 , a27 out nocopy JTF_DATE_TABLE
175 , a28 out nocopy JTF_NUMBER_TABLE
176 , a29 out nocopy JTF_NUMBER_TABLE
177 , a30 out nocopy JTF_DATE_TABLE
178 , a31 out nocopy JTF_NUMBER_TABLE
179 , a32 out nocopy JTF_NUMBER_TABLE
180 , a33 out nocopy JTF_DATE_TABLE
181 , a34 out nocopy JTF_NUMBER_TABLE
182 , a35 out nocopy JTF_NUMBER_TABLE
183 , a36 out nocopy JTF_NUMBER_TABLE
184 , a37 out nocopy JTF_NUMBER_TABLE
185 , a38 out nocopy JTF_VARCHAR2_TABLE_100
186 , a39 out nocopy JTF_NUMBER_TABLE
187 , a40 out nocopy JTF_VARCHAR2_TABLE_100
188 , a41 out nocopy JTF_VARCHAR2_TABLE_200
189 , a42 out nocopy JTF_VARCHAR2_TABLE_200
190 , a43 out nocopy JTF_VARCHAR2_TABLE_200
191 , a44 out nocopy JTF_VARCHAR2_TABLE_200
192 , a45 out nocopy JTF_VARCHAR2_TABLE_200
193 , a46 out nocopy JTF_VARCHAR2_TABLE_200
194 , a47 out nocopy JTF_VARCHAR2_TABLE_200
195 , a48 out nocopy JTF_VARCHAR2_TABLE_200
196 , a49 out nocopy JTF_VARCHAR2_TABLE_200
197 , a50 out nocopy JTF_VARCHAR2_TABLE_200
198 , a51 out nocopy JTF_VARCHAR2_TABLE_200
199 , a52 out nocopy JTF_VARCHAR2_TABLE_200
200 , a53 out nocopy JTF_VARCHAR2_TABLE_200
201 , a54 out nocopy JTF_VARCHAR2_TABLE_200
202 , a55 out nocopy JTF_VARCHAR2_TABLE_200
203 , a56 out nocopy JTF_VARCHAR2_TABLE_100
204 ) as
205 ddindx binary_integer; indx binary_integer;
206 begin
207 if t is null or t.count = 0 then
208 a0 := JTF_NUMBER_TABLE();
209 a1 := JTF_NUMBER_TABLE();
210 a2 := JTF_NUMBER_TABLE();
211 a3 := JTF_VARCHAR2_TABLE_500();
212 a4 := JTF_NUMBER_TABLE();
213 a5 := JTF_NUMBER_TABLE();
214 a6 := JTF_NUMBER_TABLE();
215 a7 := JTF_NUMBER_TABLE();
216 a8 := JTF_DATE_TABLE();
217 a9 := JTF_NUMBER_TABLE();
218 a10 := JTF_DATE_TABLE();
219 a11 := JTF_NUMBER_TABLE();
220 a12 := JTF_NUMBER_TABLE();
221 a13 := JTF_NUMBER_TABLE();
222 a14 := JTF_VARCHAR2_TABLE_300();
223 a15 := JTF_VARCHAR2_TABLE_100();
224 a16 := JTF_VARCHAR2_TABLE_100();
225 a17 := JTF_NUMBER_TABLE();
226 a18 := JTF_VARCHAR2_TABLE_500();
227 a19 := JTF_VARCHAR2_TABLE_100();
228 a20 := JTF_VARCHAR2_TABLE_100();
229 a21 := JTF_VARCHAR2_TABLE_100();
230 a22 := JTF_NUMBER_TABLE();
231 a23 := JTF_NUMBER_TABLE();
232 a24 := JTF_DATE_TABLE();
233 a25 := JTF_NUMBER_TABLE();
234 a26 := JTF_NUMBER_TABLE();
235 a27 := JTF_DATE_TABLE();
236 a28 := JTF_NUMBER_TABLE();
237 a29 := JTF_NUMBER_TABLE();
238 a30 := JTF_DATE_TABLE();
239 a31 := JTF_NUMBER_TABLE();
240 a32 := JTF_NUMBER_TABLE();
241 a33 := JTF_DATE_TABLE();
242 a34 := JTF_NUMBER_TABLE();
243 a35 := JTF_NUMBER_TABLE();
244 a36 := JTF_NUMBER_TABLE();
245 a37 := JTF_NUMBER_TABLE();
246 a38 := JTF_VARCHAR2_TABLE_100();
247 a39 := JTF_NUMBER_TABLE();
248 a40 := JTF_VARCHAR2_TABLE_100();
249 a41 := JTF_VARCHAR2_TABLE_200();
250 a42 := JTF_VARCHAR2_TABLE_200();
251 a43 := JTF_VARCHAR2_TABLE_200();
252 a44 := JTF_VARCHAR2_TABLE_200();
253 a45 := JTF_VARCHAR2_TABLE_200();
254 a46 := JTF_VARCHAR2_TABLE_200();
255 a47 := JTF_VARCHAR2_TABLE_200();
256 a48 := JTF_VARCHAR2_TABLE_200();
257 a49 := JTF_VARCHAR2_TABLE_200();
258 a50 := JTF_VARCHAR2_TABLE_200();
259 a51 := JTF_VARCHAR2_TABLE_200();
260 a52 := JTF_VARCHAR2_TABLE_200();
261 a53 := JTF_VARCHAR2_TABLE_200();
262 a54 := JTF_VARCHAR2_TABLE_200();
263 a55 := JTF_VARCHAR2_TABLE_200();
264 a56 := JTF_VARCHAR2_TABLE_100();
265 else
266 a0 := JTF_NUMBER_TABLE();
267 a1 := JTF_NUMBER_TABLE();
268 a2 := JTF_NUMBER_TABLE();
269 a3 := JTF_VARCHAR2_TABLE_500();
270 a4 := JTF_NUMBER_TABLE();
271 a5 := JTF_NUMBER_TABLE();
272 a6 := JTF_NUMBER_TABLE();
273 a7 := JTF_NUMBER_TABLE();
274 a8 := JTF_DATE_TABLE();
275 a9 := JTF_NUMBER_TABLE();
276 a10 := JTF_DATE_TABLE();
277 a11 := JTF_NUMBER_TABLE();
278 a12 := JTF_NUMBER_TABLE();
279 a13 := JTF_NUMBER_TABLE();
280 a14 := JTF_VARCHAR2_TABLE_300();
281 a15 := JTF_VARCHAR2_TABLE_100();
282 a16 := JTF_VARCHAR2_TABLE_100();
283 a17 := JTF_NUMBER_TABLE();
284 a18 := JTF_VARCHAR2_TABLE_500();
285 a19 := JTF_VARCHAR2_TABLE_100();
286 a20 := JTF_VARCHAR2_TABLE_100();
287 a21 := JTF_VARCHAR2_TABLE_100();
288 a22 := JTF_NUMBER_TABLE();
289 a23 := JTF_NUMBER_TABLE();
290 a24 := JTF_DATE_TABLE();
291 a25 := JTF_NUMBER_TABLE();
292 a26 := JTF_NUMBER_TABLE();
293 a27 := JTF_DATE_TABLE();
294 a28 := JTF_NUMBER_TABLE();
295 a29 := JTF_NUMBER_TABLE();
296 a30 := JTF_DATE_TABLE();
297 a31 := JTF_NUMBER_TABLE();
298 a32 := JTF_NUMBER_TABLE();
299 a33 := JTF_DATE_TABLE();
300 a34 := JTF_NUMBER_TABLE();
301 a35 := JTF_NUMBER_TABLE();
302 a36 := JTF_NUMBER_TABLE();
303 a37 := JTF_NUMBER_TABLE();
304 a38 := JTF_VARCHAR2_TABLE_100();
305 a39 := JTF_NUMBER_TABLE();
306 a40 := JTF_VARCHAR2_TABLE_100();
307 a41 := JTF_VARCHAR2_TABLE_200();
308 a42 := JTF_VARCHAR2_TABLE_200();
309 a43 := JTF_VARCHAR2_TABLE_200();
310 a44 := JTF_VARCHAR2_TABLE_200();
311 a45 := JTF_VARCHAR2_TABLE_200();
312 a46 := JTF_VARCHAR2_TABLE_200();
313 a47 := JTF_VARCHAR2_TABLE_200();
314 a48 := JTF_VARCHAR2_TABLE_200();
315 a49 := JTF_VARCHAR2_TABLE_200();
316 a50 := JTF_VARCHAR2_TABLE_200();
317 a51 := JTF_VARCHAR2_TABLE_200();
318 a52 := JTF_VARCHAR2_TABLE_200();
319 a53 := JTF_VARCHAR2_TABLE_200();
320 a54 := JTF_VARCHAR2_TABLE_200();
321 a55 := JTF_VARCHAR2_TABLE_200();
322 a56 := JTF_VARCHAR2_TABLE_100();
323 if t.count > 0 then
324 a0.extend(t.count);
325 a1.extend(t.count);
326 a2.extend(t.count);
327 a3.extend(t.count);
328 a4.extend(t.count);
329 a5.extend(t.count);
330 a6.extend(t.count);
331 a7.extend(t.count);
332 a8.extend(t.count);
333 a9.extend(t.count);
334 a10.extend(t.count);
335 a11.extend(t.count);
336 a12.extend(t.count);
337 a13.extend(t.count);
338 a14.extend(t.count);
339 a15.extend(t.count);
340 a16.extend(t.count);
341 a17.extend(t.count);
342 a18.extend(t.count);
343 a19.extend(t.count);
344 a20.extend(t.count);
345 a21.extend(t.count);
346 a22.extend(t.count);
347 a23.extend(t.count);
348 a24.extend(t.count);
349 a25.extend(t.count);
350 a26.extend(t.count);
351 a27.extend(t.count);
352 a28.extend(t.count);
353 a29.extend(t.count);
354 a30.extend(t.count);
355 a31.extend(t.count);
356 a32.extend(t.count);
357 a33.extend(t.count);
358 a34.extend(t.count);
359 a35.extend(t.count);
360 a36.extend(t.count);
361 a37.extend(t.count);
362 a38.extend(t.count);
363 a39.extend(t.count);
364 a40.extend(t.count);
365 a41.extend(t.count);
366 a42.extend(t.count);
367 a43.extend(t.count);
368 a44.extend(t.count);
369 a45.extend(t.count);
370 a46.extend(t.count);
371 a47.extend(t.count);
372 a48.extend(t.count);
373 a49.extend(t.count);
374 a50.extend(t.count);
375 a51.extend(t.count);
376 a52.extend(t.count);
377 a53.extend(t.count);
378 a54.extend(t.count);
379 a55.extend(t.count);
380 a56.extend(t.count);
381 ddindx := t.first;
382 indx := 1;
383 while true loop
384 a0(indx) := t(ddindx).workorder_operation_id;
385 a1(indx) := t(ddindx).organization_id;
386 a2(indx) := t(ddindx).operation_sequence_num;
387 a3(indx) := t(ddindx).operation_description;
388 a4(indx) := t(ddindx).workorder_id;
389 a5(indx) := t(ddindx).wip_entity_id;
390 a6(indx) := t(ddindx).route_id;
391 a7(indx) := t(ddindx).object_version_number;
392 a8(indx) := t(ddindx).last_update_date;
393 a9(indx) := t(ddindx).last_updated_by;
394 a10(indx) := t(ddindx).creation_date;
398 a14(indx) := t(ddindx).department_name;
395 a11(indx) := t(ddindx).created_by;
396 a12(indx) := t(ddindx).last_update_login;
397 a13(indx) := t(ddindx).department_id;
399 a15(indx) := t(ddindx).status_code;
400 a16(indx) := t(ddindx).status_meaning;
401 a17(indx) := t(ddindx).operation_id;
402 a18(indx) := t(ddindx).operation_code;
403 a19(indx) := t(ddindx).operation_type_code;
404 a20(indx) := t(ddindx).operation_type;
405 a21(indx) := t(ddindx).replenish;
406 a22(indx) := t(ddindx).minimum_transfer_quantity;
407 a23(indx) := t(ddindx).count_point_type;
408 a24(indx) := t(ddindx).scheduled_start_date;
409 a25(indx) := t(ddindx).scheduled_start_hr;
410 a26(indx) := t(ddindx).scheduled_start_mi;
411 a27(indx) := t(ddindx).scheduled_end_date;
412 a28(indx) := t(ddindx).scheduled_end_hr;
413 a29(indx) := t(ddindx).scheduled_end_mi;
414 a30(indx) := t(ddindx).actual_start_date;
415 a31(indx) := t(ddindx).actual_start_hr;
416 a32(indx) := t(ddindx).actual_start_mi;
417 a33(indx) := t(ddindx).actual_end_date;
418 a34(indx) := t(ddindx).actual_end_hr;
419 a35(indx) := t(ddindx).actual_end_mi;
420 a36(indx) := t(ddindx).plan_id;
421 a37(indx) := t(ddindx).collection_id;
422 a38(indx) := t(ddindx).propagate_flag;
423 a39(indx) := t(ddindx).security_group_id;
424 a40(indx) := t(ddindx).attribute_category;
425 a41(indx) := t(ddindx).attribute1;
426 a42(indx) := t(ddindx).attribute2;
427 a43(indx) := t(ddindx).attribute3;
428 a44(indx) := t(ddindx).attribute4;
429 a45(indx) := t(ddindx).attribute5;
430 a46(indx) := t(ddindx).attribute6;
431 a47(indx) := t(ddindx).attribute7;
432 a48(indx) := t(ddindx).attribute8;
433 a49(indx) := t(ddindx).attribute9;
434 a50(indx) := t(ddindx).attribute10;
435 a51(indx) := t(ddindx).attribute11;
436 a52(indx) := t(ddindx).attribute12;
437 a53(indx) := t(ddindx).attribute13;
438 a54(indx) := t(ddindx).attribute14;
439 a55(indx) := t(ddindx).attribute15;
440 a56(indx) := t(ddindx).dml_operation;
441 indx := indx+1;
442 if t.last =ddindx
443 then exit;
444 end if;
445 ddindx := t.next(ddindx);
446 end loop;
447 end if;
448 end if;
449 end rosetta_table_copy_out_p1;
450
451 procedure rosetta_table_copy_in_p3(t out nocopy ahl_prd_workorder_pvt.prd_workorder_tbl, a0 JTF_NUMBER_TABLE
452 , a1 JTF_NUMBER_TABLE
453 , a2 JTF_NUMBER_TABLE
454 , a3 JTF_NUMBER_TABLE
455 , a4 JTF_NUMBER_TABLE
456 , a5 JTF_VARCHAR2_TABLE_100
457 , a6 JTF_VARCHAR2_TABLE_300
458 , a7 JTF_NUMBER_TABLE
459 , a8 JTF_VARCHAR2_TABLE_300
460 , a9 JTF_VARCHAR2_TABLE_100
461 , a10 JTF_VARCHAR2_TABLE_300
462 , a11 JTF_NUMBER_TABLE
463 , a12 JTF_VARCHAR2_TABLE_100
464 , a13 JTF_VARCHAR2_TABLE_100
465 , a14 JTF_VARCHAR2_TABLE_100
466 , a15 JTF_DATE_TABLE
467 , a16 JTF_NUMBER_TABLE
468 , a17 JTF_NUMBER_TABLE
469 , a18 JTF_DATE_TABLE
470 , a19 JTF_NUMBER_TABLE
471 , a20 JTF_NUMBER_TABLE
472 , a21 JTF_DATE_TABLE
473 , a22 JTF_NUMBER_TABLE
474 , a23 JTF_NUMBER_TABLE
475 , a24 JTF_DATE_TABLE
476 , a25 JTF_NUMBER_TABLE
477 , a26 JTF_NUMBER_TABLE
478 , a27 JTF_NUMBER_TABLE
479 , a28 JTF_NUMBER_TABLE
480 , a29 JTF_VARCHAR2_TABLE_100
481 , a30 JTF_VARCHAR2_TABLE_100
482 , a31 JTF_VARCHAR2_TABLE_100
483 , a32 JTF_VARCHAR2_TABLE_300
484 , a33 JTF_VARCHAR2_TABLE_100
485 , a34 JTF_VARCHAR2_TABLE_100
486 , a35 JTF_VARCHAR2_TABLE_100
487 , a36 JTF_NUMBER_TABLE
488 , a37 JTF_VARCHAR2_TABLE_300
489 , a38 JTF_NUMBER_TABLE
490 , a39 JTF_VARCHAR2_TABLE_100
491 , a40 JTF_NUMBER_TABLE
492 , a41 JTF_VARCHAR2_TABLE_100
493 , a42 JTF_NUMBER_TABLE
494 , a43 JTF_NUMBER_TABLE
495 , a44 JTF_VARCHAR2_TABLE_100
496 , a45 JTF_NUMBER_TABLE
497 , a46 JTF_NUMBER_TABLE
498 , a47 JTF_NUMBER_TABLE
499 , a48 JTF_VARCHAR2_TABLE_100
500 , a49 JTF_NUMBER_TABLE
501 , a50 JTF_NUMBER_TABLE
502 , a51 JTF_VARCHAR2_TABLE_100
503 , a52 JTF_VARCHAR2_TABLE_100
504 , a53 JTF_NUMBER_TABLE
505 , a54 JTF_NUMBER_TABLE
506 , a55 JTF_VARCHAR2_TABLE_300
507 , a56 JTF_VARCHAR2_TABLE_100
508 , a57 JTF_VARCHAR2_TABLE_100
509 , a58 JTF_NUMBER_TABLE
510 , a59 JTF_NUMBER_TABLE
511 , a60 JTF_NUMBER_TABLE
512 , a61 JTF_NUMBER_TABLE
513 , a62 JTF_NUMBER_TABLE
514 , a63 JTF_NUMBER_TABLE
515 , a64 JTF_NUMBER_TABLE
516 , a65 JTF_NUMBER_TABLE
517 , a66 JTF_VARCHAR2_TABLE_100
518 , a67 JTF_VARCHAR2_TABLE_100
519 , a68 JTF_NUMBER_TABLE
520 , a69 JTF_VARCHAR2_TABLE_100
521 , a70 JTF_NUMBER_TABLE
522 , a71 JTF_NUMBER_TABLE
523 , a72 JTF_NUMBER_TABLE
524 , a73 JTF_NUMBER_TABLE
525 , a74 JTF_VARCHAR2_TABLE_100
526 , a75 JTF_NUMBER_TABLE
527 , a76 JTF_NUMBER_TABLE
528 , a77 JTF_VARCHAR2_TABLE_100
529 , a78 JTF_VARCHAR2_TABLE_200
530 , a79 JTF_VARCHAR2_TABLE_200
531 , a80 JTF_VARCHAR2_TABLE_200
532 , a81 JTF_VARCHAR2_TABLE_200
533 , a82 JTF_VARCHAR2_TABLE_200
534 , a83 JTF_VARCHAR2_TABLE_200
535 , a84 JTF_VARCHAR2_TABLE_200
536 , a85 JTF_VARCHAR2_TABLE_200
537 , a86 JTF_VARCHAR2_TABLE_200
538 , a87 JTF_VARCHAR2_TABLE_200
542 , a91 JTF_VARCHAR2_TABLE_200
539 , a88 JTF_VARCHAR2_TABLE_200
540 , a89 JTF_VARCHAR2_TABLE_200
541 , a90 JTF_VARCHAR2_TABLE_200
543 , a92 JTF_VARCHAR2_TABLE_200
544 , a93 JTF_DATE_TABLE
545 , a94 JTF_NUMBER_TABLE
546 , a95 JTF_DATE_TABLE
547 , a96 JTF_NUMBER_TABLE
548 , a97 JTF_NUMBER_TABLE
549 , a98 JTF_VARCHAR2_TABLE_100
550 , a99 JTF_VARCHAR2_TABLE_100
551 , a100 JTF_VARCHAR2_TABLE_100
552 , a101 JTF_NUMBER_TABLE
553 , a102 JTF_VARCHAR2_TABLE_100
554 , a103 JTF_VARCHAR2_TABLE_100
555 , a104 JTF_VARCHAR2_TABLE_100
556 ) as
557 ddindx binary_integer; indx binary_integer;
558 begin
559 if a0 is not null and a0.count > 0 then
560 if a0.count > 0 then
561 indx := a0.first;
562 ddindx := 1;
563 while true loop
564 t(ddindx).batch_id := a0(indx);
565 t(ddindx).header_id := a1(indx);
566 t(ddindx).workorder_id := a2(indx);
567 t(ddindx).wip_entity_id := a3(indx);
568 t(ddindx).object_version_number := a4(indx);
569 t(ddindx).job_number := a5(indx);
570 t(ddindx).job_description := a6(indx);
571 t(ddindx).organization_id := a7(indx);
572 t(ddindx).organization_name := a8(indx);
573 t(ddindx).organization_code := a9(indx);
574 t(ddindx).department_name := a10(indx);
575 t(ddindx).department_id := a11(indx);
576 t(ddindx).department_class_code := a12(indx);
577 t(ddindx).status_code := a13(indx);
578 t(ddindx).status_meaning := a14(indx);
579 t(ddindx).scheduled_start_date := rosetta_g_miss_date_in_map(a15(indx));
580 t(ddindx).scheduled_start_hr := a16(indx);
581 t(ddindx).scheduled_start_mi := a17(indx);
582 t(ddindx).scheduled_end_date := rosetta_g_miss_date_in_map(a18(indx));
583 t(ddindx).scheduled_end_hr := a19(indx);
584 t(ddindx).scheduled_end_mi := a20(indx);
585 t(ddindx).actual_start_date := rosetta_g_miss_date_in_map(a21(indx));
586 t(ddindx).actual_start_hr := a22(indx);
587 t(ddindx).actual_start_mi := a23(indx);
588 t(ddindx).actual_end_date := rosetta_g_miss_date_in_map(a24(indx));
589 t(ddindx).actual_end_hr := a25(indx);
590 t(ddindx).actual_end_mi := a26(indx);
591 t(ddindx).inventory_item_id := a27(indx);
592 t(ddindx).item_instance_id := a28(indx);
593 t(ddindx).unit_name := a29(indx);
594 t(ddindx).item_instance_number := a30(indx);
595 t(ddindx).wo_part_number := a31(indx);
596 t(ddindx).item_description := a32(indx);
597 t(ddindx).serial_number := a33(indx);
598 t(ddindx).item_instance_uom := a34(indx);
599 t(ddindx).completion_subinventory := a35(indx);
600 t(ddindx).completion_locator_id := a36(indx);
601 t(ddindx).completion_locator_name := a37(indx);
602 t(ddindx).wip_supply_type := a38(indx);
603 t(ddindx).wip_supply_meaning := a39(indx);
604 t(ddindx).firm_planned_flag := a40(indx);
605 t(ddindx).master_workorder_flag := a41(indx);
606 t(ddindx).visit_id := a42(indx);
607 t(ddindx).visit_number := a43(indx);
608 t(ddindx).visit_name := a44(indx);
609 t(ddindx).visit_task_id := a45(indx);
610 t(ddindx).mr_header_id := a46(indx);
611 t(ddindx).visit_task_number := a47(indx);
612 t(ddindx).mr_title := a48(indx);
613 t(ddindx).mr_route_id := a49(indx);
614 t(ddindx).route_id := a50(indx);
615 t(ddindx).confirm_failure_flag := a51(indx);
616 t(ddindx).propagate_flag := a52(indx);
617 t(ddindx).service_item_id := a53(indx);
618 t(ddindx).service_item_org_id := a54(indx);
619 t(ddindx).service_item_description := a55(indx);
620 t(ddindx).service_item_number := a56(indx);
621 t(ddindx).service_item_uom := a57(indx);
622 t(ddindx).project_id := a58(indx);
623 t(ddindx).project_task_id := a59(indx);
624 t(ddindx).quantity := a60(indx);
625 t(ddindx).mrp_quantity := a61(indx);
626 t(ddindx).incident_id := a62(indx);
627 t(ddindx).origination_task_id := a63(indx);
628 t(ddindx).parent_id := a64(indx);
629 t(ddindx).task_motive_status_id := a65(indx);
630 t(ddindx).allow_explosion := a66(indx);
631 t(ddindx).class_code := a67(indx);
632 t(ddindx).job_priority := a68(indx);
633 t(ddindx).job_priority_meaning := a69(indx);
634 t(ddindx).confirmed_failure_flag := a70(indx);
635 t(ddindx).unit_effectivity_id := a71(indx);
636 t(ddindx).plan_id := a72(indx);
637 t(ddindx).collection_id := a73(indx);
638 t(ddindx).sub_inventory := a74(indx);
639 t(ddindx).locator_id := a75(indx);
640 t(ddindx).security_group_id := a76(indx);
641 t(ddindx).attribute_category := a77(indx);
642 t(ddindx).attribute1 := a78(indx);
643 t(ddindx).attribute2 := a79(indx);
644 t(ddindx).attribute3 := a80(indx);
645 t(ddindx).attribute4 := a81(indx);
646 t(ddindx).attribute5 := a82(indx);
647 t(ddindx).attribute6 := a83(indx);
648 t(ddindx).attribute7 := a84(indx);
649 t(ddindx).attribute8 := a85(indx);
650 t(ddindx).attribute9 := a86(indx);
651 t(ddindx).attribute10 := a87(indx);
652 t(ddindx).attribute11 := a88(indx);
653 t(ddindx).attribute12 := a89(indx);
654 t(ddindx).attribute13 := a90(indx);
655 t(ddindx).attribute14 := a91(indx);
656 t(ddindx).attribute15 := a92(indx);
657 t(ddindx).last_update_date := rosetta_g_miss_date_in_map(a93(indx));
661 t(ddindx).last_update_login := a97(indx);
658 t(ddindx).last_updated_by := a94(indx);
659 t(ddindx).creation_date := rosetta_g_miss_date_in_map(a95(indx));
660 t(ddindx).created_by := a96(indx);
662 t(ddindx).dml_operation := a98(indx);
663 t(ddindx).hold_reason_code := a99(indx);
664 t(ddindx).hold_reason := a100(indx);
665 t(ddindx).contract_number := a101(indx);
666 t(ddindx).warranty_status_code := a102(indx);
667 t(ddindx).aog_flag := a103(indx);
668 t(ddindx).set_mr_priority := a104(indx);
669 ddindx := ddindx+1;
670 if a0.last =indx
671 then exit;
672 end if;
673 indx := a0.next(indx);
674 end loop;
675 end if;
676 end if;
677 end rosetta_table_copy_in_p3;
678 procedure rosetta_table_copy_out_p3(t ahl_prd_workorder_pvt.prd_workorder_tbl, a0 out nocopy JTF_NUMBER_TABLE
679 , a1 out nocopy JTF_NUMBER_TABLE
680 , a2 out nocopy JTF_NUMBER_TABLE
681 , a3 out nocopy JTF_NUMBER_TABLE
682 , a4 out nocopy JTF_NUMBER_TABLE
683 , a5 out nocopy JTF_VARCHAR2_TABLE_100
684 , a6 out nocopy JTF_VARCHAR2_TABLE_300
685 , a7 out nocopy JTF_NUMBER_TABLE
686 , a8 out nocopy JTF_VARCHAR2_TABLE_300
687 , a9 out nocopy JTF_VARCHAR2_TABLE_100
688 , a10 out nocopy JTF_VARCHAR2_TABLE_300
689 , a11 out nocopy JTF_NUMBER_TABLE
690 , a12 out nocopy JTF_VARCHAR2_TABLE_100
691 , a13 out nocopy JTF_VARCHAR2_TABLE_100
692 , a14 out nocopy JTF_VARCHAR2_TABLE_100
693 , a15 out nocopy JTF_DATE_TABLE
694 , a16 out nocopy JTF_NUMBER_TABLE
695 , a17 out nocopy JTF_NUMBER_TABLE
696 , a18 out nocopy JTF_DATE_TABLE
697 , a19 out nocopy JTF_NUMBER_TABLE
698 , a20 out nocopy JTF_NUMBER_TABLE
699 , a21 out nocopy JTF_DATE_TABLE
700 , a22 out nocopy JTF_NUMBER_TABLE
701 , a23 out nocopy JTF_NUMBER_TABLE
702 , a24 out nocopy JTF_DATE_TABLE
703 , a25 out nocopy JTF_NUMBER_TABLE
704 , a26 out nocopy JTF_NUMBER_TABLE
705 , a27 out nocopy JTF_NUMBER_TABLE
706 , a28 out nocopy JTF_NUMBER_TABLE
707 , a29 out nocopy JTF_VARCHAR2_TABLE_100
708 , a30 out nocopy JTF_VARCHAR2_TABLE_100
709 , a31 out nocopy JTF_VARCHAR2_TABLE_100
710 , a32 out nocopy JTF_VARCHAR2_TABLE_300
711 , a33 out nocopy JTF_VARCHAR2_TABLE_100
712 , a34 out nocopy JTF_VARCHAR2_TABLE_100
713 , a35 out nocopy JTF_VARCHAR2_TABLE_100
714 , a36 out nocopy JTF_NUMBER_TABLE
715 , a37 out nocopy JTF_VARCHAR2_TABLE_300
716 , a38 out nocopy JTF_NUMBER_TABLE
717 , a39 out nocopy JTF_VARCHAR2_TABLE_100
718 , a40 out nocopy JTF_NUMBER_TABLE
719 , a41 out nocopy JTF_VARCHAR2_TABLE_100
720 , a42 out nocopy JTF_NUMBER_TABLE
721 , a43 out nocopy JTF_NUMBER_TABLE
722 , a44 out nocopy JTF_VARCHAR2_TABLE_100
723 , a45 out nocopy JTF_NUMBER_TABLE
724 , a46 out nocopy JTF_NUMBER_TABLE
725 , a47 out nocopy JTF_NUMBER_TABLE
726 , a48 out nocopy JTF_VARCHAR2_TABLE_100
727 , a49 out nocopy JTF_NUMBER_TABLE
728 , a50 out nocopy JTF_NUMBER_TABLE
729 , a51 out nocopy JTF_VARCHAR2_TABLE_100
730 , a52 out nocopy JTF_VARCHAR2_TABLE_100
731 , a53 out nocopy JTF_NUMBER_TABLE
732 , a54 out nocopy JTF_NUMBER_TABLE
733 , a55 out nocopy JTF_VARCHAR2_TABLE_300
734 , a56 out nocopy JTF_VARCHAR2_TABLE_100
735 , a57 out nocopy JTF_VARCHAR2_TABLE_100
736 , a58 out nocopy JTF_NUMBER_TABLE
737 , a59 out nocopy JTF_NUMBER_TABLE
738 , a60 out nocopy JTF_NUMBER_TABLE
739 , a61 out nocopy JTF_NUMBER_TABLE
740 , a62 out nocopy JTF_NUMBER_TABLE
741 , a63 out nocopy JTF_NUMBER_TABLE
742 , a64 out nocopy JTF_NUMBER_TABLE
743 , a65 out nocopy JTF_NUMBER_TABLE
744 , a66 out nocopy JTF_VARCHAR2_TABLE_100
745 , a67 out nocopy JTF_VARCHAR2_TABLE_100
746 , a68 out nocopy JTF_NUMBER_TABLE
747 , a69 out nocopy JTF_VARCHAR2_TABLE_100
748 , a70 out nocopy JTF_NUMBER_TABLE
749 , a71 out nocopy JTF_NUMBER_TABLE
750 , a72 out nocopy JTF_NUMBER_TABLE
751 , a73 out nocopy JTF_NUMBER_TABLE
752 , a74 out nocopy JTF_VARCHAR2_TABLE_100
753 , a75 out nocopy JTF_NUMBER_TABLE
754 , a76 out nocopy JTF_NUMBER_TABLE
755 , a77 out nocopy JTF_VARCHAR2_TABLE_100
756 , a78 out nocopy JTF_VARCHAR2_TABLE_200
757 , a79 out nocopy JTF_VARCHAR2_TABLE_200
758 , a80 out nocopy JTF_VARCHAR2_TABLE_200
759 , a81 out nocopy JTF_VARCHAR2_TABLE_200
760 , a82 out nocopy JTF_VARCHAR2_TABLE_200
761 , a83 out nocopy JTF_VARCHAR2_TABLE_200
762 , a84 out nocopy JTF_VARCHAR2_TABLE_200
763 , a85 out nocopy JTF_VARCHAR2_TABLE_200
764 , a86 out nocopy JTF_VARCHAR2_TABLE_200
765 , a87 out nocopy JTF_VARCHAR2_TABLE_200
766 , a88 out nocopy JTF_VARCHAR2_TABLE_200
767 , a89 out nocopy JTF_VARCHAR2_TABLE_200
768 , a90 out nocopy JTF_VARCHAR2_TABLE_200
769 , a91 out nocopy JTF_VARCHAR2_TABLE_200
770 , a92 out nocopy JTF_VARCHAR2_TABLE_200
771 , a93 out nocopy JTF_DATE_TABLE
772 , a94 out nocopy JTF_NUMBER_TABLE
773 , a95 out nocopy JTF_DATE_TABLE
774 , a96 out nocopy JTF_NUMBER_TABLE
775 , a97 out nocopy JTF_NUMBER_TABLE
776 , a98 out nocopy JTF_VARCHAR2_TABLE_100
777 , a99 out nocopy JTF_VARCHAR2_TABLE_100
778 , a100 out nocopy JTF_VARCHAR2_TABLE_100
779 , a101 out nocopy JTF_NUMBER_TABLE
780 , a102 out nocopy JTF_VARCHAR2_TABLE_100
781 , a103 out nocopy JTF_VARCHAR2_TABLE_100
782 , a104 out nocopy JTF_VARCHAR2_TABLE_100
783 ) as
784 ddindx binary_integer; indx binary_integer;
785 begin
786 if t is null or t.count = 0 then
787 a0 := JTF_NUMBER_TABLE();
788 a1 := JTF_NUMBER_TABLE();
792 a5 := JTF_VARCHAR2_TABLE_100();
789 a2 := JTF_NUMBER_TABLE();
790 a3 := JTF_NUMBER_TABLE();
791 a4 := JTF_NUMBER_TABLE();
793 a6 := JTF_VARCHAR2_TABLE_300();
794 a7 := JTF_NUMBER_TABLE();
795 a8 := JTF_VARCHAR2_TABLE_300();
796 a9 := JTF_VARCHAR2_TABLE_100();
797 a10 := JTF_VARCHAR2_TABLE_300();
798 a11 := JTF_NUMBER_TABLE();
799 a12 := JTF_VARCHAR2_TABLE_100();
800 a13 := JTF_VARCHAR2_TABLE_100();
801 a14 := JTF_VARCHAR2_TABLE_100();
802 a15 := JTF_DATE_TABLE();
803 a16 := JTF_NUMBER_TABLE();
804 a17 := JTF_NUMBER_TABLE();
805 a18 := JTF_DATE_TABLE();
806 a19 := JTF_NUMBER_TABLE();
807 a20 := JTF_NUMBER_TABLE();
808 a21 := JTF_DATE_TABLE();
809 a22 := JTF_NUMBER_TABLE();
810 a23 := JTF_NUMBER_TABLE();
811 a24 := JTF_DATE_TABLE();
812 a25 := JTF_NUMBER_TABLE();
813 a26 := JTF_NUMBER_TABLE();
814 a27 := JTF_NUMBER_TABLE();
815 a28 := JTF_NUMBER_TABLE();
816 a29 := JTF_VARCHAR2_TABLE_100();
817 a30 := JTF_VARCHAR2_TABLE_100();
818 a31 := JTF_VARCHAR2_TABLE_100();
819 a32 := JTF_VARCHAR2_TABLE_300();
820 a33 := JTF_VARCHAR2_TABLE_100();
821 a34 := JTF_VARCHAR2_TABLE_100();
822 a35 := JTF_VARCHAR2_TABLE_100();
823 a36 := JTF_NUMBER_TABLE();
824 a37 := JTF_VARCHAR2_TABLE_300();
825 a38 := JTF_NUMBER_TABLE();
826 a39 := JTF_VARCHAR2_TABLE_100();
827 a40 := JTF_NUMBER_TABLE();
828 a41 := JTF_VARCHAR2_TABLE_100();
829 a42 := JTF_NUMBER_TABLE();
830 a43 := JTF_NUMBER_TABLE();
831 a44 := JTF_VARCHAR2_TABLE_100();
832 a45 := JTF_NUMBER_TABLE();
833 a46 := JTF_NUMBER_TABLE();
834 a47 := JTF_NUMBER_TABLE();
835 a48 := JTF_VARCHAR2_TABLE_100();
836 a49 := JTF_NUMBER_TABLE();
837 a50 := JTF_NUMBER_TABLE();
838 a51 := JTF_VARCHAR2_TABLE_100();
839 a52 := JTF_VARCHAR2_TABLE_100();
840 a53 := JTF_NUMBER_TABLE();
841 a54 := JTF_NUMBER_TABLE();
842 a55 := JTF_VARCHAR2_TABLE_300();
843 a56 := JTF_VARCHAR2_TABLE_100();
844 a57 := JTF_VARCHAR2_TABLE_100();
845 a58 := JTF_NUMBER_TABLE();
846 a59 := JTF_NUMBER_TABLE();
847 a60 := JTF_NUMBER_TABLE();
848 a61 := JTF_NUMBER_TABLE();
849 a62 := JTF_NUMBER_TABLE();
850 a63 := JTF_NUMBER_TABLE();
851 a64 := JTF_NUMBER_TABLE();
852 a65 := JTF_NUMBER_TABLE();
853 a66 := JTF_VARCHAR2_TABLE_100();
854 a67 := JTF_VARCHAR2_TABLE_100();
855 a68 := JTF_NUMBER_TABLE();
856 a69 := JTF_VARCHAR2_TABLE_100();
857 a70 := JTF_NUMBER_TABLE();
858 a71 := JTF_NUMBER_TABLE();
859 a72 := JTF_NUMBER_TABLE();
860 a73 := JTF_NUMBER_TABLE();
861 a74 := JTF_VARCHAR2_TABLE_100();
862 a75 := JTF_NUMBER_TABLE();
863 a76 := JTF_NUMBER_TABLE();
864 a77 := JTF_VARCHAR2_TABLE_100();
865 a78 := JTF_VARCHAR2_TABLE_200();
866 a79 := JTF_VARCHAR2_TABLE_200();
867 a80 := JTF_VARCHAR2_TABLE_200();
868 a81 := JTF_VARCHAR2_TABLE_200();
869 a82 := JTF_VARCHAR2_TABLE_200();
870 a83 := JTF_VARCHAR2_TABLE_200();
871 a84 := JTF_VARCHAR2_TABLE_200();
872 a85 := JTF_VARCHAR2_TABLE_200();
873 a86 := JTF_VARCHAR2_TABLE_200();
874 a87 := JTF_VARCHAR2_TABLE_200();
875 a88 := JTF_VARCHAR2_TABLE_200();
876 a89 := JTF_VARCHAR2_TABLE_200();
877 a90 := JTF_VARCHAR2_TABLE_200();
878 a91 := JTF_VARCHAR2_TABLE_200();
879 a92 := JTF_VARCHAR2_TABLE_200();
880 a93 := JTF_DATE_TABLE();
881 a94 := JTF_NUMBER_TABLE();
882 a95 := JTF_DATE_TABLE();
883 a96 := JTF_NUMBER_TABLE();
884 a97 := JTF_NUMBER_TABLE();
885 a98 := JTF_VARCHAR2_TABLE_100();
886 a99 := JTF_VARCHAR2_TABLE_100();
887 a100 := JTF_VARCHAR2_TABLE_100();
888 a101 := JTF_NUMBER_TABLE();
889 a102 := JTF_VARCHAR2_TABLE_100();
890 a103 := JTF_VARCHAR2_TABLE_100();
891 a104 := JTF_VARCHAR2_TABLE_100();
892 else
893 a0 := JTF_NUMBER_TABLE();
894 a1 := JTF_NUMBER_TABLE();
895 a2 := JTF_NUMBER_TABLE();
896 a3 := JTF_NUMBER_TABLE();
897 a4 := JTF_NUMBER_TABLE();
898 a5 := JTF_VARCHAR2_TABLE_100();
899 a6 := JTF_VARCHAR2_TABLE_300();
900 a7 := JTF_NUMBER_TABLE();
901 a8 := JTF_VARCHAR2_TABLE_300();
902 a9 := JTF_VARCHAR2_TABLE_100();
903 a10 := JTF_VARCHAR2_TABLE_300();
904 a11 := JTF_NUMBER_TABLE();
905 a12 := JTF_VARCHAR2_TABLE_100();
906 a13 := JTF_VARCHAR2_TABLE_100();
907 a14 := JTF_VARCHAR2_TABLE_100();
908 a15 := JTF_DATE_TABLE();
909 a16 := JTF_NUMBER_TABLE();
910 a17 := JTF_NUMBER_TABLE();
911 a18 := JTF_DATE_TABLE();
912 a19 := JTF_NUMBER_TABLE();
913 a20 := JTF_NUMBER_TABLE();
914 a21 := JTF_DATE_TABLE();
915 a22 := JTF_NUMBER_TABLE();
916 a23 := JTF_NUMBER_TABLE();
917 a24 := JTF_DATE_TABLE();
918 a25 := JTF_NUMBER_TABLE();
919 a26 := JTF_NUMBER_TABLE();
920 a27 := JTF_NUMBER_TABLE();
921 a28 := JTF_NUMBER_TABLE();
922 a29 := JTF_VARCHAR2_TABLE_100();
923 a30 := JTF_VARCHAR2_TABLE_100();
924 a31 := JTF_VARCHAR2_TABLE_100();
925 a32 := JTF_VARCHAR2_TABLE_300();
926 a33 := JTF_VARCHAR2_TABLE_100();
927 a34 := JTF_VARCHAR2_TABLE_100();
928 a35 := JTF_VARCHAR2_TABLE_100();
929 a36 := JTF_NUMBER_TABLE();
930 a37 := JTF_VARCHAR2_TABLE_300();
931 a38 := JTF_NUMBER_TABLE();
932 a39 := JTF_VARCHAR2_TABLE_100();
933 a40 := JTF_NUMBER_TABLE();
934 a41 := JTF_VARCHAR2_TABLE_100();
935 a42 := JTF_NUMBER_TABLE();
936 a43 := JTF_NUMBER_TABLE();
940 a47 := JTF_NUMBER_TABLE();
937 a44 := JTF_VARCHAR2_TABLE_100();
938 a45 := JTF_NUMBER_TABLE();
939 a46 := JTF_NUMBER_TABLE();
941 a48 := JTF_VARCHAR2_TABLE_100();
942 a49 := JTF_NUMBER_TABLE();
943 a50 := JTF_NUMBER_TABLE();
944 a51 := JTF_VARCHAR2_TABLE_100();
945 a52 := JTF_VARCHAR2_TABLE_100();
946 a53 := JTF_NUMBER_TABLE();
947 a54 := JTF_NUMBER_TABLE();
948 a55 := JTF_VARCHAR2_TABLE_300();
949 a56 := JTF_VARCHAR2_TABLE_100();
950 a57 := JTF_VARCHAR2_TABLE_100();
951 a58 := JTF_NUMBER_TABLE();
952 a59 := JTF_NUMBER_TABLE();
953 a60 := JTF_NUMBER_TABLE();
954 a61 := JTF_NUMBER_TABLE();
955 a62 := JTF_NUMBER_TABLE();
956 a63 := JTF_NUMBER_TABLE();
957 a64 := JTF_NUMBER_TABLE();
958 a65 := JTF_NUMBER_TABLE();
959 a66 := JTF_VARCHAR2_TABLE_100();
960 a67 := JTF_VARCHAR2_TABLE_100();
961 a68 := JTF_NUMBER_TABLE();
962 a69 := JTF_VARCHAR2_TABLE_100();
963 a70 := JTF_NUMBER_TABLE();
964 a71 := JTF_NUMBER_TABLE();
965 a72 := JTF_NUMBER_TABLE();
966 a73 := JTF_NUMBER_TABLE();
967 a74 := JTF_VARCHAR2_TABLE_100();
968 a75 := JTF_NUMBER_TABLE();
969 a76 := JTF_NUMBER_TABLE();
970 a77 := JTF_VARCHAR2_TABLE_100();
971 a78 := JTF_VARCHAR2_TABLE_200();
972 a79 := JTF_VARCHAR2_TABLE_200();
973 a80 := JTF_VARCHAR2_TABLE_200();
974 a81 := JTF_VARCHAR2_TABLE_200();
975 a82 := JTF_VARCHAR2_TABLE_200();
976 a83 := JTF_VARCHAR2_TABLE_200();
977 a84 := JTF_VARCHAR2_TABLE_200();
978 a85 := JTF_VARCHAR2_TABLE_200();
979 a86 := JTF_VARCHAR2_TABLE_200();
980 a87 := JTF_VARCHAR2_TABLE_200();
981 a88 := JTF_VARCHAR2_TABLE_200();
982 a89 := JTF_VARCHAR2_TABLE_200();
983 a90 := JTF_VARCHAR2_TABLE_200();
984 a91 := JTF_VARCHAR2_TABLE_200();
985 a92 := JTF_VARCHAR2_TABLE_200();
986 a93 := JTF_DATE_TABLE();
987 a94 := JTF_NUMBER_TABLE();
988 a95 := JTF_DATE_TABLE();
989 a96 := JTF_NUMBER_TABLE();
990 a97 := JTF_NUMBER_TABLE();
991 a98 := JTF_VARCHAR2_TABLE_100();
992 a99 := JTF_VARCHAR2_TABLE_100();
993 a100 := JTF_VARCHAR2_TABLE_100();
994 a101 := JTF_NUMBER_TABLE();
995 a102 := JTF_VARCHAR2_TABLE_100();
996 a103 := JTF_VARCHAR2_TABLE_100();
997 a104 := JTF_VARCHAR2_TABLE_100();
998 if t.count > 0 then
999 a0.extend(t.count);
1000 a1.extend(t.count);
1001 a2.extend(t.count);
1002 a3.extend(t.count);
1003 a4.extend(t.count);
1004 a5.extend(t.count);
1005 a6.extend(t.count);
1006 a7.extend(t.count);
1007 a8.extend(t.count);
1008 a9.extend(t.count);
1009 a10.extend(t.count);
1010 a11.extend(t.count);
1011 a12.extend(t.count);
1012 a13.extend(t.count);
1013 a14.extend(t.count);
1014 a15.extend(t.count);
1015 a16.extend(t.count);
1016 a17.extend(t.count);
1017 a18.extend(t.count);
1018 a19.extend(t.count);
1019 a20.extend(t.count);
1020 a21.extend(t.count);
1021 a22.extend(t.count);
1022 a23.extend(t.count);
1023 a24.extend(t.count);
1024 a25.extend(t.count);
1025 a26.extend(t.count);
1026 a27.extend(t.count);
1027 a28.extend(t.count);
1028 a29.extend(t.count);
1029 a30.extend(t.count);
1030 a31.extend(t.count);
1031 a32.extend(t.count);
1032 a33.extend(t.count);
1033 a34.extend(t.count);
1034 a35.extend(t.count);
1035 a36.extend(t.count);
1036 a37.extend(t.count);
1037 a38.extend(t.count);
1038 a39.extend(t.count);
1039 a40.extend(t.count);
1040 a41.extend(t.count);
1041 a42.extend(t.count);
1042 a43.extend(t.count);
1043 a44.extend(t.count);
1044 a45.extend(t.count);
1045 a46.extend(t.count);
1046 a47.extend(t.count);
1047 a48.extend(t.count);
1048 a49.extend(t.count);
1049 a50.extend(t.count);
1050 a51.extend(t.count);
1051 a52.extend(t.count);
1052 a53.extend(t.count);
1053 a54.extend(t.count);
1054 a55.extend(t.count);
1055 a56.extend(t.count);
1056 a57.extend(t.count);
1057 a58.extend(t.count);
1058 a59.extend(t.count);
1059 a60.extend(t.count);
1060 a61.extend(t.count);
1061 a62.extend(t.count);
1062 a63.extend(t.count);
1063 a64.extend(t.count);
1064 a65.extend(t.count);
1065 a66.extend(t.count);
1066 a67.extend(t.count);
1067 a68.extend(t.count);
1068 a69.extend(t.count);
1069 a70.extend(t.count);
1070 a71.extend(t.count);
1071 a72.extend(t.count);
1072 a73.extend(t.count);
1073 a74.extend(t.count);
1074 a75.extend(t.count);
1075 a76.extend(t.count);
1076 a77.extend(t.count);
1077 a78.extend(t.count);
1078 a79.extend(t.count);
1079 a80.extend(t.count);
1080 a81.extend(t.count);
1081 a82.extend(t.count);
1082 a83.extend(t.count);
1083 a84.extend(t.count);
1084 a85.extend(t.count);
1085 a86.extend(t.count);
1086 a87.extend(t.count);
1087 a88.extend(t.count);
1088 a89.extend(t.count);
1089 a90.extend(t.count);
1090 a91.extend(t.count);
1091 a92.extend(t.count);
1095 a96.extend(t.count);
1092 a93.extend(t.count);
1093 a94.extend(t.count);
1094 a95.extend(t.count);
1096 a97.extend(t.count);
1097 a98.extend(t.count);
1098 a99.extend(t.count);
1099 a100.extend(t.count);
1100 a101.extend(t.count);
1101 a102.extend(t.count);
1102 a103.extend(t.count);
1103 a104.extend(t.count);
1104 ddindx := t.first;
1105 indx := 1;
1106 while true loop
1107 a0(indx) := t(ddindx).batch_id;
1108 a1(indx) := t(ddindx).header_id;
1109 a2(indx) := t(ddindx).workorder_id;
1110 a3(indx) := t(ddindx).wip_entity_id;
1111 a4(indx) := t(ddindx).object_version_number;
1112 a5(indx) := t(ddindx).job_number;
1113 a6(indx) := t(ddindx).job_description;
1114 a7(indx) := t(ddindx).organization_id;
1115 a8(indx) := t(ddindx).organization_name;
1116 a9(indx) := t(ddindx).organization_code;
1117 a10(indx) := t(ddindx).department_name;
1118 a11(indx) := t(ddindx).department_id;
1119 a12(indx) := t(ddindx).department_class_code;
1120 a13(indx) := t(ddindx).status_code;
1121 a14(indx) := t(ddindx).status_meaning;
1122 a15(indx) := t(ddindx).scheduled_start_date;
1123 a16(indx) := t(ddindx).scheduled_start_hr;
1124 a17(indx) := t(ddindx).scheduled_start_mi;
1125 a18(indx) := t(ddindx).scheduled_end_date;
1126 a19(indx) := t(ddindx).scheduled_end_hr;
1127 a20(indx) := t(ddindx).scheduled_end_mi;
1128 a21(indx) := t(ddindx).actual_start_date;
1129 a22(indx) := t(ddindx).actual_start_hr;
1130 a23(indx) := t(ddindx).actual_start_mi;
1131 a24(indx) := t(ddindx).actual_end_date;
1132 a25(indx) := t(ddindx).actual_end_hr;
1133 a26(indx) := t(ddindx).actual_end_mi;
1134 a27(indx) := t(ddindx).inventory_item_id;
1135 a28(indx) := t(ddindx).item_instance_id;
1136 a29(indx) := t(ddindx).unit_name;
1137 a30(indx) := t(ddindx).item_instance_number;
1138 a31(indx) := t(ddindx).wo_part_number;
1139 a32(indx) := t(ddindx).item_description;
1140 a33(indx) := t(ddindx).serial_number;
1141 a34(indx) := t(ddindx).item_instance_uom;
1142 a35(indx) := t(ddindx).completion_subinventory;
1143 a36(indx) := t(ddindx).completion_locator_id;
1144 a37(indx) := t(ddindx).completion_locator_name;
1145 a38(indx) := t(ddindx).wip_supply_type;
1146 a39(indx) := t(ddindx).wip_supply_meaning;
1147 a40(indx) := t(ddindx).firm_planned_flag;
1148 a41(indx) := t(ddindx).master_workorder_flag;
1149 a42(indx) := t(ddindx).visit_id;
1150 a43(indx) := t(ddindx).visit_number;
1151 a44(indx) := t(ddindx).visit_name;
1152 a45(indx) := t(ddindx).visit_task_id;
1153 a46(indx) := t(ddindx).mr_header_id;
1154 a47(indx) := t(ddindx).visit_task_number;
1155 a48(indx) := t(ddindx).mr_title;
1156 a49(indx) := t(ddindx).mr_route_id;
1157 a50(indx) := t(ddindx).route_id;
1158 a51(indx) := t(ddindx).confirm_failure_flag;
1159 a52(indx) := t(ddindx).propagate_flag;
1160 a53(indx) := t(ddindx).service_item_id;
1161 a54(indx) := t(ddindx).service_item_org_id;
1162 a55(indx) := t(ddindx).service_item_description;
1163 a56(indx) := t(ddindx).service_item_number;
1164 a57(indx) := t(ddindx).service_item_uom;
1165 a58(indx) := t(ddindx).project_id;
1166 a59(indx) := t(ddindx).project_task_id;
1167 a60(indx) := t(ddindx).quantity;
1168 a61(indx) := t(ddindx).mrp_quantity;
1169 a62(indx) := t(ddindx).incident_id;
1170 a63(indx) := t(ddindx).origination_task_id;
1171 a64(indx) := t(ddindx).parent_id;
1172 a65(indx) := t(ddindx).task_motive_status_id;
1173 a66(indx) := t(ddindx).allow_explosion;
1174 a67(indx) := t(ddindx).class_code;
1175 a68(indx) := t(ddindx).job_priority;
1176 a69(indx) := t(ddindx).job_priority_meaning;
1177 a70(indx) := t(ddindx).confirmed_failure_flag;
1178 a71(indx) := t(ddindx).unit_effectivity_id;
1179 a72(indx) := t(ddindx).plan_id;
1180 a73(indx) := t(ddindx).collection_id;
1181 a74(indx) := t(ddindx).sub_inventory;
1182 a75(indx) := t(ddindx).locator_id;
1183 a76(indx) := t(ddindx).security_group_id;
1184 a77(indx) := t(ddindx).attribute_category;
1185 a78(indx) := t(ddindx).attribute1;
1186 a79(indx) := t(ddindx).attribute2;
1187 a80(indx) := t(ddindx).attribute3;
1188 a81(indx) := t(ddindx).attribute4;
1189 a82(indx) := t(ddindx).attribute5;
1190 a83(indx) := t(ddindx).attribute6;
1191 a84(indx) := t(ddindx).attribute7;
1192 a85(indx) := t(ddindx).attribute8;
1193 a86(indx) := t(ddindx).attribute9;
1194 a87(indx) := t(ddindx).attribute10;
1195 a88(indx) := t(ddindx).attribute11;
1196 a89(indx) := t(ddindx).attribute12;
1197 a90(indx) := t(ddindx).attribute13;
1198 a91(indx) := t(ddindx).attribute14;
1199 a92(indx) := t(ddindx).attribute15;
1200 a93(indx) := t(ddindx).last_update_date;
1201 a94(indx) := t(ddindx).last_updated_by;
1202 a95(indx) := t(ddindx).creation_date;
1203 a96(indx) := t(ddindx).created_by;
1204 a97(indx) := t(ddindx).last_update_login;
1205 a98(indx) := t(ddindx).dml_operation;
1206 a99(indx) := t(ddindx).hold_reason_code;
1207 a100(indx) := t(ddindx).hold_reason;
1208 a101(indx) := t(ddindx).contract_number;
1209 a102(indx) := t(ddindx).warranty_status_code;
1213 if t.last =ddindx
1210 a103(indx) := t(ddindx).aog_flag;
1211 a104(indx) := t(ddindx).set_mr_priority;
1212 indx := indx+1;
1214 then exit;
1215 end if;
1216 ddindx := t.next(ddindx);
1217 end loop;
1218 end if;
1219 end if;
1220 end rosetta_table_copy_out_p3;
1221
1222 procedure rosetta_table_copy_in_p5(t out nocopy ahl_prd_workorder_pvt.prd_workorder_rel_tbl, a0 JTF_NUMBER_TABLE
1223 , a1 JTF_NUMBER_TABLE
1224 , a2 JTF_NUMBER_TABLE
1225 , a3 JTF_NUMBER_TABLE
1226 , a4 JTF_NUMBER_TABLE
1227 , a5 JTF_NUMBER_TABLE
1228 , a6 JTF_NUMBER_TABLE
1229 , a7 JTF_VARCHAR2_TABLE_100
1230 ) as
1231 ddindx binary_integer; indx binary_integer;
1232 begin
1233 if a0 is not null and a0.count > 0 then
1234 if a0.count > 0 then
1235 indx := a0.first;
1236 ddindx := 1;
1237 while true loop
1238 t(ddindx).batch_id := a0(indx);
1239 t(ddindx).wo_relationship_id := a1(indx);
1240 t(ddindx).parent_header_id := a2(indx);
1241 t(ddindx).parent_wip_entity_id := a3(indx);
1242 t(ddindx).child_header_id := a4(indx);
1243 t(ddindx).child_wip_entity_id := a5(indx);
1244 t(ddindx).relationship_type := a6(indx);
1245 t(ddindx).dml_operation := a7(indx);
1246 ddindx := ddindx+1;
1247 if a0.last =indx
1248 then exit;
1249 end if;
1250 indx := a0.next(indx);
1251 end loop;
1252 end if;
1253 end if;
1254 end rosetta_table_copy_in_p5;
1255 procedure rosetta_table_copy_out_p5(t ahl_prd_workorder_pvt.prd_workorder_rel_tbl, a0 out nocopy JTF_NUMBER_TABLE
1256 , a1 out nocopy JTF_NUMBER_TABLE
1257 , a2 out nocopy JTF_NUMBER_TABLE
1258 , a3 out nocopy JTF_NUMBER_TABLE
1259 , a4 out nocopy JTF_NUMBER_TABLE
1260 , a5 out nocopy JTF_NUMBER_TABLE
1261 , a6 out nocopy JTF_NUMBER_TABLE
1262 , a7 out nocopy JTF_VARCHAR2_TABLE_100
1263 ) as
1264 ddindx binary_integer; indx binary_integer;
1265 begin
1266 if t is null or t.count = 0 then
1267 a0 := JTF_NUMBER_TABLE();
1268 a1 := JTF_NUMBER_TABLE();
1269 a2 := JTF_NUMBER_TABLE();
1270 a3 := JTF_NUMBER_TABLE();
1271 a4 := JTF_NUMBER_TABLE();
1272 a5 := JTF_NUMBER_TABLE();
1273 a6 := JTF_NUMBER_TABLE();
1274 a7 := JTF_VARCHAR2_TABLE_100();
1275 else
1276 a0 := JTF_NUMBER_TABLE();
1277 a1 := JTF_NUMBER_TABLE();
1278 a2 := JTF_NUMBER_TABLE();
1279 a3 := JTF_NUMBER_TABLE();
1280 a4 := JTF_NUMBER_TABLE();
1281 a5 := JTF_NUMBER_TABLE();
1282 a6 := JTF_NUMBER_TABLE();
1283 a7 := JTF_VARCHAR2_TABLE_100();
1284 if t.count > 0 then
1285 a0.extend(t.count);
1286 a1.extend(t.count);
1287 a2.extend(t.count);
1288 a3.extend(t.count);
1289 a4.extend(t.count);
1290 a5.extend(t.count);
1291 a6.extend(t.count);
1292 a7.extend(t.count);
1293 ddindx := t.first;
1294 indx := 1;
1295 while true loop
1296 a0(indx) := t(ddindx).batch_id;
1297 a1(indx) := t(ddindx).wo_relationship_id;
1298 a2(indx) := t(ddindx).parent_header_id;
1299 a3(indx) := t(ddindx).parent_wip_entity_id;
1300 a4(indx) := t(ddindx).child_header_id;
1301 a5(indx) := t(ddindx).child_wip_entity_id;
1302 a6(indx) := t(ddindx).relationship_type;
1303 a7(indx) := t(ddindx).dml_operation;
1304 indx := indx+1;
1305 if t.last =ddindx
1306 then exit;
1307 end if;
1308 ddindx := t.next(ddindx);
1309 end loop;
1310 end if;
1311 end if;
1312 end rosetta_table_copy_out_p5;
1313
1314 procedure rosetta_table_copy_in_p14(t out nocopy ahl_prd_workorder_pvt.turnover_notes_tbl_type, a0 JTF_NUMBER_TABLE
1315 , a1 JTF_NUMBER_TABLE
1316 , a2 JTF_VARCHAR2_TABLE_100
1317 , a3 JTF_VARCHAR2_TABLE_2000
1318 , a4 JTF_NUMBER_TABLE
1319 , a5 JTF_VARCHAR2_TABLE_300
1320 , a6 JTF_DATE_TABLE
1321 , a7 JTF_NUMBER_TABLE
1322 ) as
1323 ddindx binary_integer; indx binary_integer;
1324 begin
1325 if a0 is not null and a0.count > 0 then
1326 if a0.count > 0 then
1327 indx := a0.first;
1328 ddindx := 1;
1329 while true loop
1330 t(ddindx).jtf_note_id := a0(indx);
1331 t(ddindx).source_object_id := a1(indx);
1332 t(ddindx).source_object_code := a2(indx);
1333 t(ddindx).notes := a3(indx);
1334 t(ddindx).employee_id := a4(indx);
1335 t(ddindx).employee_name := a5(indx);
1336 t(ddindx).entered_date := rosetta_g_miss_date_in_map(a6(indx));
1337 t(ddindx).org_id := a7(indx);
1338 ddindx := ddindx+1;
1339 if a0.last =indx
1340 then exit;
1341 end if;
1342 indx := a0.next(indx);
1343 end loop;
1344 end if;
1345 end if;
1346 end rosetta_table_copy_in_p14;
1347 procedure rosetta_table_copy_out_p14(t ahl_prd_workorder_pvt.turnover_notes_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
1348 , a1 out nocopy JTF_NUMBER_TABLE
1349 , a2 out nocopy JTF_VARCHAR2_TABLE_100
1350 , a3 out nocopy JTF_VARCHAR2_TABLE_2000
1351 , a4 out nocopy JTF_NUMBER_TABLE
1352 , a5 out nocopy JTF_VARCHAR2_TABLE_300
1353 , a6 out nocopy JTF_DATE_TABLE
1354 , a7 out nocopy JTF_NUMBER_TABLE
1355 ) as
1356 ddindx binary_integer; indx binary_integer;
1357 begin
1358 if t is null or t.count = 0 then
1359 a0 := JTF_NUMBER_TABLE();
1360 a1 := JTF_NUMBER_TABLE();
1364 a5 := JTF_VARCHAR2_TABLE_300();
1361 a2 := JTF_VARCHAR2_TABLE_100();
1362 a3 := JTF_VARCHAR2_TABLE_2000();
1363 a4 := JTF_NUMBER_TABLE();
1365 a6 := JTF_DATE_TABLE();
1366 a7 := JTF_NUMBER_TABLE();
1367 else
1368 a0 := JTF_NUMBER_TABLE();
1369 a1 := JTF_NUMBER_TABLE();
1370 a2 := JTF_VARCHAR2_TABLE_100();
1371 a3 := JTF_VARCHAR2_TABLE_2000();
1372 a4 := JTF_NUMBER_TABLE();
1373 a5 := JTF_VARCHAR2_TABLE_300();
1374 a6 := JTF_DATE_TABLE();
1375 a7 := JTF_NUMBER_TABLE();
1376 if t.count > 0 then
1377 a0.extend(t.count);
1378 a1.extend(t.count);
1379 a2.extend(t.count);
1380 a3.extend(t.count);
1381 a4.extend(t.count);
1382 a5.extend(t.count);
1383 a6.extend(t.count);
1384 a7.extend(t.count);
1385 ddindx := t.first;
1386 indx := 1;
1387 while true loop
1388 a0(indx) := t(ddindx).jtf_note_id;
1389 a1(indx) := t(ddindx).source_object_id;
1390 a2(indx) := t(ddindx).source_object_code;
1391 a3(indx) := t(ddindx).notes;
1392 a4(indx) := t(ddindx).employee_id;
1393 a5(indx) := t(ddindx).employee_name;
1394 a6(indx) := t(ddindx).entered_date;
1395 a7(indx) := t(ddindx).org_id;
1396 indx := indx+1;
1397 if t.last =ddindx
1398 then exit;
1399 end if;
1400 ddindx := t.next(ddindx);
1401 end loop;
1402 end if;
1403 end if;
1404 end rosetta_table_copy_out_p14;
1405
1406 procedure rosetta_table_copy_in_p23(t out nocopy ahl_prd_workorder_pvt.workorder_id_tbl_type, a0 JTF_NUMBER_TABLE
1407 , a1 JTF_NUMBER_TABLE
1408 ) as
1409 ddindx binary_integer; indx binary_integer;
1410 begin
1411 if a0 is not null and a0.count > 0 then
1412 if a0.count > 0 then
1413 indx := a0.first;
1414 ddindx := 1;
1415 while true loop
1416 t(ddindx).workorder_id := a0(indx);
1417 t(ddindx).obj_ver_num := a1(indx);
1418 ddindx := ddindx+1;
1419 if a0.last =indx
1420 then exit;
1421 end if;
1422 indx := a0.next(indx);
1423 end loop;
1424 end if;
1425 end if;
1426 end rosetta_table_copy_in_p23;
1427 procedure rosetta_table_copy_out_p23(t ahl_prd_workorder_pvt.workorder_id_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
1428 , a1 out nocopy JTF_NUMBER_TABLE
1429 ) as
1430 ddindx binary_integer; indx binary_integer;
1431 begin
1432 if t is null or t.count = 0 then
1433 a0 := JTF_NUMBER_TABLE();
1434 a1 := JTF_NUMBER_TABLE();
1435 else
1436 a0 := JTF_NUMBER_TABLE();
1437 a1 := JTF_NUMBER_TABLE();
1438 if t.count > 0 then
1439 a0.extend(t.count);
1440 a1.extend(t.count);
1441 ddindx := t.first;
1442 indx := 1;
1443 while true loop
1444 a0(indx) := t(ddindx).workorder_id;
1445 a1(indx) := t(ddindx).obj_ver_num;
1446 indx := indx+1;
1447 if t.last =ddindx
1448 then exit;
1449 end if;
1450 ddindx := t.next(ddindx);
1451 end loop;
1452 end if;
1453 end if;
1454 end rosetta_table_copy_out_p23;
1455
1456 procedure process_jobs(p_api_version NUMBER
1457 , p_init_msg_list VARCHAR2
1458 , p_commit VARCHAR2
1459 , p_validation_level NUMBER
1460 , p_default VARCHAR2
1461 , p_module_type VARCHAR2
1462 , x_return_status out nocopy VARCHAR2
1463 , x_msg_count out nocopy NUMBER
1464 , x_msg_data out nocopy VARCHAR2
1465 , p9_a0 in out nocopy JTF_NUMBER_TABLE
1466 , p9_a1 in out nocopy JTF_NUMBER_TABLE
1467 , p9_a2 in out nocopy JTF_NUMBER_TABLE
1468 , p9_a3 in out nocopy JTF_NUMBER_TABLE
1469 , p9_a4 in out nocopy JTF_NUMBER_TABLE
1470 , p9_a5 in out nocopy JTF_VARCHAR2_TABLE_100
1471 , p9_a6 in out nocopy JTF_VARCHAR2_TABLE_300
1472 , p9_a7 in out nocopy JTF_NUMBER_TABLE
1473 , p9_a8 in out nocopy JTF_VARCHAR2_TABLE_300
1474 , p9_a9 in out nocopy JTF_VARCHAR2_TABLE_100
1475 , p9_a10 in out nocopy JTF_VARCHAR2_TABLE_300
1476 , p9_a11 in out nocopy JTF_NUMBER_TABLE
1477 , p9_a12 in out nocopy JTF_VARCHAR2_TABLE_100
1478 , p9_a13 in out nocopy JTF_VARCHAR2_TABLE_100
1479 , p9_a14 in out nocopy JTF_VARCHAR2_TABLE_100
1480 , p9_a15 in out nocopy JTF_DATE_TABLE
1481 , p9_a16 in out nocopy JTF_NUMBER_TABLE
1482 , p9_a17 in out nocopy JTF_NUMBER_TABLE
1483 , p9_a18 in out nocopy JTF_DATE_TABLE
1484 , p9_a19 in out nocopy JTF_NUMBER_TABLE
1485 , p9_a20 in out nocopy JTF_NUMBER_TABLE
1486 , p9_a21 in out nocopy JTF_DATE_TABLE
1487 , p9_a22 in out nocopy JTF_NUMBER_TABLE
1488 , p9_a23 in out nocopy JTF_NUMBER_TABLE
1489 , p9_a24 in out nocopy JTF_DATE_TABLE
1490 , p9_a25 in out nocopy JTF_NUMBER_TABLE
1491 , p9_a26 in out nocopy JTF_NUMBER_TABLE
1492 , p9_a27 in out nocopy JTF_NUMBER_TABLE
1493 , p9_a28 in out nocopy JTF_NUMBER_TABLE
1494 , p9_a29 in out nocopy JTF_VARCHAR2_TABLE_100
1495 , p9_a30 in out nocopy JTF_VARCHAR2_TABLE_100
1496 , p9_a31 in out nocopy JTF_VARCHAR2_TABLE_100
1497 , p9_a32 in out nocopy JTF_VARCHAR2_TABLE_300
1498 , p9_a33 in out nocopy JTF_VARCHAR2_TABLE_100
1499 , p9_a34 in out nocopy JTF_VARCHAR2_TABLE_100
1500 , p9_a35 in out nocopy JTF_VARCHAR2_TABLE_100
1501 , p9_a36 in out nocopy JTF_NUMBER_TABLE
1502 , p9_a37 in out nocopy JTF_VARCHAR2_TABLE_300
1503 , p9_a38 in out nocopy JTF_NUMBER_TABLE
1504 , p9_a39 in out nocopy JTF_VARCHAR2_TABLE_100
1505 , p9_a40 in out nocopy JTF_NUMBER_TABLE
1506 , p9_a41 in out nocopy JTF_VARCHAR2_TABLE_100
1510 , p9_a45 in out nocopy JTF_NUMBER_TABLE
1507 , p9_a42 in out nocopy JTF_NUMBER_TABLE
1508 , p9_a43 in out nocopy JTF_NUMBER_TABLE
1509 , p9_a44 in out nocopy JTF_VARCHAR2_TABLE_100
1511 , p9_a46 in out nocopy JTF_NUMBER_TABLE
1512 , p9_a47 in out nocopy JTF_NUMBER_TABLE
1513 , p9_a48 in out nocopy JTF_VARCHAR2_TABLE_100
1514 , p9_a49 in out nocopy JTF_NUMBER_TABLE
1515 , p9_a50 in out nocopy JTF_NUMBER_TABLE
1516 , p9_a51 in out nocopy JTF_VARCHAR2_TABLE_100
1517 , p9_a52 in out nocopy JTF_VARCHAR2_TABLE_100
1518 , p9_a53 in out nocopy JTF_NUMBER_TABLE
1519 , p9_a54 in out nocopy JTF_NUMBER_TABLE
1520 , p9_a55 in out nocopy JTF_VARCHAR2_TABLE_300
1521 , p9_a56 in out nocopy JTF_VARCHAR2_TABLE_100
1522 , p9_a57 in out nocopy JTF_VARCHAR2_TABLE_100
1523 , p9_a58 in out nocopy JTF_NUMBER_TABLE
1524 , p9_a59 in out nocopy JTF_NUMBER_TABLE
1525 , p9_a60 in out nocopy JTF_NUMBER_TABLE
1526 , p9_a61 in out nocopy JTF_NUMBER_TABLE
1527 , p9_a62 in out nocopy JTF_NUMBER_TABLE
1528 , p9_a63 in out nocopy JTF_NUMBER_TABLE
1529 , p9_a64 in out nocopy JTF_NUMBER_TABLE
1530 , p9_a65 in out nocopy JTF_NUMBER_TABLE
1531 , p9_a66 in out nocopy JTF_VARCHAR2_TABLE_100
1532 , p9_a67 in out nocopy JTF_VARCHAR2_TABLE_100
1533 , p9_a68 in out nocopy JTF_NUMBER_TABLE
1534 , p9_a69 in out nocopy JTF_VARCHAR2_TABLE_100
1535 , p9_a70 in out nocopy JTF_NUMBER_TABLE
1536 , p9_a71 in out nocopy JTF_NUMBER_TABLE
1537 , p9_a72 in out nocopy JTF_NUMBER_TABLE
1538 , p9_a73 in out nocopy JTF_NUMBER_TABLE
1539 , p9_a74 in out nocopy JTF_VARCHAR2_TABLE_100
1540 , p9_a75 in out nocopy JTF_NUMBER_TABLE
1541 , p9_a76 in out nocopy JTF_NUMBER_TABLE
1542 , p9_a77 in out nocopy JTF_VARCHAR2_TABLE_100
1543 , p9_a78 in out nocopy JTF_VARCHAR2_TABLE_200
1544 , p9_a79 in out nocopy JTF_VARCHAR2_TABLE_200
1545 , p9_a80 in out nocopy JTF_VARCHAR2_TABLE_200
1546 , p9_a81 in out nocopy JTF_VARCHAR2_TABLE_200
1547 , p9_a82 in out nocopy JTF_VARCHAR2_TABLE_200
1548 , p9_a83 in out nocopy JTF_VARCHAR2_TABLE_200
1549 , p9_a84 in out nocopy JTF_VARCHAR2_TABLE_200
1550 , p9_a85 in out nocopy JTF_VARCHAR2_TABLE_200
1551 , p9_a86 in out nocopy JTF_VARCHAR2_TABLE_200
1552 , p9_a87 in out nocopy JTF_VARCHAR2_TABLE_200
1553 , p9_a88 in out nocopy JTF_VARCHAR2_TABLE_200
1554 , p9_a89 in out nocopy JTF_VARCHAR2_TABLE_200
1555 , p9_a90 in out nocopy JTF_VARCHAR2_TABLE_200
1556 , p9_a91 in out nocopy JTF_VARCHAR2_TABLE_200
1557 , p9_a92 in out nocopy JTF_VARCHAR2_TABLE_200
1558 , p9_a93 in out nocopy JTF_DATE_TABLE
1559 , p9_a94 in out nocopy JTF_NUMBER_TABLE
1560 , p9_a95 in out nocopy JTF_DATE_TABLE
1561 , p9_a96 in out nocopy JTF_NUMBER_TABLE
1562 , p9_a97 in out nocopy JTF_NUMBER_TABLE
1563 , p9_a98 in out nocopy JTF_VARCHAR2_TABLE_100
1564 , p9_a99 in out nocopy JTF_VARCHAR2_TABLE_100
1565 , p9_a100 in out nocopy JTF_VARCHAR2_TABLE_100
1566 , p9_a101 in out nocopy JTF_NUMBER_TABLE
1567 , p9_a102 in out nocopy JTF_VARCHAR2_TABLE_100
1568 , p9_a103 in out nocopy JTF_VARCHAR2_TABLE_100
1569 , p9_a104 in out nocopy JTF_VARCHAR2_TABLE_100
1570 , p10_a0 JTF_NUMBER_TABLE
1571 , p10_a1 JTF_NUMBER_TABLE
1572 , p10_a2 JTF_NUMBER_TABLE
1573 , p10_a3 JTF_NUMBER_TABLE
1574 , p10_a4 JTF_NUMBER_TABLE
1575 , p10_a5 JTF_NUMBER_TABLE
1576 , p10_a6 JTF_NUMBER_TABLE
1577 , p10_a7 JTF_VARCHAR2_TABLE_100
1578 )
1579
1580 as
1581 ddp_x_prd_workorder_tbl ahl_prd_workorder_pvt.prd_workorder_tbl;
1582 ddp_prd_workorder_rel_tbl ahl_prd_workorder_pvt.prd_workorder_rel_tbl;
1583 ddindx binary_integer; indx binary_integer;
1584 begin
1585
1586 -- copy data to the local IN or IN-OUT args, if any
1587
1588
1589
1590
1591
1592
1593
1594
1595
1596 ahl_prd_workorder_pvt_w.rosetta_table_copy_in_p3(ddp_x_prd_workorder_tbl, p9_a0
1597 , p9_a1
1598 , p9_a2
1599 , p9_a3
1600 , p9_a4
1601 , p9_a5
1602 , p9_a6
1603 , p9_a7
1604 , p9_a8
1605 , p9_a9
1606 , p9_a10
1607 , p9_a11
1608 , p9_a12
1609 , p9_a13
1610 , p9_a14
1611 , p9_a15
1612 , p9_a16
1613 , p9_a17
1614 , p9_a18
1615 , p9_a19
1616 , p9_a20
1617 , p9_a21
1618 , p9_a22
1619 , p9_a23
1620 , p9_a24
1621 , p9_a25
1622 , p9_a26
1623 , p9_a27
1624 , p9_a28
1625 , p9_a29
1626 , p9_a30
1627 , p9_a31
1628 , p9_a32
1629 , p9_a33
1630 , p9_a34
1631 , p9_a35
1632 , p9_a36
1633 , p9_a37
1634 , p9_a38
1635 , p9_a39
1636 , p9_a40
1637 , p9_a41
1638 , p9_a42
1639 , p9_a43
1640 , p9_a44
1641 , p9_a45
1642 , p9_a46
1643 , p9_a47
1644 , p9_a48
1645 , p9_a49
1646 , p9_a50
1647 , p9_a51
1648 , p9_a52
1649 , p9_a53
1650 , p9_a54
1651 , p9_a55
1652 , p9_a56
1653 , p9_a57
1654 , p9_a58
1655 , p9_a59
1656 , p9_a60
1657 , p9_a61
1658 , p9_a62
1659 , p9_a63
1660 , p9_a64
1661 , p9_a65
1662 , p9_a66
1663 , p9_a67
1664 , p9_a68
1665 , p9_a69
1666 , p9_a70
1667 , p9_a71
1668 , p9_a72
1669 , p9_a73
1670 , p9_a74
1671 , p9_a75
1672 , p9_a76
1673 , p9_a77
1674 , p9_a78
1675 , p9_a79
1679 , p9_a83
1676 , p9_a80
1677 , p9_a81
1678 , p9_a82
1680 , p9_a84
1681 , p9_a85
1682 , p9_a86
1683 , p9_a87
1684 , p9_a88
1685 , p9_a89
1686 , p9_a90
1687 , p9_a91
1688 , p9_a92
1689 , p9_a93
1690 , p9_a94
1691 , p9_a95
1692 , p9_a96
1693 , p9_a97
1694 , p9_a98
1695 , p9_a99
1696 , p9_a100
1697 , p9_a101
1698 , p9_a102
1699 , p9_a103
1700 , p9_a104
1701 );
1702
1703 ahl_prd_workorder_pvt_w.rosetta_table_copy_in_p5(ddp_prd_workorder_rel_tbl, p10_a0
1704 , p10_a1
1705 , p10_a2
1706 , p10_a3
1707 , p10_a4
1708 , p10_a5
1709 , p10_a6
1710 , p10_a7
1711 );
1712
1713 -- here's the delegated call to the old PL/SQL routine
1714 ahl_prd_workorder_pvt.process_jobs(p_api_version,
1715 p_init_msg_list,
1716 p_commit,
1717 p_validation_level,
1718 p_default,
1719 p_module_type,
1720 x_return_status,
1721 x_msg_count,
1722 x_msg_data,
1723 ddp_x_prd_workorder_tbl,
1724 ddp_prd_workorder_rel_tbl);
1725
1726 -- copy data back from the local variables to OUT or IN-OUT args, if any
1727
1728
1729
1730
1731
1732
1733
1734
1735
1736 ahl_prd_workorder_pvt_w.rosetta_table_copy_out_p3(ddp_x_prd_workorder_tbl, p9_a0
1737 , p9_a1
1738 , p9_a2
1739 , p9_a3
1740 , p9_a4
1741 , p9_a5
1742 , p9_a6
1743 , p9_a7
1744 , p9_a8
1745 , p9_a9
1746 , p9_a10
1747 , p9_a11
1748 , p9_a12
1749 , p9_a13
1750 , p9_a14
1751 , p9_a15
1752 , p9_a16
1753 , p9_a17
1754 , p9_a18
1755 , p9_a19
1756 , p9_a20
1757 , p9_a21
1758 , p9_a22
1759 , p9_a23
1760 , p9_a24
1761 , p9_a25
1762 , p9_a26
1763 , p9_a27
1764 , p9_a28
1765 , p9_a29
1766 , p9_a30
1767 , p9_a31
1768 , p9_a32
1769 , p9_a33
1770 , p9_a34
1771 , p9_a35
1772 , p9_a36
1773 , p9_a37
1774 , p9_a38
1775 , p9_a39
1776 , p9_a40
1777 , p9_a41
1778 , p9_a42
1779 , p9_a43
1780 , p9_a44
1781 , p9_a45
1782 , p9_a46
1783 , p9_a47
1784 , p9_a48
1785 , p9_a49
1786 , p9_a50
1787 , p9_a51
1788 , p9_a52
1789 , p9_a53
1790 , p9_a54
1791 , p9_a55
1792 , p9_a56
1793 , p9_a57
1794 , p9_a58
1795 , p9_a59
1796 , p9_a60
1797 , p9_a61
1798 , p9_a62
1799 , p9_a63
1800 , p9_a64
1801 , p9_a65
1802 , p9_a66
1803 , p9_a67
1804 , p9_a68
1805 , p9_a69
1806 , p9_a70
1807 , p9_a71
1808 , p9_a72
1809 , p9_a73
1810 , p9_a74
1811 , p9_a75
1812 , p9_a76
1813 , p9_a77
1814 , p9_a78
1815 , p9_a79
1816 , p9_a80
1817 , p9_a81
1818 , p9_a82
1819 , p9_a83
1820 , p9_a84
1821 , p9_a85
1822 , p9_a86
1823 , p9_a87
1824 , p9_a88
1825 , p9_a89
1826 , p9_a90
1827 , p9_a91
1828 , p9_a92
1829 , p9_a93
1830 , p9_a94
1831 , p9_a95
1832 , p9_a96
1833 , p9_a97
1834 , p9_a98
1835 , p9_a99
1836 , p9_a100
1837 , p9_a101
1838 , p9_a102
1839 , p9_a103
1840 , p9_a104
1841 );
1842
1843 end;
1844
1845 procedure update_job(p_api_version NUMBER
1846 , p_init_msg_list VARCHAR2
1847 , p_commit VARCHAR2
1848 , p_validation_level NUMBER
1849 , p_default VARCHAR2
1850 , p_module_type VARCHAR2
1851 , x_return_status out nocopy VARCHAR2
1852 , x_msg_count out nocopy NUMBER
1853 , x_msg_data out nocopy VARCHAR2
1854 , p_wip_load_flag VARCHAR2
1855 , p10_a0 in out nocopy NUMBER
1856 , p10_a1 in out nocopy NUMBER
1857 , p10_a2 in out nocopy NUMBER
1858 , p10_a3 in out nocopy NUMBER
1859 , p10_a4 in out nocopy NUMBER
1860 , p10_a5 in out nocopy VARCHAR2
1861 , p10_a6 in out nocopy VARCHAR2
1862 , p10_a7 in out nocopy NUMBER
1863 , p10_a8 in out nocopy VARCHAR2
1864 , p10_a9 in out nocopy VARCHAR2
1865 , p10_a10 in out nocopy VARCHAR2
1866 , p10_a11 in out nocopy NUMBER
1867 , p10_a12 in out nocopy VARCHAR2
1868 , p10_a13 in out nocopy VARCHAR2
1869 , p10_a14 in out nocopy VARCHAR2
1870 , p10_a15 in out nocopy DATE
1871 , p10_a16 in out nocopy NUMBER
1872 , p10_a17 in out nocopy NUMBER
1873 , p10_a18 in out nocopy DATE
1874 , p10_a19 in out nocopy NUMBER
1875 , p10_a20 in out nocopy NUMBER
1876 , p10_a21 in out nocopy DATE
1877 , p10_a22 in out nocopy NUMBER
1878 , p10_a23 in out nocopy NUMBER
1879 , p10_a24 in out nocopy DATE
1880 , p10_a25 in out nocopy NUMBER
1881 , p10_a26 in out nocopy NUMBER
1882 , p10_a27 in out nocopy NUMBER
1883 , p10_a28 in out nocopy NUMBER
1884 , p10_a29 in out nocopy VARCHAR2
1885 , p10_a30 in out nocopy VARCHAR2
1889 , p10_a34 in out nocopy VARCHAR2
1886 , p10_a31 in out nocopy VARCHAR2
1887 , p10_a32 in out nocopy VARCHAR2
1888 , p10_a33 in out nocopy VARCHAR2
1890 , p10_a35 in out nocopy VARCHAR2
1891 , p10_a36 in out nocopy NUMBER
1892 , p10_a37 in out nocopy VARCHAR2
1893 , p10_a38 in out nocopy NUMBER
1894 , p10_a39 in out nocopy VARCHAR2
1895 , p10_a40 in out nocopy NUMBER
1896 , p10_a41 in out nocopy VARCHAR2
1897 , p10_a42 in out nocopy NUMBER
1898 , p10_a43 in out nocopy NUMBER
1899 , p10_a44 in out nocopy VARCHAR2
1900 , p10_a45 in out nocopy NUMBER
1901 , p10_a46 in out nocopy NUMBER
1902 , p10_a47 in out nocopy NUMBER
1903 , p10_a48 in out nocopy VARCHAR2
1904 , p10_a49 in out nocopy NUMBER
1905 , p10_a50 in out nocopy NUMBER
1906 , p10_a51 in out nocopy VARCHAR2
1907 , p10_a52 in out nocopy VARCHAR2
1908 , p10_a53 in out nocopy NUMBER
1909 , p10_a54 in out nocopy NUMBER
1910 , p10_a55 in out nocopy VARCHAR2
1911 , p10_a56 in out nocopy VARCHAR2
1912 , p10_a57 in out nocopy VARCHAR2
1913 , p10_a58 in out nocopy NUMBER
1914 , p10_a59 in out nocopy NUMBER
1915 , p10_a60 in out nocopy NUMBER
1916 , p10_a61 in out nocopy NUMBER
1917 , p10_a62 in out nocopy NUMBER
1918 , p10_a63 in out nocopy NUMBER
1919 , p10_a64 in out nocopy NUMBER
1920 , p10_a65 in out nocopy NUMBER
1921 , p10_a66 in out nocopy VARCHAR2
1922 , p10_a67 in out nocopy VARCHAR2
1923 , p10_a68 in out nocopy NUMBER
1924 , p10_a69 in out nocopy VARCHAR2
1925 , p10_a70 in out nocopy NUMBER
1926 , p10_a71 in out nocopy NUMBER
1927 , p10_a72 in out nocopy NUMBER
1928 , p10_a73 in out nocopy NUMBER
1929 , p10_a74 in out nocopy VARCHAR2
1930 , p10_a75 in out nocopy NUMBER
1931 , p10_a76 in out nocopy NUMBER
1932 , p10_a77 in out nocopy VARCHAR2
1933 , p10_a78 in out nocopy VARCHAR2
1934 , p10_a79 in out nocopy VARCHAR2
1935 , p10_a80 in out nocopy VARCHAR2
1936 , p10_a81 in out nocopy VARCHAR2
1937 , p10_a82 in out nocopy VARCHAR2
1938 , p10_a83 in out nocopy VARCHAR2
1939 , p10_a84 in out nocopy VARCHAR2
1940 , p10_a85 in out nocopy VARCHAR2
1941 , p10_a86 in out nocopy VARCHAR2
1942 , p10_a87 in out nocopy VARCHAR2
1943 , p10_a88 in out nocopy VARCHAR2
1944 , p10_a89 in out nocopy VARCHAR2
1945 , p10_a90 in out nocopy VARCHAR2
1946 , p10_a91 in out nocopy VARCHAR2
1947 , p10_a92 in out nocopy VARCHAR2
1948 , p10_a93 in out nocopy DATE
1949 , p10_a94 in out nocopy NUMBER
1950 , p10_a95 in out nocopy DATE
1951 , p10_a96 in out nocopy NUMBER
1952 , p10_a97 in out nocopy NUMBER
1953 , p10_a98 in out nocopy VARCHAR2
1954 , p10_a99 in out nocopy VARCHAR2
1955 , p10_a100 in out nocopy VARCHAR2
1956 , p10_a101 in out nocopy NUMBER
1957 , p10_a102 in out nocopy VARCHAR2
1958 , p10_a103 in out nocopy VARCHAR2
1959 , p10_a104 in out nocopy VARCHAR2
1960 , p11_a0 in out nocopy JTF_NUMBER_TABLE
1961 , p11_a1 in out nocopy JTF_NUMBER_TABLE
1962 , p11_a2 in out nocopy JTF_NUMBER_TABLE
1963 , p11_a3 in out nocopy JTF_VARCHAR2_TABLE_500
1964 , p11_a4 in out nocopy JTF_NUMBER_TABLE
1965 , p11_a5 in out nocopy JTF_NUMBER_TABLE
1966 , p11_a6 in out nocopy JTF_NUMBER_TABLE
1967 , p11_a7 in out nocopy JTF_NUMBER_TABLE
1968 , p11_a8 in out nocopy JTF_DATE_TABLE
1969 , p11_a9 in out nocopy JTF_NUMBER_TABLE
1970 , p11_a10 in out nocopy JTF_DATE_TABLE
1971 , p11_a11 in out nocopy JTF_NUMBER_TABLE
1972 , p11_a12 in out nocopy JTF_NUMBER_TABLE
1973 , p11_a13 in out nocopy JTF_NUMBER_TABLE
1974 , p11_a14 in out nocopy JTF_VARCHAR2_TABLE_300
1975 , p11_a15 in out nocopy JTF_VARCHAR2_TABLE_100
1976 , p11_a16 in out nocopy JTF_VARCHAR2_TABLE_100
1977 , p11_a17 in out nocopy JTF_NUMBER_TABLE
1978 , p11_a18 in out nocopy JTF_VARCHAR2_TABLE_500
1979 , p11_a19 in out nocopy JTF_VARCHAR2_TABLE_100
1980 , p11_a20 in out nocopy JTF_VARCHAR2_TABLE_100
1981 , p11_a21 in out nocopy JTF_VARCHAR2_TABLE_100
1982 , p11_a22 in out nocopy JTF_NUMBER_TABLE
1983 , p11_a23 in out nocopy JTF_NUMBER_TABLE
1984 , p11_a24 in out nocopy JTF_DATE_TABLE
1985 , p11_a25 in out nocopy JTF_NUMBER_TABLE
1986 , p11_a26 in out nocopy JTF_NUMBER_TABLE
1987 , p11_a27 in out nocopy JTF_DATE_TABLE
1988 , p11_a28 in out nocopy JTF_NUMBER_TABLE
1989 , p11_a29 in out nocopy JTF_NUMBER_TABLE
1990 , p11_a30 in out nocopy JTF_DATE_TABLE
1991 , p11_a31 in out nocopy JTF_NUMBER_TABLE
1992 , p11_a32 in out nocopy JTF_NUMBER_TABLE
1993 , p11_a33 in out nocopy JTF_DATE_TABLE
1994 , p11_a34 in out nocopy JTF_NUMBER_TABLE
1995 , p11_a35 in out nocopy JTF_NUMBER_TABLE
1996 , p11_a36 in out nocopy JTF_NUMBER_TABLE
1997 , p11_a37 in out nocopy JTF_NUMBER_TABLE
1998 , p11_a38 in out nocopy JTF_VARCHAR2_TABLE_100
1999 , p11_a39 in out nocopy JTF_NUMBER_TABLE
2000 , p11_a40 in out nocopy JTF_VARCHAR2_TABLE_100
2001 , p11_a41 in out nocopy JTF_VARCHAR2_TABLE_200
2002 , p11_a42 in out nocopy JTF_VARCHAR2_TABLE_200
2003 , p11_a43 in out nocopy JTF_VARCHAR2_TABLE_200
2004 , p11_a44 in out nocopy JTF_VARCHAR2_TABLE_200
2005 , p11_a45 in out nocopy JTF_VARCHAR2_TABLE_200
2006 , p11_a46 in out nocopy JTF_VARCHAR2_TABLE_200
2007 , p11_a47 in out nocopy JTF_VARCHAR2_TABLE_200
2008 , p11_a48 in out nocopy JTF_VARCHAR2_TABLE_200
2009 , p11_a49 in out nocopy JTF_VARCHAR2_TABLE_200
2010 , p11_a50 in out nocopy JTF_VARCHAR2_TABLE_200
2011 , p11_a51 in out nocopy JTF_VARCHAR2_TABLE_200
2012 , p11_a52 in out nocopy JTF_VARCHAR2_TABLE_200
2013 , p11_a53 in out nocopy JTF_VARCHAR2_TABLE_200
2014 , p11_a54 in out nocopy JTF_VARCHAR2_TABLE_200
2018
2015 , p11_a55 in out nocopy JTF_VARCHAR2_TABLE_200
2016 , p11_a56 in out nocopy JTF_VARCHAR2_TABLE_100
2017 )
2019 as
2020 ddp_x_prd_workorder_rec ahl_prd_workorder_pvt.prd_workorder_rec;
2021 ddp_x_prd_workoper_tbl ahl_prd_workorder_pvt.prd_workoper_tbl;
2022 ddindx binary_integer; indx binary_integer;
2023 begin
2024
2025 -- copy data to the local IN or IN-OUT args, if any
2026
2027
2028
2029
2030
2031
2032
2033
2034
2035
2036 ddp_x_prd_workorder_rec.batch_id := p10_a0;
2037 ddp_x_prd_workorder_rec.header_id := p10_a1;
2038 ddp_x_prd_workorder_rec.workorder_id := p10_a2;
2039 ddp_x_prd_workorder_rec.wip_entity_id := p10_a3;
2040 ddp_x_prd_workorder_rec.object_version_number := p10_a4;
2041 ddp_x_prd_workorder_rec.job_number := p10_a5;
2042 ddp_x_prd_workorder_rec.job_description := p10_a6;
2043 ddp_x_prd_workorder_rec.organization_id := p10_a7;
2044 ddp_x_prd_workorder_rec.organization_name := p10_a8;
2045 ddp_x_prd_workorder_rec.organization_code := p10_a9;
2046 ddp_x_prd_workorder_rec.department_name := p10_a10;
2047 ddp_x_prd_workorder_rec.department_id := p10_a11;
2048 ddp_x_prd_workorder_rec.department_class_code := p10_a12;
2049 ddp_x_prd_workorder_rec.status_code := p10_a13;
2050 ddp_x_prd_workorder_rec.status_meaning := p10_a14;
2051 ddp_x_prd_workorder_rec.scheduled_start_date := rosetta_g_miss_date_in_map(p10_a15);
2052 ddp_x_prd_workorder_rec.scheduled_start_hr := p10_a16;
2053 ddp_x_prd_workorder_rec.scheduled_start_mi := p10_a17;
2054 ddp_x_prd_workorder_rec.scheduled_end_date := rosetta_g_miss_date_in_map(p10_a18);
2055 ddp_x_prd_workorder_rec.scheduled_end_hr := p10_a19;
2056 ddp_x_prd_workorder_rec.scheduled_end_mi := p10_a20;
2057 ddp_x_prd_workorder_rec.actual_start_date := rosetta_g_miss_date_in_map(p10_a21);
2058 ddp_x_prd_workorder_rec.actual_start_hr := p10_a22;
2059 ddp_x_prd_workorder_rec.actual_start_mi := p10_a23;
2060 ddp_x_prd_workorder_rec.actual_end_date := rosetta_g_miss_date_in_map(p10_a24);
2061 ddp_x_prd_workorder_rec.actual_end_hr := p10_a25;
2062 ddp_x_prd_workorder_rec.actual_end_mi := p10_a26;
2063 ddp_x_prd_workorder_rec.inventory_item_id := p10_a27;
2064 ddp_x_prd_workorder_rec.item_instance_id := p10_a28;
2065 ddp_x_prd_workorder_rec.unit_name := p10_a29;
2066 ddp_x_prd_workorder_rec.item_instance_number := p10_a30;
2067 ddp_x_prd_workorder_rec.wo_part_number := p10_a31;
2068 ddp_x_prd_workorder_rec.item_description := p10_a32;
2069 ddp_x_prd_workorder_rec.serial_number := p10_a33;
2070 ddp_x_prd_workorder_rec.item_instance_uom := p10_a34;
2071 ddp_x_prd_workorder_rec.completion_subinventory := p10_a35;
2072 ddp_x_prd_workorder_rec.completion_locator_id := p10_a36;
2073 ddp_x_prd_workorder_rec.completion_locator_name := p10_a37;
2074 ddp_x_prd_workorder_rec.wip_supply_type := p10_a38;
2075 ddp_x_prd_workorder_rec.wip_supply_meaning := p10_a39;
2076 ddp_x_prd_workorder_rec.firm_planned_flag := p10_a40;
2077 ddp_x_prd_workorder_rec.master_workorder_flag := p10_a41;
2078 ddp_x_prd_workorder_rec.visit_id := p10_a42;
2079 ddp_x_prd_workorder_rec.visit_number := p10_a43;
2080 ddp_x_prd_workorder_rec.visit_name := p10_a44;
2081 ddp_x_prd_workorder_rec.visit_task_id := p10_a45;
2082 ddp_x_prd_workorder_rec.mr_header_id := p10_a46;
2083 ddp_x_prd_workorder_rec.visit_task_number := p10_a47;
2084 ddp_x_prd_workorder_rec.mr_title := p10_a48;
2085 ddp_x_prd_workorder_rec.mr_route_id := p10_a49;
2086 ddp_x_prd_workorder_rec.route_id := p10_a50;
2087 ddp_x_prd_workorder_rec.confirm_failure_flag := p10_a51;
2088 ddp_x_prd_workorder_rec.propagate_flag := p10_a52;
2089 ddp_x_prd_workorder_rec.service_item_id := p10_a53;
2090 ddp_x_prd_workorder_rec.service_item_org_id := p10_a54;
2091 ddp_x_prd_workorder_rec.service_item_description := p10_a55;
2092 ddp_x_prd_workorder_rec.service_item_number := p10_a56;
2093 ddp_x_prd_workorder_rec.service_item_uom := p10_a57;
2094 ddp_x_prd_workorder_rec.project_id := p10_a58;
2095 ddp_x_prd_workorder_rec.project_task_id := p10_a59;
2096 ddp_x_prd_workorder_rec.quantity := p10_a60;
2097 ddp_x_prd_workorder_rec.mrp_quantity := p10_a61;
2098 ddp_x_prd_workorder_rec.incident_id := p10_a62;
2099 ddp_x_prd_workorder_rec.origination_task_id := p10_a63;
2100 ddp_x_prd_workorder_rec.parent_id := p10_a64;
2101 ddp_x_prd_workorder_rec.task_motive_status_id := p10_a65;
2102 ddp_x_prd_workorder_rec.allow_explosion := p10_a66;
2103 ddp_x_prd_workorder_rec.class_code := p10_a67;
2104 ddp_x_prd_workorder_rec.job_priority := p10_a68;
2105 ddp_x_prd_workorder_rec.job_priority_meaning := p10_a69;
2106 ddp_x_prd_workorder_rec.confirmed_failure_flag := p10_a70;
2107 ddp_x_prd_workorder_rec.unit_effectivity_id := p10_a71;
2108 ddp_x_prd_workorder_rec.plan_id := p10_a72;
2109 ddp_x_prd_workorder_rec.collection_id := p10_a73;
2110 ddp_x_prd_workorder_rec.sub_inventory := p10_a74;
2111 ddp_x_prd_workorder_rec.locator_id := p10_a75;
2112 ddp_x_prd_workorder_rec.security_group_id := p10_a76;
2113 ddp_x_prd_workorder_rec.attribute_category := p10_a77;
2114 ddp_x_prd_workorder_rec.attribute1 := p10_a78;
2115 ddp_x_prd_workorder_rec.attribute2 := p10_a79;
2116 ddp_x_prd_workorder_rec.attribute3 := p10_a80;
2117 ddp_x_prd_workorder_rec.attribute4 := p10_a81;
2118 ddp_x_prd_workorder_rec.attribute5 := p10_a82;
2119 ddp_x_prd_workorder_rec.attribute6 := p10_a83;
2120 ddp_x_prd_workorder_rec.attribute7 := p10_a84;
2121 ddp_x_prd_workorder_rec.attribute8 := p10_a85;
2122 ddp_x_prd_workorder_rec.attribute9 := p10_a86;
2123 ddp_x_prd_workorder_rec.attribute10 := p10_a87;
2124 ddp_x_prd_workorder_rec.attribute11 := p10_a88;
2125 ddp_x_prd_workorder_rec.attribute12 := p10_a89;
2126 ddp_x_prd_workorder_rec.attribute13 := p10_a90;
2127 ddp_x_prd_workorder_rec.attribute14 := p10_a91;
2131 ddp_x_prd_workorder_rec.creation_date := rosetta_g_miss_date_in_map(p10_a95);
2128 ddp_x_prd_workorder_rec.attribute15 := p10_a92;
2129 ddp_x_prd_workorder_rec.last_update_date := rosetta_g_miss_date_in_map(p10_a93);
2130 ddp_x_prd_workorder_rec.last_updated_by := p10_a94;
2132 ddp_x_prd_workorder_rec.created_by := p10_a96;
2133 ddp_x_prd_workorder_rec.last_update_login := p10_a97;
2134 ddp_x_prd_workorder_rec.dml_operation := p10_a98;
2135 ddp_x_prd_workorder_rec.hold_reason_code := p10_a99;
2136 ddp_x_prd_workorder_rec.hold_reason := p10_a100;
2137 ddp_x_prd_workorder_rec.contract_number := p10_a101;
2138 ddp_x_prd_workorder_rec.warranty_status_code := p10_a102;
2139 ddp_x_prd_workorder_rec.aog_flag := p10_a103;
2140 ddp_x_prd_workorder_rec.set_mr_priority := p10_a104;
2141
2142 ahl_prd_workorder_pvt_w.rosetta_table_copy_in_p1(ddp_x_prd_workoper_tbl, p11_a0
2143 , p11_a1
2144 , p11_a2
2145 , p11_a3
2146 , p11_a4
2147 , p11_a5
2148 , p11_a6
2149 , p11_a7
2150 , p11_a8
2151 , p11_a9
2152 , p11_a10
2153 , p11_a11
2154 , p11_a12
2155 , p11_a13
2156 , p11_a14
2157 , p11_a15
2158 , p11_a16
2159 , p11_a17
2160 , p11_a18
2161 , p11_a19
2162 , p11_a20
2163 , p11_a21
2164 , p11_a22
2165 , p11_a23
2166 , p11_a24
2167 , p11_a25
2168 , p11_a26
2169 , p11_a27
2170 , p11_a28
2171 , p11_a29
2172 , p11_a30
2173 , p11_a31
2174 , p11_a32
2175 , p11_a33
2176 , p11_a34
2177 , p11_a35
2178 , p11_a36
2179 , p11_a37
2180 , p11_a38
2181 , p11_a39
2182 , p11_a40
2183 , p11_a41
2184 , p11_a42
2185 , p11_a43
2186 , p11_a44
2187 , p11_a45
2188 , p11_a46
2189 , p11_a47
2190 , p11_a48
2191 , p11_a49
2192 , p11_a50
2193 , p11_a51
2194 , p11_a52
2195 , p11_a53
2196 , p11_a54
2197 , p11_a55
2198 , p11_a56
2199 );
2200
2201 -- here's the delegated call to the old PL/SQL routine
2202 ahl_prd_workorder_pvt.update_job(p_api_version,
2203 p_init_msg_list,
2204 p_commit,
2205 p_validation_level,
2206 p_default,
2207 p_module_type,
2208 x_return_status,
2209 x_msg_count,
2210 x_msg_data,
2211 p_wip_load_flag,
2212 ddp_x_prd_workorder_rec,
2213 ddp_x_prd_workoper_tbl);
2214
2215 -- copy data back from the local variables to OUT or IN-OUT args, if any
2216
2217
2218
2219
2220
2221
2222
2223
2224
2225
2226 p10_a0 := ddp_x_prd_workorder_rec.batch_id;
2227 p10_a1 := ddp_x_prd_workorder_rec.header_id;
2228 p10_a2 := ddp_x_prd_workorder_rec.workorder_id;
2229 p10_a3 := ddp_x_prd_workorder_rec.wip_entity_id;
2230 p10_a4 := ddp_x_prd_workorder_rec.object_version_number;
2231 p10_a5 := ddp_x_prd_workorder_rec.job_number;
2232 p10_a6 := ddp_x_prd_workorder_rec.job_description;
2233 p10_a7 := ddp_x_prd_workorder_rec.organization_id;
2234 p10_a8 := ddp_x_prd_workorder_rec.organization_name;
2235 p10_a9 := ddp_x_prd_workorder_rec.organization_code;
2236 p10_a10 := ddp_x_prd_workorder_rec.department_name;
2237 p10_a11 := ddp_x_prd_workorder_rec.department_id;
2238 p10_a12 := ddp_x_prd_workorder_rec.department_class_code;
2239 p10_a13 := ddp_x_prd_workorder_rec.status_code;
2240 p10_a14 := ddp_x_prd_workorder_rec.status_meaning;
2241 p10_a15 := ddp_x_prd_workorder_rec.scheduled_start_date;
2242 p10_a16 := ddp_x_prd_workorder_rec.scheduled_start_hr;
2243 p10_a17 := ddp_x_prd_workorder_rec.scheduled_start_mi;
2244 p10_a18 := ddp_x_prd_workorder_rec.scheduled_end_date;
2245 p10_a19 := ddp_x_prd_workorder_rec.scheduled_end_hr;
2246 p10_a20 := ddp_x_prd_workorder_rec.scheduled_end_mi;
2247 p10_a21 := ddp_x_prd_workorder_rec.actual_start_date;
2248 p10_a22 := ddp_x_prd_workorder_rec.actual_start_hr;
2249 p10_a23 := ddp_x_prd_workorder_rec.actual_start_mi;
2250 p10_a24 := ddp_x_prd_workorder_rec.actual_end_date;
2251 p10_a25 := ddp_x_prd_workorder_rec.actual_end_hr;
2252 p10_a26 := ddp_x_prd_workorder_rec.actual_end_mi;
2253 p10_a27 := ddp_x_prd_workorder_rec.inventory_item_id;
2254 p10_a28 := ddp_x_prd_workorder_rec.item_instance_id;
2255 p10_a29 := ddp_x_prd_workorder_rec.unit_name;
2256 p10_a30 := ddp_x_prd_workorder_rec.item_instance_number;
2257 p10_a31 := ddp_x_prd_workorder_rec.wo_part_number;
2258 p10_a32 := ddp_x_prd_workorder_rec.item_description;
2259 p10_a33 := ddp_x_prd_workorder_rec.serial_number;
2260 p10_a34 := ddp_x_prd_workorder_rec.item_instance_uom;
2261 p10_a35 := ddp_x_prd_workorder_rec.completion_subinventory;
2262 p10_a36 := ddp_x_prd_workorder_rec.completion_locator_id;
2263 p10_a37 := ddp_x_prd_workorder_rec.completion_locator_name;
2264 p10_a38 := ddp_x_prd_workorder_rec.wip_supply_type;
2265 p10_a39 := ddp_x_prd_workorder_rec.wip_supply_meaning;
2266 p10_a40 := ddp_x_prd_workorder_rec.firm_planned_flag;
2267 p10_a41 := ddp_x_prd_workorder_rec.master_workorder_flag;
2268 p10_a42 := ddp_x_prd_workorder_rec.visit_id;
2269 p10_a43 := ddp_x_prd_workorder_rec.visit_number;
2270 p10_a44 := ddp_x_prd_workorder_rec.visit_name;
2271 p10_a45 := ddp_x_prd_workorder_rec.visit_task_id;
2272 p10_a46 := ddp_x_prd_workorder_rec.mr_header_id;
2273 p10_a47 := ddp_x_prd_workorder_rec.visit_task_number;
2274 p10_a48 := ddp_x_prd_workorder_rec.mr_title;
2275 p10_a49 := ddp_x_prd_workorder_rec.mr_route_id;
2276 p10_a50 := ddp_x_prd_workorder_rec.route_id;
2280 p10_a54 := ddp_x_prd_workorder_rec.service_item_org_id;
2277 p10_a51 := ddp_x_prd_workorder_rec.confirm_failure_flag;
2278 p10_a52 := ddp_x_prd_workorder_rec.propagate_flag;
2279 p10_a53 := ddp_x_prd_workorder_rec.service_item_id;
2281 p10_a55 := ddp_x_prd_workorder_rec.service_item_description;
2282 p10_a56 := ddp_x_prd_workorder_rec.service_item_number;
2283 p10_a57 := ddp_x_prd_workorder_rec.service_item_uom;
2284 p10_a58 := ddp_x_prd_workorder_rec.project_id;
2285 p10_a59 := ddp_x_prd_workorder_rec.project_task_id;
2286 p10_a60 := ddp_x_prd_workorder_rec.quantity;
2287 p10_a61 := ddp_x_prd_workorder_rec.mrp_quantity;
2288 p10_a62 := ddp_x_prd_workorder_rec.incident_id;
2289 p10_a63 := ddp_x_prd_workorder_rec.origination_task_id;
2290 p10_a64 := ddp_x_prd_workorder_rec.parent_id;
2291 p10_a65 := ddp_x_prd_workorder_rec.task_motive_status_id;
2292 p10_a66 := ddp_x_prd_workorder_rec.allow_explosion;
2293 p10_a67 := ddp_x_prd_workorder_rec.class_code;
2294 p10_a68 := ddp_x_prd_workorder_rec.job_priority;
2295 p10_a69 := ddp_x_prd_workorder_rec.job_priority_meaning;
2296 p10_a70 := ddp_x_prd_workorder_rec.confirmed_failure_flag;
2297 p10_a71 := ddp_x_prd_workorder_rec.unit_effectivity_id;
2298 p10_a72 := ddp_x_prd_workorder_rec.plan_id;
2299 p10_a73 := ddp_x_prd_workorder_rec.collection_id;
2300 p10_a74 := ddp_x_prd_workorder_rec.sub_inventory;
2301 p10_a75 := ddp_x_prd_workorder_rec.locator_id;
2302 p10_a76 := ddp_x_prd_workorder_rec.security_group_id;
2303 p10_a77 := ddp_x_prd_workorder_rec.attribute_category;
2304 p10_a78 := ddp_x_prd_workorder_rec.attribute1;
2305 p10_a79 := ddp_x_prd_workorder_rec.attribute2;
2306 p10_a80 := ddp_x_prd_workorder_rec.attribute3;
2307 p10_a81 := ddp_x_prd_workorder_rec.attribute4;
2308 p10_a82 := ddp_x_prd_workorder_rec.attribute5;
2309 p10_a83 := ddp_x_prd_workorder_rec.attribute6;
2310 p10_a84 := ddp_x_prd_workorder_rec.attribute7;
2311 p10_a85 := ddp_x_prd_workorder_rec.attribute8;
2312 p10_a86 := ddp_x_prd_workorder_rec.attribute9;
2313 p10_a87 := ddp_x_prd_workorder_rec.attribute10;
2314 p10_a88 := ddp_x_prd_workorder_rec.attribute11;
2315 p10_a89 := ddp_x_prd_workorder_rec.attribute12;
2316 p10_a90 := ddp_x_prd_workorder_rec.attribute13;
2317 p10_a91 := ddp_x_prd_workorder_rec.attribute14;
2318 p10_a92 := ddp_x_prd_workorder_rec.attribute15;
2319 p10_a93 := ddp_x_prd_workorder_rec.last_update_date;
2320 p10_a94 := ddp_x_prd_workorder_rec.last_updated_by;
2321 p10_a95 := ddp_x_prd_workorder_rec.creation_date;
2322 p10_a96 := ddp_x_prd_workorder_rec.created_by;
2323 p10_a97 := ddp_x_prd_workorder_rec.last_update_login;
2324 p10_a98 := ddp_x_prd_workorder_rec.dml_operation;
2325 p10_a99 := ddp_x_prd_workorder_rec.hold_reason_code;
2326 p10_a100 := ddp_x_prd_workorder_rec.hold_reason;
2327 p10_a101 := ddp_x_prd_workorder_rec.contract_number;
2328 p10_a102 := ddp_x_prd_workorder_rec.warranty_status_code;
2329 p10_a103 := ddp_x_prd_workorder_rec.aog_flag;
2330 p10_a104 := ddp_x_prd_workorder_rec.set_mr_priority;
2331
2332 ahl_prd_workorder_pvt_w.rosetta_table_copy_out_p1(ddp_x_prd_workoper_tbl, p11_a0
2333 , p11_a1
2334 , p11_a2
2335 , p11_a3
2336 , p11_a4
2337 , p11_a5
2338 , p11_a6
2339 , p11_a7
2340 , p11_a8
2341 , p11_a9
2342 , p11_a10
2343 , p11_a11
2344 , p11_a12
2345 , p11_a13
2346 , p11_a14
2347 , p11_a15
2348 , p11_a16
2349 , p11_a17
2350 , p11_a18
2351 , p11_a19
2352 , p11_a20
2353 , p11_a21
2354 , p11_a22
2355 , p11_a23
2356 , p11_a24
2357 , p11_a25
2358 , p11_a26
2359 , p11_a27
2360 , p11_a28
2361 , p11_a29
2362 , p11_a30
2363 , p11_a31
2364 , p11_a32
2365 , p11_a33
2366 , p11_a34
2367 , p11_a35
2368 , p11_a36
2369 , p11_a37
2370 , p11_a38
2371 , p11_a39
2372 , p11_a40
2373 , p11_a41
2374 , p11_a42
2375 , p11_a43
2376 , p11_a44
2377 , p11_a45
2378 , p11_a46
2379 , p11_a47
2380 , p11_a48
2381 , p11_a49
2382 , p11_a50
2383 , p11_a51
2384 , p11_a52
2385 , p11_a53
2386 , p11_a54
2387 , p11_a55
2388 , p11_a56
2389 );
2390 end;
2391
2392 procedure process_stage_jobs(p_api_version NUMBER
2393 , p_init_msg_list VARCHAR2
2394 , p_commit VARCHAR2
2395 , p_validation_level NUMBER
2396 , p_module_type VARCHAR2
2397 , p5_a0 JTF_NUMBER_TABLE
2398 , p5_a1 JTF_NUMBER_TABLE
2399 , p5_a2 JTF_NUMBER_TABLE
2400 , p5_a3 JTF_NUMBER_TABLE
2401 , p5_a4 JTF_NUMBER_TABLE
2402 , p5_a5 JTF_VARCHAR2_TABLE_100
2403 , p5_a6 JTF_VARCHAR2_TABLE_300
2404 , p5_a7 JTF_NUMBER_TABLE
2405 , p5_a8 JTF_VARCHAR2_TABLE_300
2406 , p5_a9 JTF_VARCHAR2_TABLE_100
2407 , p5_a10 JTF_VARCHAR2_TABLE_300
2408 , p5_a11 JTF_NUMBER_TABLE
2409 , p5_a12 JTF_VARCHAR2_TABLE_100
2410 , p5_a13 JTF_VARCHAR2_TABLE_100
2411 , p5_a14 JTF_VARCHAR2_TABLE_100
2412 , p5_a15 JTF_DATE_TABLE
2413 , p5_a16 JTF_NUMBER_TABLE
2414 , p5_a17 JTF_NUMBER_TABLE
2415 , p5_a18 JTF_DATE_TABLE
2416 , p5_a19 JTF_NUMBER_TABLE
2417 , p5_a20 JTF_NUMBER_TABLE
2418 , p5_a21 JTF_DATE_TABLE
2419 , p5_a22 JTF_NUMBER_TABLE
2420 , p5_a23 JTF_NUMBER_TABLE
2421 , p5_a24 JTF_DATE_TABLE
2422 , p5_a25 JTF_NUMBER_TABLE
2423 , p5_a26 JTF_NUMBER_TABLE
2424 , p5_a27 JTF_NUMBER_TABLE
2425 , p5_a28 JTF_NUMBER_TABLE
2429 , p5_a32 JTF_VARCHAR2_TABLE_300
2426 , p5_a29 JTF_VARCHAR2_TABLE_100
2427 , p5_a30 JTF_VARCHAR2_TABLE_100
2428 , p5_a31 JTF_VARCHAR2_TABLE_100
2430 , p5_a33 JTF_VARCHAR2_TABLE_100
2431 , p5_a34 JTF_VARCHAR2_TABLE_100
2432 , p5_a35 JTF_VARCHAR2_TABLE_100
2433 , p5_a36 JTF_NUMBER_TABLE
2434 , p5_a37 JTF_VARCHAR2_TABLE_300
2435 , p5_a38 JTF_NUMBER_TABLE
2436 , p5_a39 JTF_VARCHAR2_TABLE_100
2437 , p5_a40 JTF_NUMBER_TABLE
2438 , p5_a41 JTF_VARCHAR2_TABLE_100
2439 , p5_a42 JTF_NUMBER_TABLE
2440 , p5_a43 JTF_NUMBER_TABLE
2441 , p5_a44 JTF_VARCHAR2_TABLE_100
2442 , p5_a45 JTF_NUMBER_TABLE
2443 , p5_a46 JTF_NUMBER_TABLE
2444 , p5_a47 JTF_NUMBER_TABLE
2445 , p5_a48 JTF_VARCHAR2_TABLE_100
2446 , p5_a49 JTF_NUMBER_TABLE
2447 , p5_a50 JTF_NUMBER_TABLE
2448 , p5_a51 JTF_VARCHAR2_TABLE_100
2449 , p5_a52 JTF_VARCHAR2_TABLE_100
2450 , p5_a53 JTF_NUMBER_TABLE
2451 , p5_a54 JTF_NUMBER_TABLE
2452 , p5_a55 JTF_VARCHAR2_TABLE_300
2453 , p5_a56 JTF_VARCHAR2_TABLE_100
2454 , p5_a57 JTF_VARCHAR2_TABLE_100
2455 , p5_a58 JTF_NUMBER_TABLE
2456 , p5_a59 JTF_NUMBER_TABLE
2457 , p5_a60 JTF_NUMBER_TABLE
2458 , p5_a61 JTF_NUMBER_TABLE
2459 , p5_a62 JTF_NUMBER_TABLE
2460 , p5_a63 JTF_NUMBER_TABLE
2461 , p5_a64 JTF_NUMBER_TABLE
2462 , p5_a65 JTF_NUMBER_TABLE
2463 , p5_a66 JTF_VARCHAR2_TABLE_100
2464 , p5_a67 JTF_VARCHAR2_TABLE_100
2465 , p5_a68 JTF_NUMBER_TABLE
2466 , p5_a69 JTF_VARCHAR2_TABLE_100
2467 , p5_a70 JTF_NUMBER_TABLE
2468 , p5_a71 JTF_NUMBER_TABLE
2469 , p5_a72 JTF_NUMBER_TABLE
2470 , p5_a73 JTF_NUMBER_TABLE
2471 , p5_a74 JTF_VARCHAR2_TABLE_100
2472 , p5_a75 JTF_NUMBER_TABLE
2473 , p5_a76 JTF_NUMBER_TABLE
2474 , p5_a77 JTF_VARCHAR2_TABLE_100
2475 , p5_a78 JTF_VARCHAR2_TABLE_200
2476 , p5_a79 JTF_VARCHAR2_TABLE_200
2477 , p5_a80 JTF_VARCHAR2_TABLE_200
2478 , p5_a81 JTF_VARCHAR2_TABLE_200
2479 , p5_a82 JTF_VARCHAR2_TABLE_200
2480 , p5_a83 JTF_VARCHAR2_TABLE_200
2481 , p5_a84 JTF_VARCHAR2_TABLE_200
2482 , p5_a85 JTF_VARCHAR2_TABLE_200
2483 , p5_a86 JTF_VARCHAR2_TABLE_200
2484 , p5_a87 JTF_VARCHAR2_TABLE_200
2485 , p5_a88 JTF_VARCHAR2_TABLE_200
2486 , p5_a89 JTF_VARCHAR2_TABLE_200
2487 , p5_a90 JTF_VARCHAR2_TABLE_200
2488 , p5_a91 JTF_VARCHAR2_TABLE_200
2489 , p5_a92 JTF_VARCHAR2_TABLE_200
2490 , p5_a93 JTF_DATE_TABLE
2491 , p5_a94 JTF_NUMBER_TABLE
2492 , p5_a95 JTF_DATE_TABLE
2493 , p5_a96 JTF_NUMBER_TABLE
2494 , p5_a97 JTF_NUMBER_TABLE
2495 , p5_a98 JTF_VARCHAR2_TABLE_100
2496 , p5_a99 JTF_VARCHAR2_TABLE_100
2497 , p5_a100 JTF_VARCHAR2_TABLE_100
2498 , p5_a101 JTF_NUMBER_TABLE
2499 , p5_a102 JTF_VARCHAR2_TABLE_100
2500 , p5_a103 JTF_VARCHAR2_TABLE_100
2501 , p5_a104 JTF_VARCHAR2_TABLE_100
2502 , x_return_status out nocopy VARCHAR2
2503 , x_msg_count out nocopy NUMBER
2504 , x_msg_data out nocopy VARCHAR2
2505 )
2506
2507 as
2508 ddp_workorder_tbl ahl_prd_workorder_pvt.prd_workorder_tbl;
2509 ddindx binary_integer; indx binary_integer;
2510 begin
2511
2512 -- copy data to the local IN or IN-OUT args, if any
2513
2514
2515
2516
2517
2518 ahl_prd_workorder_pvt_w.rosetta_table_copy_in_p3(ddp_workorder_tbl, p5_a0
2519 , p5_a1
2520 , p5_a2
2521 , p5_a3
2522 , p5_a4
2523 , p5_a5
2524 , p5_a6
2525 , p5_a7
2526 , p5_a8
2527 , p5_a9
2528 , p5_a10
2529 , p5_a11
2530 , p5_a12
2531 , p5_a13
2532 , p5_a14
2533 , p5_a15
2534 , p5_a16
2535 , p5_a17
2536 , p5_a18
2537 , p5_a19
2538 , p5_a20
2539 , p5_a21
2540 , p5_a22
2541 , p5_a23
2542 , p5_a24
2543 , p5_a25
2544 , p5_a26
2545 , p5_a27
2546 , p5_a28
2547 , p5_a29
2548 , p5_a30
2549 , p5_a31
2550 , p5_a32
2551 , p5_a33
2552 , p5_a34
2553 , p5_a35
2554 , p5_a36
2555 , p5_a37
2556 , p5_a38
2557 , p5_a39
2558 , p5_a40
2559 , p5_a41
2560 , p5_a42
2561 , p5_a43
2562 , p5_a44
2563 , p5_a45
2564 , p5_a46
2565 , p5_a47
2566 , p5_a48
2567 , p5_a49
2568 , p5_a50
2569 , p5_a51
2570 , p5_a52
2571 , p5_a53
2572 , p5_a54
2573 , p5_a55
2574 , p5_a56
2575 , p5_a57
2576 , p5_a58
2577 , p5_a59
2578 , p5_a60
2579 , p5_a61
2580 , p5_a62
2581 , p5_a63
2582 , p5_a64
2583 , p5_a65
2584 , p5_a66
2585 , p5_a67
2586 , p5_a68
2587 , p5_a69
2588 , p5_a70
2589 , p5_a71
2590 , p5_a72
2591 , p5_a73
2592 , p5_a74
2593 , p5_a75
2594 , p5_a76
2595 , p5_a77
2596 , p5_a78
2597 , p5_a79
2598 , p5_a80
2599 , p5_a81
2600 , p5_a82
2601 , p5_a83
2602 , p5_a84
2603 , p5_a85
2604 , p5_a86
2605 , p5_a87
2606 , p5_a88
2607 , p5_a89
2608 , p5_a90
2609 , p5_a91
2610 , p5_a92
2611 , p5_a93
2612 , p5_a94
2613 , p5_a95
2614 , p5_a96
2615 , p5_a97
2616 , p5_a98
2617 , p5_a99
2621 , p5_a103
2618 , p5_a100
2619 , p5_a101
2620 , p5_a102
2622 , p5_a104
2623 );
2624
2625
2626
2627
2628 -- here's the delegated call to the old PL/SQL routine
2629 ahl_prd_workorder_pvt.process_stage_jobs(p_api_version,
2630 p_init_msg_list,
2631 p_commit,
2632 p_validation_level,
2633 p_module_type,
2634 ddp_workorder_tbl,
2635 x_return_status,
2636 x_msg_count,
2637 x_msg_data);
2638
2639 -- copy data back from the local variables to OUT or IN-OUT args, if any
2640
2641
2642
2643
2644
2645
2646
2647
2648 end;
2649
2650 procedure reschedule_visit_jobs(p_api_version NUMBER
2651 , p_init_msg_list VARCHAR2
2652 , p_commit VARCHAR2
2653 , p_validation_level NUMBER
2654 , p_default VARCHAR2
2655 , p_module_type VARCHAR2
2656 , x_return_status out nocopy VARCHAR2
2657 , x_msg_count out nocopy NUMBER
2658 , x_msg_data out nocopy VARCHAR2
2659 , p_visit_id NUMBER
2660 , p_x_scheduled_start_date in out nocopy date
2661 , p_x_scheduled_end_date in out nocopy date
2662 )
2663
2664 as
2665 ddp_x_scheduled_start_date date;
2666 ddp_x_scheduled_end_date date;
2667 ddindx binary_integer; indx binary_integer;
2668 begin
2669
2670 -- copy data to the local IN or IN-OUT args, if any
2671
2672
2673
2674
2675
2676
2677
2678
2679
2680
2681 ddp_x_scheduled_start_date := rosetta_g_miss_date_in_map(p_x_scheduled_start_date);
2682
2683 ddp_x_scheduled_end_date := rosetta_g_miss_date_in_map(p_x_scheduled_end_date);
2684
2685 -- here's the delegated call to the old PL/SQL routine
2686 ahl_prd_workorder_pvt.reschedule_visit_jobs(p_api_version,
2687 p_init_msg_list,
2688 p_commit,
2689 p_validation_level,
2690 p_default,
2691 p_module_type,
2692 x_return_status,
2693 x_msg_count,
2694 x_msg_data,
2695 p_visit_id,
2696 ddp_x_scheduled_start_date,
2697 ddp_x_scheduled_end_date);
2698
2699 -- copy data back from the local variables to OUT or IN-OUT args, if any
2700
2701
2702
2703
2704
2705
2706
2707
2708
2709
2710 p_x_scheduled_start_date := ddp_x_scheduled_start_date;
2711
2712 p_x_scheduled_end_date := ddp_x_scheduled_end_date;
2713 end;
2714
2715 procedure insert_turnover_notes(p_api_version NUMBER
2716 , p_init_msg_list VARCHAR2
2717 , p_commit VARCHAR2
2718 , p_validation_level NUMBER
2719 , p_default VARCHAR2
2720 , p_module_type VARCHAR2
2721 , x_return_status out nocopy VARCHAR2
2722 , x_msg_count out nocopy NUMBER
2723 , x_msg_data out nocopy VARCHAR2
2724 , p9_a0 in out nocopy JTF_NUMBER_TABLE
2725 , p9_a1 in out nocopy JTF_NUMBER_TABLE
2726 , p9_a2 in out nocopy JTF_VARCHAR2_TABLE_100
2727 , p9_a3 in out nocopy JTF_VARCHAR2_TABLE_2000
2728 , p9_a4 in out nocopy JTF_NUMBER_TABLE
2729 , p9_a5 in out nocopy JTF_VARCHAR2_TABLE_300
2730 , p9_a6 in out nocopy JTF_DATE_TABLE
2731 , p9_a7 in out nocopy JTF_NUMBER_TABLE
2732 )
2733
2734 as
2735 ddp_trunover_notes_tbl ahl_prd_workorder_pvt.turnover_notes_tbl_type;
2736 ddindx binary_integer; indx binary_integer;
2737 begin
2738
2739 -- copy data to the local IN or IN-OUT args, if any
2740
2741
2742
2743
2744
2745
2746
2747
2748
2749 ahl_prd_workorder_pvt_w.rosetta_table_copy_in_p14(ddp_trunover_notes_tbl, p9_a0
2750 , p9_a1
2751 , p9_a2
2752 , p9_a3
2753 , p9_a4
2754 , p9_a5
2755 , p9_a6
2756 , p9_a7
2757 );
2758
2759 -- here's the delegated call to the old PL/SQL routine
2760 ahl_prd_workorder_pvt.insert_turnover_notes(p_api_version,
2761 p_init_msg_list,
2762 p_commit,
2763 p_validation_level,
2764 p_default,
2765 p_module_type,
2766 x_return_status,
2767 x_msg_count,
2768 x_msg_data,
2769 ddp_trunover_notes_tbl);
2770
2771 -- copy data back from the local variables to OUT or IN-OUT args, if any
2772
2773
2774
2775
2776
2777
2778
2779
2780
2781 ahl_prd_workorder_pvt_w.rosetta_table_copy_out_p14(ddp_trunover_notes_tbl, p9_a0
2782 , p9_a1
2783 , p9_a2
2784 , p9_a3
2785 , p9_a4
2786 , p9_a5
2787 , p9_a6
2788 , p9_a7
2789 );
2790 end;
2791
2792 procedure unclose_workorder(p_api_version NUMBER
2793 , p_init_msg_list VARCHAR2
2794 , p_commit VARCHAR2
2795 , p_validation_level NUMBER
2796 , p_default VARCHAR2
2797 , p_module_type VARCHAR2
2798 , x_return_status out nocopy VARCHAR2
2799 , x_msg_count out nocopy NUMBER
2800 , x_msg_data out nocopy VARCHAR2
2801 , p9_a0 in out nocopy NUMBER
2802 , p9_a1 in out nocopy NUMBER
2803 , p9_a2 in out nocopy NUMBER
2804 , p9_a3 in out nocopy NUMBER
2805 , p9_a4 in out nocopy NUMBER
2806 , p9_a5 in out nocopy VARCHAR2
2807 , p9_a6 in out nocopy VARCHAR2
2808 , p9_a7 in out nocopy NUMBER
2809 , p9_a8 in out nocopy VARCHAR2
2810 , p9_a9 in out nocopy VARCHAR2
2811 , p9_a10 in out nocopy VARCHAR2
2812 , p9_a11 in out nocopy NUMBER
2813 , p9_a12 in out nocopy VARCHAR2
2817 , p9_a16 in out nocopy NUMBER
2814 , p9_a13 in out nocopy VARCHAR2
2815 , p9_a14 in out nocopy VARCHAR2
2816 , p9_a15 in out nocopy DATE
2818 , p9_a17 in out nocopy NUMBER
2819 , p9_a18 in out nocopy DATE
2820 , p9_a19 in out nocopy NUMBER
2821 , p9_a20 in out nocopy NUMBER
2822 , p9_a21 in out nocopy DATE
2823 , p9_a22 in out nocopy NUMBER
2824 , p9_a23 in out nocopy NUMBER
2825 , p9_a24 in out nocopy DATE
2826 , p9_a25 in out nocopy NUMBER
2827 , p9_a26 in out nocopy NUMBER
2828 , p9_a27 in out nocopy NUMBER
2829 , p9_a28 in out nocopy NUMBER
2830 , p9_a29 in out nocopy VARCHAR2
2831 , p9_a30 in out nocopy VARCHAR2
2832 , p9_a31 in out nocopy VARCHAR2
2833 , p9_a32 in out nocopy VARCHAR2
2834 , p9_a33 in out nocopy VARCHAR2
2835 , p9_a34 in out nocopy VARCHAR2
2836 , p9_a35 in out nocopy VARCHAR2
2837 , p9_a36 in out nocopy NUMBER
2838 , p9_a37 in out nocopy VARCHAR2
2839 , p9_a38 in out nocopy NUMBER
2840 , p9_a39 in out nocopy VARCHAR2
2841 , p9_a40 in out nocopy NUMBER
2842 , p9_a41 in out nocopy VARCHAR2
2843 , p9_a42 in out nocopy NUMBER
2844 , p9_a43 in out nocopy NUMBER
2845 , p9_a44 in out nocopy VARCHAR2
2846 , p9_a45 in out nocopy NUMBER
2847 , p9_a46 in out nocopy NUMBER
2848 , p9_a47 in out nocopy NUMBER
2849 , p9_a48 in out nocopy VARCHAR2
2850 , p9_a49 in out nocopy NUMBER
2851 , p9_a50 in out nocopy NUMBER
2852 , p9_a51 in out nocopy VARCHAR2
2853 , p9_a52 in out nocopy VARCHAR2
2854 , p9_a53 in out nocopy NUMBER
2855 , p9_a54 in out nocopy NUMBER
2856 , p9_a55 in out nocopy VARCHAR2
2857 , p9_a56 in out nocopy VARCHAR2
2858 , p9_a57 in out nocopy VARCHAR2
2859 , p9_a58 in out nocopy NUMBER
2860 , p9_a59 in out nocopy NUMBER
2861 , p9_a60 in out nocopy NUMBER
2862 , p9_a61 in out nocopy NUMBER
2863 , p9_a62 in out nocopy NUMBER
2864 , p9_a63 in out nocopy NUMBER
2865 , p9_a64 in out nocopy NUMBER
2866 , p9_a65 in out nocopy NUMBER
2867 , p9_a66 in out nocopy VARCHAR2
2868 , p9_a67 in out nocopy VARCHAR2
2869 , p9_a68 in out nocopy NUMBER
2870 , p9_a69 in out nocopy VARCHAR2
2871 , p9_a70 in out nocopy NUMBER
2872 , p9_a71 in out nocopy NUMBER
2873 , p9_a72 in out nocopy NUMBER
2874 , p9_a73 in out nocopy NUMBER
2875 , p9_a74 in out nocopy VARCHAR2
2876 , p9_a75 in out nocopy NUMBER
2877 , p9_a76 in out nocopy NUMBER
2878 , p9_a77 in out nocopy VARCHAR2
2879 , p9_a78 in out nocopy VARCHAR2
2880 , p9_a79 in out nocopy VARCHAR2
2881 , p9_a80 in out nocopy VARCHAR2
2882 , p9_a81 in out nocopy VARCHAR2
2883 , p9_a82 in out nocopy VARCHAR2
2884 , p9_a83 in out nocopy VARCHAR2
2885 , p9_a84 in out nocopy VARCHAR2
2886 , p9_a85 in out nocopy VARCHAR2
2887 , p9_a86 in out nocopy VARCHAR2
2888 , p9_a87 in out nocopy VARCHAR2
2889 , p9_a88 in out nocopy VARCHAR2
2890 , p9_a89 in out nocopy VARCHAR2
2891 , p9_a90 in out nocopy VARCHAR2
2892 , p9_a91 in out nocopy VARCHAR2
2893 , p9_a92 in out nocopy VARCHAR2
2894 , p9_a93 in out nocopy DATE
2895 , p9_a94 in out nocopy NUMBER
2896 , p9_a95 in out nocopy DATE
2897 , p9_a96 in out nocopy NUMBER
2898 , p9_a97 in out nocopy NUMBER
2899 , p9_a98 in out nocopy VARCHAR2
2900 , p9_a99 in out nocopy VARCHAR2
2901 , p9_a100 in out nocopy VARCHAR2
2902 , p9_a101 in out nocopy NUMBER
2903 , p9_a102 in out nocopy VARCHAR2
2904 , p9_a103 in out nocopy VARCHAR2
2905 , p9_a104 in out nocopy VARCHAR2
2906 )
2907
2908 as
2909 ddp_x_prd_workorder_rec ahl_prd_workorder_pvt.prd_workorder_rec;
2910 ddindx binary_integer; indx binary_integer;
2911 begin
2912
2913 -- copy data to the local IN or IN-OUT args, if any
2914
2915
2916
2917
2918
2919
2920
2921
2922
2923 ddp_x_prd_workorder_rec.batch_id := p9_a0;
2924 ddp_x_prd_workorder_rec.header_id := p9_a1;
2925 ddp_x_prd_workorder_rec.workorder_id := p9_a2;
2926 ddp_x_prd_workorder_rec.wip_entity_id := p9_a3;
2927 ddp_x_prd_workorder_rec.object_version_number := p9_a4;
2928 ddp_x_prd_workorder_rec.job_number := p9_a5;
2929 ddp_x_prd_workorder_rec.job_description := p9_a6;
2930 ddp_x_prd_workorder_rec.organization_id := p9_a7;
2931 ddp_x_prd_workorder_rec.organization_name := p9_a8;
2932 ddp_x_prd_workorder_rec.organization_code := p9_a9;
2933 ddp_x_prd_workorder_rec.department_name := p9_a10;
2934 ddp_x_prd_workorder_rec.department_id := p9_a11;
2935 ddp_x_prd_workorder_rec.department_class_code := p9_a12;
2936 ddp_x_prd_workorder_rec.status_code := p9_a13;
2937 ddp_x_prd_workorder_rec.status_meaning := p9_a14;
2938 ddp_x_prd_workorder_rec.scheduled_start_date := rosetta_g_miss_date_in_map(p9_a15);
2939 ddp_x_prd_workorder_rec.scheduled_start_hr := p9_a16;
2940 ddp_x_prd_workorder_rec.scheduled_start_mi := p9_a17;
2941 ddp_x_prd_workorder_rec.scheduled_end_date := rosetta_g_miss_date_in_map(p9_a18);
2942 ddp_x_prd_workorder_rec.scheduled_end_hr := p9_a19;
2943 ddp_x_prd_workorder_rec.scheduled_end_mi := p9_a20;
2944 ddp_x_prd_workorder_rec.actual_start_date := rosetta_g_miss_date_in_map(p9_a21);
2945 ddp_x_prd_workorder_rec.actual_start_hr := p9_a22;
2946 ddp_x_prd_workorder_rec.actual_start_mi := p9_a23;
2947 ddp_x_prd_workorder_rec.actual_end_date := rosetta_g_miss_date_in_map(p9_a24);
2948 ddp_x_prd_workorder_rec.actual_end_hr := p9_a25;
2949 ddp_x_prd_workorder_rec.actual_end_mi := p9_a26;
2950 ddp_x_prd_workorder_rec.inventory_item_id := p9_a27;
2951 ddp_x_prd_workorder_rec.item_instance_id := p9_a28;
2955 ddp_x_prd_workorder_rec.item_description := p9_a32;
2952 ddp_x_prd_workorder_rec.unit_name := p9_a29;
2953 ddp_x_prd_workorder_rec.item_instance_number := p9_a30;
2954 ddp_x_prd_workorder_rec.wo_part_number := p9_a31;
2956 ddp_x_prd_workorder_rec.serial_number := p9_a33;
2957 ddp_x_prd_workorder_rec.item_instance_uom := p9_a34;
2958 ddp_x_prd_workorder_rec.completion_subinventory := p9_a35;
2959 ddp_x_prd_workorder_rec.completion_locator_id := p9_a36;
2960 ddp_x_prd_workorder_rec.completion_locator_name := p9_a37;
2961 ddp_x_prd_workorder_rec.wip_supply_type := p9_a38;
2962 ddp_x_prd_workorder_rec.wip_supply_meaning := p9_a39;
2963 ddp_x_prd_workorder_rec.firm_planned_flag := p9_a40;
2964 ddp_x_prd_workorder_rec.master_workorder_flag := p9_a41;
2965 ddp_x_prd_workorder_rec.visit_id := p9_a42;
2966 ddp_x_prd_workorder_rec.visit_number := p9_a43;
2967 ddp_x_prd_workorder_rec.visit_name := p9_a44;
2968 ddp_x_prd_workorder_rec.visit_task_id := p9_a45;
2969 ddp_x_prd_workorder_rec.mr_header_id := p9_a46;
2970 ddp_x_prd_workorder_rec.visit_task_number := p9_a47;
2971 ddp_x_prd_workorder_rec.mr_title := p9_a48;
2972 ddp_x_prd_workorder_rec.mr_route_id := p9_a49;
2973 ddp_x_prd_workorder_rec.route_id := p9_a50;
2974 ddp_x_prd_workorder_rec.confirm_failure_flag := p9_a51;
2975 ddp_x_prd_workorder_rec.propagate_flag := p9_a52;
2976 ddp_x_prd_workorder_rec.service_item_id := p9_a53;
2977 ddp_x_prd_workorder_rec.service_item_org_id := p9_a54;
2978 ddp_x_prd_workorder_rec.service_item_description := p9_a55;
2979 ddp_x_prd_workorder_rec.service_item_number := p9_a56;
2980 ddp_x_prd_workorder_rec.service_item_uom := p9_a57;
2981 ddp_x_prd_workorder_rec.project_id := p9_a58;
2982 ddp_x_prd_workorder_rec.project_task_id := p9_a59;
2983 ddp_x_prd_workorder_rec.quantity := p9_a60;
2984 ddp_x_prd_workorder_rec.mrp_quantity := p9_a61;
2985 ddp_x_prd_workorder_rec.incident_id := p9_a62;
2986 ddp_x_prd_workorder_rec.origination_task_id := p9_a63;
2987 ddp_x_prd_workorder_rec.parent_id := p9_a64;
2988 ddp_x_prd_workorder_rec.task_motive_status_id := p9_a65;
2989 ddp_x_prd_workorder_rec.allow_explosion := p9_a66;
2990 ddp_x_prd_workorder_rec.class_code := p9_a67;
2991 ddp_x_prd_workorder_rec.job_priority := p9_a68;
2992 ddp_x_prd_workorder_rec.job_priority_meaning := p9_a69;
2993 ddp_x_prd_workorder_rec.confirmed_failure_flag := p9_a70;
2994 ddp_x_prd_workorder_rec.unit_effectivity_id := p9_a71;
2995 ddp_x_prd_workorder_rec.plan_id := p9_a72;
2996 ddp_x_prd_workorder_rec.collection_id := p9_a73;
2997 ddp_x_prd_workorder_rec.sub_inventory := p9_a74;
2998 ddp_x_prd_workorder_rec.locator_id := p9_a75;
2999 ddp_x_prd_workorder_rec.security_group_id := p9_a76;
3000 ddp_x_prd_workorder_rec.attribute_category := p9_a77;
3001 ddp_x_prd_workorder_rec.attribute1 := p9_a78;
3002 ddp_x_prd_workorder_rec.attribute2 := p9_a79;
3003 ddp_x_prd_workorder_rec.attribute3 := p9_a80;
3004 ddp_x_prd_workorder_rec.attribute4 := p9_a81;
3005 ddp_x_prd_workorder_rec.attribute5 := p9_a82;
3006 ddp_x_prd_workorder_rec.attribute6 := p9_a83;
3007 ddp_x_prd_workorder_rec.attribute7 := p9_a84;
3008 ddp_x_prd_workorder_rec.attribute8 := p9_a85;
3009 ddp_x_prd_workorder_rec.attribute9 := p9_a86;
3010 ddp_x_prd_workorder_rec.attribute10 := p9_a87;
3011 ddp_x_prd_workorder_rec.attribute11 := p9_a88;
3012 ddp_x_prd_workorder_rec.attribute12 := p9_a89;
3013 ddp_x_prd_workorder_rec.attribute13 := p9_a90;
3014 ddp_x_prd_workorder_rec.attribute14 := p9_a91;
3015 ddp_x_prd_workorder_rec.attribute15 := p9_a92;
3016 ddp_x_prd_workorder_rec.last_update_date := rosetta_g_miss_date_in_map(p9_a93);
3017 ddp_x_prd_workorder_rec.last_updated_by := p9_a94;
3018 ddp_x_prd_workorder_rec.creation_date := rosetta_g_miss_date_in_map(p9_a95);
3019 ddp_x_prd_workorder_rec.created_by := p9_a96;
3020 ddp_x_prd_workorder_rec.last_update_login := p9_a97;
3021 ddp_x_prd_workorder_rec.dml_operation := p9_a98;
3022 ddp_x_prd_workorder_rec.hold_reason_code := p9_a99;
3023 ddp_x_prd_workorder_rec.hold_reason := p9_a100;
3024 ddp_x_prd_workorder_rec.contract_number := p9_a101;
3025 ddp_x_prd_workorder_rec.warranty_status_code := p9_a102;
3026 ddp_x_prd_workorder_rec.aog_flag := p9_a103;
3027 ddp_x_prd_workorder_rec.set_mr_priority := p9_a104;
3028
3029 -- here's the delegated call to the old PL/SQL routine
3030 ahl_prd_workorder_pvt.unclose_workorder(p_api_version,
3031 p_init_msg_list,
3032 p_commit,
3033 p_validation_level,
3034 p_default,
3035 p_module_type,
3036 x_return_status,
3037 x_msg_count,
3038 x_msg_data,
3039 ddp_x_prd_workorder_rec);
3040
3041 -- copy data back from the local variables to OUT or IN-OUT args, if any
3042
3043
3044
3045
3046
3047
3048
3049
3050
3051 p9_a0 := ddp_x_prd_workorder_rec.batch_id;
3052 p9_a1 := ddp_x_prd_workorder_rec.header_id;
3053 p9_a2 := ddp_x_prd_workorder_rec.workorder_id;
3054 p9_a3 := ddp_x_prd_workorder_rec.wip_entity_id;
3055 p9_a4 := ddp_x_prd_workorder_rec.object_version_number;
3056 p9_a5 := ddp_x_prd_workorder_rec.job_number;
3057 p9_a6 := ddp_x_prd_workorder_rec.job_description;
3058 p9_a7 := ddp_x_prd_workorder_rec.organization_id;
3059 p9_a8 := ddp_x_prd_workorder_rec.organization_name;
3060 p9_a9 := ddp_x_prd_workorder_rec.organization_code;
3061 p9_a10 := ddp_x_prd_workorder_rec.department_name;
3062 p9_a11 := ddp_x_prd_workorder_rec.department_id;
3063 p9_a12 := ddp_x_prd_workorder_rec.department_class_code;
3064 p9_a13 := ddp_x_prd_workorder_rec.status_code;
3065 p9_a14 := ddp_x_prd_workorder_rec.status_meaning;
3066 p9_a15 := ddp_x_prd_workorder_rec.scheduled_start_date;
3067 p9_a16 := ddp_x_prd_workorder_rec.scheduled_start_hr;
3068 p9_a17 := ddp_x_prd_workorder_rec.scheduled_start_mi;
3072 p9_a21 := ddp_x_prd_workorder_rec.actual_start_date;
3069 p9_a18 := ddp_x_prd_workorder_rec.scheduled_end_date;
3070 p9_a19 := ddp_x_prd_workorder_rec.scheduled_end_hr;
3071 p9_a20 := ddp_x_prd_workorder_rec.scheduled_end_mi;
3073 p9_a22 := ddp_x_prd_workorder_rec.actual_start_hr;
3074 p9_a23 := ddp_x_prd_workorder_rec.actual_start_mi;
3075 p9_a24 := ddp_x_prd_workorder_rec.actual_end_date;
3076 p9_a25 := ddp_x_prd_workorder_rec.actual_end_hr;
3077 p9_a26 := ddp_x_prd_workorder_rec.actual_end_mi;
3078 p9_a27 := ddp_x_prd_workorder_rec.inventory_item_id;
3079 p9_a28 := ddp_x_prd_workorder_rec.item_instance_id;
3080 p9_a29 := ddp_x_prd_workorder_rec.unit_name;
3081 p9_a30 := ddp_x_prd_workorder_rec.item_instance_number;
3082 p9_a31 := ddp_x_prd_workorder_rec.wo_part_number;
3083 p9_a32 := ddp_x_prd_workorder_rec.item_description;
3084 p9_a33 := ddp_x_prd_workorder_rec.serial_number;
3085 p9_a34 := ddp_x_prd_workorder_rec.item_instance_uom;
3086 p9_a35 := ddp_x_prd_workorder_rec.completion_subinventory;
3087 p9_a36 := ddp_x_prd_workorder_rec.completion_locator_id;
3088 p9_a37 := ddp_x_prd_workorder_rec.completion_locator_name;
3089 p9_a38 := ddp_x_prd_workorder_rec.wip_supply_type;
3090 p9_a39 := ddp_x_prd_workorder_rec.wip_supply_meaning;
3091 p9_a40 := ddp_x_prd_workorder_rec.firm_planned_flag;
3092 p9_a41 := ddp_x_prd_workorder_rec.master_workorder_flag;
3093 p9_a42 := ddp_x_prd_workorder_rec.visit_id;
3094 p9_a43 := ddp_x_prd_workorder_rec.visit_number;
3095 p9_a44 := ddp_x_prd_workorder_rec.visit_name;
3096 p9_a45 := ddp_x_prd_workorder_rec.visit_task_id;
3097 p9_a46 := ddp_x_prd_workorder_rec.mr_header_id;
3098 p9_a47 := ddp_x_prd_workorder_rec.visit_task_number;
3099 p9_a48 := ddp_x_prd_workorder_rec.mr_title;
3100 p9_a49 := ddp_x_prd_workorder_rec.mr_route_id;
3101 p9_a50 := ddp_x_prd_workorder_rec.route_id;
3102 p9_a51 := ddp_x_prd_workorder_rec.confirm_failure_flag;
3103 p9_a52 := ddp_x_prd_workorder_rec.propagate_flag;
3104 p9_a53 := ddp_x_prd_workorder_rec.service_item_id;
3105 p9_a54 := ddp_x_prd_workorder_rec.service_item_org_id;
3106 p9_a55 := ddp_x_prd_workorder_rec.service_item_description;
3107 p9_a56 := ddp_x_prd_workorder_rec.service_item_number;
3108 p9_a57 := ddp_x_prd_workorder_rec.service_item_uom;
3109 p9_a58 := ddp_x_prd_workorder_rec.project_id;
3110 p9_a59 := ddp_x_prd_workorder_rec.project_task_id;
3111 p9_a60 := ddp_x_prd_workorder_rec.quantity;
3112 p9_a61 := ddp_x_prd_workorder_rec.mrp_quantity;
3113 p9_a62 := ddp_x_prd_workorder_rec.incident_id;
3114 p9_a63 := ddp_x_prd_workorder_rec.origination_task_id;
3115 p9_a64 := ddp_x_prd_workorder_rec.parent_id;
3116 p9_a65 := ddp_x_prd_workorder_rec.task_motive_status_id;
3117 p9_a66 := ddp_x_prd_workorder_rec.allow_explosion;
3118 p9_a67 := ddp_x_prd_workorder_rec.class_code;
3119 p9_a68 := ddp_x_prd_workorder_rec.job_priority;
3120 p9_a69 := ddp_x_prd_workorder_rec.job_priority_meaning;
3121 p9_a70 := ddp_x_prd_workorder_rec.confirmed_failure_flag;
3122 p9_a71 := ddp_x_prd_workorder_rec.unit_effectivity_id;
3123 p9_a72 := ddp_x_prd_workorder_rec.plan_id;
3124 p9_a73 := ddp_x_prd_workorder_rec.collection_id;
3125 p9_a74 := ddp_x_prd_workorder_rec.sub_inventory;
3126 p9_a75 := ddp_x_prd_workorder_rec.locator_id;
3127 p9_a76 := ddp_x_prd_workorder_rec.security_group_id;
3128 p9_a77 := ddp_x_prd_workorder_rec.attribute_category;
3129 p9_a78 := ddp_x_prd_workorder_rec.attribute1;
3130 p9_a79 := ddp_x_prd_workorder_rec.attribute2;
3131 p9_a80 := ddp_x_prd_workorder_rec.attribute3;
3132 p9_a81 := ddp_x_prd_workorder_rec.attribute4;
3133 p9_a82 := ddp_x_prd_workorder_rec.attribute5;
3134 p9_a83 := ddp_x_prd_workorder_rec.attribute6;
3135 p9_a84 := ddp_x_prd_workorder_rec.attribute7;
3136 p9_a85 := ddp_x_prd_workorder_rec.attribute8;
3137 p9_a86 := ddp_x_prd_workorder_rec.attribute9;
3138 p9_a87 := ddp_x_prd_workorder_rec.attribute10;
3139 p9_a88 := ddp_x_prd_workorder_rec.attribute11;
3140 p9_a89 := ddp_x_prd_workorder_rec.attribute12;
3141 p9_a90 := ddp_x_prd_workorder_rec.attribute13;
3142 p9_a91 := ddp_x_prd_workorder_rec.attribute14;
3143 p9_a92 := ddp_x_prd_workorder_rec.attribute15;
3144 p9_a93 := ddp_x_prd_workorder_rec.last_update_date;
3145 p9_a94 := ddp_x_prd_workorder_rec.last_updated_by;
3146 p9_a95 := ddp_x_prd_workorder_rec.creation_date;
3147 p9_a96 := ddp_x_prd_workorder_rec.created_by;
3148 p9_a97 := ddp_x_prd_workorder_rec.last_update_login;
3149 p9_a98 := ddp_x_prd_workorder_rec.dml_operation;
3150 p9_a99 := ddp_x_prd_workorder_rec.hold_reason_code;
3151 p9_a100 := ddp_x_prd_workorder_rec.hold_reason;
3152 p9_a101 := ddp_x_prd_workorder_rec.contract_number;
3153 p9_a102 := ddp_x_prd_workorder_rec.warranty_status_code;
3154 p9_a103 := ddp_x_prd_workorder_rec.aog_flag;
3155 p9_a104 := ddp_x_prd_workorder_rec.set_mr_priority;
3156 end;
3157
3158 procedure populate_entitlements(p_api_version NUMBER
3159 , p_init_msg_list VARCHAR2
3160 , p_commit VARCHAR2
3161 , p_validation_level NUMBER
3162 , p_contract_number NUMBER
3163 , p5_a0 in out nocopy NUMBER
3164 , p5_a1 in out nocopy VARCHAR2
3165 , p5_a2 in out nocopy NUMBER
3166 , p5_a3 in out nocopy DATE
3167 , p5_a4 in out nocopy NUMBER
3168 , p5_a5 in out nocopy DATE
3169 , p5_a6 in out nocopy NUMBER
3170 , p5_a7 in out nocopy NUMBER
3171 , p5_a8 in out nocopy NUMBER
3172 , p5_a9 in out nocopy NUMBER
3173 , p5_a10 in out nocopy VARCHAR2
3174 , p5_a11 in out nocopy NUMBER
3175 , p5_a12 in out nocopy NUMBER
3176 , p5_a13 in out nocopy NUMBER
3177 , p5_a14 in out nocopy NUMBER
3178 , p5_a15 in out nocopy NUMBER
3179 , p5_a16 in out nocopy NUMBER
3180 , p5_a17 in out nocopy VARCHAR2
3181 , p5_a18 in out nocopy VARCHAR2
3185 , p5_a22 in out nocopy VARCHAR2
3182 , p5_a19 in out nocopy NUMBER
3183 , p5_a20 in out nocopy VARCHAR2
3184 , p5_a21 in out nocopy VARCHAR2
3186 , p5_a23 in out nocopy VARCHAR2
3187 , p5_a24 in out nocopy VARCHAR2
3188 , p5_a25 in out nocopy VARCHAR2
3189 , p5_a26 in out nocopy VARCHAR2
3190 , p5_a27 in out nocopy VARCHAR2
3191 , p5_a28 in out nocopy VARCHAR2
3192 , p5_a29 in out nocopy VARCHAR2
3193 , p5_a30 in out nocopy VARCHAR2
3194 , p5_a31 in out nocopy VARCHAR2
3195 , p5_a32 in out nocopy VARCHAR2
3196 , p5_a33 in out nocopy VARCHAR2
3197 , p5_a34 in out nocopy VARCHAR2
3198 , p5_a35 in out nocopy VARCHAR2
3199 , p_user_role VARCHAR2
3200 , x_return_status out nocopy VARCHAR2
3201 , x_msg_count out nocopy NUMBER
3202 , x_msg_data out nocopy VARCHAR2
3203 )
3204
3205 as
3206 ddp_warranty_entl_rec ahl_warranty_entl_pvt.warranty_entl_rec_type;
3207 ddindx binary_integer; indx binary_integer;
3208 begin
3209
3210 -- copy data to the local IN or IN-OUT args, if any
3211
3212
3213
3214
3215
3216 ddp_warranty_entl_rec.warranty_entitlement_id := p5_a0;
3217 ddp_warranty_entl_rec.operation_flag := p5_a1;
3218 ddp_warranty_entl_rec.object_version_number := p5_a2;
3219 ddp_warranty_entl_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a3);
3220 ddp_warranty_entl_rec.last_updated_by := p5_a4;
3221 ddp_warranty_entl_rec.creation_date := rosetta_g_miss_date_in_map(p5_a5);
3222 ddp_warranty_entl_rec.created_by := p5_a6;
3223 ddp_warranty_entl_rec.last_update_login := p5_a7;
3224 ddp_warranty_entl_rec.security_group_id := p5_a8;
3225 ddp_warranty_entl_rec.warranty_contract_id := p5_a9;
3226 ddp_warranty_entl_rec.entitlement_status_code := p5_a10;
3227 ddp_warranty_entl_rec.warranty_claim_id := p5_a11;
3228 ddp_warranty_entl_rec.po_header_id := p5_a12;
3229 ddp_warranty_entl_rec.sr_incident_id := p5_a13;
3230 ddp_warranty_entl_rec.visit_task_id := p5_a14;
3231 ddp_warranty_entl_rec.workorder_id := p5_a15;
3232 ddp_warranty_entl_rec.osp_order_line_id := p5_a16;
3233 ddp_warranty_entl_rec.warranty_labour_capture := p5_a17;
3234 ddp_warranty_entl_rec.warranty_mtl_capture := p5_a18;
3235 ddp_warranty_entl_rec.order_claim_amount := p5_a19;
3236 ddp_warranty_entl_rec.attribute_category := p5_a20;
3237 ddp_warranty_entl_rec.attribute1 := p5_a21;
3238 ddp_warranty_entl_rec.attribute2 := p5_a22;
3239 ddp_warranty_entl_rec.attribute3 := p5_a23;
3240 ddp_warranty_entl_rec.attribute4 := p5_a24;
3241 ddp_warranty_entl_rec.attribute5 := p5_a25;
3242 ddp_warranty_entl_rec.attribute6 := p5_a26;
3243 ddp_warranty_entl_rec.attribute7 := p5_a27;
3244 ddp_warranty_entl_rec.attribute8 := p5_a28;
3245 ddp_warranty_entl_rec.attribute9 := p5_a29;
3246 ddp_warranty_entl_rec.attribute10 := p5_a30;
3247 ddp_warranty_entl_rec.attribute11 := p5_a31;
3248 ddp_warranty_entl_rec.attribute12 := p5_a32;
3249 ddp_warranty_entl_rec.attribute13 := p5_a33;
3250 ddp_warranty_entl_rec.attribute14 := p5_a34;
3251 ddp_warranty_entl_rec.attribute15 := p5_a35;
3252
3253
3254
3255
3256
3257 -- here's the delegated call to the old PL/SQL routine
3258 ahl_prd_workorder_pvt.populate_entitlements(p_api_version,
3259 p_init_msg_list,
3260 p_commit,
3261 p_validation_level,
3262 p_contract_number,
3263 ddp_warranty_entl_rec,
3264 p_user_role,
3265 x_return_status,
3266 x_msg_count,
3267 x_msg_data);
3268
3269 -- copy data back from the local variables to OUT or IN-OUT args, if any
3270
3271
3272
3273
3274
3275 p5_a0 := ddp_warranty_entl_rec.warranty_entitlement_id;
3276 p5_a1 := ddp_warranty_entl_rec.operation_flag;
3277 p5_a2 := ddp_warranty_entl_rec.object_version_number;
3278 p5_a3 := ddp_warranty_entl_rec.last_update_date;
3279 p5_a4 := ddp_warranty_entl_rec.last_updated_by;
3280 p5_a5 := ddp_warranty_entl_rec.creation_date;
3281 p5_a6 := ddp_warranty_entl_rec.created_by;
3282 p5_a7 := ddp_warranty_entl_rec.last_update_login;
3283 p5_a8 := ddp_warranty_entl_rec.security_group_id;
3284 p5_a9 := ddp_warranty_entl_rec.warranty_contract_id;
3285 p5_a10 := ddp_warranty_entl_rec.entitlement_status_code;
3286 p5_a11 := ddp_warranty_entl_rec.warranty_claim_id;
3287 p5_a12 := ddp_warranty_entl_rec.po_header_id;
3288 p5_a13 := ddp_warranty_entl_rec.sr_incident_id;
3289 p5_a14 := ddp_warranty_entl_rec.visit_task_id;
3290 p5_a15 := ddp_warranty_entl_rec.workorder_id;
3291 p5_a16 := ddp_warranty_entl_rec.osp_order_line_id;
3292 p5_a17 := ddp_warranty_entl_rec.warranty_labour_capture;
3293 p5_a18 := ddp_warranty_entl_rec.warranty_mtl_capture;
3294 p5_a19 := ddp_warranty_entl_rec.order_claim_amount;
3295 p5_a20 := ddp_warranty_entl_rec.attribute_category;
3296 p5_a21 := ddp_warranty_entl_rec.attribute1;
3297 p5_a22 := ddp_warranty_entl_rec.attribute2;
3298 p5_a23 := ddp_warranty_entl_rec.attribute3;
3299 p5_a24 := ddp_warranty_entl_rec.attribute4;
3300 p5_a25 := ddp_warranty_entl_rec.attribute5;
3301 p5_a26 := ddp_warranty_entl_rec.attribute6;
3302 p5_a27 := ddp_warranty_entl_rec.attribute7;
3303 p5_a28 := ddp_warranty_entl_rec.attribute8;
3304 p5_a29 := ddp_warranty_entl_rec.attribute9;
3305 p5_a30 := ddp_warranty_entl_rec.attribute10;
3306 p5_a31 := ddp_warranty_entl_rec.attribute11;
3307 p5_a32 := ddp_warranty_entl_rec.attribute12;
3308 p5_a33 := ddp_warranty_entl_rec.attribute13;
3309 p5_a34 := ddp_warranty_entl_rec.attribute14;
3310 p5_a35 := ddp_warranty_entl_rec.attribute15;
3311
3312
3313
3314
3315 end;
3316
3317 procedure update_wo_aog_status(p_api_version NUMBER
3318 , p_init_msg_list VARCHAR2
3319 , p_commit VARCHAR2
3320 , p3_a0 JTF_NUMBER_TABLE
3321 , p3_a1 JTF_NUMBER_TABLE
3322 , x_return_status out nocopy VARCHAR2
3323 , x_msg_count out nocopy NUMBER
3324 , x_msg_data out nocopy VARCHAR2
3325 )
3326
3327 as
3328 ddp_workorder_id_tbl ahl_prd_workorder_pvt.workorder_id_tbl_type;
3329 ddindx binary_integer; indx binary_integer;
3330 begin
3331
3332 -- copy data to the local IN or IN-OUT args, if any
3333
3334
3335
3336 ahl_prd_workorder_pvt_w.rosetta_table_copy_in_p23(ddp_workorder_id_tbl, p3_a0
3337 , p3_a1
3338 );
3339
3340
3341
3342
3343 -- here's the delegated call to the old PL/SQL routine
3344 ahl_prd_workorder_pvt.update_wo_aog_status(p_api_version,
3345 p_init_msg_list,
3346 p_commit,
3347 ddp_workorder_id_tbl,
3348 x_return_status,
3349 x_msg_count,
3350 x_msg_data);
3351
3352 -- copy data back from the local variables to OUT or IN-OUT args, if any
3353
3354
3355
3356
3357
3358
3359 end;
3360
3361 end ahl_prd_workorder_pvt_w;