[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.4.12010000.2 2008/12/15 01:47:22 sracha ship $ */
3 procedure rosetta_table_copy_in_p1(t out nocopy ahl_prd_workorder_pvt.prd_workoper_tbl, a0 JTF_NUMBER_TABLE
4 , a1 JTF_NUMBER_TABLE
5 , a2 JTF_NUMBER_TABLE
6 , a3 JTF_VARCHAR2_TABLE_500
7 , a4 JTF_NUMBER_TABLE
8 , a5 JTF_NUMBER_TABLE
9 , a6 JTF_NUMBER_TABLE
10 , a7 JTF_NUMBER_TABLE
11 , a8 JTF_DATE_TABLE
12 , a9 JTF_NUMBER_TABLE
13 , a10 JTF_DATE_TABLE
14 , a11 JTF_NUMBER_TABLE
15 , a12 JTF_NUMBER_TABLE
16 , a13 JTF_NUMBER_TABLE
17 , a14 JTF_VARCHAR2_TABLE_300
18 , a15 JTF_VARCHAR2_TABLE_100
19 , a16 JTF_VARCHAR2_TABLE_100
20 , a17 JTF_NUMBER_TABLE
21 , a18 JTF_VARCHAR2_TABLE_500
22 , a19 JTF_VARCHAR2_TABLE_100
23 , a20 JTF_VARCHAR2_TABLE_100
24 , a21 JTF_VARCHAR2_TABLE_100
25 , a22 JTF_NUMBER_TABLE
26 , a23 JTF_NUMBER_TABLE
27 , a24 JTF_DATE_TABLE
28 , a25 JTF_NUMBER_TABLE
29 , a26 JTF_NUMBER_TABLE
30 , a27 JTF_DATE_TABLE
31 , a28 JTF_NUMBER_TABLE
32 , a29 JTF_NUMBER_TABLE
33 , a30 JTF_DATE_TABLE
34 , a31 JTF_NUMBER_TABLE
35 , a32 JTF_NUMBER_TABLE
36 , a33 JTF_DATE_TABLE
37 , a34 JTF_NUMBER_TABLE
38 , a35 JTF_NUMBER_TABLE
39 , a36 JTF_NUMBER_TABLE
40 , a37 JTF_NUMBER_TABLE
41 , a38 JTF_VARCHAR2_TABLE_100
42 , a39 JTF_NUMBER_TABLE
43 , a40 JTF_VARCHAR2_TABLE_100
44 , a41 JTF_VARCHAR2_TABLE_200
45 , a42 JTF_VARCHAR2_TABLE_200
46 , a43 JTF_VARCHAR2_TABLE_200
47 , a44 JTF_VARCHAR2_TABLE_200
48 , a45 JTF_VARCHAR2_TABLE_200
49 , a46 JTF_VARCHAR2_TABLE_200
50 , a47 JTF_VARCHAR2_TABLE_200
51 , a48 JTF_VARCHAR2_TABLE_200
52 , a49 JTF_VARCHAR2_TABLE_200
53 , a50 JTF_VARCHAR2_TABLE_200
54 , a51 JTF_VARCHAR2_TABLE_200
55 , a52 JTF_VARCHAR2_TABLE_200
56 , a53 JTF_VARCHAR2_TABLE_200
57 , a54 JTF_VARCHAR2_TABLE_200
58 , a55 JTF_VARCHAR2_TABLE_200
59 , a56 JTF_VARCHAR2_TABLE_100
60 ) as
61 ddindx binary_integer; indx binary_integer;
62 begin
63 if a0 is not null and a0.count > 0 then
64 if a0.count > 0 then
65 indx := a0.first;
66 ddindx := 1;
67 while true loop
68 t(ddindx).workorder_operation_id := a0(indx);
69 t(ddindx).organization_id := a1(indx);
70 t(ddindx).operation_sequence_num := a2(indx);
71 t(ddindx).operation_description := a3(indx);
72 t(ddindx).workorder_id := a4(indx);
73 t(ddindx).wip_entity_id := a5(indx);
74 t(ddindx).route_id := a6(indx);
75 t(ddindx).object_version_number := a7(indx);
76 t(ddindx).last_update_date := a8(indx);
77 t(ddindx).last_updated_by := a9(indx);
78 t(ddindx).creation_date := a10(indx);
79 t(ddindx).created_by := a11(indx);
80 t(ddindx).last_update_login := a12(indx);
81 t(ddindx).department_id := a13(indx);
82 t(ddindx).department_name := a14(indx);
83 t(ddindx).status_code := a15(indx);
84 t(ddindx).status_meaning := a16(indx);
85 t(ddindx).operation_id := a17(indx);
86 t(ddindx).operation_code := a18(indx);
87 t(ddindx).operation_type_code := a19(indx);
88 t(ddindx).operation_type := a20(indx);
89 t(ddindx).replenish := a21(indx);
90 t(ddindx).minimum_transfer_quantity := a22(indx);
91 t(ddindx).count_point_type := a23(indx);
92 t(ddindx).scheduled_start_date := a24(indx);
93 t(ddindx).scheduled_start_hr := a25(indx);
94 t(ddindx).scheduled_start_mi := a26(indx);
95 t(ddindx).scheduled_end_date := a27(indx);
96 t(ddindx).scheduled_end_hr := a28(indx);
97 t(ddindx).scheduled_end_mi := a29(indx);
98 t(ddindx).actual_start_date := a30(indx);
99 t(ddindx).actual_start_hr := a31(indx);
100 t(ddindx).actual_start_mi := a32(indx);
101 t(ddindx).actual_end_date := a33(indx);
102 t(ddindx).actual_end_hr := a34(indx);
103 t(ddindx).actual_end_mi := a35(indx);
104 t(ddindx).plan_id := a36(indx);
105 t(ddindx).collection_id := a37(indx);
106 t(ddindx).propagate_flag := a38(indx);
107 t(ddindx).security_group_id := a39(indx);
108 t(ddindx).attribute_category := a40(indx);
109 t(ddindx).attribute1 := a41(indx);
110 t(ddindx).attribute2 := a42(indx);
111 t(ddindx).attribute3 := a43(indx);
112 t(ddindx).attribute4 := a44(indx);
113 t(ddindx).attribute5 := a45(indx);
114 t(ddindx).attribute6 := a46(indx);
115 t(ddindx).attribute7 := a47(indx);
116 t(ddindx).attribute8 := a48(indx);
117 t(ddindx).attribute9 := a49(indx);
118 t(ddindx).attribute10 := a50(indx);
119 t(ddindx).attribute11 := a51(indx);
120 t(ddindx).attribute12 := a52(indx);
121 t(ddindx).attribute13 := a53(indx);
122 t(ddindx).attribute14 := a54(indx);
123 t(ddindx).attribute15 := a55(indx);
124 t(ddindx).dml_operation := a56(indx);
125 ddindx := ddindx+1;
126 if a0.last =indx
127 then exit;
128 end if;
129 indx := a0.next(indx);
130 end loop;
131 end if;
132 end if;
133 end rosetta_table_copy_in_p1;
134 procedure rosetta_table_copy_out_p1(t ahl_prd_workorder_pvt.prd_workoper_tbl, a0 out nocopy JTF_NUMBER_TABLE
135 , a1 out nocopy JTF_NUMBER_TABLE
136 , a2 out nocopy JTF_NUMBER_TABLE
137 , a3 out nocopy JTF_VARCHAR2_TABLE_500
138 , a4 out nocopy JTF_NUMBER_TABLE
139 , a5 out nocopy JTF_NUMBER_TABLE
140 , a6 out nocopy JTF_NUMBER_TABLE
141 , a7 out nocopy JTF_NUMBER_TABLE
142 , a8 out nocopy JTF_DATE_TABLE
143 , a9 out nocopy JTF_NUMBER_TABLE
144 , a10 out nocopy JTF_DATE_TABLE
145 , a11 out nocopy JTF_NUMBER_TABLE
146 , a12 out nocopy JTF_NUMBER_TABLE
147 , a13 out nocopy JTF_NUMBER_TABLE
148 , a14 out nocopy JTF_VARCHAR2_TABLE_300
149 , a15 out nocopy JTF_VARCHAR2_TABLE_100
150 , a16 out nocopy JTF_VARCHAR2_TABLE_100
151 , a17 out nocopy JTF_NUMBER_TABLE
152 , a18 out nocopy JTF_VARCHAR2_TABLE_500
153 , a19 out nocopy JTF_VARCHAR2_TABLE_100
154 , a20 out nocopy JTF_VARCHAR2_TABLE_100
155 , a21 out nocopy JTF_VARCHAR2_TABLE_100
156 , a22 out nocopy JTF_NUMBER_TABLE
157 , a23 out nocopy JTF_NUMBER_TABLE
158 , a24 out nocopy JTF_DATE_TABLE
159 , a25 out nocopy JTF_NUMBER_TABLE
160 , a26 out nocopy JTF_NUMBER_TABLE
161 , a27 out nocopy JTF_DATE_TABLE
162 , a28 out nocopy JTF_NUMBER_TABLE
163 , a29 out nocopy JTF_NUMBER_TABLE
164 , a30 out nocopy JTF_DATE_TABLE
165 , a31 out nocopy JTF_NUMBER_TABLE
166 , a32 out nocopy JTF_NUMBER_TABLE
167 , a33 out nocopy JTF_DATE_TABLE
168 , a34 out nocopy JTF_NUMBER_TABLE
169 , a35 out nocopy JTF_NUMBER_TABLE
170 , a36 out nocopy JTF_NUMBER_TABLE
171 , a37 out nocopy JTF_NUMBER_TABLE
172 , a38 out nocopy JTF_VARCHAR2_TABLE_100
173 , a39 out nocopy JTF_NUMBER_TABLE
174 , a40 out nocopy JTF_VARCHAR2_TABLE_100
175 , a41 out nocopy JTF_VARCHAR2_TABLE_200
176 , a42 out nocopy JTF_VARCHAR2_TABLE_200
177 , a43 out nocopy JTF_VARCHAR2_TABLE_200
178 , a44 out nocopy JTF_VARCHAR2_TABLE_200
179 , a45 out nocopy JTF_VARCHAR2_TABLE_200
180 , a46 out nocopy JTF_VARCHAR2_TABLE_200
181 , a47 out nocopy JTF_VARCHAR2_TABLE_200
182 , a48 out nocopy JTF_VARCHAR2_TABLE_200
183 , a49 out nocopy JTF_VARCHAR2_TABLE_200
184 , a50 out nocopy JTF_VARCHAR2_TABLE_200
185 , a51 out nocopy JTF_VARCHAR2_TABLE_200
186 , a52 out nocopy JTF_VARCHAR2_TABLE_200
187 , a53 out nocopy JTF_VARCHAR2_TABLE_200
188 , a54 out nocopy JTF_VARCHAR2_TABLE_200
189 , a55 out nocopy JTF_VARCHAR2_TABLE_200
190 , a56 out nocopy JTF_VARCHAR2_TABLE_100
191 ) as
192 ddindx binary_integer; indx binary_integer;
193 begin
194 if t is null or t.count = 0 then
195 a0 := JTF_NUMBER_TABLE();
196 a1 := JTF_NUMBER_TABLE();
197 a2 := JTF_NUMBER_TABLE();
198 a3 := JTF_VARCHAR2_TABLE_500();
199 a4 := JTF_NUMBER_TABLE();
200 a5 := JTF_NUMBER_TABLE();
201 a6 := JTF_NUMBER_TABLE();
202 a7 := JTF_NUMBER_TABLE();
203 a8 := JTF_DATE_TABLE();
204 a9 := JTF_NUMBER_TABLE();
205 a10 := JTF_DATE_TABLE();
206 a11 := JTF_NUMBER_TABLE();
207 a12 := JTF_NUMBER_TABLE();
208 a13 := JTF_NUMBER_TABLE();
209 a14 := JTF_VARCHAR2_TABLE_300();
210 a15 := JTF_VARCHAR2_TABLE_100();
211 a16 := JTF_VARCHAR2_TABLE_100();
212 a17 := JTF_NUMBER_TABLE();
213 a18 := JTF_VARCHAR2_TABLE_500();
214 a19 := JTF_VARCHAR2_TABLE_100();
215 a20 := JTF_VARCHAR2_TABLE_100();
216 a21 := JTF_VARCHAR2_TABLE_100();
217 a22 := JTF_NUMBER_TABLE();
218 a23 := JTF_NUMBER_TABLE();
219 a24 := JTF_DATE_TABLE();
220 a25 := JTF_NUMBER_TABLE();
221 a26 := JTF_NUMBER_TABLE();
222 a27 := JTF_DATE_TABLE();
223 a28 := JTF_NUMBER_TABLE();
224 a29 := JTF_NUMBER_TABLE();
225 a30 := JTF_DATE_TABLE();
226 a31 := JTF_NUMBER_TABLE();
227 a32 := JTF_NUMBER_TABLE();
228 a33 := JTF_DATE_TABLE();
229 a34 := JTF_NUMBER_TABLE();
230 a35 := JTF_NUMBER_TABLE();
231 a36 := JTF_NUMBER_TABLE();
232 a37 := JTF_NUMBER_TABLE();
233 a38 := JTF_VARCHAR2_TABLE_100();
234 a39 := JTF_NUMBER_TABLE();
235 a40 := JTF_VARCHAR2_TABLE_100();
236 a41 := JTF_VARCHAR2_TABLE_200();
237 a42 := JTF_VARCHAR2_TABLE_200();
238 a43 := JTF_VARCHAR2_TABLE_200();
239 a44 := JTF_VARCHAR2_TABLE_200();
240 a45 := JTF_VARCHAR2_TABLE_200();
241 a46 := JTF_VARCHAR2_TABLE_200();
242 a47 := JTF_VARCHAR2_TABLE_200();
243 a48 := JTF_VARCHAR2_TABLE_200();
244 a49 := JTF_VARCHAR2_TABLE_200();
245 a50 := JTF_VARCHAR2_TABLE_200();
246 a51 := JTF_VARCHAR2_TABLE_200();
247 a52 := JTF_VARCHAR2_TABLE_200();
248 a53 := JTF_VARCHAR2_TABLE_200();
249 a54 := JTF_VARCHAR2_TABLE_200();
250 a55 := JTF_VARCHAR2_TABLE_200();
251 a56 := JTF_VARCHAR2_TABLE_100();
252 else
253 a0 := JTF_NUMBER_TABLE();
254 a1 := JTF_NUMBER_TABLE();
255 a2 := JTF_NUMBER_TABLE();
256 a3 := JTF_VARCHAR2_TABLE_500();
257 a4 := JTF_NUMBER_TABLE();
258 a5 := JTF_NUMBER_TABLE();
259 a6 := JTF_NUMBER_TABLE();
260 a7 := JTF_NUMBER_TABLE();
261 a8 := JTF_DATE_TABLE();
262 a9 := JTF_NUMBER_TABLE();
263 a10 := JTF_DATE_TABLE();
264 a11 := JTF_NUMBER_TABLE();
265 a12 := JTF_NUMBER_TABLE();
266 a13 := JTF_NUMBER_TABLE();
267 a14 := JTF_VARCHAR2_TABLE_300();
268 a15 := JTF_VARCHAR2_TABLE_100();
269 a16 := JTF_VARCHAR2_TABLE_100();
270 a17 := JTF_NUMBER_TABLE();
271 a18 := JTF_VARCHAR2_TABLE_500();
272 a19 := JTF_VARCHAR2_TABLE_100();
273 a20 := JTF_VARCHAR2_TABLE_100();
274 a21 := JTF_VARCHAR2_TABLE_100();
275 a22 := JTF_NUMBER_TABLE();
276 a23 := JTF_NUMBER_TABLE();
277 a24 := JTF_DATE_TABLE();
278 a25 := JTF_NUMBER_TABLE();
279 a26 := JTF_NUMBER_TABLE();
280 a27 := JTF_DATE_TABLE();
281 a28 := JTF_NUMBER_TABLE();
282 a29 := JTF_NUMBER_TABLE();
283 a30 := JTF_DATE_TABLE();
284 a31 := JTF_NUMBER_TABLE();
285 a32 := JTF_NUMBER_TABLE();
286 a33 := JTF_DATE_TABLE();
287 a34 := JTF_NUMBER_TABLE();
288 a35 := JTF_NUMBER_TABLE();
289 a36 := JTF_NUMBER_TABLE();
290 a37 := JTF_NUMBER_TABLE();
291 a38 := JTF_VARCHAR2_TABLE_100();
292 a39 := JTF_NUMBER_TABLE();
293 a40 := JTF_VARCHAR2_TABLE_100();
294 a41 := JTF_VARCHAR2_TABLE_200();
295 a42 := JTF_VARCHAR2_TABLE_200();
296 a43 := JTF_VARCHAR2_TABLE_200();
297 a44 := JTF_VARCHAR2_TABLE_200();
298 a45 := JTF_VARCHAR2_TABLE_200();
299 a46 := JTF_VARCHAR2_TABLE_200();
300 a47 := JTF_VARCHAR2_TABLE_200();
301 a48 := JTF_VARCHAR2_TABLE_200();
302 a49 := JTF_VARCHAR2_TABLE_200();
303 a50 := JTF_VARCHAR2_TABLE_200();
304 a51 := JTF_VARCHAR2_TABLE_200();
305 a52 := JTF_VARCHAR2_TABLE_200();
306 a53 := JTF_VARCHAR2_TABLE_200();
307 a54 := JTF_VARCHAR2_TABLE_200();
308 a55 := JTF_VARCHAR2_TABLE_200();
309 a56 := JTF_VARCHAR2_TABLE_100();
310 if t.count > 0 then
311 a0.extend(t.count);
312 a1.extend(t.count);
313 a2.extend(t.count);
314 a3.extend(t.count);
315 a4.extend(t.count);
316 a5.extend(t.count);
317 a6.extend(t.count);
318 a7.extend(t.count);
319 a8.extend(t.count);
320 a9.extend(t.count);
321 a10.extend(t.count);
322 a11.extend(t.count);
323 a12.extend(t.count);
324 a13.extend(t.count);
325 a14.extend(t.count);
326 a15.extend(t.count);
327 a16.extend(t.count);
328 a17.extend(t.count);
329 a18.extend(t.count);
330 a19.extend(t.count);
331 a20.extend(t.count);
332 a21.extend(t.count);
333 a22.extend(t.count);
334 a23.extend(t.count);
338 a27.extend(t.count);
335 a24.extend(t.count);
336 a25.extend(t.count);
337 a26.extend(t.count);
339 a28.extend(t.count);
340 a29.extend(t.count);
341 a30.extend(t.count);
342 a31.extend(t.count);
343 a32.extend(t.count);
344 a33.extend(t.count);
345 a34.extend(t.count);
346 a35.extend(t.count);
347 a36.extend(t.count);
348 a37.extend(t.count);
349 a38.extend(t.count);
350 a39.extend(t.count);
351 a40.extend(t.count);
352 a41.extend(t.count);
353 a42.extend(t.count);
354 a43.extend(t.count);
355 a44.extend(t.count);
356 a45.extend(t.count);
357 a46.extend(t.count);
358 a47.extend(t.count);
359 a48.extend(t.count);
360 a49.extend(t.count);
361 a50.extend(t.count);
362 a51.extend(t.count);
363 a52.extend(t.count);
364 a53.extend(t.count);
365 a54.extend(t.count);
366 a55.extend(t.count);
367 a56.extend(t.count);
368 ddindx := t.first;
369 indx := 1;
370 while true loop
371 a0(indx) := t(ddindx).workorder_operation_id;
372 a1(indx) := t(ddindx).organization_id;
373 a2(indx) := t(ddindx).operation_sequence_num;
374 a3(indx) := t(ddindx).operation_description;
375 a4(indx) := t(ddindx).workorder_id;
376 a5(indx) := t(ddindx).wip_entity_id;
377 a6(indx) := t(ddindx).route_id;
378 a7(indx) := t(ddindx).object_version_number;
379 a8(indx) := t(ddindx).last_update_date;
380 a9(indx) := t(ddindx).last_updated_by;
381 a10(indx) := t(ddindx).creation_date;
382 a11(indx) := t(ddindx).created_by;
383 a12(indx) := t(ddindx).last_update_login;
384 a13(indx) := t(ddindx).department_id;
385 a14(indx) := t(ddindx).department_name;
386 a15(indx) := t(ddindx).status_code;
387 a16(indx) := t(ddindx).status_meaning;
388 a17(indx) := t(ddindx).operation_id;
389 a18(indx) := t(ddindx).operation_code;
390 a19(indx) := t(ddindx).operation_type_code;
391 a20(indx) := t(ddindx).operation_type;
392 a21(indx) := t(ddindx).replenish;
393 a22(indx) := t(ddindx).minimum_transfer_quantity;
394 a23(indx) := t(ddindx).count_point_type;
395 a24(indx) := t(ddindx).scheduled_start_date;
396 a25(indx) := t(ddindx).scheduled_start_hr;
397 a26(indx) := t(ddindx).scheduled_start_mi;
398 a27(indx) := t(ddindx).scheduled_end_date;
399 a28(indx) := t(ddindx).scheduled_end_hr;
400 a29(indx) := t(ddindx).scheduled_end_mi;
401 a30(indx) := t(ddindx).actual_start_date;
402 a31(indx) := t(ddindx).actual_start_hr;
403 a32(indx) := t(ddindx).actual_start_mi;
404 a33(indx) := t(ddindx).actual_end_date;
405 a34(indx) := t(ddindx).actual_end_hr;
406 a35(indx) := t(ddindx).actual_end_mi;
407 a36(indx) := t(ddindx).plan_id;
408 a37(indx) := t(ddindx).collection_id;
409 a38(indx) := t(ddindx).propagate_flag;
410 a39(indx) := t(ddindx).security_group_id;
411 a40(indx) := t(ddindx).attribute_category;
412 a41(indx) := t(ddindx).attribute1;
413 a42(indx) := t(ddindx).attribute2;
414 a43(indx) := t(ddindx).attribute3;
415 a44(indx) := t(ddindx).attribute4;
416 a45(indx) := t(ddindx).attribute5;
417 a46(indx) := t(ddindx).attribute6;
418 a47(indx) := t(ddindx).attribute7;
419 a48(indx) := t(ddindx).attribute8;
420 a49(indx) := t(ddindx).attribute9;
421 a50(indx) := t(ddindx).attribute10;
422 a51(indx) := t(ddindx).attribute11;
423 a52(indx) := t(ddindx).attribute12;
424 a53(indx) := t(ddindx).attribute13;
425 a54(indx) := t(ddindx).attribute14;
426 a55(indx) := t(ddindx).attribute15;
427 a56(indx) := t(ddindx).dml_operation;
428 indx := indx+1;
429 if t.last =ddindx
430 then exit;
431 end if;
432 ddindx := t.next(ddindx);
433 end loop;
434 end if;
435 end if;
436 end rosetta_table_copy_out_p1;
437
438 procedure rosetta_table_copy_in_p3(t out nocopy ahl_prd_workorder_pvt.prd_workorder_tbl, a0 JTF_NUMBER_TABLE
439 , a1 JTF_NUMBER_TABLE
440 , a2 JTF_NUMBER_TABLE
441 , a3 JTF_NUMBER_TABLE
442 , a4 JTF_NUMBER_TABLE
443 , a5 JTF_VARCHAR2_TABLE_100
444 , a6 JTF_VARCHAR2_TABLE_300
445 , a7 JTF_NUMBER_TABLE
446 , a8 JTF_VARCHAR2_TABLE_100
447 , a9 JTF_VARCHAR2_TABLE_100
448 , a10 JTF_VARCHAR2_TABLE_300
449 , a11 JTF_NUMBER_TABLE
450 , a12 JTF_VARCHAR2_TABLE_100
451 , a13 JTF_VARCHAR2_TABLE_100
452 , a14 JTF_VARCHAR2_TABLE_100
453 , a15 JTF_DATE_TABLE
454 , a16 JTF_NUMBER_TABLE
455 , a17 JTF_NUMBER_TABLE
456 , a18 JTF_DATE_TABLE
457 , a19 JTF_NUMBER_TABLE
458 , a20 JTF_NUMBER_TABLE
459 , a21 JTF_DATE_TABLE
460 , a22 JTF_NUMBER_TABLE
461 , a23 JTF_NUMBER_TABLE
462 , a24 JTF_DATE_TABLE
463 , a25 JTF_NUMBER_TABLE
464 , a26 JTF_NUMBER_TABLE
465 , a27 JTF_NUMBER_TABLE
469 , a31 JTF_VARCHAR2_TABLE_100
466 , a28 JTF_NUMBER_TABLE
467 , a29 JTF_VARCHAR2_TABLE_100
468 , a30 JTF_VARCHAR2_TABLE_100
470 , a32 JTF_VARCHAR2_TABLE_300
471 , a33 JTF_VARCHAR2_TABLE_100
472 , a34 JTF_VARCHAR2_TABLE_100
473 , a35 JTF_VARCHAR2_TABLE_100
474 , a36 JTF_NUMBER_TABLE
475 , a37 JTF_VARCHAR2_TABLE_300
476 , a38 JTF_NUMBER_TABLE
477 , a39 JTF_VARCHAR2_TABLE_100
478 , a40 JTF_NUMBER_TABLE
479 , a41 JTF_VARCHAR2_TABLE_100
480 , a42 JTF_NUMBER_TABLE
481 , a43 JTF_NUMBER_TABLE
482 , a44 JTF_VARCHAR2_TABLE_100
483 , a45 JTF_NUMBER_TABLE
484 , a46 JTF_NUMBER_TABLE
485 , a47 JTF_NUMBER_TABLE
486 , a48 JTF_VARCHAR2_TABLE_100
487 , a49 JTF_NUMBER_TABLE
488 , a50 JTF_NUMBER_TABLE
489 , a51 JTF_VARCHAR2_TABLE_100
490 , a52 JTF_VARCHAR2_TABLE_100
491 , a53 JTF_NUMBER_TABLE
492 , a54 JTF_NUMBER_TABLE
493 , a55 JTF_VARCHAR2_TABLE_300
494 , a56 JTF_VARCHAR2_TABLE_100
495 , a57 JTF_VARCHAR2_TABLE_100
496 , a58 JTF_NUMBER_TABLE
497 , a59 JTF_NUMBER_TABLE
498 , a60 JTF_NUMBER_TABLE
499 , a61 JTF_NUMBER_TABLE
500 , a62 JTF_NUMBER_TABLE
501 , a63 JTF_NUMBER_TABLE
502 , a64 JTF_NUMBER_TABLE
503 , a65 JTF_NUMBER_TABLE
504 , a66 JTF_VARCHAR2_TABLE_100
505 , a67 JTF_VARCHAR2_TABLE_100
506 , a68 JTF_NUMBER_TABLE
507 , a69 JTF_VARCHAR2_TABLE_100
508 , a70 JTF_NUMBER_TABLE
509 , a71 JTF_NUMBER_TABLE
510 , a72 JTF_NUMBER_TABLE
511 , a73 JTF_NUMBER_TABLE
512 , a74 JTF_VARCHAR2_TABLE_100
513 , a75 JTF_NUMBER_TABLE
514 , a76 JTF_NUMBER_TABLE
515 , a77 JTF_VARCHAR2_TABLE_100
516 , a78 JTF_VARCHAR2_TABLE_200
517 , a79 JTF_VARCHAR2_TABLE_200
518 , a80 JTF_VARCHAR2_TABLE_200
519 , a81 JTF_VARCHAR2_TABLE_200
520 , a82 JTF_VARCHAR2_TABLE_200
521 , a83 JTF_VARCHAR2_TABLE_200
522 , a84 JTF_VARCHAR2_TABLE_200
523 , a85 JTF_VARCHAR2_TABLE_200
524 , a86 JTF_VARCHAR2_TABLE_200
525 , a87 JTF_VARCHAR2_TABLE_200
526 , a88 JTF_VARCHAR2_TABLE_200
527 , a89 JTF_VARCHAR2_TABLE_200
528 , a90 JTF_VARCHAR2_TABLE_200
529 , a91 JTF_VARCHAR2_TABLE_200
530 , a92 JTF_VARCHAR2_TABLE_200
531 , a93 JTF_DATE_TABLE
532 , a94 JTF_NUMBER_TABLE
533 , a95 JTF_DATE_TABLE
534 , a96 JTF_NUMBER_TABLE
535 , a97 JTF_NUMBER_TABLE
536 , a98 JTF_VARCHAR2_TABLE_100
537 , a99 JTF_VARCHAR2_TABLE_100
538 , a100 JTF_VARCHAR2_TABLE_100
539 ) as
540 ddindx binary_integer; indx binary_integer;
541 begin
542 if a0 is not null and a0.count > 0 then
543 if a0.count > 0 then
544 indx := a0.first;
545 ddindx := 1;
546 while true loop
547 t(ddindx).batch_id := a0(indx);
548 t(ddindx).header_id := a1(indx);
549 t(ddindx).workorder_id := a2(indx);
550 t(ddindx).wip_entity_id := a3(indx);
551 t(ddindx).object_version_number := a4(indx);
552 t(ddindx).job_number := a5(indx);
553 t(ddindx).job_description := a6(indx);
554 t(ddindx).organization_id := a7(indx);
555 t(ddindx).organization_name := a8(indx);
556 t(ddindx).organization_code := a9(indx);
557 t(ddindx).department_name := a10(indx);
558 t(ddindx).department_id := a11(indx);
559 t(ddindx).department_class_code := a12(indx);
560 t(ddindx).status_code := a13(indx);
561 t(ddindx).status_meaning := a14(indx);
562 t(ddindx).scheduled_start_date := a15(indx);
563 t(ddindx).scheduled_start_hr := a16(indx);
564 t(ddindx).scheduled_start_mi := a17(indx);
565 t(ddindx).scheduled_end_date := a18(indx);
566 t(ddindx).scheduled_end_hr := a19(indx);
567 t(ddindx).scheduled_end_mi := a20(indx);
568 t(ddindx).actual_start_date := a21(indx);
569 t(ddindx).actual_start_hr := a22(indx);
570 t(ddindx).actual_start_mi := a23(indx);
571 t(ddindx).actual_end_date := a24(indx);
572 t(ddindx).actual_end_hr := a25(indx);
573 t(ddindx).actual_end_mi := a26(indx);
574 t(ddindx).inventory_item_id := a27(indx);
575 t(ddindx).item_instance_id := a28(indx);
576 t(ddindx).unit_name := a29(indx);
577 t(ddindx).item_instance_number := a30(indx);
578 t(ddindx).wo_part_number := a31(indx);
579 t(ddindx).item_description := a32(indx);
580 t(ddindx).serial_number := a33(indx);
581 t(ddindx).item_instance_uom := a34(indx);
582 t(ddindx).completion_subinventory := a35(indx);
583 t(ddindx).completion_locator_id := a36(indx);
584 t(ddindx).completion_locator_name := a37(indx);
585 t(ddindx).wip_supply_type := a38(indx);
586 t(ddindx).wip_supply_meaning := a39(indx);
587 t(ddindx).firm_planned_flag := a40(indx);
588 t(ddindx).master_workorder_flag := a41(indx);
589 t(ddindx).visit_id := a42(indx);
590 t(ddindx).visit_number := a43(indx);
591 t(ddindx).visit_name := a44(indx);
592 t(ddindx).visit_task_id := a45(indx);
593 t(ddindx).mr_header_id := a46(indx);
597 t(ddindx).route_id := a50(indx);
594 t(ddindx).visit_task_number := a47(indx);
595 t(ddindx).mr_title := a48(indx);
596 t(ddindx).mr_route_id := a49(indx);
598 t(ddindx).confirm_failure_flag := a51(indx);
599 t(ddindx).propagate_flag := a52(indx);
600 t(ddindx).service_item_id := a53(indx);
601 t(ddindx).service_item_org_id := a54(indx);
602 t(ddindx).service_item_description := a55(indx);
603 t(ddindx).service_item_number := a56(indx);
604 t(ddindx).service_item_uom := a57(indx);
605 t(ddindx).project_id := a58(indx);
606 t(ddindx).project_task_id := a59(indx);
607 t(ddindx).quantity := a60(indx);
608 t(ddindx).mrp_quantity := a61(indx);
609 t(ddindx).incident_id := a62(indx);
610 t(ddindx).origination_task_id := a63(indx);
611 t(ddindx).parent_id := a64(indx);
612 t(ddindx).task_motive_status_id := a65(indx);
613 t(ddindx).allow_explosion := a66(indx);
614 t(ddindx).class_code := a67(indx);
615 t(ddindx).job_priority := a68(indx);
616 t(ddindx).job_priority_meaning := a69(indx);
617 t(ddindx).confirmed_failure_flag := a70(indx);
618 t(ddindx).unit_effectivity_id := a71(indx);
619 t(ddindx).plan_id := a72(indx);
620 t(ddindx).collection_id := a73(indx);
621 t(ddindx).sub_inventory := a74(indx);
622 t(ddindx).locator_id := a75(indx);
623 t(ddindx).security_group_id := a76(indx);
624 t(ddindx).attribute_category := a77(indx);
625 t(ddindx).attribute1 := a78(indx);
626 t(ddindx).attribute2 := a79(indx);
627 t(ddindx).attribute3 := a80(indx);
628 t(ddindx).attribute4 := a81(indx);
629 t(ddindx).attribute5 := a82(indx);
630 t(ddindx).attribute6 := a83(indx);
631 t(ddindx).attribute7 := a84(indx);
632 t(ddindx).attribute8 := a85(indx);
633 t(ddindx).attribute9 := a86(indx);
634 t(ddindx).attribute10 := a87(indx);
635 t(ddindx).attribute11 := a88(indx);
636 t(ddindx).attribute12 := a89(indx);
637 t(ddindx).attribute13 := a90(indx);
638 t(ddindx).attribute14 := a91(indx);
639 t(ddindx).attribute15 := a92(indx);
640 t(ddindx).last_update_date := a93(indx);
641 t(ddindx).last_updated_by := a94(indx);
642 t(ddindx).creation_date := a95(indx);
643 t(ddindx).created_by := a96(indx);
644 t(ddindx).last_update_login := a97(indx);
645 t(ddindx).dml_operation := a98(indx);
646 t(ddindx).hold_reason_code := a99(indx);
647 t(ddindx).hold_reason := a100(indx);
648 ddindx := ddindx+1;
649 if a0.last =indx
650 then exit;
651 end if;
652 indx := a0.next(indx);
653 end loop;
654 end if;
655 end if;
656 end rosetta_table_copy_in_p3;
657 procedure rosetta_table_copy_out_p3(t ahl_prd_workorder_pvt.prd_workorder_tbl, a0 out nocopy JTF_NUMBER_TABLE
658 , a1 out nocopy JTF_NUMBER_TABLE
659 , a2 out nocopy JTF_NUMBER_TABLE
660 , a3 out nocopy JTF_NUMBER_TABLE
661 , a4 out nocopy JTF_NUMBER_TABLE
662 , a5 out nocopy JTF_VARCHAR2_TABLE_100
663 , a6 out nocopy JTF_VARCHAR2_TABLE_300
664 , a7 out nocopy JTF_NUMBER_TABLE
665 , a8 out nocopy JTF_VARCHAR2_TABLE_100
666 , a9 out nocopy JTF_VARCHAR2_TABLE_100
667 , a10 out nocopy JTF_VARCHAR2_TABLE_300
668 , a11 out nocopy JTF_NUMBER_TABLE
669 , a12 out nocopy JTF_VARCHAR2_TABLE_100
670 , a13 out nocopy JTF_VARCHAR2_TABLE_100
671 , a14 out nocopy JTF_VARCHAR2_TABLE_100
672 , a15 out nocopy JTF_DATE_TABLE
673 , a16 out nocopy JTF_NUMBER_TABLE
674 , a17 out nocopy JTF_NUMBER_TABLE
675 , a18 out nocopy JTF_DATE_TABLE
676 , a19 out nocopy JTF_NUMBER_TABLE
677 , a20 out nocopy JTF_NUMBER_TABLE
678 , a21 out nocopy JTF_DATE_TABLE
679 , a22 out nocopy JTF_NUMBER_TABLE
680 , a23 out nocopy JTF_NUMBER_TABLE
681 , a24 out nocopy JTF_DATE_TABLE
682 , a25 out nocopy JTF_NUMBER_TABLE
683 , a26 out nocopy JTF_NUMBER_TABLE
684 , a27 out nocopy JTF_NUMBER_TABLE
685 , a28 out nocopy JTF_NUMBER_TABLE
686 , a29 out nocopy JTF_VARCHAR2_TABLE_100
687 , a30 out nocopy JTF_VARCHAR2_TABLE_100
688 , a31 out nocopy JTF_VARCHAR2_TABLE_100
689 , a32 out nocopy JTF_VARCHAR2_TABLE_300
690 , a33 out nocopy JTF_VARCHAR2_TABLE_100
691 , a34 out nocopy JTF_VARCHAR2_TABLE_100
692 , a35 out nocopy JTF_VARCHAR2_TABLE_100
693 , a36 out nocopy JTF_NUMBER_TABLE
694 , a37 out nocopy JTF_VARCHAR2_TABLE_300
695 , a38 out nocopy JTF_NUMBER_TABLE
696 , a39 out nocopy JTF_VARCHAR2_TABLE_100
697 , a40 out nocopy JTF_NUMBER_TABLE
698 , a41 out nocopy JTF_VARCHAR2_TABLE_100
699 , a42 out nocopy JTF_NUMBER_TABLE
700 , a43 out nocopy JTF_NUMBER_TABLE
701 , a44 out nocopy JTF_VARCHAR2_TABLE_100
702 , a45 out nocopy JTF_NUMBER_TABLE
706 , a49 out nocopy JTF_NUMBER_TABLE
703 , a46 out nocopy JTF_NUMBER_TABLE
704 , a47 out nocopy JTF_NUMBER_TABLE
705 , a48 out nocopy JTF_VARCHAR2_TABLE_100
707 , a50 out nocopy JTF_NUMBER_TABLE
708 , a51 out nocopy JTF_VARCHAR2_TABLE_100
709 , a52 out nocopy JTF_VARCHAR2_TABLE_100
710 , a53 out nocopy JTF_NUMBER_TABLE
711 , a54 out nocopy JTF_NUMBER_TABLE
712 , a55 out nocopy JTF_VARCHAR2_TABLE_300
713 , a56 out nocopy JTF_VARCHAR2_TABLE_100
714 , a57 out nocopy JTF_VARCHAR2_TABLE_100
715 , a58 out nocopy JTF_NUMBER_TABLE
716 , a59 out nocopy JTF_NUMBER_TABLE
717 , a60 out nocopy JTF_NUMBER_TABLE
718 , a61 out nocopy JTF_NUMBER_TABLE
719 , a62 out nocopy JTF_NUMBER_TABLE
720 , a63 out nocopy JTF_NUMBER_TABLE
721 , a64 out nocopy JTF_NUMBER_TABLE
722 , a65 out nocopy JTF_NUMBER_TABLE
723 , a66 out nocopy JTF_VARCHAR2_TABLE_100
724 , a67 out nocopy JTF_VARCHAR2_TABLE_100
725 , a68 out nocopy JTF_NUMBER_TABLE
726 , a69 out nocopy JTF_VARCHAR2_TABLE_100
727 , a70 out nocopy JTF_NUMBER_TABLE
728 , a71 out nocopy JTF_NUMBER_TABLE
729 , a72 out nocopy JTF_NUMBER_TABLE
730 , a73 out nocopy JTF_NUMBER_TABLE
731 , a74 out nocopy JTF_VARCHAR2_TABLE_100
732 , a75 out nocopy JTF_NUMBER_TABLE
733 , a76 out nocopy JTF_NUMBER_TABLE
734 , a77 out nocopy JTF_VARCHAR2_TABLE_100
735 , a78 out nocopy JTF_VARCHAR2_TABLE_200
736 , a79 out nocopy JTF_VARCHAR2_TABLE_200
737 , a80 out nocopy JTF_VARCHAR2_TABLE_200
738 , a81 out nocopy JTF_VARCHAR2_TABLE_200
739 , a82 out nocopy JTF_VARCHAR2_TABLE_200
740 , a83 out nocopy JTF_VARCHAR2_TABLE_200
741 , a84 out nocopy JTF_VARCHAR2_TABLE_200
742 , a85 out nocopy JTF_VARCHAR2_TABLE_200
743 , a86 out nocopy JTF_VARCHAR2_TABLE_200
744 , a87 out nocopy JTF_VARCHAR2_TABLE_200
745 , a88 out nocopy JTF_VARCHAR2_TABLE_200
746 , a89 out nocopy JTF_VARCHAR2_TABLE_200
747 , a90 out nocopy JTF_VARCHAR2_TABLE_200
748 , a91 out nocopy JTF_VARCHAR2_TABLE_200
749 , a92 out nocopy JTF_VARCHAR2_TABLE_200
750 , a93 out nocopy JTF_DATE_TABLE
751 , a94 out nocopy JTF_NUMBER_TABLE
752 , a95 out nocopy JTF_DATE_TABLE
753 , a96 out nocopy JTF_NUMBER_TABLE
754 , a97 out nocopy JTF_NUMBER_TABLE
755 , a98 out nocopy JTF_VARCHAR2_TABLE_100
756 , a99 out nocopy JTF_VARCHAR2_TABLE_100
757 , a100 out nocopy JTF_VARCHAR2_TABLE_100
758 ) as
759 ddindx binary_integer; indx binary_integer;
760 begin
761 if t is null or t.count = 0 then
762 a0 := JTF_NUMBER_TABLE();
763 a1 := JTF_NUMBER_TABLE();
764 a2 := JTF_NUMBER_TABLE();
765 a3 := JTF_NUMBER_TABLE();
766 a4 := JTF_NUMBER_TABLE();
767 a5 := JTF_VARCHAR2_TABLE_100();
768 a6 := JTF_VARCHAR2_TABLE_300();
769 a7 := JTF_NUMBER_TABLE();
770 a8 := JTF_VARCHAR2_TABLE_100();
771 a9 := JTF_VARCHAR2_TABLE_100();
772 a10 := JTF_VARCHAR2_TABLE_300();
773 a11 := JTF_NUMBER_TABLE();
774 a12 := JTF_VARCHAR2_TABLE_100();
775 a13 := JTF_VARCHAR2_TABLE_100();
776 a14 := JTF_VARCHAR2_TABLE_100();
777 a15 := JTF_DATE_TABLE();
778 a16 := JTF_NUMBER_TABLE();
779 a17 := JTF_NUMBER_TABLE();
780 a18 := JTF_DATE_TABLE();
781 a19 := JTF_NUMBER_TABLE();
782 a20 := JTF_NUMBER_TABLE();
783 a21 := JTF_DATE_TABLE();
784 a22 := JTF_NUMBER_TABLE();
785 a23 := JTF_NUMBER_TABLE();
786 a24 := JTF_DATE_TABLE();
787 a25 := JTF_NUMBER_TABLE();
788 a26 := JTF_NUMBER_TABLE();
789 a27 := JTF_NUMBER_TABLE();
790 a28 := JTF_NUMBER_TABLE();
791 a29 := JTF_VARCHAR2_TABLE_100();
792 a30 := JTF_VARCHAR2_TABLE_100();
793 a31 := JTF_VARCHAR2_TABLE_100();
794 a32 := JTF_VARCHAR2_TABLE_300();
795 a33 := JTF_VARCHAR2_TABLE_100();
796 a34 := JTF_VARCHAR2_TABLE_100();
797 a35 := JTF_VARCHAR2_TABLE_100();
798 a36 := JTF_NUMBER_TABLE();
799 a37 := JTF_VARCHAR2_TABLE_300();
800 a38 := JTF_NUMBER_TABLE();
801 a39 := JTF_VARCHAR2_TABLE_100();
802 a40 := JTF_NUMBER_TABLE();
803 a41 := JTF_VARCHAR2_TABLE_100();
804 a42 := JTF_NUMBER_TABLE();
805 a43 := JTF_NUMBER_TABLE();
806 a44 := JTF_VARCHAR2_TABLE_100();
807 a45 := JTF_NUMBER_TABLE();
808 a46 := JTF_NUMBER_TABLE();
809 a47 := JTF_NUMBER_TABLE();
810 a48 := JTF_VARCHAR2_TABLE_100();
811 a49 := JTF_NUMBER_TABLE();
812 a50 := JTF_NUMBER_TABLE();
813 a51 := JTF_VARCHAR2_TABLE_100();
814 a52 := JTF_VARCHAR2_TABLE_100();
815 a53 := JTF_NUMBER_TABLE();
816 a54 := JTF_NUMBER_TABLE();
817 a55 := JTF_VARCHAR2_TABLE_300();
818 a56 := JTF_VARCHAR2_TABLE_100();
819 a57 := JTF_VARCHAR2_TABLE_100();
820 a58 := JTF_NUMBER_TABLE();
821 a59 := JTF_NUMBER_TABLE();
822 a60 := JTF_NUMBER_TABLE();
823 a61 := JTF_NUMBER_TABLE();
824 a62 := JTF_NUMBER_TABLE();
825 a63 := JTF_NUMBER_TABLE();
826 a64 := JTF_NUMBER_TABLE();
827 a65 := JTF_NUMBER_TABLE();
828 a66 := JTF_VARCHAR2_TABLE_100();
829 a67 := JTF_VARCHAR2_TABLE_100();
830 a68 := JTF_NUMBER_TABLE();
831 a69 := JTF_VARCHAR2_TABLE_100();
832 a70 := JTF_NUMBER_TABLE();
833 a71 := JTF_NUMBER_TABLE();
834 a72 := JTF_NUMBER_TABLE();
838 a76 := JTF_NUMBER_TABLE();
835 a73 := JTF_NUMBER_TABLE();
836 a74 := JTF_VARCHAR2_TABLE_100();
837 a75 := JTF_NUMBER_TABLE();
839 a77 := JTF_VARCHAR2_TABLE_100();
840 a78 := JTF_VARCHAR2_TABLE_200();
841 a79 := JTF_VARCHAR2_TABLE_200();
842 a80 := JTF_VARCHAR2_TABLE_200();
843 a81 := JTF_VARCHAR2_TABLE_200();
844 a82 := JTF_VARCHAR2_TABLE_200();
845 a83 := JTF_VARCHAR2_TABLE_200();
846 a84 := JTF_VARCHAR2_TABLE_200();
847 a85 := JTF_VARCHAR2_TABLE_200();
848 a86 := JTF_VARCHAR2_TABLE_200();
849 a87 := JTF_VARCHAR2_TABLE_200();
850 a88 := JTF_VARCHAR2_TABLE_200();
851 a89 := JTF_VARCHAR2_TABLE_200();
852 a90 := JTF_VARCHAR2_TABLE_200();
853 a91 := JTF_VARCHAR2_TABLE_200();
854 a92 := JTF_VARCHAR2_TABLE_200();
855 a93 := JTF_DATE_TABLE();
856 a94 := JTF_NUMBER_TABLE();
857 a95 := JTF_DATE_TABLE();
858 a96 := JTF_NUMBER_TABLE();
859 a97 := JTF_NUMBER_TABLE();
860 a98 := JTF_VARCHAR2_TABLE_100();
861 a99 := JTF_VARCHAR2_TABLE_100();
862 a100 := JTF_VARCHAR2_TABLE_100();
863 else
864 a0 := JTF_NUMBER_TABLE();
865 a1 := JTF_NUMBER_TABLE();
866 a2 := JTF_NUMBER_TABLE();
867 a3 := JTF_NUMBER_TABLE();
868 a4 := JTF_NUMBER_TABLE();
869 a5 := JTF_VARCHAR2_TABLE_100();
870 a6 := JTF_VARCHAR2_TABLE_300();
871 a7 := JTF_NUMBER_TABLE();
872 a8 := JTF_VARCHAR2_TABLE_100();
873 a9 := JTF_VARCHAR2_TABLE_100();
874 a10 := JTF_VARCHAR2_TABLE_300();
875 a11 := JTF_NUMBER_TABLE();
876 a12 := JTF_VARCHAR2_TABLE_100();
877 a13 := JTF_VARCHAR2_TABLE_100();
878 a14 := JTF_VARCHAR2_TABLE_100();
879 a15 := JTF_DATE_TABLE();
880 a16 := JTF_NUMBER_TABLE();
881 a17 := JTF_NUMBER_TABLE();
882 a18 := JTF_DATE_TABLE();
883 a19 := JTF_NUMBER_TABLE();
884 a20 := JTF_NUMBER_TABLE();
885 a21 := JTF_DATE_TABLE();
886 a22 := JTF_NUMBER_TABLE();
887 a23 := JTF_NUMBER_TABLE();
888 a24 := JTF_DATE_TABLE();
889 a25 := JTF_NUMBER_TABLE();
890 a26 := JTF_NUMBER_TABLE();
891 a27 := JTF_NUMBER_TABLE();
892 a28 := JTF_NUMBER_TABLE();
893 a29 := JTF_VARCHAR2_TABLE_100();
894 a30 := JTF_VARCHAR2_TABLE_100();
895 a31 := JTF_VARCHAR2_TABLE_100();
896 a32 := JTF_VARCHAR2_TABLE_300();
897 a33 := JTF_VARCHAR2_TABLE_100();
898 a34 := JTF_VARCHAR2_TABLE_100();
899 a35 := JTF_VARCHAR2_TABLE_100();
900 a36 := JTF_NUMBER_TABLE();
901 a37 := JTF_VARCHAR2_TABLE_300();
902 a38 := JTF_NUMBER_TABLE();
903 a39 := JTF_VARCHAR2_TABLE_100();
904 a40 := JTF_NUMBER_TABLE();
905 a41 := JTF_VARCHAR2_TABLE_100();
906 a42 := JTF_NUMBER_TABLE();
907 a43 := JTF_NUMBER_TABLE();
908 a44 := JTF_VARCHAR2_TABLE_100();
909 a45 := JTF_NUMBER_TABLE();
910 a46 := JTF_NUMBER_TABLE();
911 a47 := JTF_NUMBER_TABLE();
912 a48 := JTF_VARCHAR2_TABLE_100();
913 a49 := JTF_NUMBER_TABLE();
914 a50 := JTF_NUMBER_TABLE();
915 a51 := JTF_VARCHAR2_TABLE_100();
916 a52 := JTF_VARCHAR2_TABLE_100();
917 a53 := JTF_NUMBER_TABLE();
918 a54 := JTF_NUMBER_TABLE();
919 a55 := JTF_VARCHAR2_TABLE_300();
920 a56 := JTF_VARCHAR2_TABLE_100();
921 a57 := JTF_VARCHAR2_TABLE_100();
922 a58 := JTF_NUMBER_TABLE();
923 a59 := JTF_NUMBER_TABLE();
924 a60 := JTF_NUMBER_TABLE();
925 a61 := JTF_NUMBER_TABLE();
926 a62 := JTF_NUMBER_TABLE();
927 a63 := JTF_NUMBER_TABLE();
928 a64 := JTF_NUMBER_TABLE();
929 a65 := JTF_NUMBER_TABLE();
930 a66 := JTF_VARCHAR2_TABLE_100();
931 a67 := JTF_VARCHAR2_TABLE_100();
932 a68 := JTF_NUMBER_TABLE();
933 a69 := JTF_VARCHAR2_TABLE_100();
934 a70 := JTF_NUMBER_TABLE();
935 a71 := JTF_NUMBER_TABLE();
936 a72 := JTF_NUMBER_TABLE();
937 a73 := JTF_NUMBER_TABLE();
938 a74 := JTF_VARCHAR2_TABLE_100();
939 a75 := JTF_NUMBER_TABLE();
940 a76 := JTF_NUMBER_TABLE();
941 a77 := JTF_VARCHAR2_TABLE_100();
942 a78 := JTF_VARCHAR2_TABLE_200();
943 a79 := JTF_VARCHAR2_TABLE_200();
944 a80 := JTF_VARCHAR2_TABLE_200();
945 a81 := JTF_VARCHAR2_TABLE_200();
946 a82 := JTF_VARCHAR2_TABLE_200();
947 a83 := JTF_VARCHAR2_TABLE_200();
948 a84 := JTF_VARCHAR2_TABLE_200();
949 a85 := JTF_VARCHAR2_TABLE_200();
950 a86 := JTF_VARCHAR2_TABLE_200();
951 a87 := JTF_VARCHAR2_TABLE_200();
952 a88 := JTF_VARCHAR2_TABLE_200();
953 a89 := JTF_VARCHAR2_TABLE_200();
954 a90 := JTF_VARCHAR2_TABLE_200();
955 a91 := JTF_VARCHAR2_TABLE_200();
956 a92 := JTF_VARCHAR2_TABLE_200();
957 a93 := JTF_DATE_TABLE();
958 a94 := JTF_NUMBER_TABLE();
959 a95 := JTF_DATE_TABLE();
960 a96 := JTF_NUMBER_TABLE();
961 a97 := JTF_NUMBER_TABLE();
962 a98 := JTF_VARCHAR2_TABLE_100();
963 a99 := JTF_VARCHAR2_TABLE_100();
964 a100 := JTF_VARCHAR2_TABLE_100();
965 if t.count > 0 then
966 a0.extend(t.count);
967 a1.extend(t.count);
971 a5.extend(t.count);
968 a2.extend(t.count);
969 a3.extend(t.count);
970 a4.extend(t.count);
972 a6.extend(t.count);
973 a7.extend(t.count);
974 a8.extend(t.count);
975 a9.extend(t.count);
976 a10.extend(t.count);
977 a11.extend(t.count);
978 a12.extend(t.count);
979 a13.extend(t.count);
980 a14.extend(t.count);
981 a15.extend(t.count);
982 a16.extend(t.count);
983 a17.extend(t.count);
984 a18.extend(t.count);
985 a19.extend(t.count);
986 a20.extend(t.count);
987 a21.extend(t.count);
988 a22.extend(t.count);
989 a23.extend(t.count);
990 a24.extend(t.count);
991 a25.extend(t.count);
992 a26.extend(t.count);
993 a27.extend(t.count);
994 a28.extend(t.count);
995 a29.extend(t.count);
996 a30.extend(t.count);
997 a31.extend(t.count);
998 a32.extend(t.count);
999 a33.extend(t.count);
1000 a34.extend(t.count);
1001 a35.extend(t.count);
1002 a36.extend(t.count);
1003 a37.extend(t.count);
1004 a38.extend(t.count);
1005 a39.extend(t.count);
1006 a40.extend(t.count);
1007 a41.extend(t.count);
1008 a42.extend(t.count);
1009 a43.extend(t.count);
1010 a44.extend(t.count);
1011 a45.extend(t.count);
1012 a46.extend(t.count);
1013 a47.extend(t.count);
1014 a48.extend(t.count);
1015 a49.extend(t.count);
1016 a50.extend(t.count);
1017 a51.extend(t.count);
1018 a52.extend(t.count);
1019 a53.extend(t.count);
1020 a54.extend(t.count);
1021 a55.extend(t.count);
1022 a56.extend(t.count);
1023 a57.extend(t.count);
1024 a58.extend(t.count);
1025 a59.extend(t.count);
1026 a60.extend(t.count);
1027 a61.extend(t.count);
1028 a62.extend(t.count);
1029 a63.extend(t.count);
1030 a64.extend(t.count);
1031 a65.extend(t.count);
1032 a66.extend(t.count);
1033 a67.extend(t.count);
1034 a68.extend(t.count);
1035 a69.extend(t.count);
1036 a70.extend(t.count);
1037 a71.extend(t.count);
1038 a72.extend(t.count);
1039 a73.extend(t.count);
1040 a74.extend(t.count);
1041 a75.extend(t.count);
1042 a76.extend(t.count);
1043 a77.extend(t.count);
1044 a78.extend(t.count);
1045 a79.extend(t.count);
1046 a80.extend(t.count);
1047 a81.extend(t.count);
1048 a82.extend(t.count);
1049 a83.extend(t.count);
1050 a84.extend(t.count);
1051 a85.extend(t.count);
1052 a86.extend(t.count);
1053 a87.extend(t.count);
1054 a88.extend(t.count);
1055 a89.extend(t.count);
1056 a90.extend(t.count);
1057 a91.extend(t.count);
1058 a92.extend(t.count);
1059 a93.extend(t.count);
1060 a94.extend(t.count);
1061 a95.extend(t.count);
1062 a96.extend(t.count);
1063 a97.extend(t.count);
1064 a98.extend(t.count);
1065 a99.extend(t.count);
1066 a100.extend(t.count);
1067 ddindx := t.first;
1068 indx := 1;
1069 while true loop
1070 a0(indx) := t(ddindx).batch_id;
1071 a1(indx) := t(ddindx).header_id;
1072 a2(indx) := t(ddindx).workorder_id;
1073 a3(indx) := t(ddindx).wip_entity_id;
1074 a4(indx) := t(ddindx).object_version_number;
1075 a5(indx) := t(ddindx).job_number;
1076 a6(indx) := t(ddindx).job_description;
1077 a7(indx) := t(ddindx).organization_id;
1078 a8(indx) := t(ddindx).organization_name;
1079 a9(indx) := t(ddindx).organization_code;
1080 a10(indx) := t(ddindx).department_name;
1081 a11(indx) := t(ddindx).department_id;
1082 a12(indx) := t(ddindx).department_class_code;
1083 a13(indx) := t(ddindx).status_code;
1084 a14(indx) := t(ddindx).status_meaning;
1085 a15(indx) := t(ddindx).scheduled_start_date;
1086 a16(indx) := t(ddindx).scheduled_start_hr;
1087 a17(indx) := t(ddindx).scheduled_start_mi;
1088 a18(indx) := t(ddindx).scheduled_end_date;
1089 a19(indx) := t(ddindx).scheduled_end_hr;
1090 a20(indx) := t(ddindx).scheduled_end_mi;
1091 a21(indx) := t(ddindx).actual_start_date;
1092 a22(indx) := t(ddindx).actual_start_hr;
1093 a23(indx) := t(ddindx).actual_start_mi;
1094 a24(indx) := t(ddindx).actual_end_date;
1095 a25(indx) := t(ddindx).actual_end_hr;
1096 a26(indx) := t(ddindx).actual_end_mi;
1097 a27(indx) := t(ddindx).inventory_item_id;
1098 a28(indx) := t(ddindx).item_instance_id;
1099 a29(indx) := t(ddindx).unit_name;
1100 a30(indx) := t(ddindx).item_instance_number;
1101 a31(indx) := t(ddindx).wo_part_number;
1102 a32(indx) := t(ddindx).item_description;
1103 a33(indx) := t(ddindx).serial_number;
1104 a34(indx) := t(ddindx).item_instance_uom;
1108 a38(indx) := t(ddindx).wip_supply_type;
1105 a35(indx) := t(ddindx).completion_subinventory;
1106 a36(indx) := t(ddindx).completion_locator_id;
1107 a37(indx) := t(ddindx).completion_locator_name;
1109 a39(indx) := t(ddindx).wip_supply_meaning;
1110 a40(indx) := t(ddindx).firm_planned_flag;
1111 a41(indx) := t(ddindx).master_workorder_flag;
1112 a42(indx) := t(ddindx).visit_id;
1113 a43(indx) := t(ddindx).visit_number;
1114 a44(indx) := t(ddindx).visit_name;
1115 a45(indx) := t(ddindx).visit_task_id;
1116 a46(indx) := t(ddindx).mr_header_id;
1117 a47(indx) := t(ddindx).visit_task_number;
1118 a48(indx) := t(ddindx).mr_title;
1119 a49(indx) := t(ddindx).mr_route_id;
1120 a50(indx) := t(ddindx).route_id;
1121 a51(indx) := t(ddindx).confirm_failure_flag;
1122 a52(indx) := t(ddindx).propagate_flag;
1123 a53(indx) := t(ddindx).service_item_id;
1124 a54(indx) := t(ddindx).service_item_org_id;
1125 a55(indx) := t(ddindx).service_item_description;
1126 a56(indx) := t(ddindx).service_item_number;
1127 a57(indx) := t(ddindx).service_item_uom;
1128 a58(indx) := t(ddindx).project_id;
1129 a59(indx) := t(ddindx).project_task_id;
1130 a60(indx) := t(ddindx).quantity;
1131 a61(indx) := t(ddindx).mrp_quantity;
1132 a62(indx) := t(ddindx).incident_id;
1133 a63(indx) := t(ddindx).origination_task_id;
1134 a64(indx) := t(ddindx).parent_id;
1135 a65(indx) := t(ddindx).task_motive_status_id;
1136 a66(indx) := t(ddindx).allow_explosion;
1137 a67(indx) := t(ddindx).class_code;
1138 a68(indx) := t(ddindx).job_priority;
1139 a69(indx) := t(ddindx).job_priority_meaning;
1140 a70(indx) := t(ddindx).confirmed_failure_flag;
1141 a71(indx) := t(ddindx).unit_effectivity_id;
1142 a72(indx) := t(ddindx).plan_id;
1143 a73(indx) := t(ddindx).collection_id;
1144 a74(indx) := t(ddindx).sub_inventory;
1145 a75(indx) := t(ddindx).locator_id;
1146 a76(indx) := t(ddindx).security_group_id;
1147 a77(indx) := t(ddindx).attribute_category;
1148 a78(indx) := t(ddindx).attribute1;
1149 a79(indx) := t(ddindx).attribute2;
1150 a80(indx) := t(ddindx).attribute3;
1151 a81(indx) := t(ddindx).attribute4;
1152 a82(indx) := t(ddindx).attribute5;
1153 a83(indx) := t(ddindx).attribute6;
1154 a84(indx) := t(ddindx).attribute7;
1155 a85(indx) := t(ddindx).attribute8;
1156 a86(indx) := t(ddindx).attribute9;
1157 a87(indx) := t(ddindx).attribute10;
1158 a88(indx) := t(ddindx).attribute11;
1159 a89(indx) := t(ddindx).attribute12;
1160 a90(indx) := t(ddindx).attribute13;
1161 a91(indx) := t(ddindx).attribute14;
1162 a92(indx) := t(ddindx).attribute15;
1163 a93(indx) := t(ddindx).last_update_date;
1164 a94(indx) := t(ddindx).last_updated_by;
1165 a95(indx) := t(ddindx).creation_date;
1166 a96(indx) := t(ddindx).created_by;
1167 a97(indx) := t(ddindx).last_update_login;
1168 a98(indx) := t(ddindx).dml_operation;
1169 a99(indx) := t(ddindx).hold_reason_code;
1170 a100(indx) := t(ddindx).hold_reason;
1171 indx := indx+1;
1172 if t.last =ddindx
1173 then exit;
1174 end if;
1175 ddindx := t.next(ddindx);
1176 end loop;
1177 end if;
1178 end if;
1179 end rosetta_table_copy_out_p3;
1180
1181 procedure rosetta_table_copy_in_p5(t out nocopy ahl_prd_workorder_pvt.prd_workorder_rel_tbl, a0 JTF_NUMBER_TABLE
1182 , a1 JTF_NUMBER_TABLE
1183 , a2 JTF_NUMBER_TABLE
1184 , a3 JTF_NUMBER_TABLE
1185 , a4 JTF_NUMBER_TABLE
1186 , a5 JTF_NUMBER_TABLE
1187 , a6 JTF_NUMBER_TABLE
1188 , a7 JTF_VARCHAR2_TABLE_100
1189 ) as
1190 ddindx binary_integer; indx binary_integer;
1191 begin
1192 if a0 is not null and a0.count > 0 then
1193 if a0.count > 0 then
1194 indx := a0.first;
1195 ddindx := 1;
1196 while true loop
1197 t(ddindx).batch_id := a0(indx);
1198 t(ddindx).wo_relationship_id := a1(indx);
1199 t(ddindx).parent_header_id := a2(indx);
1200 t(ddindx).parent_wip_entity_id := a3(indx);
1201 t(ddindx).child_header_id := a4(indx);
1205 ddindx := ddindx+1;
1202 t(ddindx).child_wip_entity_id := a5(indx);
1203 t(ddindx).relationship_type := a6(indx);
1204 t(ddindx).dml_operation := a7(indx);
1206 if a0.last =indx
1207 then exit;
1208 end if;
1209 indx := a0.next(indx);
1210 end loop;
1211 end if;
1212 end if;
1213 end rosetta_table_copy_in_p5;
1214 procedure rosetta_table_copy_out_p5(t ahl_prd_workorder_pvt.prd_workorder_rel_tbl, a0 out nocopy JTF_NUMBER_TABLE
1215 , a1 out nocopy JTF_NUMBER_TABLE
1216 , a2 out nocopy JTF_NUMBER_TABLE
1217 , a3 out nocopy JTF_NUMBER_TABLE
1218 , a4 out nocopy JTF_NUMBER_TABLE
1219 , a5 out nocopy JTF_NUMBER_TABLE
1220 , a6 out nocopy JTF_NUMBER_TABLE
1221 , a7 out nocopy JTF_VARCHAR2_TABLE_100
1222 ) as
1223 ddindx binary_integer; indx binary_integer;
1224 begin
1225 if t is null or t.count = 0 then
1226 a0 := JTF_NUMBER_TABLE();
1227 a1 := JTF_NUMBER_TABLE();
1228 a2 := JTF_NUMBER_TABLE();
1229 a3 := JTF_NUMBER_TABLE();
1230 a4 := JTF_NUMBER_TABLE();
1231 a5 := JTF_NUMBER_TABLE();
1232 a6 := JTF_NUMBER_TABLE();
1233 a7 := JTF_VARCHAR2_TABLE_100();
1234 else
1235 a0 := JTF_NUMBER_TABLE();
1236 a1 := JTF_NUMBER_TABLE();
1237 a2 := JTF_NUMBER_TABLE();
1238 a3 := JTF_NUMBER_TABLE();
1239 a4 := JTF_NUMBER_TABLE();
1240 a5 := JTF_NUMBER_TABLE();
1241 a6 := JTF_NUMBER_TABLE();
1242 a7 := JTF_VARCHAR2_TABLE_100();
1243 if t.count > 0 then
1244 a0.extend(t.count);
1245 a1.extend(t.count);
1246 a2.extend(t.count);
1247 a3.extend(t.count);
1248 a4.extend(t.count);
1249 a5.extend(t.count);
1250 a6.extend(t.count);
1251 a7.extend(t.count);
1252 ddindx := t.first;
1253 indx := 1;
1254 while true loop
1255 a0(indx) := t(ddindx).batch_id;
1256 a1(indx) := t(ddindx).wo_relationship_id;
1257 a2(indx) := t(ddindx).parent_header_id;
1258 a3(indx) := t(ddindx).parent_wip_entity_id;
1259 a4(indx) := t(ddindx).child_header_id;
1260 a5(indx) := t(ddindx).child_wip_entity_id;
1261 a6(indx) := t(ddindx).relationship_type;
1262 a7(indx) := t(ddindx).dml_operation;
1263 indx := indx+1;
1264 if t.last =ddindx
1265 then exit;
1266 end if;
1267 ddindx := t.next(ddindx);
1268 end loop;
1269 end if;
1270 end if;
1271 end rosetta_table_copy_out_p5;
1272
1273 procedure rosetta_table_copy_in_p13(t out nocopy ahl_prd_workorder_pvt.turnover_notes_tbl_type, a0 JTF_NUMBER_TABLE
1274 , a1 JTF_NUMBER_TABLE
1275 , a2 JTF_VARCHAR2_TABLE_100
1276 , a3 JTF_VARCHAR2_TABLE_2000
1277 , a4 JTF_NUMBER_TABLE
1278 , a5 JTF_VARCHAR2_TABLE_300
1279 , a6 JTF_DATE_TABLE
1280 , a7 JTF_NUMBER_TABLE
1281 ) as
1282 ddindx binary_integer; indx binary_integer;
1283 begin
1284 if a0 is not null and a0.count > 0 then
1285 if a0.count > 0 then
1286 indx := a0.first;
1287 ddindx := 1;
1288 while true loop
1289 t(ddindx).jtf_note_id := a0(indx);
1290 t(ddindx).source_object_id := a1(indx);
1291 t(ddindx).source_object_code := a2(indx);
1292 t(ddindx).notes := a3(indx);
1293 t(ddindx).employee_id := a4(indx);
1294 t(ddindx).employee_name := a5(indx);
1295 t(ddindx).entered_date := a6(indx);
1296 t(ddindx).org_id := a7(indx);
1297 ddindx := ddindx+1;
1298 if a0.last =indx
1299 then exit;
1300 end if;
1301 indx := a0.next(indx);
1302 end loop;
1303 end if;
1304 end if;
1305 end rosetta_table_copy_in_p13;
1306 procedure rosetta_table_copy_out_p13(t ahl_prd_workorder_pvt.turnover_notes_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
1307 , a1 out nocopy JTF_NUMBER_TABLE
1308 , a2 out nocopy JTF_VARCHAR2_TABLE_100
1309 , a3 out nocopy JTF_VARCHAR2_TABLE_2000
1310 , a4 out nocopy JTF_NUMBER_TABLE
1311 , a5 out nocopy JTF_VARCHAR2_TABLE_300
1312 , a6 out nocopy JTF_DATE_TABLE
1313 , a7 out nocopy JTF_NUMBER_TABLE
1314 ) as
1315 ddindx binary_integer; indx binary_integer;
1316 begin
1317 if t is null or t.count = 0 then
1318 a0 := JTF_NUMBER_TABLE();
1319 a1 := JTF_NUMBER_TABLE();
1320 a2 := JTF_VARCHAR2_TABLE_100();
1321 a3 := JTF_VARCHAR2_TABLE_2000();
1322 a4 := JTF_NUMBER_TABLE();
1323 a5 := JTF_VARCHAR2_TABLE_300();
1324 a6 := JTF_DATE_TABLE();
1325 a7 := JTF_NUMBER_TABLE();
1326 else
1327 a0 := JTF_NUMBER_TABLE();
1328 a1 := JTF_NUMBER_TABLE();
1329 a2 := JTF_VARCHAR2_TABLE_100();
1330 a3 := JTF_VARCHAR2_TABLE_2000();
1331 a4 := JTF_NUMBER_TABLE();
1332 a5 := JTF_VARCHAR2_TABLE_300();
1333 a6 := JTF_DATE_TABLE();
1334 a7 := JTF_NUMBER_TABLE();
1335 if t.count > 0 then
1336 a0.extend(t.count);
1337 a1.extend(t.count);
1338 a2.extend(t.count);
1342 a6.extend(t.count);
1339 a3.extend(t.count);
1340 a4.extend(t.count);
1341 a5.extend(t.count);
1343 a7.extend(t.count);
1344 ddindx := t.first;
1345 indx := 1;
1346 while true loop
1347 a0(indx) := t(ddindx).jtf_note_id;
1348 a1(indx) := t(ddindx).source_object_id;
1349 a2(indx) := t(ddindx).source_object_code;
1350 a3(indx) := t(ddindx).notes;
1351 a4(indx) := t(ddindx).employee_id;
1352 a5(indx) := t(ddindx).employee_name;
1353 a6(indx) := t(ddindx).entered_date;
1354 a7(indx) := t(ddindx).org_id;
1355 indx := indx+1;
1356 if t.last =ddindx
1357 then exit;
1358 end if;
1359 ddindx := t.next(ddindx);
1360 end loop;
1361 end if;
1362 end if;
1363 end rosetta_table_copy_out_p13;
1364
1365 procedure process_jobs(p_api_version NUMBER
1366 , p_init_msg_list VARCHAR2
1367 , p_commit VARCHAR2
1368 , p_validation_level NUMBER
1369 , p_default VARCHAR2
1370 , p_module_type VARCHAR2
1371 , x_return_status out nocopy VARCHAR2
1372 , x_msg_count out nocopy NUMBER
1373 , x_msg_data out nocopy VARCHAR2
1374 , p9_a0 in out nocopy JTF_NUMBER_TABLE
1375 , p9_a1 in out nocopy JTF_NUMBER_TABLE
1376 , p9_a2 in out nocopy JTF_NUMBER_TABLE
1377 , p9_a3 in out nocopy JTF_NUMBER_TABLE
1378 , p9_a4 in out nocopy JTF_NUMBER_TABLE
1379 , p9_a5 in out nocopy JTF_VARCHAR2_TABLE_100
1380 , p9_a6 in out nocopy JTF_VARCHAR2_TABLE_300
1381 , p9_a7 in out nocopy JTF_NUMBER_TABLE
1382 , p9_a8 in out nocopy JTF_VARCHAR2_TABLE_100
1383 , p9_a9 in out nocopy JTF_VARCHAR2_TABLE_100
1384 , p9_a10 in out nocopy JTF_VARCHAR2_TABLE_300
1385 , p9_a11 in out nocopy JTF_NUMBER_TABLE
1386 , p9_a12 in out nocopy JTF_VARCHAR2_TABLE_100
1387 , p9_a13 in out nocopy JTF_VARCHAR2_TABLE_100
1388 , p9_a14 in out nocopy JTF_VARCHAR2_TABLE_100
1389 , p9_a15 in out nocopy JTF_DATE_TABLE
1390 , p9_a16 in out nocopy JTF_NUMBER_TABLE
1391 , p9_a17 in out nocopy JTF_NUMBER_TABLE
1392 , p9_a18 in out nocopy JTF_DATE_TABLE
1393 , p9_a19 in out nocopy JTF_NUMBER_TABLE
1394 , p9_a20 in out nocopy JTF_NUMBER_TABLE
1395 , p9_a21 in out nocopy JTF_DATE_TABLE
1396 , p9_a22 in out nocopy JTF_NUMBER_TABLE
1397 , p9_a23 in out nocopy JTF_NUMBER_TABLE
1398 , p9_a24 in out nocopy JTF_DATE_TABLE
1399 , p9_a25 in out nocopy JTF_NUMBER_TABLE
1400 , p9_a26 in out nocopy JTF_NUMBER_TABLE
1401 , p9_a27 in out nocopy JTF_NUMBER_TABLE
1402 , p9_a28 in out nocopy JTF_NUMBER_TABLE
1403 , p9_a29 in out nocopy JTF_VARCHAR2_TABLE_100
1404 , p9_a30 in out nocopy JTF_VARCHAR2_TABLE_100
1405 , p9_a31 in out nocopy JTF_VARCHAR2_TABLE_100
1406 , p9_a32 in out nocopy JTF_VARCHAR2_TABLE_300
1407 , p9_a33 in out nocopy JTF_VARCHAR2_TABLE_100
1408 , p9_a34 in out nocopy JTF_VARCHAR2_TABLE_100
1409 , p9_a35 in out nocopy JTF_VARCHAR2_TABLE_100
1410 , p9_a36 in out nocopy JTF_NUMBER_TABLE
1411 , p9_a37 in out nocopy JTF_VARCHAR2_TABLE_300
1412 , p9_a38 in out nocopy JTF_NUMBER_TABLE
1413 , p9_a39 in out nocopy JTF_VARCHAR2_TABLE_100
1414 , p9_a40 in out nocopy JTF_NUMBER_TABLE
1415 , p9_a41 in out nocopy JTF_VARCHAR2_TABLE_100
1416 , p9_a42 in out nocopy JTF_NUMBER_TABLE
1417 , p9_a43 in out nocopy JTF_NUMBER_TABLE
1418 , p9_a44 in out nocopy JTF_VARCHAR2_TABLE_100
1419 , p9_a45 in out nocopy JTF_NUMBER_TABLE
1420 , p9_a46 in out nocopy JTF_NUMBER_TABLE
1421 , p9_a47 in out nocopy JTF_NUMBER_TABLE
1422 , p9_a48 in out nocopy JTF_VARCHAR2_TABLE_100
1423 , p9_a49 in out nocopy JTF_NUMBER_TABLE
1424 , p9_a50 in out nocopy JTF_NUMBER_TABLE
1425 , p9_a51 in out nocopy JTF_VARCHAR2_TABLE_100
1426 , p9_a52 in out nocopy JTF_VARCHAR2_TABLE_100
1427 , p9_a53 in out nocopy JTF_NUMBER_TABLE
1428 , p9_a54 in out nocopy JTF_NUMBER_TABLE
1429 , p9_a55 in out nocopy JTF_VARCHAR2_TABLE_300
1430 , p9_a56 in out nocopy JTF_VARCHAR2_TABLE_100
1431 , p9_a57 in out nocopy JTF_VARCHAR2_TABLE_100
1432 , p9_a58 in out nocopy JTF_NUMBER_TABLE
1433 , p9_a59 in out nocopy JTF_NUMBER_TABLE
1434 , p9_a60 in out nocopy JTF_NUMBER_TABLE
1435 , p9_a61 in out nocopy JTF_NUMBER_TABLE
1436 , p9_a62 in out nocopy JTF_NUMBER_TABLE
1437 , p9_a63 in out nocopy JTF_NUMBER_TABLE
1438 , p9_a64 in out nocopy JTF_NUMBER_TABLE
1439 , p9_a65 in out nocopy JTF_NUMBER_TABLE
1440 , p9_a66 in out nocopy JTF_VARCHAR2_TABLE_100
1441 , p9_a67 in out nocopy JTF_VARCHAR2_TABLE_100
1442 , p9_a68 in out nocopy JTF_NUMBER_TABLE
1443 , p9_a69 in out nocopy JTF_VARCHAR2_TABLE_100
1444 , p9_a70 in out nocopy JTF_NUMBER_TABLE
1445 , p9_a71 in out nocopy JTF_NUMBER_TABLE
1446 , p9_a72 in out nocopy JTF_NUMBER_TABLE
1447 , p9_a73 in out nocopy JTF_NUMBER_TABLE
1448 , p9_a74 in out nocopy JTF_VARCHAR2_TABLE_100
1449 , p9_a75 in out nocopy JTF_NUMBER_TABLE
1450 , p9_a76 in out nocopy JTF_NUMBER_TABLE
1451 , p9_a77 in out nocopy JTF_VARCHAR2_TABLE_100
1452 , p9_a78 in out nocopy JTF_VARCHAR2_TABLE_200
1453 , p9_a79 in out nocopy JTF_VARCHAR2_TABLE_200
1454 , p9_a80 in out nocopy JTF_VARCHAR2_TABLE_200
1455 , p9_a81 in out nocopy JTF_VARCHAR2_TABLE_200
1456 , p9_a82 in out nocopy JTF_VARCHAR2_TABLE_200
1460 , p9_a86 in out nocopy JTF_VARCHAR2_TABLE_200
1457 , p9_a83 in out nocopy JTF_VARCHAR2_TABLE_200
1458 , p9_a84 in out nocopy JTF_VARCHAR2_TABLE_200
1459 , p9_a85 in out nocopy JTF_VARCHAR2_TABLE_200
1461 , p9_a87 in out nocopy JTF_VARCHAR2_TABLE_200
1462 , p9_a88 in out nocopy JTF_VARCHAR2_TABLE_200
1463 , p9_a89 in out nocopy JTF_VARCHAR2_TABLE_200
1464 , p9_a90 in out nocopy JTF_VARCHAR2_TABLE_200
1465 , p9_a91 in out nocopy JTF_VARCHAR2_TABLE_200
1466 , p9_a92 in out nocopy JTF_VARCHAR2_TABLE_200
1467 , p9_a93 in out nocopy JTF_DATE_TABLE
1468 , p9_a94 in out nocopy JTF_NUMBER_TABLE
1469 , p9_a95 in out nocopy JTF_DATE_TABLE
1470 , p9_a96 in out nocopy JTF_NUMBER_TABLE
1471 , p9_a97 in out nocopy JTF_NUMBER_TABLE
1472 , p9_a98 in out nocopy JTF_VARCHAR2_TABLE_100
1473 , p9_a99 in out nocopy JTF_VARCHAR2_TABLE_100
1474 , p9_a100 in out nocopy JTF_VARCHAR2_TABLE_100
1475 , p10_a0 JTF_NUMBER_TABLE
1476 , p10_a1 JTF_NUMBER_TABLE
1477 , p10_a2 JTF_NUMBER_TABLE
1478 , p10_a3 JTF_NUMBER_TABLE
1479 , p10_a4 JTF_NUMBER_TABLE
1480 , p10_a5 JTF_NUMBER_TABLE
1481 , p10_a6 JTF_NUMBER_TABLE
1482 , p10_a7 JTF_VARCHAR2_TABLE_100
1483 )
1484
1485 as
1486 ddp_x_prd_workorder_tbl ahl_prd_workorder_pvt.prd_workorder_tbl;
1487 ddp_prd_workorder_rel_tbl ahl_prd_workorder_pvt.prd_workorder_rel_tbl;
1488 ddindx binary_integer; indx binary_integer;
1489 begin
1490
1491 -- copy data to the local IN or IN-OUT args, if any
1492
1493
1494
1495
1496
1497
1498
1499
1500
1501 ahl_prd_workorder_pvt_w.rosetta_table_copy_in_p3(ddp_x_prd_workorder_tbl, p9_a0
1502 , p9_a1
1503 , p9_a2
1504 , p9_a3
1505 , p9_a4
1506 , p9_a5
1507 , p9_a6
1508 , p9_a7
1509 , p9_a8
1510 , p9_a9
1511 , p9_a10
1512 , p9_a11
1513 , p9_a12
1514 , p9_a13
1515 , p9_a14
1516 , p9_a15
1517 , p9_a16
1518 , p9_a17
1519 , p9_a18
1520 , p9_a19
1521 , p9_a20
1522 , p9_a21
1523 , p9_a22
1524 , p9_a23
1525 , p9_a24
1526 , p9_a25
1527 , p9_a26
1528 , p9_a27
1529 , p9_a28
1530 , p9_a29
1531 , p9_a30
1532 , p9_a31
1533 , p9_a32
1534 , p9_a33
1535 , p9_a34
1536 , p9_a35
1537 , p9_a36
1538 , p9_a37
1539 , p9_a38
1540 , p9_a39
1541 , p9_a40
1542 , p9_a41
1543 , p9_a42
1544 , p9_a43
1545 , p9_a44
1546 , p9_a45
1547 , p9_a46
1548 , p9_a47
1549 , p9_a48
1550 , p9_a49
1551 , p9_a50
1552 , p9_a51
1553 , p9_a52
1554 , p9_a53
1555 , p9_a54
1556 , p9_a55
1557 , p9_a56
1558 , p9_a57
1559 , p9_a58
1560 , p9_a59
1561 , p9_a60
1562 , p9_a61
1563 , p9_a62
1564 , p9_a63
1565 , p9_a64
1566 , p9_a65
1567 , p9_a66
1568 , p9_a67
1569 , p9_a68
1570 , p9_a69
1571 , p9_a70
1572 , p9_a71
1573 , p9_a72
1574 , p9_a73
1575 , p9_a74
1576 , p9_a75
1577 , p9_a76
1578 , p9_a77
1579 , p9_a78
1580 , p9_a79
1581 , p9_a80
1582 , p9_a81
1583 , p9_a82
1584 , p9_a83
1585 , p9_a84
1586 , p9_a85
1587 , p9_a86
1588 , p9_a87
1589 , p9_a88
1590 , p9_a89
1591 , p9_a90
1592 , p9_a91
1593 , p9_a92
1594 , p9_a93
1595 , p9_a94
1596 , p9_a95
1597 , p9_a96
1598 , p9_a97
1599 , p9_a98
1600 , p9_a99
1601 , p9_a100
1602 );
1603
1604 ahl_prd_workorder_pvt_w.rosetta_table_copy_in_p5(ddp_prd_workorder_rel_tbl, p10_a0
1605 , p10_a1
1606 , p10_a2
1607 , p10_a3
1608 , p10_a4
1609 , p10_a5
1610 , p10_a6
1611 , p10_a7
1612 );
1613
1614 -- here's the delegated call to the old PL/SQL routine
1615 ahl_prd_workorder_pvt.process_jobs(p_api_version,
1616 p_init_msg_list,
1617 p_commit,
1618 p_validation_level,
1619 p_default,
1620 p_module_type,
1621 x_return_status,
1622 x_msg_count,
1623 x_msg_data,
1624 ddp_x_prd_workorder_tbl,
1625 ddp_prd_workorder_rel_tbl);
1626
1627 -- copy data back from the local variables to OUT or IN-OUT args, if any
1628
1629
1630
1631
1632
1633
1634
1635
1636
1637 ahl_prd_workorder_pvt_w.rosetta_table_copy_out_p3(ddp_x_prd_workorder_tbl, p9_a0
1638 , p9_a1
1639 , p9_a2
1640 , p9_a3
1641 , p9_a4
1642 , p9_a5
1643 , p9_a6
1644 , p9_a7
1645 , p9_a8
1646 , p9_a9
1647 , p9_a10
1648 , p9_a11
1649 , p9_a12
1653 , p9_a16
1650 , p9_a13
1651 , p9_a14
1652 , p9_a15
1654 , p9_a17
1655 , p9_a18
1656 , p9_a19
1657 , p9_a20
1658 , p9_a21
1659 , p9_a22
1660 , p9_a23
1661 , p9_a24
1662 , p9_a25
1663 , p9_a26
1664 , p9_a27
1665 , p9_a28
1666 , p9_a29
1667 , p9_a30
1668 , p9_a31
1669 , p9_a32
1670 , p9_a33
1671 , p9_a34
1672 , p9_a35
1673 , p9_a36
1674 , p9_a37
1675 , p9_a38
1676 , p9_a39
1677 , p9_a40
1678 , p9_a41
1679 , p9_a42
1680 , p9_a43
1681 , p9_a44
1682 , p9_a45
1683 , p9_a46
1684 , p9_a47
1685 , p9_a48
1686 , p9_a49
1687 , p9_a50
1688 , p9_a51
1689 , p9_a52
1690 , p9_a53
1691 , p9_a54
1692 , p9_a55
1693 , p9_a56
1694 , p9_a57
1695 , p9_a58
1696 , p9_a59
1697 , p9_a60
1698 , p9_a61
1699 , p9_a62
1700 , p9_a63
1701 , p9_a64
1702 , p9_a65
1703 , p9_a66
1704 , p9_a67
1705 , p9_a68
1706 , p9_a69
1707 , p9_a70
1708 , p9_a71
1709 , p9_a72
1710 , p9_a73
1711 , p9_a74
1712 , p9_a75
1713 , p9_a76
1714 , p9_a77
1715 , p9_a78
1716 , p9_a79
1717 , p9_a80
1718 , p9_a81
1719 , p9_a82
1720 , p9_a83
1721 , p9_a84
1722 , p9_a85
1723 , p9_a86
1724 , p9_a87
1725 , p9_a88
1726 , p9_a89
1727 , p9_a90
1728 , p9_a91
1729 , p9_a92
1730 , p9_a93
1731 , p9_a94
1732 , p9_a95
1733 , p9_a96
1734 , p9_a97
1735 , p9_a98
1736 , p9_a99
1737 , p9_a100
1738 );
1739
1740 end;
1741
1742 procedure update_job(p_api_version NUMBER
1743 , p_init_msg_list VARCHAR2
1744 , p_commit VARCHAR2
1745 , p_validation_level NUMBER
1746 , p_default VARCHAR2
1747 , p_module_type VARCHAR2
1748 , x_return_status out nocopy VARCHAR2
1749 , x_msg_count out nocopy NUMBER
1750 , x_msg_data out nocopy VARCHAR2
1751 , p_wip_load_flag VARCHAR2
1752 , p10_a0 in out nocopy NUMBER
1753 , p10_a1 in out nocopy NUMBER
1754 , p10_a2 in out nocopy NUMBER
1755 , p10_a3 in out nocopy NUMBER
1756 , p10_a4 in out nocopy NUMBER
1757 , p10_a5 in out nocopy VARCHAR2
1758 , p10_a6 in out nocopy VARCHAR2
1759 , p10_a7 in out nocopy NUMBER
1760 , p10_a8 in out nocopy VARCHAR2
1761 , p10_a9 in out nocopy VARCHAR2
1762 , p10_a10 in out nocopy VARCHAR2
1763 , p10_a11 in out nocopy NUMBER
1764 , p10_a12 in out nocopy VARCHAR2
1765 , p10_a13 in out nocopy VARCHAR2
1766 , p10_a14 in out nocopy VARCHAR2
1767 , p10_a15 in out nocopy DATE
1768 , p10_a16 in out nocopy NUMBER
1769 , p10_a17 in out nocopy NUMBER
1770 , p10_a18 in out nocopy DATE
1771 , p10_a19 in out nocopy NUMBER
1772 , p10_a20 in out nocopy NUMBER
1773 , p10_a21 in out nocopy DATE
1774 , p10_a22 in out nocopy NUMBER
1775 , p10_a23 in out nocopy NUMBER
1776 , p10_a24 in out nocopy DATE
1777 , p10_a25 in out nocopy NUMBER
1778 , p10_a26 in out nocopy NUMBER
1779 , p10_a27 in out nocopy NUMBER
1780 , p10_a28 in out nocopy NUMBER
1781 , p10_a29 in out nocopy VARCHAR2
1782 , p10_a30 in out nocopy VARCHAR2
1783 , p10_a31 in out nocopy VARCHAR2
1784 , p10_a32 in out nocopy VARCHAR2
1785 , p10_a33 in out nocopy VARCHAR2
1786 , p10_a34 in out nocopy VARCHAR2
1787 , p10_a35 in out nocopy VARCHAR2
1788 , p10_a36 in out nocopy NUMBER
1789 , p10_a37 in out nocopy VARCHAR2
1790 , p10_a38 in out nocopy NUMBER
1791 , p10_a39 in out nocopy VARCHAR2
1792 , p10_a40 in out nocopy NUMBER
1793 , p10_a41 in out nocopy VARCHAR2
1794 , p10_a42 in out nocopy NUMBER
1795 , p10_a43 in out nocopy NUMBER
1796 , p10_a44 in out nocopy VARCHAR2
1797 , p10_a45 in out nocopy NUMBER
1798 , p10_a46 in out nocopy NUMBER
1799 , p10_a47 in out nocopy NUMBER
1800 , p10_a48 in out nocopy VARCHAR2
1801 , p10_a49 in out nocopy NUMBER
1802 , p10_a50 in out nocopy NUMBER
1803 , p10_a51 in out nocopy VARCHAR2
1804 , p10_a52 in out nocopy VARCHAR2
1805 , p10_a53 in out nocopy NUMBER
1806 , p10_a54 in out nocopy NUMBER
1807 , p10_a55 in out nocopy VARCHAR2
1808 , p10_a56 in out nocopy VARCHAR2
1809 , p10_a57 in out nocopy VARCHAR2
1810 , p10_a58 in out nocopy NUMBER
1811 , p10_a59 in out nocopy NUMBER
1812 , p10_a60 in out nocopy NUMBER
1813 , p10_a61 in out nocopy NUMBER
1814 , p10_a62 in out nocopy NUMBER
1815 , p10_a63 in out nocopy NUMBER
1816 , p10_a64 in out nocopy NUMBER
1817 , p10_a65 in out nocopy NUMBER
1818 , p10_a66 in out nocopy VARCHAR2
1819 , p10_a67 in out nocopy VARCHAR2
1823 , p10_a71 in out nocopy NUMBER
1820 , p10_a68 in out nocopy NUMBER
1821 , p10_a69 in out nocopy VARCHAR2
1822 , p10_a70 in out nocopy NUMBER
1824 , p10_a72 in out nocopy NUMBER
1825 , p10_a73 in out nocopy NUMBER
1826 , p10_a74 in out nocopy VARCHAR2
1827 , p10_a75 in out nocopy NUMBER
1828 , p10_a76 in out nocopy NUMBER
1829 , p10_a77 in out nocopy VARCHAR2
1830 , p10_a78 in out nocopy VARCHAR2
1831 , p10_a79 in out nocopy VARCHAR2
1832 , p10_a80 in out nocopy VARCHAR2
1833 , p10_a81 in out nocopy VARCHAR2
1834 , p10_a82 in out nocopy VARCHAR2
1835 , p10_a83 in out nocopy VARCHAR2
1836 , p10_a84 in out nocopy VARCHAR2
1837 , p10_a85 in out nocopy VARCHAR2
1838 , p10_a86 in out nocopy VARCHAR2
1839 , p10_a87 in out nocopy VARCHAR2
1840 , p10_a88 in out nocopy VARCHAR2
1841 , p10_a89 in out nocopy VARCHAR2
1842 , p10_a90 in out nocopy VARCHAR2
1843 , p10_a91 in out nocopy VARCHAR2
1844 , p10_a92 in out nocopy VARCHAR2
1845 , p10_a93 in out nocopy DATE
1846 , p10_a94 in out nocopy NUMBER
1847 , p10_a95 in out nocopy DATE
1848 , p10_a96 in out nocopy NUMBER
1849 , p10_a97 in out nocopy NUMBER
1850 , p10_a98 in out nocopy VARCHAR2
1851 , p10_a99 in out nocopy VARCHAR2
1852 , p10_a100 in out nocopy VARCHAR2
1853 , p11_a0 in out nocopy JTF_NUMBER_TABLE
1854 , p11_a1 in out nocopy JTF_NUMBER_TABLE
1855 , p11_a2 in out nocopy JTF_NUMBER_TABLE
1856 , p11_a3 in out nocopy JTF_VARCHAR2_TABLE_500
1857 , p11_a4 in out nocopy JTF_NUMBER_TABLE
1858 , p11_a5 in out nocopy JTF_NUMBER_TABLE
1859 , p11_a6 in out nocopy JTF_NUMBER_TABLE
1860 , p11_a7 in out nocopy JTF_NUMBER_TABLE
1861 , p11_a8 in out nocopy JTF_DATE_TABLE
1862 , p11_a9 in out nocopy JTF_NUMBER_TABLE
1863 , p11_a10 in out nocopy JTF_DATE_TABLE
1864 , p11_a11 in out nocopy JTF_NUMBER_TABLE
1865 , p11_a12 in out nocopy JTF_NUMBER_TABLE
1866 , p11_a13 in out nocopy JTF_NUMBER_TABLE
1867 , p11_a14 in out nocopy JTF_VARCHAR2_TABLE_300
1868 , p11_a15 in out nocopy JTF_VARCHAR2_TABLE_100
1869 , p11_a16 in out nocopy JTF_VARCHAR2_TABLE_100
1870 , p11_a17 in out nocopy JTF_NUMBER_TABLE
1871 , p11_a18 in out nocopy JTF_VARCHAR2_TABLE_500
1872 , p11_a19 in out nocopy JTF_VARCHAR2_TABLE_100
1873 , p11_a20 in out nocopy JTF_VARCHAR2_TABLE_100
1874 , p11_a21 in out nocopy JTF_VARCHAR2_TABLE_100
1875 , p11_a22 in out nocopy JTF_NUMBER_TABLE
1876 , p11_a23 in out nocopy JTF_NUMBER_TABLE
1877 , p11_a24 in out nocopy JTF_DATE_TABLE
1878 , p11_a25 in out nocopy JTF_NUMBER_TABLE
1879 , p11_a26 in out nocopy JTF_NUMBER_TABLE
1880 , p11_a27 in out nocopy JTF_DATE_TABLE
1881 , p11_a28 in out nocopy JTF_NUMBER_TABLE
1882 , p11_a29 in out nocopy JTF_NUMBER_TABLE
1883 , p11_a30 in out nocopy JTF_DATE_TABLE
1884 , p11_a31 in out nocopy JTF_NUMBER_TABLE
1885 , p11_a32 in out nocopy JTF_NUMBER_TABLE
1886 , p11_a33 in out nocopy JTF_DATE_TABLE
1887 , p11_a34 in out nocopy JTF_NUMBER_TABLE
1888 , p11_a35 in out nocopy JTF_NUMBER_TABLE
1889 , p11_a36 in out nocopy JTF_NUMBER_TABLE
1890 , p11_a37 in out nocopy JTF_NUMBER_TABLE
1891 , p11_a38 in out nocopy JTF_VARCHAR2_TABLE_100
1892 , p11_a39 in out nocopy JTF_NUMBER_TABLE
1893 , p11_a40 in out nocopy JTF_VARCHAR2_TABLE_100
1894 , p11_a41 in out nocopy JTF_VARCHAR2_TABLE_200
1895 , p11_a42 in out nocopy JTF_VARCHAR2_TABLE_200
1896 , p11_a43 in out nocopy JTF_VARCHAR2_TABLE_200
1897 , p11_a44 in out nocopy JTF_VARCHAR2_TABLE_200
1898 , p11_a45 in out nocopy JTF_VARCHAR2_TABLE_200
1899 , p11_a46 in out nocopy JTF_VARCHAR2_TABLE_200
1900 , p11_a47 in out nocopy JTF_VARCHAR2_TABLE_200
1901 , p11_a48 in out nocopy JTF_VARCHAR2_TABLE_200
1902 , p11_a49 in out nocopy JTF_VARCHAR2_TABLE_200
1903 , p11_a50 in out nocopy JTF_VARCHAR2_TABLE_200
1904 , p11_a51 in out nocopy JTF_VARCHAR2_TABLE_200
1905 , p11_a52 in out nocopy JTF_VARCHAR2_TABLE_200
1906 , p11_a53 in out nocopy JTF_VARCHAR2_TABLE_200
1907 , p11_a54 in out nocopy JTF_VARCHAR2_TABLE_200
1908 , p11_a55 in out nocopy JTF_VARCHAR2_TABLE_200
1909 , p11_a56 in out nocopy JTF_VARCHAR2_TABLE_100
1910 )
1911
1912 as
1913 ddp_x_prd_workorder_rec ahl_prd_workorder_pvt.prd_workorder_rec;
1914 ddp_x_prd_workoper_tbl ahl_prd_workorder_pvt.prd_workoper_tbl;
1915 ddindx binary_integer; indx binary_integer;
1916 begin
1917
1918 -- copy data to the local IN or IN-OUT args, if any
1919
1920
1921
1922
1923
1924
1925
1926
1927
1928
1929 ddp_x_prd_workorder_rec.batch_id := p10_a0;
1930 ddp_x_prd_workorder_rec.header_id := p10_a1;
1931 ddp_x_prd_workorder_rec.workorder_id := p10_a2;
1932 ddp_x_prd_workorder_rec.wip_entity_id := p10_a3;
1933 ddp_x_prd_workorder_rec.object_version_number := p10_a4;
1934 ddp_x_prd_workorder_rec.job_number := p10_a5;
1935 ddp_x_prd_workorder_rec.job_description := p10_a6;
1936 ddp_x_prd_workorder_rec.organization_id := p10_a7;
1937 ddp_x_prd_workorder_rec.organization_name := p10_a8;
1938 ddp_x_prd_workorder_rec.organization_code := p10_a9;
1939 ddp_x_prd_workorder_rec.department_name := p10_a10;
1940 ddp_x_prd_workorder_rec.department_id := p10_a11;
1941 ddp_x_prd_workorder_rec.department_class_code := p10_a12;
1942 ddp_x_prd_workorder_rec.status_code := p10_a13;
1943 ddp_x_prd_workorder_rec.status_meaning := p10_a14;
1944 ddp_x_prd_workorder_rec.scheduled_start_date := p10_a15;
1945 ddp_x_prd_workorder_rec.scheduled_start_hr := p10_a16;
1946 ddp_x_prd_workorder_rec.scheduled_start_mi := p10_a17;
1947 ddp_x_prd_workorder_rec.scheduled_end_date := p10_a18;
1948 ddp_x_prd_workorder_rec.scheduled_end_hr := p10_a19;
1949 ddp_x_prd_workorder_rec.scheduled_end_mi := p10_a20;
1950 ddp_x_prd_workorder_rec.actual_start_date := p10_a21;
1951 ddp_x_prd_workorder_rec.actual_start_hr := p10_a22;
1952 ddp_x_prd_workorder_rec.actual_start_mi := p10_a23;
1953 ddp_x_prd_workorder_rec.actual_end_date := p10_a24;
1954 ddp_x_prd_workorder_rec.actual_end_hr := p10_a25;
1955 ddp_x_prd_workorder_rec.actual_end_mi := p10_a26;
1956 ddp_x_prd_workorder_rec.inventory_item_id := p10_a27;
1957 ddp_x_prd_workorder_rec.item_instance_id := p10_a28;
1958 ddp_x_prd_workorder_rec.unit_name := p10_a29;
1959 ddp_x_prd_workorder_rec.item_instance_number := p10_a30;
1960 ddp_x_prd_workorder_rec.wo_part_number := p10_a31;
1961 ddp_x_prd_workorder_rec.item_description := p10_a32;
1962 ddp_x_prd_workorder_rec.serial_number := p10_a33;
1963 ddp_x_prd_workorder_rec.item_instance_uom := p10_a34;
1964 ddp_x_prd_workorder_rec.completion_subinventory := p10_a35;
1965 ddp_x_prd_workorder_rec.completion_locator_id := p10_a36;
1966 ddp_x_prd_workorder_rec.completion_locator_name := p10_a37;
1967 ddp_x_prd_workorder_rec.wip_supply_type := p10_a38;
1968 ddp_x_prd_workorder_rec.wip_supply_meaning := p10_a39;
1969 ddp_x_prd_workorder_rec.firm_planned_flag := p10_a40;
1970 ddp_x_prd_workorder_rec.master_workorder_flag := p10_a41;
1971 ddp_x_prd_workorder_rec.visit_id := p10_a42;
1972 ddp_x_prd_workorder_rec.visit_number := p10_a43;
1973 ddp_x_prd_workorder_rec.visit_name := p10_a44;
1974 ddp_x_prd_workorder_rec.visit_task_id := p10_a45;
1975 ddp_x_prd_workorder_rec.mr_header_id := p10_a46;
1976 ddp_x_prd_workorder_rec.visit_task_number := p10_a47;
1977 ddp_x_prd_workorder_rec.mr_title := p10_a48;
1978 ddp_x_prd_workorder_rec.mr_route_id := p10_a49;
1979 ddp_x_prd_workorder_rec.route_id := p10_a50;
1980 ddp_x_prd_workorder_rec.confirm_failure_flag := p10_a51;
1981 ddp_x_prd_workorder_rec.propagate_flag := p10_a52;
1982 ddp_x_prd_workorder_rec.service_item_id := p10_a53;
1983 ddp_x_prd_workorder_rec.service_item_org_id := p10_a54;
1984 ddp_x_prd_workorder_rec.service_item_description := p10_a55;
1985 ddp_x_prd_workorder_rec.service_item_number := p10_a56;
1986 ddp_x_prd_workorder_rec.service_item_uom := p10_a57;
1987 ddp_x_prd_workorder_rec.project_id := p10_a58;
1988 ddp_x_prd_workorder_rec.project_task_id := p10_a59;
1989 ddp_x_prd_workorder_rec.quantity := p10_a60;
1990 ddp_x_prd_workorder_rec.mrp_quantity := p10_a61;
1991 ddp_x_prd_workorder_rec.incident_id := p10_a62;
1992 ddp_x_prd_workorder_rec.origination_task_id := p10_a63;
1993 ddp_x_prd_workorder_rec.parent_id := p10_a64;
1994 ddp_x_prd_workorder_rec.task_motive_status_id := p10_a65;
1995 ddp_x_prd_workorder_rec.allow_explosion := p10_a66;
1996 ddp_x_prd_workorder_rec.class_code := p10_a67;
1997 ddp_x_prd_workorder_rec.job_priority := p10_a68;
1998 ddp_x_prd_workorder_rec.job_priority_meaning := p10_a69;
1999 ddp_x_prd_workorder_rec.confirmed_failure_flag := p10_a70;
2000 ddp_x_prd_workorder_rec.unit_effectivity_id := p10_a71;
2001 ddp_x_prd_workorder_rec.plan_id := p10_a72;
2002 ddp_x_prd_workorder_rec.collection_id := p10_a73;
2003 ddp_x_prd_workorder_rec.sub_inventory := p10_a74;
2004 ddp_x_prd_workorder_rec.locator_id := p10_a75;
2005 ddp_x_prd_workorder_rec.security_group_id := p10_a76;
2006 ddp_x_prd_workorder_rec.attribute_category := p10_a77;
2007 ddp_x_prd_workorder_rec.attribute1 := p10_a78;
2008 ddp_x_prd_workorder_rec.attribute2 := p10_a79;
2009 ddp_x_prd_workorder_rec.attribute3 := p10_a80;
2010 ddp_x_prd_workorder_rec.attribute4 := p10_a81;
2011 ddp_x_prd_workorder_rec.attribute5 := p10_a82;
2012 ddp_x_prd_workorder_rec.attribute6 := p10_a83;
2013 ddp_x_prd_workorder_rec.attribute7 := p10_a84;
2014 ddp_x_prd_workorder_rec.attribute8 := p10_a85;
2015 ddp_x_prd_workorder_rec.attribute9 := p10_a86;
2016 ddp_x_prd_workorder_rec.attribute10 := p10_a87;
2017 ddp_x_prd_workorder_rec.attribute11 := p10_a88;
2018 ddp_x_prd_workorder_rec.attribute12 := p10_a89;
2019 ddp_x_prd_workorder_rec.attribute13 := p10_a90;
2020 ddp_x_prd_workorder_rec.attribute14 := p10_a91;
2021 ddp_x_prd_workorder_rec.attribute15 := p10_a92;
2022 ddp_x_prd_workorder_rec.last_update_date := p10_a93;
2023 ddp_x_prd_workorder_rec.last_updated_by := p10_a94;
2024 ddp_x_prd_workorder_rec.creation_date := p10_a95;
2025 ddp_x_prd_workorder_rec.created_by := p10_a96;
2026 ddp_x_prd_workorder_rec.last_update_login := p10_a97;
2027 ddp_x_prd_workorder_rec.dml_operation := p10_a98;
2028 ddp_x_prd_workorder_rec.hold_reason_code := p10_a99;
2029 ddp_x_prd_workorder_rec.hold_reason := p10_a100;
2030
2031 ahl_prd_workorder_pvt_w.rosetta_table_copy_in_p1(ddp_x_prd_workoper_tbl, p11_a0
2032 , p11_a1
2033 , p11_a2
2034 , p11_a3
2035 , p11_a4
2036 , p11_a5
2037 , p11_a6
2038 , p11_a7
2039 , p11_a8
2040 , p11_a9
2041 , p11_a10
2042 , p11_a11
2043 , p11_a12
2044 , p11_a13
2045 , p11_a14
2046 , p11_a15
2047 , p11_a16
2048 , p11_a17
2049 , p11_a18
2050 , p11_a19
2051 , p11_a20
2052 , p11_a21
2053 , p11_a22
2054 , p11_a23
2055 , p11_a24
2056 , p11_a25
2057 , p11_a26
2058 , p11_a27
2059 , p11_a28
2060 , p11_a29
2061 , p11_a30
2062 , p11_a31
2063 , p11_a32
2064 , p11_a33
2065 , p11_a34
2066 , p11_a35
2067 , p11_a36
2068 , p11_a37
2069 , p11_a38
2070 , p11_a39
2071 , p11_a40
2072 , p11_a41
2073 , p11_a42
2074 , p11_a43
2075 , p11_a44
2076 , p11_a45
2077 , p11_a46
2078 , p11_a47
2079 , p11_a48
2080 , p11_a49
2081 , p11_a50
2082 , p11_a51
2083 , p11_a52
2084 , p11_a53
2085 , p11_a54
2086 , p11_a55
2087 , p11_a56
2088 );
2089
2090 -- here's the delegated call to the old PL/SQL routine
2091 ahl_prd_workorder_pvt.update_job(p_api_version,
2092 p_init_msg_list,
2093 p_commit,
2094 p_validation_level,
2095 p_default,
2096 p_module_type,
2097 x_return_status,
2098 x_msg_count,
2099 x_msg_data,
2100 p_wip_load_flag,
2101 ddp_x_prd_workorder_rec,
2102 ddp_x_prd_workoper_tbl);
2103
2104 -- copy data back from the local variables to OUT or IN-OUT args, if any
2105
2106
2107
2108
2109
2110
2111
2112
2113
2114
2115 p10_a0 := ddp_x_prd_workorder_rec.batch_id;
2116 p10_a1 := ddp_x_prd_workorder_rec.header_id;
2117 p10_a2 := ddp_x_prd_workorder_rec.workorder_id;
2118 p10_a3 := ddp_x_prd_workorder_rec.wip_entity_id;
2119 p10_a4 := ddp_x_prd_workorder_rec.object_version_number;
2120 p10_a5 := ddp_x_prd_workorder_rec.job_number;
2121 p10_a6 := ddp_x_prd_workorder_rec.job_description;
2122 p10_a7 := ddp_x_prd_workorder_rec.organization_id;
2123 p10_a8 := ddp_x_prd_workorder_rec.organization_name;
2124 p10_a9 := ddp_x_prd_workorder_rec.organization_code;
2125 p10_a10 := ddp_x_prd_workorder_rec.department_name;
2126 p10_a11 := ddp_x_prd_workorder_rec.department_id;
2127 p10_a12 := ddp_x_prd_workorder_rec.department_class_code;
2128 p10_a13 := ddp_x_prd_workorder_rec.status_code;
2129 p10_a14 := ddp_x_prd_workorder_rec.status_meaning;
2130 p10_a15 := ddp_x_prd_workorder_rec.scheduled_start_date;
2131 p10_a16 := ddp_x_prd_workorder_rec.scheduled_start_hr;
2132 p10_a17 := ddp_x_prd_workorder_rec.scheduled_start_mi;
2133 p10_a18 := ddp_x_prd_workorder_rec.scheduled_end_date;
2134 p10_a19 := ddp_x_prd_workorder_rec.scheduled_end_hr;
2135 p10_a20 := ddp_x_prd_workorder_rec.scheduled_end_mi;
2136 p10_a21 := ddp_x_prd_workorder_rec.actual_start_date;
2137 p10_a22 := ddp_x_prd_workorder_rec.actual_start_hr;
2138 p10_a23 := ddp_x_prd_workorder_rec.actual_start_mi;
2139 p10_a24 := ddp_x_prd_workorder_rec.actual_end_date;
2140 p10_a25 := ddp_x_prd_workorder_rec.actual_end_hr;
2141 p10_a26 := ddp_x_prd_workorder_rec.actual_end_mi;
2142 p10_a27 := ddp_x_prd_workorder_rec.inventory_item_id;
2143 p10_a28 := ddp_x_prd_workorder_rec.item_instance_id;
2144 p10_a29 := ddp_x_prd_workorder_rec.unit_name;
2145 p10_a30 := ddp_x_prd_workorder_rec.item_instance_number;
2146 p10_a31 := ddp_x_prd_workorder_rec.wo_part_number;
2147 p10_a32 := ddp_x_prd_workorder_rec.item_description;
2148 p10_a33 := ddp_x_prd_workorder_rec.serial_number;
2149 p10_a34 := ddp_x_prd_workorder_rec.item_instance_uom;
2153 p10_a38 := ddp_x_prd_workorder_rec.wip_supply_type;
2150 p10_a35 := ddp_x_prd_workorder_rec.completion_subinventory;
2151 p10_a36 := ddp_x_prd_workorder_rec.completion_locator_id;
2152 p10_a37 := ddp_x_prd_workorder_rec.completion_locator_name;
2154 p10_a39 := ddp_x_prd_workorder_rec.wip_supply_meaning;
2155 p10_a40 := ddp_x_prd_workorder_rec.firm_planned_flag;
2156 p10_a41 := ddp_x_prd_workorder_rec.master_workorder_flag;
2157 p10_a42 := ddp_x_prd_workorder_rec.visit_id;
2158 p10_a43 := ddp_x_prd_workorder_rec.visit_number;
2159 p10_a44 := ddp_x_prd_workorder_rec.visit_name;
2160 p10_a45 := ddp_x_prd_workorder_rec.visit_task_id;
2161 p10_a46 := ddp_x_prd_workorder_rec.mr_header_id;
2162 p10_a47 := ddp_x_prd_workorder_rec.visit_task_number;
2163 p10_a48 := ddp_x_prd_workorder_rec.mr_title;
2164 p10_a49 := ddp_x_prd_workorder_rec.mr_route_id;
2165 p10_a50 := ddp_x_prd_workorder_rec.route_id;
2166 p10_a51 := ddp_x_prd_workorder_rec.confirm_failure_flag;
2167 p10_a52 := ddp_x_prd_workorder_rec.propagate_flag;
2168 p10_a53 := ddp_x_prd_workorder_rec.service_item_id;
2169 p10_a54 := ddp_x_prd_workorder_rec.service_item_org_id;
2170 p10_a55 := ddp_x_prd_workorder_rec.service_item_description;
2171 p10_a56 := ddp_x_prd_workorder_rec.service_item_number;
2172 p10_a57 := ddp_x_prd_workorder_rec.service_item_uom;
2173 p10_a58 := ddp_x_prd_workorder_rec.project_id;
2174 p10_a59 := ddp_x_prd_workorder_rec.project_task_id;
2175 p10_a60 := ddp_x_prd_workorder_rec.quantity;
2176 p10_a61 := ddp_x_prd_workorder_rec.mrp_quantity;
2177 p10_a62 := ddp_x_prd_workorder_rec.incident_id;
2178 p10_a63 := ddp_x_prd_workorder_rec.origination_task_id;
2179 p10_a64 := ddp_x_prd_workorder_rec.parent_id;
2180 p10_a65 := ddp_x_prd_workorder_rec.task_motive_status_id;
2181 p10_a66 := ddp_x_prd_workorder_rec.allow_explosion;
2182 p10_a67 := ddp_x_prd_workorder_rec.class_code;
2183 p10_a68 := ddp_x_prd_workorder_rec.job_priority;
2184 p10_a69 := ddp_x_prd_workorder_rec.job_priority_meaning;
2185 p10_a70 := ddp_x_prd_workorder_rec.confirmed_failure_flag;
2186 p10_a71 := ddp_x_prd_workorder_rec.unit_effectivity_id;
2187 p10_a72 := ddp_x_prd_workorder_rec.plan_id;
2188 p10_a73 := ddp_x_prd_workorder_rec.collection_id;
2189 p10_a74 := ddp_x_prd_workorder_rec.sub_inventory;
2190 p10_a75 := ddp_x_prd_workorder_rec.locator_id;
2191 p10_a76 := ddp_x_prd_workorder_rec.security_group_id;
2192 p10_a77 := ddp_x_prd_workorder_rec.attribute_category;
2193 p10_a78 := ddp_x_prd_workorder_rec.attribute1;
2194 p10_a79 := ddp_x_prd_workorder_rec.attribute2;
2195 p10_a80 := ddp_x_prd_workorder_rec.attribute3;
2196 p10_a81 := ddp_x_prd_workorder_rec.attribute4;
2197 p10_a82 := ddp_x_prd_workorder_rec.attribute5;
2198 p10_a83 := ddp_x_prd_workorder_rec.attribute6;
2199 p10_a84 := ddp_x_prd_workorder_rec.attribute7;
2200 p10_a85 := ddp_x_prd_workorder_rec.attribute8;
2201 p10_a86 := ddp_x_prd_workorder_rec.attribute9;
2202 p10_a87 := ddp_x_prd_workorder_rec.attribute10;
2203 p10_a88 := ddp_x_prd_workorder_rec.attribute11;
2204 p10_a89 := ddp_x_prd_workorder_rec.attribute12;
2205 p10_a90 := ddp_x_prd_workorder_rec.attribute13;
2206 p10_a91 := ddp_x_prd_workorder_rec.attribute14;
2207 p10_a92 := ddp_x_prd_workorder_rec.attribute15;
2208 p10_a93 := ddp_x_prd_workorder_rec.last_update_date;
2209 p10_a94 := ddp_x_prd_workorder_rec.last_updated_by;
2210 p10_a95 := ddp_x_prd_workorder_rec.creation_date;
2211 p10_a96 := ddp_x_prd_workorder_rec.created_by;
2212 p10_a97 := ddp_x_prd_workorder_rec.last_update_login;
2213 p10_a98 := ddp_x_prd_workorder_rec.dml_operation;
2214 p10_a99 := ddp_x_prd_workorder_rec.hold_reason_code;
2215 p10_a100 := ddp_x_prd_workorder_rec.hold_reason;
2216
2217 ahl_prd_workorder_pvt_w.rosetta_table_copy_out_p1(ddp_x_prd_workoper_tbl, p11_a0
2218 , p11_a1
2219 , p11_a2
2220 , p11_a3
2221 , p11_a4
2222 , p11_a5
2223 , p11_a6
2224 , p11_a7
2225 , p11_a8
2226 , p11_a9
2227 , p11_a10
2228 , p11_a11
2229 , p11_a12
2230 , p11_a13
2231 , p11_a14
2232 , p11_a15
2233 , p11_a16
2234 , p11_a17
2235 , p11_a18
2236 , p11_a19
2237 , p11_a20
2238 , p11_a21
2239 , p11_a22
2240 , p11_a23
2241 , p11_a24
2242 , p11_a25
2243 , p11_a26
2244 , p11_a27
2245 , p11_a28
2246 , p11_a29
2247 , p11_a30
2248 , p11_a31
2249 , p11_a32
2250 , p11_a33
2251 , p11_a34
2252 , p11_a35
2253 , p11_a36
2254 , p11_a37
2255 , p11_a38
2256 , p11_a39
2257 , p11_a40
2258 , p11_a41
2259 , p11_a42
2260 , p11_a43
2261 , p11_a44
2262 , p11_a45
2263 , p11_a46
2264 , p11_a47
2265 , p11_a48
2266 , p11_a49
2267 , p11_a50
2268 , p11_a51
2269 , p11_a52
2270 , p11_a53
2271 , p11_a54
2272 , p11_a55
2273 , p11_a56
2274 );
2275 end;
2276
2277 procedure insert_turnover_notes(p_api_version NUMBER
2278 , p_init_msg_list VARCHAR2
2279 , p_commit VARCHAR2
2283 , x_return_status out nocopy VARCHAR2
2280 , p_validation_level NUMBER
2281 , p_default VARCHAR2
2282 , p_module_type VARCHAR2
2284 , x_msg_count out nocopy NUMBER
2285 , x_msg_data out nocopy VARCHAR2
2286 , p9_a0 in out nocopy JTF_NUMBER_TABLE
2287 , p9_a1 in out nocopy JTF_NUMBER_TABLE
2288 , p9_a2 in out nocopy JTF_VARCHAR2_TABLE_100
2289 , p9_a3 in out nocopy JTF_VARCHAR2_TABLE_2000
2290 , p9_a4 in out nocopy JTF_NUMBER_TABLE
2291 , p9_a5 in out nocopy JTF_VARCHAR2_TABLE_300
2292 , p9_a6 in out nocopy JTF_DATE_TABLE
2293 , p9_a7 in out nocopy JTF_NUMBER_TABLE
2294 )
2295
2296 as
2297 ddp_trunover_notes_tbl ahl_prd_workorder_pvt.turnover_notes_tbl_type;
2298 ddindx binary_integer; indx binary_integer;
2299 begin
2300
2301 -- copy data to the local IN or IN-OUT args, if any
2302
2303
2304
2305
2306
2307
2308
2309
2310
2311 ahl_prd_workorder_pvt_w.rosetta_table_copy_in_p13(ddp_trunover_notes_tbl, p9_a0
2312 , p9_a1
2313 , p9_a2
2314 , p9_a3
2315 , p9_a4
2316 , p9_a5
2317 , p9_a6
2318 , p9_a7
2319 );
2320
2321 -- here's the delegated call to the old PL/SQL routine
2322 ahl_prd_workorder_pvt.insert_turnover_notes(p_api_version,
2323 p_init_msg_list,
2324 p_commit,
2325 p_validation_level,
2326 p_default,
2327 p_module_type,
2328 x_return_status,
2329 x_msg_count,
2330 x_msg_data,
2331 ddp_trunover_notes_tbl);
2332
2333 -- copy data back from the local variables to OUT or IN-OUT args, if any
2334
2335
2336
2337
2338
2339
2340
2341
2342
2343 ahl_prd_workorder_pvt_w.rosetta_table_copy_out_p13(ddp_trunover_notes_tbl, p9_a0
2344 , p9_a1
2345 , p9_a2
2346 , p9_a3
2347 , p9_a4
2348 , p9_a5
2349 , p9_a6
2350 , p9_a7
2351 );
2352 end;
2353
2354 end ahl_prd_workorder_pvt_w;