[Home] [Help]
PACKAGE BODY: APPS.WSM_WIP_LOT_TXN_PVT_W
Source
1 package body wsm_wip_lot_txn_pvt_w as
2 /* $Header: WSMVWLTB.pls 120.0 2005/07/26 23:53 nlal noship $ */
3 procedure rosetta_table_copy_in_p5(t out nocopy wsm_wip_lot_txn_pvt.wsm_job_secondary_qty_tbl_type, a0 JTF_NUMBER_TABLE
4 , a1 JTF_VARCHAR2_TABLE_300
5 , a2 JTF_NUMBER_TABLE
6 , a3 JTF_VARCHAR2_TABLE_100
7 , a4 JTF_NUMBER_TABLE
8 , a5 JTF_NUMBER_TABLE
9 ) as
10 ddindx binary_integer; indx binary_integer;
11 begin
12 if a0 is not null and a0.count > 0 then
13 if a0.count > 0 then
14 indx := a0.first;
15 ddindx := 1;
16 while true loop
17 t(ddindx).wip_entity_id := a0(indx);
18 t(ddindx).wip_entity_name := a1(indx);
19 t(ddindx).organization_id := a2(indx);
20 t(ddindx).uom_code := a3(indx);
21 t(ddindx).current_quantity := a4(indx);
22 t(ddindx).currently_active := a5(indx);
23 ddindx := ddindx+1;
24 if a0.last =indx
25 then exit;
26 end if;
27 indx := a0.next(indx);
28 end loop;
29 end if;
30 end if;
31 end rosetta_table_copy_in_p5;
32 procedure rosetta_table_copy_out_p5(t wsm_wip_lot_txn_pvt.wsm_job_secondary_qty_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
33 , a1 out nocopy JTF_VARCHAR2_TABLE_300
34 , a2 out nocopy JTF_NUMBER_TABLE
35 , a3 out nocopy JTF_VARCHAR2_TABLE_100
36 , a4 out nocopy JTF_NUMBER_TABLE
37 , a5 out nocopy JTF_NUMBER_TABLE
38 ) as
39 ddindx binary_integer; indx binary_integer;
40 begin
41 if t is null or t.count = 0 then
42 a0 := JTF_NUMBER_TABLE();
43 a1 := JTF_VARCHAR2_TABLE_300();
44 a2 := JTF_NUMBER_TABLE();
45 a3 := JTF_VARCHAR2_TABLE_100();
46 a4 := JTF_NUMBER_TABLE();
47 a5 := JTF_NUMBER_TABLE();
48 else
49 a0 := JTF_NUMBER_TABLE();
50 a1 := JTF_VARCHAR2_TABLE_300();
51 a2 := JTF_NUMBER_TABLE();
52 a3 := JTF_VARCHAR2_TABLE_100();
53 a4 := JTF_NUMBER_TABLE();
54 a5 := JTF_NUMBER_TABLE();
55 if t.count > 0 then
56 a0.extend(t.count);
57 a1.extend(t.count);
58 a2.extend(t.count);
59 a3.extend(t.count);
60 a4.extend(t.count);
61 a5.extend(t.count);
62 ddindx := t.first;
63 indx := 1;
64 while true loop
65 a0(indx) := t(ddindx).wip_entity_id;
66 a1(indx) := t(ddindx).wip_entity_name;
67 a2(indx) := t(ddindx).organization_id;
68 a3(indx) := t(ddindx).uom_code;
69 a4(indx) := t(ddindx).current_quantity;
70 a5(indx) := t(ddindx).currently_active;
71 indx := indx+1;
72 if t.last =ddindx
73 then exit;
74 end if;
75 ddindx := t.next(ddindx);
76 end loop;
77 end if;
78 end if;
79 end rosetta_table_copy_out_p5;
80
81 procedure rosetta_table_copy_in_p6(t out nocopy wsm_wip_lot_txn_pvt.wltx_starting_jobs_tbl_type, a0 JTF_NUMBER_TABLE
82 , a1 JTF_VARCHAR2_TABLE_300
83 , a2 JTF_NUMBER_TABLE
84 , a3 JTF_NUMBER_TABLE
85 , a4 JTF_VARCHAR2_TABLE_300
86 , a5 JTF_VARCHAR2_TABLE_100
87 , a6 JTF_NUMBER_TABLE
88 , a7 JTF_VARCHAR2_TABLE_100
89 , a8 JTF_VARCHAR2_TABLE_100
90 , a9 JTF_VARCHAR2_TABLE_100
91 , a10 JTF_NUMBER_TABLE
92 , a11 JTF_VARCHAR2_TABLE_100
93 , a12 JTF_NUMBER_TABLE
94 , a13 JTF_NUMBER_TABLE
95 , a14 JTF_NUMBER_TABLE
96 , a15 JTF_VARCHAR2_TABLE_100
97 , a16 JTF_VARCHAR2_TABLE_300
98 , a17 JTF_NUMBER_TABLE
99 , a18 JTF_NUMBER_TABLE
100 , a19 JTF_NUMBER_TABLE
101 , a20 JTF_VARCHAR2_TABLE_100
102 , a21 JTF_NUMBER_TABLE
103 , a22 JTF_NUMBER_TABLE
104 , a23 JTF_NUMBER_TABLE
105 , a24 JTF_NUMBER_TABLE
106 , a25 JTF_NUMBER_TABLE
107 , a26 JTF_NUMBER_TABLE
108 , a27 JTF_VARCHAR2_TABLE_100
109 , a28 JTF_DATE_TABLE
110 , a29 JTF_VARCHAR2_TABLE_100
111 , a30 JTF_VARCHAR2_TABLE_100
112 , a31 JTF_NUMBER_TABLE
113 , a32 JTF_VARCHAR2_TABLE_100
114 , a33 JTF_DATE_TABLE
115 , a34 JTF_VARCHAR2_TABLE_100
116 , a35 JTF_NUMBER_TABLE
117 , a36 JTF_VARCHAR2_TABLE_200
118 , a37 JTF_DATE_TABLE
119 , a38 JTF_DATE_TABLE
120 , a39 JTF_DATE_TABLE
121 , a40 JTF_NUMBER_TABLE
122 , a41 JTF_NUMBER_TABLE
123 , a42 JTF_NUMBER_TABLE
124 , a43 JTF_VARCHAR2_TABLE_100
125 , a44 JTF_VARCHAR2_TABLE_200
126 , a45 JTF_VARCHAR2_TABLE_200
127 , a46 JTF_VARCHAR2_TABLE_200
128 , a47 JTF_VARCHAR2_TABLE_200
129 , a48 JTF_VARCHAR2_TABLE_200
130 , a49 JTF_VARCHAR2_TABLE_200
131 , a50 JTF_VARCHAR2_TABLE_200
132 , a51 JTF_VARCHAR2_TABLE_200
133 , a52 JTF_VARCHAR2_TABLE_200
134 , a53 JTF_VARCHAR2_TABLE_200
135 , a54 JTF_VARCHAR2_TABLE_200
136 , a55 JTF_VARCHAR2_TABLE_200
137 , a56 JTF_VARCHAR2_TABLE_200
138 , a57 JTF_VARCHAR2_TABLE_200
139 , a58 JTF_VARCHAR2_TABLE_200
140 ) as
141 ddindx binary_integer; indx binary_integer;
142 begin
143 if a0 is not null and a0.count > 0 then
144 if a0.count > 0 then
145 indx := a0.first;
146 ddindx := 1;
147 while true loop
148 t(ddindx).wip_entity_id := a0(indx);
149 t(ddindx).wip_entity_name := a1(indx);
150 t(ddindx).job_type := a2(indx);
151 t(ddindx).status_type := a3(indx);
152 t(ddindx).description := a4(indx);
153 t(ddindx).representative_flag := a5(indx);
154 t(ddindx).serial_track_flag := a6(indx);
155 t(ddindx).class_code := a7(indx);
156 t(ddindx).demand_class := a8(indx);
157 t(ddindx).organization_code := a9(indx);
158 t(ddindx).primary_item_id := a10(indx);
159 t(ddindx).item_name := a11(indx);
160 t(ddindx).organization_id := a12(indx);
161 t(ddindx).intraoperation_step := a13(indx);
162 t(ddindx).operation_seq_num := a14(indx);
163 t(ddindx).operation_code := a15(indx);
164 t(ddindx).operation_description := a16(indx);
165 t(ddindx).operation_seq_id := a17(indx);
166 t(ddindx).standard_operation_id := a18(indx);
167 t(ddindx).department_id := a19(indx);
168 t(ddindx).department_code := a20(indx);
169 t(ddindx).start_quantity := a21(indx);
170 t(ddindx).quantity_available := a22(indx);
171 t(ddindx).net_quantity := a23(indx);
172 t(ddindx).routing_reference_id := a24(indx);
173 t(ddindx).bom_reference_id := a25(indx);
174 t(ddindx).common_bill_sequence_id := a26(indx);
175 t(ddindx).bom_revision := a27(indx);
176 t(ddindx).bom_revision_date := a28(indx);
177 t(ddindx).alternate_bom_designator := a29(indx);
178 t(ddindx).alternate_routing_designator := a30(indx);
179 t(ddindx).common_routing_sequence_id := a31(indx);
180 t(ddindx).routing_revision := a32(indx);
181 t(ddindx).routing_revision_date := a33(indx);
182 t(ddindx).completion_subinventory := a34(indx);
183 t(ddindx).completion_locator_id := a35(indx);
184 t(ddindx).completion_locator := a36(indx);
185 t(ddindx).date_released := a37(indx);
186 t(ddindx).scheduled_start_date := a38(indx);
187 t(ddindx).scheduled_completion_date := a39(indx);
188 t(ddindx).coproducts_supply := a40(indx);
189 t(ddindx).kanban_card_id := a41(indx);
190 t(ddindx).wip_supply_type := a42(indx);
191 t(ddindx).attribute_category := a43(indx);
192 t(ddindx).attribute1 := a44(indx);
193 t(ddindx).attribute2 := a45(indx);
194 t(ddindx).attribute3 := a46(indx);
195 t(ddindx).attribute4 := a47(indx);
196 t(ddindx).attribute5 := a48(indx);
197 t(ddindx).attribute6 := a49(indx);
198 t(ddindx).attribute7 := a50(indx);
199 t(ddindx).attribute8 := a51(indx);
200 t(ddindx).attribute9 := a52(indx);
201 t(ddindx).attribute10 := a53(indx);
202 t(ddindx).attribute11 := a54(indx);
203 t(ddindx).attribute12 := a55(indx);
204 t(ddindx).attribute13 := a56(indx);
205 t(ddindx).attribute14 := a57(indx);
206 t(ddindx).attribute15 := a58(indx);
207 ddindx := ddindx+1;
208 if a0.last =indx
209 then exit;
210 end if;
211 indx := a0.next(indx);
212 end loop;
213 end if;
214 end if;
215 end rosetta_table_copy_in_p6;
216 procedure rosetta_table_copy_out_p6(t wsm_wip_lot_txn_pvt.wltx_starting_jobs_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
217 , a1 out nocopy JTF_VARCHAR2_TABLE_300
218 , a2 out nocopy JTF_NUMBER_TABLE
219 , a3 out nocopy JTF_NUMBER_TABLE
220 , a4 out nocopy JTF_VARCHAR2_TABLE_300
221 , a5 out nocopy JTF_VARCHAR2_TABLE_100
222 , a6 out nocopy JTF_NUMBER_TABLE
223 , a7 out nocopy JTF_VARCHAR2_TABLE_100
224 , a8 out nocopy JTF_VARCHAR2_TABLE_100
225 , a9 out nocopy JTF_VARCHAR2_TABLE_100
226 , a10 out nocopy JTF_NUMBER_TABLE
227 , a11 out nocopy JTF_VARCHAR2_TABLE_100
228 , a12 out nocopy JTF_NUMBER_TABLE
229 , a13 out nocopy JTF_NUMBER_TABLE
230 , a14 out nocopy JTF_NUMBER_TABLE
231 , a15 out nocopy JTF_VARCHAR2_TABLE_100
232 , a16 out nocopy JTF_VARCHAR2_TABLE_300
233 , a17 out nocopy JTF_NUMBER_TABLE
234 , a18 out nocopy JTF_NUMBER_TABLE
235 , a19 out nocopy JTF_NUMBER_TABLE
236 , a20 out nocopy JTF_VARCHAR2_TABLE_100
237 , a21 out nocopy JTF_NUMBER_TABLE
238 , a22 out nocopy JTF_NUMBER_TABLE
239 , a23 out nocopy JTF_NUMBER_TABLE
240 , a24 out nocopy JTF_NUMBER_TABLE
241 , a25 out nocopy JTF_NUMBER_TABLE
242 , a26 out nocopy JTF_NUMBER_TABLE
243 , a27 out nocopy JTF_VARCHAR2_TABLE_100
244 , a28 out nocopy JTF_DATE_TABLE
245 , a29 out nocopy JTF_VARCHAR2_TABLE_100
246 , a30 out nocopy JTF_VARCHAR2_TABLE_100
247 , a31 out nocopy JTF_NUMBER_TABLE
248 , a32 out nocopy JTF_VARCHAR2_TABLE_100
249 , a33 out nocopy JTF_DATE_TABLE
250 , a34 out nocopy JTF_VARCHAR2_TABLE_100
251 , a35 out nocopy JTF_NUMBER_TABLE
252 , a36 out nocopy JTF_VARCHAR2_TABLE_200
253 , a37 out nocopy JTF_DATE_TABLE
254 , a38 out nocopy JTF_DATE_TABLE
255 , a39 out nocopy JTF_DATE_TABLE
256 , a40 out nocopy JTF_NUMBER_TABLE
257 , a41 out nocopy JTF_NUMBER_TABLE
258 , a42 out nocopy JTF_NUMBER_TABLE
259 , a43 out nocopy JTF_VARCHAR2_TABLE_100
260 , a44 out nocopy JTF_VARCHAR2_TABLE_200
261 , a45 out nocopy JTF_VARCHAR2_TABLE_200
262 , a46 out nocopy JTF_VARCHAR2_TABLE_200
263 , a47 out nocopy JTF_VARCHAR2_TABLE_200
264 , a48 out nocopy JTF_VARCHAR2_TABLE_200
265 , a49 out nocopy JTF_VARCHAR2_TABLE_200
266 , a50 out nocopy JTF_VARCHAR2_TABLE_200
267 , a51 out nocopy JTF_VARCHAR2_TABLE_200
268 , a52 out nocopy JTF_VARCHAR2_TABLE_200
269 , a53 out nocopy JTF_VARCHAR2_TABLE_200
270 , a54 out nocopy JTF_VARCHAR2_TABLE_200
271 , a55 out nocopy JTF_VARCHAR2_TABLE_200
272 , a56 out nocopy JTF_VARCHAR2_TABLE_200
273 , a57 out nocopy JTF_VARCHAR2_TABLE_200
274 , a58 out nocopy JTF_VARCHAR2_TABLE_200
275 ) as
276 ddindx binary_integer; indx binary_integer;
277 begin
278 if t is null or t.count = 0 then
279 a0 := JTF_NUMBER_TABLE();
280 a1 := JTF_VARCHAR2_TABLE_300();
281 a2 := JTF_NUMBER_TABLE();
282 a3 := JTF_NUMBER_TABLE();
283 a4 := JTF_VARCHAR2_TABLE_300();
284 a5 := JTF_VARCHAR2_TABLE_100();
285 a6 := JTF_NUMBER_TABLE();
286 a7 := JTF_VARCHAR2_TABLE_100();
287 a8 := JTF_VARCHAR2_TABLE_100();
288 a9 := JTF_VARCHAR2_TABLE_100();
289 a10 := JTF_NUMBER_TABLE();
290 a11 := JTF_VARCHAR2_TABLE_100();
291 a12 := JTF_NUMBER_TABLE();
292 a13 := JTF_NUMBER_TABLE();
293 a14 := JTF_NUMBER_TABLE();
294 a15 := JTF_VARCHAR2_TABLE_100();
295 a16 := JTF_VARCHAR2_TABLE_300();
296 a17 := JTF_NUMBER_TABLE();
297 a18 := JTF_NUMBER_TABLE();
298 a19 := JTF_NUMBER_TABLE();
299 a20 := JTF_VARCHAR2_TABLE_100();
300 a21 := JTF_NUMBER_TABLE();
301 a22 := JTF_NUMBER_TABLE();
302 a23 := JTF_NUMBER_TABLE();
303 a24 := JTF_NUMBER_TABLE();
304 a25 := JTF_NUMBER_TABLE();
305 a26 := JTF_NUMBER_TABLE();
306 a27 := JTF_VARCHAR2_TABLE_100();
307 a28 := JTF_DATE_TABLE();
308 a29 := JTF_VARCHAR2_TABLE_100();
309 a30 := JTF_VARCHAR2_TABLE_100();
310 a31 := JTF_NUMBER_TABLE();
311 a32 := JTF_VARCHAR2_TABLE_100();
312 a33 := JTF_DATE_TABLE();
313 a34 := JTF_VARCHAR2_TABLE_100();
314 a35 := JTF_NUMBER_TABLE();
315 a36 := JTF_VARCHAR2_TABLE_200();
316 a37 := JTF_DATE_TABLE();
317 a38 := JTF_DATE_TABLE();
318 a39 := JTF_DATE_TABLE();
319 a40 := JTF_NUMBER_TABLE();
320 a41 := JTF_NUMBER_TABLE();
321 a42 := JTF_NUMBER_TABLE();
322 a43 := JTF_VARCHAR2_TABLE_100();
323 a44 := JTF_VARCHAR2_TABLE_200();
324 a45 := JTF_VARCHAR2_TABLE_200();
325 a46 := JTF_VARCHAR2_TABLE_200();
326 a47 := JTF_VARCHAR2_TABLE_200();
327 a48 := JTF_VARCHAR2_TABLE_200();
328 a49 := JTF_VARCHAR2_TABLE_200();
329 a50 := JTF_VARCHAR2_TABLE_200();
330 a51 := JTF_VARCHAR2_TABLE_200();
331 a52 := JTF_VARCHAR2_TABLE_200();
332 a53 := JTF_VARCHAR2_TABLE_200();
333 a54 := JTF_VARCHAR2_TABLE_200();
334 a55 := JTF_VARCHAR2_TABLE_200();
335 a56 := JTF_VARCHAR2_TABLE_200();
336 a57 := JTF_VARCHAR2_TABLE_200();
337 a58 := JTF_VARCHAR2_TABLE_200();
338 else
339 a0 := JTF_NUMBER_TABLE();
340 a1 := JTF_VARCHAR2_TABLE_300();
341 a2 := JTF_NUMBER_TABLE();
342 a3 := JTF_NUMBER_TABLE();
343 a4 := JTF_VARCHAR2_TABLE_300();
344 a5 := JTF_VARCHAR2_TABLE_100();
345 a6 := JTF_NUMBER_TABLE();
346 a7 := JTF_VARCHAR2_TABLE_100();
347 a8 := JTF_VARCHAR2_TABLE_100();
348 a9 := JTF_VARCHAR2_TABLE_100();
349 a10 := JTF_NUMBER_TABLE();
350 a11 := JTF_VARCHAR2_TABLE_100();
351 a12 := JTF_NUMBER_TABLE();
352 a13 := JTF_NUMBER_TABLE();
353 a14 := JTF_NUMBER_TABLE();
354 a15 := JTF_VARCHAR2_TABLE_100();
355 a16 := JTF_VARCHAR2_TABLE_300();
356 a17 := JTF_NUMBER_TABLE();
357 a18 := JTF_NUMBER_TABLE();
358 a19 := JTF_NUMBER_TABLE();
359 a20 := JTF_VARCHAR2_TABLE_100();
360 a21 := JTF_NUMBER_TABLE();
361 a22 := JTF_NUMBER_TABLE();
362 a23 := JTF_NUMBER_TABLE();
363 a24 := JTF_NUMBER_TABLE();
364 a25 := JTF_NUMBER_TABLE();
365 a26 := JTF_NUMBER_TABLE();
366 a27 := JTF_VARCHAR2_TABLE_100();
367 a28 := JTF_DATE_TABLE();
368 a29 := JTF_VARCHAR2_TABLE_100();
369 a30 := JTF_VARCHAR2_TABLE_100();
370 a31 := JTF_NUMBER_TABLE();
371 a32 := JTF_VARCHAR2_TABLE_100();
372 a33 := JTF_DATE_TABLE();
373 a34 := JTF_VARCHAR2_TABLE_100();
374 a35 := JTF_NUMBER_TABLE();
375 a36 := JTF_VARCHAR2_TABLE_200();
376 a37 := JTF_DATE_TABLE();
377 a38 := JTF_DATE_TABLE();
378 a39 := JTF_DATE_TABLE();
379 a40 := JTF_NUMBER_TABLE();
380 a41 := JTF_NUMBER_TABLE();
381 a42 := JTF_NUMBER_TABLE();
382 a43 := JTF_VARCHAR2_TABLE_100();
383 a44 := JTF_VARCHAR2_TABLE_200();
384 a45 := JTF_VARCHAR2_TABLE_200();
385 a46 := JTF_VARCHAR2_TABLE_200();
386 a47 := JTF_VARCHAR2_TABLE_200();
387 a48 := JTF_VARCHAR2_TABLE_200();
388 a49 := JTF_VARCHAR2_TABLE_200();
389 a50 := JTF_VARCHAR2_TABLE_200();
390 a51 := JTF_VARCHAR2_TABLE_200();
391 a52 := JTF_VARCHAR2_TABLE_200();
392 a53 := JTF_VARCHAR2_TABLE_200();
393 a54 := JTF_VARCHAR2_TABLE_200();
394 a55 := JTF_VARCHAR2_TABLE_200();
395 a56 := JTF_VARCHAR2_TABLE_200();
396 a57 := JTF_VARCHAR2_TABLE_200();
397 a58 := JTF_VARCHAR2_TABLE_200();
398 if t.count > 0 then
399 a0.extend(t.count);
400 a1.extend(t.count);
401 a2.extend(t.count);
402 a3.extend(t.count);
403 a4.extend(t.count);
404 a5.extend(t.count);
405 a6.extend(t.count);
406 a7.extend(t.count);
407 a8.extend(t.count);
408 a9.extend(t.count);
409 a10.extend(t.count);
410 a11.extend(t.count);
411 a12.extend(t.count);
412 a13.extend(t.count);
413 a14.extend(t.count);
414 a15.extend(t.count);
415 a16.extend(t.count);
416 a17.extend(t.count);
417 a18.extend(t.count);
418 a19.extend(t.count);
419 a20.extend(t.count);
420 a21.extend(t.count);
421 a22.extend(t.count);
422 a23.extend(t.count);
423 a24.extend(t.count);
424 a25.extend(t.count);
425 a26.extend(t.count);
426 a27.extend(t.count);
427 a28.extend(t.count);
428 a29.extend(t.count);
429 a30.extend(t.count);
430 a31.extend(t.count);
431 a32.extend(t.count);
432 a33.extend(t.count);
433 a34.extend(t.count);
434 a35.extend(t.count);
435 a36.extend(t.count);
436 a37.extend(t.count);
437 a38.extend(t.count);
438 a39.extend(t.count);
439 a40.extend(t.count);
440 a41.extend(t.count);
441 a42.extend(t.count);
442 a43.extend(t.count);
443 a44.extend(t.count);
444 a45.extend(t.count);
445 a46.extend(t.count);
446 a47.extend(t.count);
447 a48.extend(t.count);
448 a49.extend(t.count);
449 a50.extend(t.count);
450 a51.extend(t.count);
451 a52.extend(t.count);
452 a53.extend(t.count);
453 a54.extend(t.count);
454 a55.extend(t.count);
455 a56.extend(t.count);
456 a57.extend(t.count);
457 a58.extend(t.count);
458 ddindx := t.first;
459 indx := 1;
460 while true loop
461 a0(indx) := t(ddindx).wip_entity_id;
462 a1(indx) := t(ddindx).wip_entity_name;
463 a2(indx) := t(ddindx).job_type;
464 a3(indx) := t(ddindx).status_type;
465 a4(indx) := t(ddindx).description;
466 a5(indx) := t(ddindx).representative_flag;
467 a6(indx) := t(ddindx).serial_track_flag;
468 a7(indx) := t(ddindx).class_code;
469 a8(indx) := t(ddindx).demand_class;
470 a9(indx) := t(ddindx).organization_code;
471 a10(indx) := t(ddindx).primary_item_id;
472 a11(indx) := t(ddindx).item_name;
473 a12(indx) := t(ddindx).organization_id;
474 a13(indx) := t(ddindx).intraoperation_step;
475 a14(indx) := t(ddindx).operation_seq_num;
476 a15(indx) := t(ddindx).operation_code;
477 a16(indx) := t(ddindx).operation_description;
478 a17(indx) := t(ddindx).operation_seq_id;
479 a18(indx) := t(ddindx).standard_operation_id;
480 a19(indx) := t(ddindx).department_id;
481 a20(indx) := t(ddindx).department_code;
482 a21(indx) := t(ddindx).start_quantity;
483 a22(indx) := t(ddindx).quantity_available;
484 a23(indx) := t(ddindx).net_quantity;
485 a24(indx) := t(ddindx).routing_reference_id;
486 a25(indx) := t(ddindx).bom_reference_id;
487 a26(indx) := t(ddindx).common_bill_sequence_id;
488 a27(indx) := t(ddindx).bom_revision;
489 a28(indx) := t(ddindx).bom_revision_date;
490 a29(indx) := t(ddindx).alternate_bom_designator;
491 a30(indx) := t(ddindx).alternate_routing_designator;
492 a31(indx) := t(ddindx).common_routing_sequence_id;
493 a32(indx) := t(ddindx).routing_revision;
494 a33(indx) := t(ddindx).routing_revision_date;
495 a34(indx) := t(ddindx).completion_subinventory;
496 a35(indx) := t(ddindx).completion_locator_id;
497 a36(indx) := t(ddindx).completion_locator;
498 a37(indx) := t(ddindx).date_released;
499 a38(indx) := t(ddindx).scheduled_start_date;
500 a39(indx) := t(ddindx).scheduled_completion_date;
501 a40(indx) := t(ddindx).coproducts_supply;
502 a41(indx) := t(ddindx).kanban_card_id;
503 a42(indx) := t(ddindx).wip_supply_type;
504 a43(indx) := t(ddindx).attribute_category;
505 a44(indx) := t(ddindx).attribute1;
506 a45(indx) := t(ddindx).attribute2;
507 a46(indx) := t(ddindx).attribute3;
508 a47(indx) := t(ddindx).attribute4;
509 a48(indx) := t(ddindx).attribute5;
510 a49(indx) := t(ddindx).attribute6;
511 a50(indx) := t(ddindx).attribute7;
512 a51(indx) := t(ddindx).attribute8;
513 a52(indx) := t(ddindx).attribute9;
514 a53(indx) := t(ddindx).attribute10;
515 a54(indx) := t(ddindx).attribute11;
516 a55(indx) := t(ddindx).attribute12;
517 a56(indx) := t(ddindx).attribute13;
518 a57(indx) := t(ddindx).attribute14;
519 a58(indx) := t(ddindx).attribute15;
520 indx := indx+1;
521 if t.last =ddindx
522 then exit;
523 end if;
524 ddindx := t.next(ddindx);
525 end loop;
526 end if;
527 end if;
528 end rosetta_table_copy_out_p6;
529
530 procedure rosetta_table_copy_in_p7(t out nocopy wsm_wip_lot_txn_pvt.wltx_resulting_jobs_tbl_type, a0 JTF_VARCHAR2_TABLE_300
531 , a1 JTF_NUMBER_TABLE
532 , a2 JTF_VARCHAR2_TABLE_300
533 , a3 JTF_NUMBER_TABLE
534 , a4 JTF_NUMBER_TABLE
535 , a5 JTF_NUMBER_TABLE
536 , a6 JTF_NUMBER_TABLE
537 , a7 JTF_VARCHAR2_TABLE_100
538 , a8 JTF_VARCHAR2_TABLE_100
539 , a9 JTF_NUMBER_TABLE
540 , a10 JTF_VARCHAR2_TABLE_100
541 , a11 JTF_VARCHAR2_TABLE_100
542 , a12 JTF_NUMBER_TABLE
543 , a13 JTF_VARCHAR2_TABLE_100
544 , a14 JTF_NUMBER_TABLE
545 , a15 JTF_NUMBER_TABLE
546 , a16 JTF_NUMBER_TABLE
547 , a17 JTF_VARCHAR2_TABLE_100
548 , a18 JTF_VARCHAR2_TABLE_100
549 , a19 JTF_DATE_TABLE
550 , a20 JTF_DATE_TABLE
551 , a21 JTF_VARCHAR2_TABLE_100
552 , a22 JTF_VARCHAR2_TABLE_100
553 , a23 JTF_NUMBER_TABLE
554 , a24 JTF_NUMBER_TABLE
555 , a25 JTF_NUMBER_TABLE
556 , a26 JTF_NUMBER_TABLE
557 , a27 JTF_VARCHAR2_TABLE_100
558 , a28 JTF_NUMBER_TABLE
559 , a29 JTF_NUMBER_TABLE
560 , a30 JTF_NUMBER_TABLE
561 , a31 JTF_VARCHAR2_TABLE_100
562 , a32 JTF_VARCHAR2_TABLE_300
563 , a33 JTF_NUMBER_TABLE
564 , a34 JTF_NUMBER_TABLE
565 , a35 JTF_VARCHAR2_TABLE_100
566 , a36 JTF_NUMBER_TABLE
567 , a37 JTF_VARCHAR2_TABLE_200
568 , a38 JTF_DATE_TABLE
569 , a39 JTF_DATE_TABLE
570 , a40 JTF_NUMBER_TABLE
571 , a41 JTF_NUMBER_TABLE
572 , a42 JTF_NUMBER_TABLE
573 , a43 JTF_VARCHAR2_TABLE_100
574 , a44 JTF_VARCHAR2_TABLE_200
575 , a45 JTF_VARCHAR2_TABLE_200
576 , a46 JTF_VARCHAR2_TABLE_200
577 , a47 JTF_VARCHAR2_TABLE_200
578 , a48 JTF_VARCHAR2_TABLE_200
579 , a49 JTF_VARCHAR2_TABLE_200
580 , a50 JTF_VARCHAR2_TABLE_200
581 , a51 JTF_VARCHAR2_TABLE_200
582 , a52 JTF_VARCHAR2_TABLE_200
583 , a53 JTF_VARCHAR2_TABLE_200
584 , a54 JTF_VARCHAR2_TABLE_200
585 , a55 JTF_VARCHAR2_TABLE_200
586 , a56 JTF_VARCHAR2_TABLE_200
587 , a57 JTF_VARCHAR2_TABLE_200
588 , a58 JTF_VARCHAR2_TABLE_200
589 ) as
590 ddindx binary_integer; indx binary_integer;
591 begin
592 if a0 is not null and a0.count > 0 then
593 if a0.count > 0 then
594 indx := a0.first;
595 ddindx := 1;
596 while true loop
597 t(ddindx).wip_entity_name := a0(indx);
598 t(ddindx).wip_entity_id := a1(indx);
599 t(ddindx).description := a2(indx);
600 t(ddindx).job_type := a3(indx);
601 t(ddindx).status_type := a4(indx);
602 t(ddindx).wip_supply_type := a5(indx);
603 t(ddindx).organization_id := a6(indx);
604 t(ddindx).organization_code := a7(indx);
605 t(ddindx).item_name := a8(indx);
606 t(ddindx).primary_item_id := a9(indx);
607 t(ddindx).class_code := a10(indx);
608 t(ddindx).bom_reference_item := a11(indx);
609 t(ddindx).bom_reference_id := a12(indx);
610 t(ddindx).routing_reference_item := a13(indx);
611 t(ddindx).routing_reference_id := a14(indx);
612 t(ddindx).common_bom_sequence_id := a15(indx);
613 t(ddindx).common_routing_sequence_id := a16(indx);
614 t(ddindx).bom_revision := a17(indx);
615 t(ddindx).routing_revision := a18(indx);
616 t(ddindx).bom_revision_date := a19(indx);
617 t(ddindx).routing_revision_date := a20(indx);
618 t(ddindx).alternate_bom_designator := a21(indx);
619 t(ddindx).alternate_routing_designator := a22(indx);
620 t(ddindx).start_quantity := a23(indx);
621 t(ddindx).net_quantity := a24(indx);
622 t(ddindx).starting_operation_seq_num := a25(indx);
623 t(ddindx).starting_intraoperation_step := a26(indx);
624 t(ddindx).starting_operation_code := a27(indx);
625 t(ddindx).starting_operation_seq_id := a28(indx);
626 t(ddindx).starting_std_op_id := a29(indx);
627 t(ddindx).department_id := a30(indx);
628 t(ddindx).department_code := a31(indx);
629 t(ddindx).operation_description := a32(indx);
630 t(ddindx).job_operation_seq_num := a33(indx);
631 t(ddindx).split_has_update_assy := a34(indx);
632 t(ddindx).completion_subinventory := a35(indx);
633 t(ddindx).completion_locator_id := a36(indx);
634 t(ddindx).completion_locator := a37(indx);
635 t(ddindx).scheduled_start_date := a38(indx);
636 t(ddindx).scheduled_completion_date := a39(indx);
637 t(ddindx).bonus_acct_id := a40(indx);
638 t(ddindx).coproducts_supply := a41(indx);
639 t(ddindx).kanban_card_id := a42(indx);
640 t(ddindx).attribute_category := a43(indx);
641 t(ddindx).attribute1 := a44(indx);
642 t(ddindx).attribute2 := a45(indx);
643 t(ddindx).attribute3 := a46(indx);
644 t(ddindx).attribute4 := a47(indx);
645 t(ddindx).attribute5 := a48(indx);
646 t(ddindx).attribute6 := a49(indx);
647 t(ddindx).attribute7 := a50(indx);
648 t(ddindx).attribute8 := a51(indx);
649 t(ddindx).attribute9 := a52(indx);
650 t(ddindx).attribute10 := a53(indx);
651 t(ddindx).attribute11 := a54(indx);
652 t(ddindx).attribute12 := a55(indx);
653 t(ddindx).attribute13 := a56(indx);
654 t(ddindx).attribute14 := a57(indx);
655 t(ddindx).attribute15 := a58(indx);
656 ddindx := ddindx+1;
657 if a0.last =indx
658 then exit;
659 end if;
660 indx := a0.next(indx);
661 end loop;
662 end if;
663 end if;
664 end rosetta_table_copy_in_p7;
665 procedure rosetta_table_copy_out_p7(t wsm_wip_lot_txn_pvt.wltx_resulting_jobs_tbl_type, a0 out nocopy JTF_VARCHAR2_TABLE_300
666 , a1 out nocopy JTF_NUMBER_TABLE
667 , a2 out nocopy JTF_VARCHAR2_TABLE_300
668 , a3 out nocopy JTF_NUMBER_TABLE
669 , a4 out nocopy JTF_NUMBER_TABLE
670 , a5 out nocopy JTF_NUMBER_TABLE
671 , a6 out nocopy JTF_NUMBER_TABLE
672 , a7 out nocopy JTF_VARCHAR2_TABLE_100
673 , a8 out nocopy JTF_VARCHAR2_TABLE_100
674 , a9 out nocopy JTF_NUMBER_TABLE
675 , a10 out nocopy JTF_VARCHAR2_TABLE_100
676 , a11 out nocopy JTF_VARCHAR2_TABLE_100
677 , a12 out nocopy JTF_NUMBER_TABLE
678 , a13 out nocopy JTF_VARCHAR2_TABLE_100
679 , a14 out nocopy JTF_NUMBER_TABLE
680 , a15 out nocopy JTF_NUMBER_TABLE
681 , a16 out nocopy JTF_NUMBER_TABLE
682 , a17 out nocopy JTF_VARCHAR2_TABLE_100
683 , a18 out nocopy JTF_VARCHAR2_TABLE_100
684 , a19 out nocopy JTF_DATE_TABLE
685 , a20 out nocopy JTF_DATE_TABLE
686 , a21 out nocopy JTF_VARCHAR2_TABLE_100
687 , a22 out nocopy JTF_VARCHAR2_TABLE_100
688 , a23 out nocopy JTF_NUMBER_TABLE
689 , a24 out nocopy JTF_NUMBER_TABLE
690 , a25 out nocopy JTF_NUMBER_TABLE
691 , a26 out nocopy JTF_NUMBER_TABLE
692 , a27 out nocopy JTF_VARCHAR2_TABLE_100
693 , a28 out nocopy JTF_NUMBER_TABLE
694 , a29 out nocopy JTF_NUMBER_TABLE
695 , a30 out nocopy JTF_NUMBER_TABLE
696 , a31 out nocopy JTF_VARCHAR2_TABLE_100
697 , a32 out nocopy JTF_VARCHAR2_TABLE_300
698 , a33 out nocopy JTF_NUMBER_TABLE
699 , a34 out nocopy JTF_NUMBER_TABLE
700 , a35 out nocopy JTF_VARCHAR2_TABLE_100
701 , a36 out nocopy JTF_NUMBER_TABLE
702 , a37 out nocopy JTF_VARCHAR2_TABLE_200
703 , a38 out nocopy JTF_DATE_TABLE
704 , a39 out nocopy JTF_DATE_TABLE
705 , a40 out nocopy JTF_NUMBER_TABLE
706 , a41 out nocopy JTF_NUMBER_TABLE
707 , a42 out nocopy JTF_NUMBER_TABLE
708 , a43 out nocopy JTF_VARCHAR2_TABLE_100
709 , a44 out nocopy JTF_VARCHAR2_TABLE_200
710 , a45 out nocopy JTF_VARCHAR2_TABLE_200
711 , a46 out nocopy JTF_VARCHAR2_TABLE_200
712 , a47 out nocopy JTF_VARCHAR2_TABLE_200
713 , a48 out nocopy JTF_VARCHAR2_TABLE_200
714 , a49 out nocopy JTF_VARCHAR2_TABLE_200
715 , a50 out nocopy JTF_VARCHAR2_TABLE_200
716 , a51 out nocopy JTF_VARCHAR2_TABLE_200
717 , a52 out nocopy JTF_VARCHAR2_TABLE_200
718 , a53 out nocopy JTF_VARCHAR2_TABLE_200
719 , a54 out nocopy JTF_VARCHAR2_TABLE_200
720 , a55 out nocopy JTF_VARCHAR2_TABLE_200
721 , a56 out nocopy JTF_VARCHAR2_TABLE_200
722 , a57 out nocopy JTF_VARCHAR2_TABLE_200
723 , a58 out nocopy JTF_VARCHAR2_TABLE_200
724 ) as
725 ddindx binary_integer; indx binary_integer;
726 begin
727 if t is null or t.count = 0 then
728 a0 := JTF_VARCHAR2_TABLE_300();
729 a1 := JTF_NUMBER_TABLE();
730 a2 := JTF_VARCHAR2_TABLE_300();
731 a3 := JTF_NUMBER_TABLE();
732 a4 := JTF_NUMBER_TABLE();
733 a5 := JTF_NUMBER_TABLE();
734 a6 := JTF_NUMBER_TABLE();
735 a7 := JTF_VARCHAR2_TABLE_100();
736 a8 := JTF_VARCHAR2_TABLE_100();
737 a9 := JTF_NUMBER_TABLE();
738 a10 := JTF_VARCHAR2_TABLE_100();
739 a11 := JTF_VARCHAR2_TABLE_100();
740 a12 := JTF_NUMBER_TABLE();
741 a13 := JTF_VARCHAR2_TABLE_100();
742 a14 := JTF_NUMBER_TABLE();
743 a15 := JTF_NUMBER_TABLE();
744 a16 := JTF_NUMBER_TABLE();
745 a17 := JTF_VARCHAR2_TABLE_100();
746 a18 := JTF_VARCHAR2_TABLE_100();
747 a19 := JTF_DATE_TABLE();
748 a20 := JTF_DATE_TABLE();
749 a21 := JTF_VARCHAR2_TABLE_100();
750 a22 := JTF_VARCHAR2_TABLE_100();
751 a23 := JTF_NUMBER_TABLE();
752 a24 := JTF_NUMBER_TABLE();
753 a25 := JTF_NUMBER_TABLE();
754 a26 := JTF_NUMBER_TABLE();
755 a27 := JTF_VARCHAR2_TABLE_100();
756 a28 := JTF_NUMBER_TABLE();
757 a29 := JTF_NUMBER_TABLE();
758 a30 := JTF_NUMBER_TABLE();
759 a31 := JTF_VARCHAR2_TABLE_100();
760 a32 := JTF_VARCHAR2_TABLE_300();
761 a33 := JTF_NUMBER_TABLE();
762 a34 := JTF_NUMBER_TABLE();
763 a35 := JTF_VARCHAR2_TABLE_100();
764 a36 := JTF_NUMBER_TABLE();
765 a37 := JTF_VARCHAR2_TABLE_200();
766 a38 := JTF_DATE_TABLE();
767 a39 := JTF_DATE_TABLE();
768 a40 := JTF_NUMBER_TABLE();
769 a41 := JTF_NUMBER_TABLE();
770 a42 := JTF_NUMBER_TABLE();
771 a43 := JTF_VARCHAR2_TABLE_100();
772 a44 := JTF_VARCHAR2_TABLE_200();
773 a45 := JTF_VARCHAR2_TABLE_200();
774 a46 := JTF_VARCHAR2_TABLE_200();
775 a47 := JTF_VARCHAR2_TABLE_200();
776 a48 := JTF_VARCHAR2_TABLE_200();
777 a49 := JTF_VARCHAR2_TABLE_200();
778 a50 := JTF_VARCHAR2_TABLE_200();
779 a51 := JTF_VARCHAR2_TABLE_200();
780 a52 := JTF_VARCHAR2_TABLE_200();
781 a53 := JTF_VARCHAR2_TABLE_200();
782 a54 := JTF_VARCHAR2_TABLE_200();
783 a55 := JTF_VARCHAR2_TABLE_200();
784 a56 := JTF_VARCHAR2_TABLE_200();
785 a57 := JTF_VARCHAR2_TABLE_200();
786 a58 := JTF_VARCHAR2_TABLE_200();
787 else
788 a0 := JTF_VARCHAR2_TABLE_300();
789 a1 := JTF_NUMBER_TABLE();
790 a2 := JTF_VARCHAR2_TABLE_300();
791 a3 := JTF_NUMBER_TABLE();
792 a4 := JTF_NUMBER_TABLE();
793 a5 := JTF_NUMBER_TABLE();
794 a6 := JTF_NUMBER_TABLE();
795 a7 := JTF_VARCHAR2_TABLE_100();
796 a8 := JTF_VARCHAR2_TABLE_100();
797 a9 := JTF_NUMBER_TABLE();
798 a10 := JTF_VARCHAR2_TABLE_100();
799 a11 := JTF_VARCHAR2_TABLE_100();
800 a12 := JTF_NUMBER_TABLE();
801 a13 := JTF_VARCHAR2_TABLE_100();
802 a14 := JTF_NUMBER_TABLE();
803 a15 := JTF_NUMBER_TABLE();
804 a16 := JTF_NUMBER_TABLE();
805 a17 := JTF_VARCHAR2_TABLE_100();
806 a18 := JTF_VARCHAR2_TABLE_100();
807 a19 := JTF_DATE_TABLE();
808 a20 := JTF_DATE_TABLE();
809 a21 := JTF_VARCHAR2_TABLE_100();
810 a22 := JTF_VARCHAR2_TABLE_100();
811 a23 := JTF_NUMBER_TABLE();
812 a24 := JTF_NUMBER_TABLE();
813 a25 := JTF_NUMBER_TABLE();
814 a26 := JTF_NUMBER_TABLE();
815 a27 := JTF_VARCHAR2_TABLE_100();
816 a28 := JTF_NUMBER_TABLE();
817 a29 := JTF_NUMBER_TABLE();
818 a30 := JTF_NUMBER_TABLE();
819 a31 := JTF_VARCHAR2_TABLE_100();
820 a32 := JTF_VARCHAR2_TABLE_300();
821 a33 := JTF_NUMBER_TABLE();
822 a34 := JTF_NUMBER_TABLE();
823 a35 := JTF_VARCHAR2_TABLE_100();
824 a36 := JTF_NUMBER_TABLE();
825 a37 := JTF_VARCHAR2_TABLE_200();
826 a38 := JTF_DATE_TABLE();
827 a39 := JTF_DATE_TABLE();
828 a40 := JTF_NUMBER_TABLE();
829 a41 := JTF_NUMBER_TABLE();
830 a42 := JTF_NUMBER_TABLE();
831 a43 := JTF_VARCHAR2_TABLE_100();
832 a44 := JTF_VARCHAR2_TABLE_200();
833 a45 := JTF_VARCHAR2_TABLE_200();
834 a46 := JTF_VARCHAR2_TABLE_200();
835 a47 := JTF_VARCHAR2_TABLE_200();
836 a48 := JTF_VARCHAR2_TABLE_200();
837 a49 := JTF_VARCHAR2_TABLE_200();
838 a50 := JTF_VARCHAR2_TABLE_200();
839 a51 := JTF_VARCHAR2_TABLE_200();
840 a52 := JTF_VARCHAR2_TABLE_200();
841 a53 := JTF_VARCHAR2_TABLE_200();
842 a54 := JTF_VARCHAR2_TABLE_200();
843 a55 := JTF_VARCHAR2_TABLE_200();
844 a56 := JTF_VARCHAR2_TABLE_200();
845 a57 := JTF_VARCHAR2_TABLE_200();
846 a58 := JTF_VARCHAR2_TABLE_200();
847 if t.count > 0 then
848 a0.extend(t.count);
849 a1.extend(t.count);
850 a2.extend(t.count);
851 a3.extend(t.count);
852 a4.extend(t.count);
853 a5.extend(t.count);
854 a6.extend(t.count);
855 a7.extend(t.count);
856 a8.extend(t.count);
857 a9.extend(t.count);
858 a10.extend(t.count);
859 a11.extend(t.count);
860 a12.extend(t.count);
861 a13.extend(t.count);
862 a14.extend(t.count);
863 a15.extend(t.count);
864 a16.extend(t.count);
865 a17.extend(t.count);
866 a18.extend(t.count);
867 a19.extend(t.count);
868 a20.extend(t.count);
869 a21.extend(t.count);
870 a22.extend(t.count);
871 a23.extend(t.count);
872 a24.extend(t.count);
873 a25.extend(t.count);
874 a26.extend(t.count);
875 a27.extend(t.count);
876 a28.extend(t.count);
877 a29.extend(t.count);
878 a30.extend(t.count);
879 a31.extend(t.count);
880 a32.extend(t.count);
881 a33.extend(t.count);
882 a34.extend(t.count);
883 a35.extend(t.count);
884 a36.extend(t.count);
885 a37.extend(t.count);
886 a38.extend(t.count);
887 a39.extend(t.count);
888 a40.extend(t.count);
889 a41.extend(t.count);
890 a42.extend(t.count);
891 a43.extend(t.count);
892 a44.extend(t.count);
893 a45.extend(t.count);
894 a46.extend(t.count);
895 a47.extend(t.count);
896 a48.extend(t.count);
897 a49.extend(t.count);
898 a50.extend(t.count);
899 a51.extend(t.count);
900 a52.extend(t.count);
901 a53.extend(t.count);
902 a54.extend(t.count);
903 a55.extend(t.count);
904 a56.extend(t.count);
905 a57.extend(t.count);
906 a58.extend(t.count);
907 ddindx := t.first;
908 indx := 1;
909 while true loop
910 a0(indx) := t(ddindx).wip_entity_name;
911 a1(indx) := t(ddindx).wip_entity_id;
912 a2(indx) := t(ddindx).description;
913 a3(indx) := t(ddindx).job_type;
914 a4(indx) := t(ddindx).status_type;
915 a5(indx) := t(ddindx).wip_supply_type;
916 a6(indx) := t(ddindx).organization_id;
917 a7(indx) := t(ddindx).organization_code;
918 a8(indx) := t(ddindx).item_name;
919 a9(indx) := t(ddindx).primary_item_id;
920 a10(indx) := t(ddindx).class_code;
921 a11(indx) := t(ddindx).bom_reference_item;
922 a12(indx) := t(ddindx).bom_reference_id;
923 a13(indx) := t(ddindx).routing_reference_item;
924 a14(indx) := t(ddindx).routing_reference_id;
925 a15(indx) := t(ddindx).common_bom_sequence_id;
926 a16(indx) := t(ddindx).common_routing_sequence_id;
927 a17(indx) := t(ddindx).bom_revision;
928 a18(indx) := t(ddindx).routing_revision;
929 a19(indx) := t(ddindx).bom_revision_date;
930 a20(indx) := t(ddindx).routing_revision_date;
931 a21(indx) := t(ddindx).alternate_bom_designator;
932 a22(indx) := t(ddindx).alternate_routing_designator;
933 a23(indx) := t(ddindx).start_quantity;
934 a24(indx) := t(ddindx).net_quantity;
935 a25(indx) := t(ddindx).starting_operation_seq_num;
936 a26(indx) := t(ddindx).starting_intraoperation_step;
937 a27(indx) := t(ddindx).starting_operation_code;
938 a28(indx) := t(ddindx).starting_operation_seq_id;
939 a29(indx) := t(ddindx).starting_std_op_id;
940 a30(indx) := t(ddindx).department_id;
941 a31(indx) := t(ddindx).department_code;
942 a32(indx) := t(ddindx).operation_description;
943 a33(indx) := t(ddindx).job_operation_seq_num;
944 a34(indx) := t(ddindx).split_has_update_assy;
945 a35(indx) := t(ddindx).completion_subinventory;
946 a36(indx) := t(ddindx).completion_locator_id;
947 a37(indx) := t(ddindx).completion_locator;
948 a38(indx) := t(ddindx).scheduled_start_date;
949 a39(indx) := t(ddindx).scheduled_completion_date;
950 a40(indx) := t(ddindx).bonus_acct_id;
951 a41(indx) := t(ddindx).coproducts_supply;
952 a42(indx) := t(ddindx).kanban_card_id;
953 a43(indx) := t(ddindx).attribute_category;
954 a44(indx) := t(ddindx).attribute1;
955 a45(indx) := t(ddindx).attribute2;
956 a46(indx) := t(ddindx).attribute3;
957 a47(indx) := t(ddindx).attribute4;
958 a48(indx) := t(ddindx).attribute5;
959 a49(indx) := t(ddindx).attribute6;
960 a50(indx) := t(ddindx).attribute7;
961 a51(indx) := t(ddindx).attribute8;
962 a52(indx) := t(ddindx).attribute9;
963 a53(indx) := t(ddindx).attribute10;
964 a54(indx) := t(ddindx).attribute11;
965 a55(indx) := t(ddindx).attribute12;
966 a56(indx) := t(ddindx).attribute13;
967 a57(indx) := t(ddindx).attribute14;
968 a58(indx) := t(ddindx).attribute15;
969 indx := indx+1;
970 if t.last =ddindx
971 then exit;
972 end if;
973 ddindx := t.next(ddindx);
974 end loop;
975 end if;
976 end if;
977 end rosetta_table_copy_out_p7;
978
979 procedure rosetta_table_copy_in_p8(t out nocopy wsm_serial_support_grp.wsm_serial_num_tbl, a0 JTF_VARCHAR2_TABLE_100
980 , a1 JTF_NUMBER_TABLE
981 , a2 JTF_NUMBER_TABLE
982 , a3 JTF_NUMBER_TABLE
983 , a4 JTF_NUMBER_TABLE
984 , a5 JTF_NUMBER_TABLE
985 , a6 JTF_VARCHAR2_TABLE_300
986 , a7 JTF_VARCHAR2_TABLE_300
987 , a8 JTF_NUMBER_TABLE
988 , a9 JTF_NUMBER_TABLE
989 , a10 JTF_VARCHAR2_TABLE_100
990 , a11 JTF_VARCHAR2_TABLE_100
991 , a12 JTF_DATE_TABLE
992 , a13 JTF_VARCHAR2_TABLE_200
993 , a14 JTF_VARCHAR2_TABLE_200
994 , a15 JTF_VARCHAR2_TABLE_200
995 , a16 JTF_VARCHAR2_TABLE_200
996 , a17 JTF_VARCHAR2_TABLE_200
997 , a18 JTF_VARCHAR2_TABLE_200
998 , a19 JTF_VARCHAR2_TABLE_200
999 , a20 JTF_VARCHAR2_TABLE_200
1000 , a21 JTF_VARCHAR2_TABLE_200
1001 , a22 JTF_VARCHAR2_TABLE_200
1002 , a23 JTF_VARCHAR2_TABLE_200
1003 , a24 JTF_VARCHAR2_TABLE_200
1004 , a25 JTF_VARCHAR2_TABLE_200
1005 , a26 JTF_VARCHAR2_TABLE_200
1006 , a27 JTF_VARCHAR2_TABLE_200
1007 , a28 JTF_VARCHAR2_TABLE_200
1008 , a29 JTF_VARCHAR2_TABLE_200
1009 , a30 JTF_VARCHAR2_TABLE_200
1010 , a31 JTF_VARCHAR2_TABLE_200
1011 , a32 JTF_VARCHAR2_TABLE_200
1012 , a33 JTF_DATE_TABLE
1013 , a34 JTF_DATE_TABLE
1014 , a35 JTF_DATE_TABLE
1015 , a36 JTF_DATE_TABLE
1016 , a37 JTF_DATE_TABLE
1017 , a38 JTF_DATE_TABLE
1018 , a39 JTF_DATE_TABLE
1019 , a40 JTF_DATE_TABLE
1020 , a41 JTF_DATE_TABLE
1021 , a42 JTF_DATE_TABLE
1022 , a43 JTF_NUMBER_TABLE
1023 , a44 JTF_NUMBER_TABLE
1024 , a45 JTF_NUMBER_TABLE
1025 , a46 JTF_NUMBER_TABLE
1026 , a47 JTF_NUMBER_TABLE
1027 , a48 JTF_NUMBER_TABLE
1028 , a49 JTF_NUMBER_TABLE
1029 , a50 JTF_NUMBER_TABLE
1030 , a51 JTF_NUMBER_TABLE
1031 , a52 JTF_NUMBER_TABLE
1032 , a53 JTF_NUMBER_TABLE
1033 , a54 JTF_NUMBER_TABLE
1034 , a55 JTF_NUMBER_TABLE
1035 , a56 JTF_NUMBER_TABLE
1036 , a57 JTF_NUMBER_TABLE
1037 , a58 JTF_NUMBER_TABLE
1038 , a59 JTF_NUMBER_TABLE
1039 , a60 JTF_NUMBER_TABLE
1040 , a61 JTF_NUMBER_TABLE
1041 , a62 JTF_NUMBER_TABLE
1042 , a63 JTF_NUMBER_TABLE
1043 , a64 JTF_NUMBER_TABLE
1044 , a65 JTF_VARCHAR2_TABLE_100
1045 , a66 JTF_VARCHAR2_TABLE_200
1046 , a67 JTF_VARCHAR2_TABLE_200
1047 , a68 JTF_VARCHAR2_TABLE_200
1048 , a69 JTF_VARCHAR2_TABLE_200
1049 , a70 JTF_VARCHAR2_TABLE_200
1050 , a71 JTF_VARCHAR2_TABLE_200
1051 , a72 JTF_VARCHAR2_TABLE_200
1052 , a73 JTF_VARCHAR2_TABLE_200
1053 , a74 JTF_VARCHAR2_TABLE_200
1054 , a75 JTF_VARCHAR2_TABLE_200
1055 , a76 JTF_VARCHAR2_TABLE_200
1056 , a77 JTF_VARCHAR2_TABLE_200
1057 , a78 JTF_VARCHAR2_TABLE_200
1058 , a79 JTF_VARCHAR2_TABLE_200
1059 , a80 JTF_VARCHAR2_TABLE_200
1060 ) as
1061 ddindx binary_integer; indx binary_integer;
1062 begin
1063 if a0 is not null and a0.count > 0 then
1064 if a0.count > 0 then
1065 indx := a0.first;
1066 ddindx := 1;
1067 while true loop
1068 t(ddindx).serial_number := a0(indx);
1069 t(ddindx).assembly_item_id := a1(indx);
1070 t(ddindx).header_id := a2(indx);
1071 t(ddindx).generate_serial_number := a3(indx);
1072 t(ddindx).generate_for_qty := a4(indx);
1073 t(ddindx).action_flag := a5(indx);
1074 t(ddindx).current_wip_entity_name := a6(indx);
1075 t(ddindx).changed_wip_entity_name := a7(indx);
1076 t(ddindx).current_wip_entity_id := a8(indx);
1077 t(ddindx).changed_wip_entity_id := a9(indx);
1078 t(ddindx).serial_attribute_category := a10(indx);
1079 t(ddindx).territory_code := a11(indx);
1080 t(ddindx).origination_date := a12(indx);
1081 t(ddindx).c_attribute1 := a13(indx);
1082 t(ddindx).c_attribute2 := a14(indx);
1083 t(ddindx).c_attribute3 := a15(indx);
1084 t(ddindx).c_attribute4 := a16(indx);
1085 t(ddindx).c_attribute5 := a17(indx);
1086 t(ddindx).c_attribute6 := a18(indx);
1087 t(ddindx).c_attribute7 := a19(indx);
1088 t(ddindx).c_attribute8 := a20(indx);
1089 t(ddindx).c_attribute9 := a21(indx);
1090 t(ddindx).c_attribute10 := a22(indx);
1091 t(ddindx).c_attribute11 := a23(indx);
1092 t(ddindx).c_attribute12 := a24(indx);
1093 t(ddindx).c_attribute13 := a25(indx);
1094 t(ddindx).c_attribute14 := a26(indx);
1095 t(ddindx).c_attribute15 := a27(indx);
1096 t(ddindx).c_attribute16 := a28(indx);
1097 t(ddindx).c_attribute17 := a29(indx);
1098 t(ddindx).c_attribute18 := a30(indx);
1099 t(ddindx).c_attribute19 := a31(indx);
1100 t(ddindx).c_attribute20 := a32(indx);
1101 t(ddindx).d_attribute1 := a33(indx);
1102 t(ddindx).d_attribute2 := a34(indx);
1103 t(ddindx).d_attribute3 := a35(indx);
1104 t(ddindx).d_attribute4 := a36(indx);
1105 t(ddindx).d_attribute5 := a37(indx);
1106 t(ddindx).d_attribute6 := a38(indx);
1107 t(ddindx).d_attribute7 := a39(indx);
1108 t(ddindx).d_attribute8 := a40(indx);
1109 t(ddindx).d_attribute9 := a41(indx);
1110 t(ddindx).d_attribute10 := a42(indx);
1111 t(ddindx).n_attribute1 := a43(indx);
1112 t(ddindx).n_attribute2 := a44(indx);
1113 t(ddindx).n_attribute3 := a45(indx);
1114 t(ddindx).n_attribute4 := a46(indx);
1115 t(ddindx).n_attribute5 := a47(indx);
1116 t(ddindx).n_attribute6 := a48(indx);
1117 t(ddindx).n_attribute7 := a49(indx);
1118 t(ddindx).n_attribute8 := a50(indx);
1119 t(ddindx).n_attribute9 := a51(indx);
1120 t(ddindx).n_attribute10 := a52(indx);
1121 t(ddindx).status_id := a53(indx);
1122 t(ddindx).time_since_new := a54(indx);
1123 t(ddindx).cycles_since_new := a55(indx);
1124 t(ddindx).time_since_overhaul := a56(indx);
1125 t(ddindx).cycles_since_overhaul := a57(indx);
1126 t(ddindx).time_since_repair := a58(indx);
1127 t(ddindx).cycles_since_repair := a59(indx);
1128 t(ddindx).time_since_visit := a60(indx);
1129 t(ddindx).cycles_since_visit := a61(indx);
1130 t(ddindx).time_since_mark := a62(indx);
1131 t(ddindx).cycles_since_mark := a63(indx);
1132 t(ddindx).number_of_repairs := a64(indx);
1133 t(ddindx).attribute_category := a65(indx);
1134 t(ddindx).attribute1 := a66(indx);
1135 t(ddindx).attribute2 := a67(indx);
1136 t(ddindx).attribute3 := a68(indx);
1137 t(ddindx).attribute4 := a69(indx);
1138 t(ddindx).attribute5 := a70(indx);
1139 t(ddindx).attribute6 := a71(indx);
1140 t(ddindx).attribute7 := a72(indx);
1141 t(ddindx).attribute8 := a73(indx);
1142 t(ddindx).attribute9 := a74(indx);
1143 t(ddindx).attribute10 := a75(indx);
1144 t(ddindx).attribute11 := a76(indx);
1145 t(ddindx).attribute12 := a77(indx);
1146 t(ddindx).attribute13 := a78(indx);
1147 t(ddindx).attribute14 := a79(indx);
1148 t(ddindx).attribute15 := a80(indx);
1149 ddindx := ddindx+1;
1150 if a0.last =indx
1151 then exit;
1152 end if;
1153 indx := a0.next(indx);
1154 end loop;
1155 end if;
1156 end if;
1157 end rosetta_table_copy_in_p8;
1158 procedure rosetta_table_copy_out_p8(t wsm_serial_support_grp.wsm_serial_num_tbl, a0 out nocopy JTF_VARCHAR2_TABLE_100
1159 , a1 out nocopy JTF_NUMBER_TABLE
1160 , a2 out nocopy JTF_NUMBER_TABLE
1161 , a3 out nocopy JTF_NUMBER_TABLE
1162 , a4 out nocopy JTF_NUMBER_TABLE
1163 , a5 out nocopy JTF_NUMBER_TABLE
1164 , a6 out nocopy JTF_VARCHAR2_TABLE_300
1165 , a7 out nocopy JTF_VARCHAR2_TABLE_300
1166 , a8 out nocopy JTF_NUMBER_TABLE
1167 , a9 out nocopy JTF_NUMBER_TABLE
1168 , a10 out nocopy JTF_VARCHAR2_TABLE_100
1169 , a11 out nocopy JTF_VARCHAR2_TABLE_100
1170 , a12 out nocopy JTF_DATE_TABLE
1171 , a13 out nocopy JTF_VARCHAR2_TABLE_200
1172 , a14 out nocopy JTF_VARCHAR2_TABLE_200
1173 , a15 out nocopy JTF_VARCHAR2_TABLE_200
1174 , a16 out nocopy JTF_VARCHAR2_TABLE_200
1175 , a17 out nocopy JTF_VARCHAR2_TABLE_200
1176 , a18 out nocopy JTF_VARCHAR2_TABLE_200
1177 , a19 out nocopy JTF_VARCHAR2_TABLE_200
1178 , a20 out nocopy JTF_VARCHAR2_TABLE_200
1179 , a21 out nocopy JTF_VARCHAR2_TABLE_200
1180 , a22 out nocopy JTF_VARCHAR2_TABLE_200
1181 , a23 out nocopy JTF_VARCHAR2_TABLE_200
1182 , a24 out nocopy JTF_VARCHAR2_TABLE_200
1183 , a25 out nocopy JTF_VARCHAR2_TABLE_200
1184 , a26 out nocopy JTF_VARCHAR2_TABLE_200
1185 , a27 out nocopy JTF_VARCHAR2_TABLE_200
1186 , a28 out nocopy JTF_VARCHAR2_TABLE_200
1187 , a29 out nocopy JTF_VARCHAR2_TABLE_200
1188 , a30 out nocopy JTF_VARCHAR2_TABLE_200
1189 , a31 out nocopy JTF_VARCHAR2_TABLE_200
1190 , a32 out nocopy JTF_VARCHAR2_TABLE_200
1191 , a33 out nocopy JTF_DATE_TABLE
1192 , a34 out nocopy JTF_DATE_TABLE
1193 , a35 out nocopy JTF_DATE_TABLE
1194 , a36 out nocopy JTF_DATE_TABLE
1195 , a37 out nocopy JTF_DATE_TABLE
1196 , a38 out nocopy JTF_DATE_TABLE
1197 , a39 out nocopy JTF_DATE_TABLE
1198 , a40 out nocopy JTF_DATE_TABLE
1199 , a41 out nocopy JTF_DATE_TABLE
1200 , a42 out nocopy JTF_DATE_TABLE
1201 , a43 out nocopy JTF_NUMBER_TABLE
1202 , a44 out nocopy JTF_NUMBER_TABLE
1203 , a45 out nocopy JTF_NUMBER_TABLE
1204 , a46 out nocopy JTF_NUMBER_TABLE
1205 , a47 out nocopy JTF_NUMBER_TABLE
1206 , a48 out nocopy JTF_NUMBER_TABLE
1207 , a49 out nocopy JTF_NUMBER_TABLE
1208 , a50 out nocopy JTF_NUMBER_TABLE
1209 , a51 out nocopy JTF_NUMBER_TABLE
1210 , a52 out nocopy JTF_NUMBER_TABLE
1211 , a53 out nocopy JTF_NUMBER_TABLE
1212 , a54 out nocopy JTF_NUMBER_TABLE
1213 , a55 out nocopy JTF_NUMBER_TABLE
1214 , a56 out nocopy JTF_NUMBER_TABLE
1215 , a57 out nocopy JTF_NUMBER_TABLE
1216 , a58 out nocopy JTF_NUMBER_TABLE
1217 , a59 out nocopy JTF_NUMBER_TABLE
1218 , a60 out nocopy JTF_NUMBER_TABLE
1219 , a61 out nocopy JTF_NUMBER_TABLE
1220 , a62 out nocopy JTF_NUMBER_TABLE
1221 , a63 out nocopy JTF_NUMBER_TABLE
1222 , a64 out nocopy JTF_NUMBER_TABLE
1223 , a65 out nocopy JTF_VARCHAR2_TABLE_100
1224 , a66 out nocopy JTF_VARCHAR2_TABLE_200
1225 , a67 out nocopy JTF_VARCHAR2_TABLE_200
1226 , a68 out nocopy JTF_VARCHAR2_TABLE_200
1227 , a69 out nocopy JTF_VARCHAR2_TABLE_200
1228 , a70 out nocopy JTF_VARCHAR2_TABLE_200
1229 , a71 out nocopy JTF_VARCHAR2_TABLE_200
1230 , a72 out nocopy JTF_VARCHAR2_TABLE_200
1231 , a73 out nocopy JTF_VARCHAR2_TABLE_200
1232 , a74 out nocopy JTF_VARCHAR2_TABLE_200
1233 , a75 out nocopy JTF_VARCHAR2_TABLE_200
1234 , a76 out nocopy JTF_VARCHAR2_TABLE_200
1235 , a77 out nocopy JTF_VARCHAR2_TABLE_200
1236 , a78 out nocopy JTF_VARCHAR2_TABLE_200
1237 , a79 out nocopy JTF_VARCHAR2_TABLE_200
1238 , a80 out nocopy JTF_VARCHAR2_TABLE_200
1239 ) as
1240 ddindx binary_integer; indx binary_integer;
1241 begin
1242 if t is null or t.count = 0 then
1243 a0 := JTF_VARCHAR2_TABLE_100();
1244 a1 := JTF_NUMBER_TABLE();
1245 a2 := JTF_NUMBER_TABLE();
1246 a3 := JTF_NUMBER_TABLE();
1247 a4 := JTF_NUMBER_TABLE();
1248 a5 := JTF_NUMBER_TABLE();
1249 a6 := JTF_VARCHAR2_TABLE_300();
1250 a7 := JTF_VARCHAR2_TABLE_300();
1251 a8 := JTF_NUMBER_TABLE();
1252 a9 := JTF_NUMBER_TABLE();
1253 a10 := JTF_VARCHAR2_TABLE_100();
1254 a11 := JTF_VARCHAR2_TABLE_100();
1255 a12 := JTF_DATE_TABLE();
1256 a13 := JTF_VARCHAR2_TABLE_200();
1257 a14 := JTF_VARCHAR2_TABLE_200();
1258 a15 := JTF_VARCHAR2_TABLE_200();
1259 a16 := JTF_VARCHAR2_TABLE_200();
1260 a17 := JTF_VARCHAR2_TABLE_200();
1261 a18 := JTF_VARCHAR2_TABLE_200();
1262 a19 := JTF_VARCHAR2_TABLE_200();
1263 a20 := JTF_VARCHAR2_TABLE_200();
1264 a21 := JTF_VARCHAR2_TABLE_200();
1265 a22 := JTF_VARCHAR2_TABLE_200();
1266 a23 := JTF_VARCHAR2_TABLE_200();
1267 a24 := JTF_VARCHAR2_TABLE_200();
1268 a25 := JTF_VARCHAR2_TABLE_200();
1269 a26 := JTF_VARCHAR2_TABLE_200();
1270 a27 := JTF_VARCHAR2_TABLE_200();
1271 a28 := JTF_VARCHAR2_TABLE_200();
1272 a29 := JTF_VARCHAR2_TABLE_200();
1273 a30 := JTF_VARCHAR2_TABLE_200();
1274 a31 := JTF_VARCHAR2_TABLE_200();
1275 a32 := JTF_VARCHAR2_TABLE_200();
1276 a33 := JTF_DATE_TABLE();
1277 a34 := JTF_DATE_TABLE();
1278 a35 := JTF_DATE_TABLE();
1279 a36 := JTF_DATE_TABLE();
1280 a37 := JTF_DATE_TABLE();
1281 a38 := JTF_DATE_TABLE();
1282 a39 := JTF_DATE_TABLE();
1283 a40 := JTF_DATE_TABLE();
1284 a41 := JTF_DATE_TABLE();
1285 a42 := JTF_DATE_TABLE();
1286 a43 := JTF_NUMBER_TABLE();
1287 a44 := JTF_NUMBER_TABLE();
1288 a45 := JTF_NUMBER_TABLE();
1289 a46 := JTF_NUMBER_TABLE();
1290 a47 := JTF_NUMBER_TABLE();
1291 a48 := JTF_NUMBER_TABLE();
1292 a49 := JTF_NUMBER_TABLE();
1293 a50 := JTF_NUMBER_TABLE();
1294 a51 := JTF_NUMBER_TABLE();
1295 a52 := JTF_NUMBER_TABLE();
1296 a53 := JTF_NUMBER_TABLE();
1297 a54 := JTF_NUMBER_TABLE();
1298 a55 := JTF_NUMBER_TABLE();
1299 a56 := JTF_NUMBER_TABLE();
1300 a57 := JTF_NUMBER_TABLE();
1301 a58 := JTF_NUMBER_TABLE();
1302 a59 := JTF_NUMBER_TABLE();
1303 a60 := JTF_NUMBER_TABLE();
1304 a61 := JTF_NUMBER_TABLE();
1305 a62 := JTF_NUMBER_TABLE();
1306 a63 := JTF_NUMBER_TABLE();
1307 a64 := JTF_NUMBER_TABLE();
1308 a65 := JTF_VARCHAR2_TABLE_100();
1309 a66 := JTF_VARCHAR2_TABLE_200();
1310 a67 := JTF_VARCHAR2_TABLE_200();
1311 a68 := JTF_VARCHAR2_TABLE_200();
1312 a69 := JTF_VARCHAR2_TABLE_200();
1313 a70 := JTF_VARCHAR2_TABLE_200();
1314 a71 := JTF_VARCHAR2_TABLE_200();
1315 a72 := JTF_VARCHAR2_TABLE_200();
1316 a73 := JTF_VARCHAR2_TABLE_200();
1317 a74 := JTF_VARCHAR2_TABLE_200();
1318 a75 := JTF_VARCHAR2_TABLE_200();
1319 a76 := JTF_VARCHAR2_TABLE_200();
1320 a77 := JTF_VARCHAR2_TABLE_200();
1321 a78 := JTF_VARCHAR2_TABLE_200();
1322 a79 := JTF_VARCHAR2_TABLE_200();
1323 a80 := JTF_VARCHAR2_TABLE_200();
1324 else
1325 a0 := JTF_VARCHAR2_TABLE_100();
1326 a1 := JTF_NUMBER_TABLE();
1327 a2 := JTF_NUMBER_TABLE();
1328 a3 := JTF_NUMBER_TABLE();
1329 a4 := JTF_NUMBER_TABLE();
1330 a5 := JTF_NUMBER_TABLE();
1331 a6 := JTF_VARCHAR2_TABLE_300();
1332 a7 := JTF_VARCHAR2_TABLE_300();
1333 a8 := JTF_NUMBER_TABLE();
1334 a9 := JTF_NUMBER_TABLE();
1335 a10 := JTF_VARCHAR2_TABLE_100();
1336 a11 := JTF_VARCHAR2_TABLE_100();
1337 a12 := JTF_DATE_TABLE();
1338 a13 := JTF_VARCHAR2_TABLE_200();
1339 a14 := JTF_VARCHAR2_TABLE_200();
1340 a15 := JTF_VARCHAR2_TABLE_200();
1341 a16 := JTF_VARCHAR2_TABLE_200();
1342 a17 := JTF_VARCHAR2_TABLE_200();
1343 a18 := JTF_VARCHAR2_TABLE_200();
1344 a19 := JTF_VARCHAR2_TABLE_200();
1345 a20 := JTF_VARCHAR2_TABLE_200();
1346 a21 := JTF_VARCHAR2_TABLE_200();
1347 a22 := JTF_VARCHAR2_TABLE_200();
1348 a23 := JTF_VARCHAR2_TABLE_200();
1349 a24 := JTF_VARCHAR2_TABLE_200();
1350 a25 := JTF_VARCHAR2_TABLE_200();
1351 a26 := JTF_VARCHAR2_TABLE_200();
1352 a27 := JTF_VARCHAR2_TABLE_200();
1353 a28 := JTF_VARCHAR2_TABLE_200();
1354 a29 := JTF_VARCHAR2_TABLE_200();
1355 a30 := JTF_VARCHAR2_TABLE_200();
1356 a31 := JTF_VARCHAR2_TABLE_200();
1357 a32 := JTF_VARCHAR2_TABLE_200();
1358 a33 := JTF_DATE_TABLE();
1359 a34 := JTF_DATE_TABLE();
1360 a35 := JTF_DATE_TABLE();
1361 a36 := JTF_DATE_TABLE();
1362 a37 := JTF_DATE_TABLE();
1363 a38 := JTF_DATE_TABLE();
1364 a39 := JTF_DATE_TABLE();
1365 a40 := JTF_DATE_TABLE();
1366 a41 := JTF_DATE_TABLE();
1367 a42 := JTF_DATE_TABLE();
1368 a43 := JTF_NUMBER_TABLE();
1369 a44 := JTF_NUMBER_TABLE();
1370 a45 := JTF_NUMBER_TABLE();
1371 a46 := JTF_NUMBER_TABLE();
1372 a47 := JTF_NUMBER_TABLE();
1373 a48 := JTF_NUMBER_TABLE();
1374 a49 := JTF_NUMBER_TABLE();
1375 a50 := JTF_NUMBER_TABLE();
1376 a51 := JTF_NUMBER_TABLE();
1377 a52 := JTF_NUMBER_TABLE();
1378 a53 := JTF_NUMBER_TABLE();
1379 a54 := JTF_NUMBER_TABLE();
1380 a55 := JTF_NUMBER_TABLE();
1381 a56 := JTF_NUMBER_TABLE();
1382 a57 := JTF_NUMBER_TABLE();
1383 a58 := JTF_NUMBER_TABLE();
1384 a59 := JTF_NUMBER_TABLE();
1385 a60 := JTF_NUMBER_TABLE();
1386 a61 := JTF_NUMBER_TABLE();
1387 a62 := JTF_NUMBER_TABLE();
1388 a63 := JTF_NUMBER_TABLE();
1389 a64 := JTF_NUMBER_TABLE();
1390 a65 := JTF_VARCHAR2_TABLE_100();
1391 a66 := JTF_VARCHAR2_TABLE_200();
1392 a67 := JTF_VARCHAR2_TABLE_200();
1393 a68 := JTF_VARCHAR2_TABLE_200();
1394 a69 := JTF_VARCHAR2_TABLE_200();
1395 a70 := JTF_VARCHAR2_TABLE_200();
1396 a71 := JTF_VARCHAR2_TABLE_200();
1397 a72 := JTF_VARCHAR2_TABLE_200();
1398 a73 := JTF_VARCHAR2_TABLE_200();
1399 a74 := JTF_VARCHAR2_TABLE_200();
1400 a75 := JTF_VARCHAR2_TABLE_200();
1401 a76 := JTF_VARCHAR2_TABLE_200();
1402 a77 := JTF_VARCHAR2_TABLE_200();
1403 a78 := JTF_VARCHAR2_TABLE_200();
1404 a79 := JTF_VARCHAR2_TABLE_200();
1405 a80 := JTF_VARCHAR2_TABLE_200();
1406 if t.count > 0 then
1407 a0.extend(t.count);
1408 a1.extend(t.count);
1409 a2.extend(t.count);
1410 a3.extend(t.count);
1411 a4.extend(t.count);
1412 a5.extend(t.count);
1413 a6.extend(t.count);
1414 a7.extend(t.count);
1415 a8.extend(t.count);
1416 a9.extend(t.count);
1417 a10.extend(t.count);
1418 a11.extend(t.count);
1419 a12.extend(t.count);
1420 a13.extend(t.count);
1421 a14.extend(t.count);
1422 a15.extend(t.count);
1423 a16.extend(t.count);
1424 a17.extend(t.count);
1425 a18.extend(t.count);
1426 a19.extend(t.count);
1427 a20.extend(t.count);
1428 a21.extend(t.count);
1429 a22.extend(t.count);
1430 a23.extend(t.count);
1431 a24.extend(t.count);
1432 a25.extend(t.count);
1433 a26.extend(t.count);
1434 a27.extend(t.count);
1435 a28.extend(t.count);
1436 a29.extend(t.count);
1437 a30.extend(t.count);
1438 a31.extend(t.count);
1439 a32.extend(t.count);
1440 a33.extend(t.count);
1441 a34.extend(t.count);
1442 a35.extend(t.count);
1443 a36.extend(t.count);
1444 a37.extend(t.count);
1445 a38.extend(t.count);
1446 a39.extend(t.count);
1447 a40.extend(t.count);
1448 a41.extend(t.count);
1449 a42.extend(t.count);
1450 a43.extend(t.count);
1451 a44.extend(t.count);
1452 a45.extend(t.count);
1453 a46.extend(t.count);
1454 a47.extend(t.count);
1455 a48.extend(t.count);
1456 a49.extend(t.count);
1457 a50.extend(t.count);
1458 a51.extend(t.count);
1459 a52.extend(t.count);
1460 a53.extend(t.count);
1461 a54.extend(t.count);
1462 a55.extend(t.count);
1463 a56.extend(t.count);
1464 a57.extend(t.count);
1465 a58.extend(t.count);
1466 a59.extend(t.count);
1467 a60.extend(t.count);
1468 a61.extend(t.count);
1469 a62.extend(t.count);
1470 a63.extend(t.count);
1471 a64.extend(t.count);
1472 a65.extend(t.count);
1473 a66.extend(t.count);
1474 a67.extend(t.count);
1475 a68.extend(t.count);
1476 a69.extend(t.count);
1477 a70.extend(t.count);
1478 a71.extend(t.count);
1479 a72.extend(t.count);
1480 a73.extend(t.count);
1481 a74.extend(t.count);
1482 a75.extend(t.count);
1483 a76.extend(t.count);
1484 a77.extend(t.count);
1485 a78.extend(t.count);
1486 a79.extend(t.count);
1487 a80.extend(t.count);
1488 ddindx := t.first;
1489 indx := 1;
1490 while true loop
1491 a0(indx) := t(ddindx).serial_number;
1492 a1(indx) := t(ddindx).assembly_item_id;
1493 a2(indx) := t(ddindx).header_id;
1494 a3(indx) := t(ddindx).generate_serial_number;
1495 a4(indx) := t(ddindx).generate_for_qty;
1496 a5(indx) := t(ddindx).action_flag;
1497 a6(indx) := t(ddindx).current_wip_entity_name;
1498 a7(indx) := t(ddindx).changed_wip_entity_name;
1499 a8(indx) := t(ddindx).current_wip_entity_id;
1500 a9(indx) := t(ddindx).changed_wip_entity_id;
1501 a10(indx) := t(ddindx).serial_attribute_category;
1502 a11(indx) := t(ddindx).territory_code;
1503 a12(indx) := t(ddindx).origination_date;
1504 a13(indx) := t(ddindx).c_attribute1;
1505 a14(indx) := t(ddindx).c_attribute2;
1506 a15(indx) := t(ddindx).c_attribute3;
1507 a16(indx) := t(ddindx).c_attribute4;
1508 a17(indx) := t(ddindx).c_attribute5;
1509 a18(indx) := t(ddindx).c_attribute6;
1510 a19(indx) := t(ddindx).c_attribute7;
1511 a20(indx) := t(ddindx).c_attribute8;
1512 a21(indx) := t(ddindx).c_attribute9;
1513 a22(indx) := t(ddindx).c_attribute10;
1514 a23(indx) := t(ddindx).c_attribute11;
1515 a24(indx) := t(ddindx).c_attribute12;
1516 a25(indx) := t(ddindx).c_attribute13;
1517 a26(indx) := t(ddindx).c_attribute14;
1518 a27(indx) := t(ddindx).c_attribute15;
1519 a28(indx) := t(ddindx).c_attribute16;
1520 a29(indx) := t(ddindx).c_attribute17;
1521 a30(indx) := t(ddindx).c_attribute18;
1522 a31(indx) := t(ddindx).c_attribute19;
1523 a32(indx) := t(ddindx).c_attribute20;
1524 a33(indx) := t(ddindx).d_attribute1;
1525 a34(indx) := t(ddindx).d_attribute2;
1526 a35(indx) := t(ddindx).d_attribute3;
1527 a36(indx) := t(ddindx).d_attribute4;
1528 a37(indx) := t(ddindx).d_attribute5;
1529 a38(indx) := t(ddindx).d_attribute6;
1530 a39(indx) := t(ddindx).d_attribute7;
1531 a40(indx) := t(ddindx).d_attribute8;
1532 a41(indx) := t(ddindx).d_attribute9;
1533 a42(indx) := t(ddindx).d_attribute10;
1534 a43(indx) := t(ddindx).n_attribute1;
1535 a44(indx) := t(ddindx).n_attribute2;
1536 a45(indx) := t(ddindx).n_attribute3;
1537 a46(indx) := t(ddindx).n_attribute4;
1538 a47(indx) := t(ddindx).n_attribute5;
1539 a48(indx) := t(ddindx).n_attribute6;
1540 a49(indx) := t(ddindx).n_attribute7;
1541 a50(indx) := t(ddindx).n_attribute8;
1542 a51(indx) := t(ddindx).n_attribute9;
1543 a52(indx) := t(ddindx).n_attribute10;
1544 a53(indx) := t(ddindx).status_id;
1545 a54(indx) := t(ddindx).time_since_new;
1546 a55(indx) := t(ddindx).cycles_since_new;
1547 a56(indx) := t(ddindx).time_since_overhaul;
1548 a57(indx) := t(ddindx).cycles_since_overhaul;
1549 a58(indx) := t(ddindx).time_since_repair;
1550 a59(indx) := t(ddindx).cycles_since_repair;
1551 a60(indx) := t(ddindx).time_since_visit;
1552 a61(indx) := t(ddindx).cycles_since_visit;
1553 a62(indx) := t(ddindx).time_since_mark;
1554 a63(indx) := t(ddindx).cycles_since_mark;
1555 a64(indx) := t(ddindx).number_of_repairs;
1556 a65(indx) := t(ddindx).attribute_category;
1557 a66(indx) := t(ddindx).attribute1;
1558 a67(indx) := t(ddindx).attribute2;
1559 a68(indx) := t(ddindx).attribute3;
1560 a69(indx) := t(ddindx).attribute4;
1561 a70(indx) := t(ddindx).attribute5;
1562 a71(indx) := t(ddindx).attribute6;
1563 a72(indx) := t(ddindx).attribute7;
1564 a73(indx) := t(ddindx).attribute8;
1565 a74(indx) := t(ddindx).attribute9;
1566 a75(indx) := t(ddindx).attribute10;
1567 a76(indx) := t(ddindx).attribute11;
1568 a77(indx) := t(ddindx).attribute12;
1569 a78(indx) := t(ddindx).attribute13;
1570 a79(indx) := t(ddindx).attribute14;
1571 a80(indx) := t(ddindx).attribute15;
1572 indx := indx+1;
1573 if t.last =ddindx
1574 then exit;
1575 end if;
1576 ddindx := t.next(ddindx);
1577 end loop;
1578 end if;
1579 end if;
1580 end rosetta_table_copy_out_p8;
1581
1582 procedure invoke_txn_api(p_api_version NUMBER
1583 , p_commit VARCHAR2
1584 , p_validation_level NUMBER
1585 , p_init_msg_list VARCHAR2
1586 , p_calling_mode NUMBER
1587 , p5_a0 NUMBER
1588 , p5_a1 DATE
1589 , p5_a2 VARCHAR2
1590 , p5_a3 NUMBER
1591 , p5_a4 NUMBER
1592 , p5_a5 NUMBER
1593 , p5_a6 VARCHAR2
1594 , p5_a7 NUMBER
1595 , p5_a8 VARCHAR2
1596 , p5_a9 VARCHAR2
1597 , p5_a10 VARCHAR2
1598 , p5_a11 VARCHAR2
1599 , p5_a12 VARCHAR2
1600 , p5_a13 VARCHAR2
1601 , p5_a14 VARCHAR2
1602 , p5_a15 VARCHAR2
1603 , p5_a16 VARCHAR2
1604 , p5_a17 VARCHAR2
1605 , p5_a18 VARCHAR2
1606 , p5_a19 VARCHAR2
1607 , p5_a20 VARCHAR2
1608 , p5_a21 VARCHAR2
1609 , p5_a22 VARCHAR2
1610 , p5_a23 VARCHAR2
1611 , p5_a24 VARCHAR2
1612 , p6_a0 JTF_NUMBER_TABLE
1613 , p6_a1 JTF_VARCHAR2_TABLE_300
1614 , p6_a2 JTF_NUMBER_TABLE
1615 , p6_a3 JTF_NUMBER_TABLE
1616 , p6_a4 JTF_VARCHAR2_TABLE_300
1617 , p6_a5 JTF_VARCHAR2_TABLE_100
1618 , p6_a6 JTF_NUMBER_TABLE
1619 , p6_a7 JTF_VARCHAR2_TABLE_100
1620 , p6_a8 JTF_VARCHAR2_TABLE_100
1621 , p6_a9 JTF_VARCHAR2_TABLE_100
1622 , p6_a10 JTF_NUMBER_TABLE
1623 , p6_a11 JTF_VARCHAR2_TABLE_100
1624 , p6_a12 JTF_NUMBER_TABLE
1625 , p6_a13 JTF_NUMBER_TABLE
1626 , p6_a14 JTF_NUMBER_TABLE
1627 , p6_a15 JTF_VARCHAR2_TABLE_100
1628 , p6_a16 JTF_VARCHAR2_TABLE_300
1629 , p6_a17 JTF_NUMBER_TABLE
1630 , p6_a18 JTF_NUMBER_TABLE
1631 , p6_a19 JTF_NUMBER_TABLE
1632 , p6_a20 JTF_VARCHAR2_TABLE_100
1633 , p6_a21 JTF_NUMBER_TABLE
1634 , p6_a22 JTF_NUMBER_TABLE
1635 , p6_a23 JTF_NUMBER_TABLE
1636 , p6_a24 JTF_NUMBER_TABLE
1637 , p6_a25 JTF_NUMBER_TABLE
1638 , p6_a26 JTF_NUMBER_TABLE
1639 , p6_a27 JTF_VARCHAR2_TABLE_100
1640 , p6_a28 JTF_DATE_TABLE
1641 , p6_a29 JTF_VARCHAR2_TABLE_100
1642 , p6_a30 JTF_VARCHAR2_TABLE_100
1643 , p6_a31 JTF_NUMBER_TABLE
1644 , p6_a32 JTF_VARCHAR2_TABLE_100
1645 , p6_a33 JTF_DATE_TABLE
1646 , p6_a34 JTF_VARCHAR2_TABLE_100
1647 , p6_a35 JTF_NUMBER_TABLE
1648 , p6_a36 JTF_VARCHAR2_TABLE_200
1649 , p6_a37 JTF_DATE_TABLE
1650 , p6_a38 JTF_DATE_TABLE
1651 , p6_a39 JTF_DATE_TABLE
1652 , p6_a40 JTF_NUMBER_TABLE
1653 , p6_a41 JTF_NUMBER_TABLE
1654 , p6_a42 JTF_NUMBER_TABLE
1655 , p6_a43 JTF_VARCHAR2_TABLE_100
1656 , p6_a44 JTF_VARCHAR2_TABLE_200
1657 , p6_a45 JTF_VARCHAR2_TABLE_200
1658 , p6_a46 JTF_VARCHAR2_TABLE_200
1659 , p6_a47 JTF_VARCHAR2_TABLE_200
1660 , p6_a48 JTF_VARCHAR2_TABLE_200
1661 , p6_a49 JTF_VARCHAR2_TABLE_200
1662 , p6_a50 JTF_VARCHAR2_TABLE_200
1663 , p6_a51 JTF_VARCHAR2_TABLE_200
1664 , p6_a52 JTF_VARCHAR2_TABLE_200
1665 , p6_a53 JTF_VARCHAR2_TABLE_200
1666 , p6_a54 JTF_VARCHAR2_TABLE_200
1667 , p6_a55 JTF_VARCHAR2_TABLE_200
1668 , p6_a56 JTF_VARCHAR2_TABLE_200
1669 , p6_a57 JTF_VARCHAR2_TABLE_200
1670 , p6_a58 JTF_VARCHAR2_TABLE_200
1671 , p7_a0 JTF_VARCHAR2_TABLE_300
1672 , p7_a1 JTF_NUMBER_TABLE
1673 , p7_a2 JTF_VARCHAR2_TABLE_300
1674 , p7_a3 JTF_NUMBER_TABLE
1675 , p7_a4 JTF_NUMBER_TABLE
1676 , p7_a5 JTF_NUMBER_TABLE
1677 , p7_a6 JTF_NUMBER_TABLE
1678 , p7_a7 JTF_VARCHAR2_TABLE_100
1679 , p7_a8 JTF_VARCHAR2_TABLE_100
1680 , p7_a9 JTF_NUMBER_TABLE
1681 , p7_a10 JTF_VARCHAR2_TABLE_100
1682 , p7_a11 JTF_VARCHAR2_TABLE_100
1683 , p7_a12 JTF_NUMBER_TABLE
1684 , p7_a13 JTF_VARCHAR2_TABLE_100
1685 , p7_a14 JTF_NUMBER_TABLE
1686 , p7_a15 JTF_NUMBER_TABLE
1687 , p7_a16 JTF_NUMBER_TABLE
1688 , p7_a17 JTF_VARCHAR2_TABLE_100
1689 , p7_a18 JTF_VARCHAR2_TABLE_100
1690 , p7_a19 JTF_DATE_TABLE
1691 , p7_a20 JTF_DATE_TABLE
1692 , p7_a21 JTF_VARCHAR2_TABLE_100
1693 , p7_a22 JTF_VARCHAR2_TABLE_100
1694 , p7_a23 JTF_NUMBER_TABLE
1695 , p7_a24 JTF_NUMBER_TABLE
1696 , p7_a25 JTF_NUMBER_TABLE
1697 , p7_a26 JTF_NUMBER_TABLE
1698 , p7_a27 JTF_VARCHAR2_TABLE_100
1699 , p7_a28 JTF_NUMBER_TABLE
1700 , p7_a29 JTF_NUMBER_TABLE
1701 , p7_a30 JTF_NUMBER_TABLE
1702 , p7_a31 JTF_VARCHAR2_TABLE_100
1703 , p7_a32 JTF_VARCHAR2_TABLE_300
1704 , p7_a33 JTF_NUMBER_TABLE
1705 , p7_a34 JTF_NUMBER_TABLE
1706 , p7_a35 JTF_VARCHAR2_TABLE_100
1707 , p7_a36 JTF_NUMBER_TABLE
1708 , p7_a37 JTF_VARCHAR2_TABLE_200
1709 , p7_a38 JTF_DATE_TABLE
1710 , p7_a39 JTF_DATE_TABLE
1711 , p7_a40 JTF_NUMBER_TABLE
1712 , p7_a41 JTF_NUMBER_TABLE
1713 , p7_a42 JTF_NUMBER_TABLE
1714 , p7_a43 JTF_VARCHAR2_TABLE_100
1715 , p7_a44 JTF_VARCHAR2_TABLE_200
1716 , p7_a45 JTF_VARCHAR2_TABLE_200
1717 , p7_a46 JTF_VARCHAR2_TABLE_200
1718 , p7_a47 JTF_VARCHAR2_TABLE_200
1719 , p7_a48 JTF_VARCHAR2_TABLE_200
1720 , p7_a49 JTF_VARCHAR2_TABLE_200
1721 , p7_a50 JTF_VARCHAR2_TABLE_200
1722 , p7_a51 JTF_VARCHAR2_TABLE_200
1723 , p7_a52 JTF_VARCHAR2_TABLE_200
1724 , p7_a53 JTF_VARCHAR2_TABLE_200
1725 , p7_a54 JTF_VARCHAR2_TABLE_200
1726 , p7_a55 JTF_VARCHAR2_TABLE_200
1727 , p7_a56 JTF_VARCHAR2_TABLE_200
1728 , p7_a57 JTF_VARCHAR2_TABLE_200
1729 , p7_a58 JTF_VARCHAR2_TABLE_200
1730 , p8_a0 JTF_VARCHAR2_TABLE_100
1731 , p8_a1 JTF_NUMBER_TABLE
1732 , p8_a2 JTF_NUMBER_TABLE
1733 , p8_a3 JTF_NUMBER_TABLE
1734 , p8_a4 JTF_NUMBER_TABLE
1735 , p8_a5 JTF_NUMBER_TABLE
1736 , p8_a6 JTF_VARCHAR2_TABLE_300
1737 , p8_a7 JTF_VARCHAR2_TABLE_300
1738 , p8_a8 JTF_NUMBER_TABLE
1739 , p8_a9 JTF_NUMBER_TABLE
1740 , p8_a10 JTF_VARCHAR2_TABLE_100
1741 , p8_a11 JTF_VARCHAR2_TABLE_100
1742 , p8_a12 JTF_DATE_TABLE
1743 , p8_a13 JTF_VARCHAR2_TABLE_200
1744 , p8_a14 JTF_VARCHAR2_TABLE_200
1745 , p8_a15 JTF_VARCHAR2_TABLE_200
1746 , p8_a16 JTF_VARCHAR2_TABLE_200
1747 , p8_a17 JTF_VARCHAR2_TABLE_200
1748 , p8_a18 JTF_VARCHAR2_TABLE_200
1749 , p8_a19 JTF_VARCHAR2_TABLE_200
1750 , p8_a20 JTF_VARCHAR2_TABLE_200
1751 , p8_a21 JTF_VARCHAR2_TABLE_200
1752 , p8_a22 JTF_VARCHAR2_TABLE_200
1753 , p8_a23 JTF_VARCHAR2_TABLE_200
1754 , p8_a24 JTF_VARCHAR2_TABLE_200
1755 , p8_a25 JTF_VARCHAR2_TABLE_200
1756 , p8_a26 JTF_VARCHAR2_TABLE_200
1757 , p8_a27 JTF_VARCHAR2_TABLE_200
1758 , p8_a28 JTF_VARCHAR2_TABLE_200
1759 , p8_a29 JTF_VARCHAR2_TABLE_200
1760 , p8_a30 JTF_VARCHAR2_TABLE_200
1761 , p8_a31 JTF_VARCHAR2_TABLE_200
1762 , p8_a32 JTF_VARCHAR2_TABLE_200
1763 , p8_a33 JTF_DATE_TABLE
1764 , p8_a34 JTF_DATE_TABLE
1765 , p8_a35 JTF_DATE_TABLE
1766 , p8_a36 JTF_DATE_TABLE
1767 , p8_a37 JTF_DATE_TABLE
1768 , p8_a38 JTF_DATE_TABLE
1769 , p8_a39 JTF_DATE_TABLE
1770 , p8_a40 JTF_DATE_TABLE
1771 , p8_a41 JTF_DATE_TABLE
1772 , p8_a42 JTF_DATE_TABLE
1773 , p8_a43 JTF_NUMBER_TABLE
1774 , p8_a44 JTF_NUMBER_TABLE
1775 , p8_a45 JTF_NUMBER_TABLE
1776 , p8_a46 JTF_NUMBER_TABLE
1777 , p8_a47 JTF_NUMBER_TABLE
1778 , p8_a48 JTF_NUMBER_TABLE
1779 , p8_a49 JTF_NUMBER_TABLE
1780 , p8_a50 JTF_NUMBER_TABLE
1781 , p8_a51 JTF_NUMBER_TABLE
1782 , p8_a52 JTF_NUMBER_TABLE
1783 , p8_a53 JTF_NUMBER_TABLE
1784 , p8_a54 JTF_NUMBER_TABLE
1785 , p8_a55 JTF_NUMBER_TABLE
1786 , p8_a56 JTF_NUMBER_TABLE
1787 , p8_a57 JTF_NUMBER_TABLE
1788 , p8_a58 JTF_NUMBER_TABLE
1789 , p8_a59 JTF_NUMBER_TABLE
1790 , p8_a60 JTF_NUMBER_TABLE
1791 , p8_a61 JTF_NUMBER_TABLE
1792 , p8_a62 JTF_NUMBER_TABLE
1793 , p8_a63 JTF_NUMBER_TABLE
1794 , p8_a64 JTF_NUMBER_TABLE
1795 , p8_a65 JTF_VARCHAR2_TABLE_100
1796 , p8_a66 JTF_VARCHAR2_TABLE_200
1797 , p8_a67 JTF_VARCHAR2_TABLE_200
1798 , p8_a68 JTF_VARCHAR2_TABLE_200
1799 , p8_a69 JTF_VARCHAR2_TABLE_200
1800 , p8_a70 JTF_VARCHAR2_TABLE_200
1801 , p8_a71 JTF_VARCHAR2_TABLE_200
1802 , p8_a72 JTF_VARCHAR2_TABLE_200
1803 , p8_a73 JTF_VARCHAR2_TABLE_200
1804 , p8_a74 JTF_VARCHAR2_TABLE_200
1805 , p8_a75 JTF_VARCHAR2_TABLE_200
1806 , p8_a76 JTF_VARCHAR2_TABLE_200
1807 , p8_a77 JTF_VARCHAR2_TABLE_200
1808 , p8_a78 JTF_VARCHAR2_TABLE_200
1809 , p8_a79 JTF_VARCHAR2_TABLE_200
1810 , p8_a80 JTF_VARCHAR2_TABLE_200
1811 , p9_a0 JTF_NUMBER_TABLE
1812 , p9_a1 JTF_VARCHAR2_TABLE_300
1813 , p9_a2 JTF_NUMBER_TABLE
1814 , p9_a3 JTF_VARCHAR2_TABLE_100
1815 , p9_a4 JTF_NUMBER_TABLE
1816 , p9_a5 JTF_NUMBER_TABLE
1817 , x_return_status out nocopy VARCHAR2
1818 , x_msg_count out nocopy NUMBER
1819 , x_error_msg out nocopy VARCHAR2
1820 )
1821
1822 as
1823 ddp_txn_header_rec wsm_wip_lot_txn_pvt.wltx_transactions_rec_type;
1824 ddp_starting_jobs_tbl wsm_wip_lot_txn_pvt.wltx_starting_jobs_tbl_type;
1825 ddp_resulting_jobs_tbl wsm_wip_lot_txn_pvt.wltx_resulting_jobs_tbl_type;
1826 ddp_wsm_serial_num_tbl wsm_serial_support_grp.wsm_serial_num_tbl;
1827 ddp_secondary_qty_tbl wsm_wip_lot_txn_pvt.wsm_job_secondary_qty_tbl_type;
1828 ddindx binary_integer; indx binary_integer;
1829 begin
1830
1831 -- copy data to the local IN or IN-OUT args, if any
1832
1833
1834
1835
1836
1837 ddp_txn_header_rec.transaction_type_id := p5_a0;
1838 ddp_txn_header_rec.transaction_date := p5_a1;
1839 ddp_txn_header_rec.transaction_reference := p5_a2;
1840 ddp_txn_header_rec.reason_id := p5_a3;
1841 ddp_txn_header_rec.transaction_id := p5_a4;
1842 ddp_txn_header_rec.employee_id := p5_a5;
1843 ddp_txn_header_rec.organization_code := p5_a6;
1844 ddp_txn_header_rec.organization_id := p5_a7;
1845 ddp_txn_header_rec.error_message := p5_a8;
1846 ddp_txn_header_rec.attribute_category := p5_a9;
1847 ddp_txn_header_rec.attribute1 := p5_a10;
1848 ddp_txn_header_rec.attribute2 := p5_a11;
1849 ddp_txn_header_rec.attribute3 := p5_a12;
1850 ddp_txn_header_rec.attribute4 := p5_a13;
1851 ddp_txn_header_rec.attribute5 := p5_a14;
1852 ddp_txn_header_rec.attribute6 := p5_a15;
1853 ddp_txn_header_rec.attribute7 := p5_a16;
1854 ddp_txn_header_rec.attribute8 := p5_a17;
1855 ddp_txn_header_rec.attribute9 := p5_a18;
1856 ddp_txn_header_rec.attribute10 := p5_a19;
1857 ddp_txn_header_rec.attribute11 := p5_a20;
1858 ddp_txn_header_rec.attribute12 := p5_a21;
1859 ddp_txn_header_rec.attribute13 := p5_a22;
1860 ddp_txn_header_rec.attribute14 := p5_a23;
1861 ddp_txn_header_rec.attribute15 := p5_a24;
1862
1863 wsm_wip_lot_txn_pvt_w.rosetta_table_copy_in_p6(ddp_starting_jobs_tbl, p6_a0
1864 , p6_a1
1865 , p6_a2
1866 , p6_a3
1867 , p6_a4
1868 , p6_a5
1869 , p6_a6
1870 , p6_a7
1871 , p6_a8
1872 , p6_a9
1873 , p6_a10
1874 , p6_a11
1875 , p6_a12
1876 , p6_a13
1877 , p6_a14
1878 , p6_a15
1879 , p6_a16
1880 , p6_a17
1881 , p6_a18
1882 , p6_a19
1883 , p6_a20
1884 , p6_a21
1885 , p6_a22
1886 , p6_a23
1887 , p6_a24
1888 , p6_a25
1889 , p6_a26
1890 , p6_a27
1891 , p6_a28
1892 , p6_a29
1893 , p6_a30
1894 , p6_a31
1895 , p6_a32
1896 , p6_a33
1897 , p6_a34
1898 , p6_a35
1899 , p6_a36
1900 , p6_a37
1901 , p6_a38
1902 , p6_a39
1903 , p6_a40
1904 , p6_a41
1905 , p6_a42
1906 , p6_a43
1907 , p6_a44
1908 , p6_a45
1909 , p6_a46
1910 , p6_a47
1911 , p6_a48
1912 , p6_a49
1913 , p6_a50
1914 , p6_a51
1915 , p6_a52
1916 , p6_a53
1917 , p6_a54
1918 , p6_a55
1919 , p6_a56
1920 , p6_a57
1921 , p6_a58
1922 );
1923
1924 wsm_wip_lot_txn_pvt_w.rosetta_table_copy_in_p7(ddp_resulting_jobs_tbl, p7_a0
1925 , p7_a1
1926 , p7_a2
1927 , p7_a3
1928 , p7_a4
1929 , p7_a5
1930 , p7_a6
1931 , p7_a7
1932 , p7_a8
1933 , p7_a9
1934 , p7_a10
1935 , p7_a11
1936 , p7_a12
1937 , p7_a13
1938 , p7_a14
1939 , p7_a15
1940 , p7_a16
1941 , p7_a17
1942 , p7_a18
1943 , p7_a19
1944 , p7_a20
1945 , p7_a21
1946 , p7_a22
1947 , p7_a23
1948 , p7_a24
1949 , p7_a25
1950 , p7_a26
1951 , p7_a27
1952 , p7_a28
1953 , p7_a29
1954 , p7_a30
1955 , p7_a31
1956 , p7_a32
1957 , p7_a33
1958 , p7_a34
1959 , p7_a35
1960 , p7_a36
1961 , p7_a37
1962 , p7_a38
1963 , p7_a39
1964 , p7_a40
1965 , p7_a41
1966 , p7_a42
1967 , p7_a43
1968 , p7_a44
1969 , p7_a45
1970 , p7_a46
1971 , p7_a47
1972 , p7_a48
1973 , p7_a49
1974 , p7_a50
1975 , p7_a51
1976 , p7_a52
1977 , p7_a53
1978 , p7_a54
1979 , p7_a55
1980 , p7_a56
1981 , p7_a57
1982 , p7_a58
1983 );
1984
1985 wsm_wip_lot_txn_pvt_w.rosetta_table_copy_in_p8(ddp_wsm_serial_num_tbl, p8_a0
1986 , p8_a1
1987 , p8_a2
1988 , p8_a3
1989 , p8_a4
1990 , p8_a5
1991 , p8_a6
1992 , p8_a7
1993 , p8_a8
1994 , p8_a9
1995 , p8_a10
1996 , p8_a11
1997 , p8_a12
1998 , p8_a13
1999 , p8_a14
2000 , p8_a15
2001 , p8_a16
2002 , p8_a17
2003 , p8_a18
2004 , p8_a19
2005 , p8_a20
2006 , p8_a21
2007 , p8_a22
2008 , p8_a23
2009 , p8_a24
2010 , p8_a25
2011 , p8_a26
2012 , p8_a27
2013 , p8_a28
2014 , p8_a29
2015 , p8_a30
2016 , p8_a31
2017 , p8_a32
2018 , p8_a33
2019 , p8_a34
2020 , p8_a35
2021 , p8_a36
2022 , p8_a37
2023 , p8_a38
2024 , p8_a39
2025 , p8_a40
2026 , p8_a41
2027 , p8_a42
2028 , p8_a43
2029 , p8_a44
2030 , p8_a45
2031 , p8_a46
2032 , p8_a47
2033 , p8_a48
2034 , p8_a49
2035 , p8_a50
2036 , p8_a51
2037 , p8_a52
2038 , p8_a53
2039 , p8_a54
2040 , p8_a55
2041 , p8_a56
2042 , p8_a57
2043 , p8_a58
2044 , p8_a59
2045 , p8_a60
2046 , p8_a61
2047 , p8_a62
2048 , p8_a63
2049 , p8_a64
2050 , p8_a65
2051 , p8_a66
2052 , p8_a67
2053 , p8_a68
2054 , p8_a69
2055 , p8_a70
2056 , p8_a71
2057 , p8_a72
2058 , p8_a73
2059 , p8_a74
2060 , p8_a75
2061 , p8_a76
2062 , p8_a77
2063 , p8_a78
2064 , p8_a79
2065 , p8_a80
2066 );
2067
2068 wsm_wip_lot_txn_pvt_w.rosetta_table_copy_in_p5(ddp_secondary_qty_tbl, p9_a0
2069 , p9_a1
2070 , p9_a2
2071 , p9_a3
2072 , p9_a4
2073 , p9_a5
2074 );
2075
2076
2077
2078
2079 -- here's the delegated call to the old PL/SQL routine
2080 wsm_wip_lot_txn_pvt.invoke_txn_api(p_api_version,
2081 p_commit,
2082 p_validation_level,
2083 p_init_msg_list,
2084 p_calling_mode,
2085 ddp_txn_header_rec,
2086 ddp_starting_jobs_tbl,
2087 ddp_resulting_jobs_tbl,
2088 ddp_wsm_serial_num_tbl,
2089 ddp_secondary_qty_tbl,
2090 x_return_status,
2091 x_msg_count,
2092 x_error_msg);
2093
2094 -- copy data back from the local variables to OUT or IN-OUT args, if any
2095
2096
2097
2098
2099
2100
2101
2102
2103
2104
2105
2106
2107 end;
2108
2109 end wsm_wip_lot_txn_pvt_w;