[Home] [Help]
PACKAGE BODY: APPS.EAM_PROCESS_WO_PUB_W
Source
1 package body eam_process_wo_pub_w as
2 /* $Header: EAMVWORB.pls 120.3.12020000.3 2013/01/17 13:48:47 vchidura ship $ */
3 procedure rosetta_table_copy_in_p26(t out nocopy eam_process_wo_pub.eam_wo_relations_tbl_type, a0 JTF_NUMBER_TABLE
4 , a1 JTF_NUMBER_TABLE
5 , a2 JTF_NUMBER_TABLE
6 , a3 JTF_NUMBER_TABLE
7 , a4 JTF_NUMBER_TABLE
8 , a5 JTF_NUMBER_TABLE
9 , a6 JTF_NUMBER_TABLE
10 , a7 JTF_NUMBER_TABLE
11 , a8 JTF_NUMBER_TABLE
12 , a9 JTF_NUMBER_TABLE
13 , a10 JTF_NUMBER_TABLE
14 , a11 JTF_NUMBER_TABLE
15 , a12 JTF_NUMBER_TABLE
16 , a13 JTF_VARCHAR2_TABLE_100
17 , a14 JTF_VARCHAR2_TABLE_100
18 , a15 JTF_NUMBER_TABLE
19 , a16 JTF_NUMBER_TABLE
20 ) as
21 ddindx binary_integer; indx binary_integer;
22 begin
23 if a0 is not null and a0.count > 0 then
24 if a0.count > 0 then
25 indx := a0.first;
26 ddindx := 1;
27 while true loop
28 t(ddindx).batch_id := a0(indx);
29 t(ddindx).wo_relationship_id := a1(indx);
30 t(ddindx).parent_object_id := a2(indx);
31 t(ddindx).parent_object_type_id := a3(indx);
32 t(ddindx).parent_header_id := a4(indx);
33 t(ddindx).child_object_id := a5(indx);
34 t(ddindx).child_object_type_id := a6(indx);
35 t(ddindx).child_header_id := a7(indx);
36 t(ddindx).parent_relationship_type := a8(indx);
37 t(ddindx).relationship_status := a9(indx);
38 t(ddindx).top_level_object_id := a10(indx);
39 t(ddindx).top_level_object_type_id := a11(indx);
40 t(ddindx).top_level_header_id := a12(indx);
41 t(ddindx).adjust_parent := a13(indx);
42 t(ddindx).return_status := a14(indx);
43 t(ddindx).transaction_type := a15(indx);
44 t(ddindx).row_id := a16(indx);
45 ddindx := ddindx+1;
46 if a0.last =indx
47 then exit;
48 end if;
49 indx := a0.next(indx);
50 end loop;
51 end if;
52 end if;
53 end rosetta_table_copy_in_p26;
54 procedure rosetta_table_copy_out_p26(t eam_process_wo_pub.eam_wo_relations_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
55 , a1 out nocopy JTF_NUMBER_TABLE
56 , a2 out nocopy JTF_NUMBER_TABLE
57 , a3 out nocopy JTF_NUMBER_TABLE
58 , a4 out nocopy JTF_NUMBER_TABLE
59 , a5 out nocopy JTF_NUMBER_TABLE
60 , a6 out nocopy JTF_NUMBER_TABLE
61 , a7 out nocopy JTF_NUMBER_TABLE
62 , a8 out nocopy JTF_NUMBER_TABLE
63 , a9 out nocopy JTF_NUMBER_TABLE
64 , a10 out nocopy JTF_NUMBER_TABLE
65 , a11 out nocopy JTF_NUMBER_TABLE
66 , a12 out nocopy JTF_NUMBER_TABLE
67 , a13 out nocopy JTF_VARCHAR2_TABLE_100
68 , a14 out nocopy JTF_VARCHAR2_TABLE_100
69 , a15 out nocopy JTF_NUMBER_TABLE
70 , a16 out nocopy JTF_NUMBER_TABLE
71 ) as
72 ddindx binary_integer; indx binary_integer;
73 begin
74 if t is null or t.count = 0 then
75 a0 := JTF_NUMBER_TABLE();
76 a1 := JTF_NUMBER_TABLE();
77 a2 := JTF_NUMBER_TABLE();
78 a3 := JTF_NUMBER_TABLE();
79 a4 := JTF_NUMBER_TABLE();
80 a5 := JTF_NUMBER_TABLE();
81 a6 := JTF_NUMBER_TABLE();
82 a7 := JTF_NUMBER_TABLE();
83 a8 := JTF_NUMBER_TABLE();
84 a9 := JTF_NUMBER_TABLE();
85 a10 := JTF_NUMBER_TABLE();
86 a11 := JTF_NUMBER_TABLE();
87 a12 := JTF_NUMBER_TABLE();
88 a13 := JTF_VARCHAR2_TABLE_100();
89 a14 := JTF_VARCHAR2_TABLE_100();
90 a15 := JTF_NUMBER_TABLE();
91 a16 := JTF_NUMBER_TABLE();
92 else
93 a0 := JTF_NUMBER_TABLE();
94 a1 := JTF_NUMBER_TABLE();
95 a2 := JTF_NUMBER_TABLE();
96 a3 := JTF_NUMBER_TABLE();
97 a4 := JTF_NUMBER_TABLE();
98 a5 := JTF_NUMBER_TABLE();
99 a6 := JTF_NUMBER_TABLE();
100 a7 := JTF_NUMBER_TABLE();
101 a8 := JTF_NUMBER_TABLE();
102 a9 := JTF_NUMBER_TABLE();
103 a10 := JTF_NUMBER_TABLE();
104 a11 := JTF_NUMBER_TABLE();
105 a12 := JTF_NUMBER_TABLE();
106 a13 := JTF_VARCHAR2_TABLE_100();
107 a14 := JTF_VARCHAR2_TABLE_100();
108 a15 := JTF_NUMBER_TABLE();
109 a16 := JTF_NUMBER_TABLE();
110 if t.count > 0 then
111 a0.extend(t.count);
112 a1.extend(t.count);
113 a2.extend(t.count);
114 a3.extend(t.count);
115 a4.extend(t.count);
116 a5.extend(t.count);
117 a6.extend(t.count);
118 a7.extend(t.count);
119 a8.extend(t.count);
120 a9.extend(t.count);
121 a10.extend(t.count);
122 a11.extend(t.count);
123 a12.extend(t.count);
124 a13.extend(t.count);
125 a14.extend(t.count);
126 a15.extend(t.count);
127 a16.extend(t.count);
128 ddindx := t.first;
129 indx := 1;
130 while true loop
131 a0(indx) := t(ddindx).batch_id;
132 a1(indx) := t(ddindx).wo_relationship_id;
133 a2(indx) := t(ddindx).parent_object_id;
134 a3(indx) := t(ddindx).parent_object_type_id;
135 a4(indx) := t(ddindx).parent_header_id;
136 a5(indx) := t(ddindx).child_object_id;
137 a6(indx) := t(ddindx).child_object_type_id;
138 a7(indx) := t(ddindx).child_header_id;
139 a8(indx) := t(ddindx).parent_relationship_type;
140 a9(indx) := t(ddindx).relationship_status;
141 a10(indx) := t(ddindx).top_level_object_id;
142 a11(indx) := t(ddindx).top_level_object_type_id;
143 a12(indx) := t(ddindx).top_level_header_id;
144 a13(indx) := t(ddindx).adjust_parent;
145 a14(indx) := t(ddindx).return_status;
146 a15(indx) := t(ddindx).transaction_type;
147 a16(indx) := t(ddindx).row_id;
148 indx := indx+1;
149 if t.last =ddindx
150 then exit;
151 end if;
152 ddindx := t.next(ddindx);
153 end loop;
154 end if;
155 end if;
156 end rosetta_table_copy_out_p26;
157
158 procedure rosetta_table_copy_in_p27(t out nocopy eam_process_wo_pub.header_id_tbl_type, a0 JTF_NUMBER_TABLE
159 ) as
160 ddindx binary_integer; indx binary_integer;
161 begin
162 if a0 is not null and a0.count > 0 then
163 if a0.count > 0 then
164 indx := a0.first;
165 ddindx := 1;
166 while true loop
167 t(ddindx).header_id := a0(indx);
168 ddindx := ddindx+1;
169 if a0.last =indx
170 then exit;
171 end if;
172 indx := a0.next(indx);
173 end loop;
174 end if;
175 end if;
176 end rosetta_table_copy_in_p27;
177 procedure rosetta_table_copy_out_p27(t eam_process_wo_pub.header_id_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
178 ) as
179 ddindx binary_integer; indx binary_integer;
180 begin
181 if t is null or t.count = 0 then
182 a0 := JTF_NUMBER_TABLE();
183 else
184 a0 := JTF_NUMBER_TABLE();
185 if t.count > 0 then
186 a0.extend(t.count);
187 ddindx := t.first;
188 indx := 1;
189 while true loop
190 a0(indx) := t(ddindx).header_id;
191 indx := indx+1;
192 if t.last =ddindx
193 then exit;
194 end if;
195 ddindx := t.next(ddindx);
196 end loop;
197 end if;
198 end if;
199 end rosetta_table_copy_out_p27;
200
201 procedure rosetta_table_copy_in_p28(t out nocopy eam_process_wo_pub.eam_wo_tbl_type, a0 JTF_NUMBER_TABLE
202 , a1 JTF_NUMBER_TABLE
203 , a2 JTF_NUMBER_TABLE
204 , a3 JTF_VARCHAR2_TABLE_300
205 , a4 JTF_NUMBER_TABLE
206 , a5 JTF_NUMBER_TABLE
207 , a6 JTF_VARCHAR2_TABLE_300
208 , a7 JTF_VARCHAR2_TABLE_100
209 , a8 JTF_NUMBER_TABLE
210 , a9 JTF_NUMBER_TABLE
211 , a10 JTF_VARCHAR2_TABLE_100
212 , a11 JTF_NUMBER_TABLE
213 , a12 JTF_NUMBER_TABLE
214 , a13 JTF_NUMBER_TABLE
215 , a14 JTF_NUMBER_TABLE
216 , a15 JTF_VARCHAR2_TABLE_100
217 , a16 JTF_NUMBER_TABLE
218 , a17 JTF_VARCHAR2_TABLE_100
219 , a18 JTF_VARCHAR2_TABLE_100
220 , a19 JTF_VARCHAR2_TABLE_100
221 , a20 JTF_VARCHAR2_TABLE_100
222 , a21 JTF_NUMBER_TABLE
223 , a22 JTF_NUMBER_TABLE
224 , a23 JTF_DATE_TABLE
225 , a24 JTF_NUMBER_TABLE
226 , a25 JTF_NUMBER_TABLE
227 , a26 JTF_DATE_TABLE
228 , a27 JTF_DATE_TABLE
229 , a28 JTF_VARCHAR2_TABLE_100
230 , a29 JTF_VARCHAR2_TABLE_100
231 , a30 JTF_NUMBER_TABLE
232 , a31 JTF_VARCHAR2_TABLE_100
233 , a32 JTF_VARCHAR2_TABLE_100
234 , a33 JTF_VARCHAR2_TABLE_100
235 , a34 JTF_NUMBER_TABLE
236 , a35 JTF_NUMBER_TABLE
237 , a36 JTF_VARCHAR2_TABLE_100
238 , a37 JTF_NUMBER_TABLE
239 , a38 JTF_DATE_TABLE
240 , a39 JTF_DATE_TABLE
241 , a40 JTF_VARCHAR2_TABLE_100
242 , a41 JTF_VARCHAR2_TABLE_100
243 , a42 JTF_VARCHAR2_TABLE_100
244 , a43 JTF_VARCHAR2_TABLE_100
245 , a44 JTF_NUMBER_TABLE
246 , a45 JTF_VARCHAR2_TABLE_100
247 , a46 JTF_NUMBER_TABLE
248 , a47 JTF_NUMBER_TABLE
249 , a48 JTF_NUMBER_TABLE
250 , a49 JTF_NUMBER_TABLE
251 , a50 JTF_NUMBER_TABLE
252 , a51 JTF_NUMBER_TABLE
253 , a52 JTF_NUMBER_TABLE
254 , a53 JTF_NUMBER_TABLE
255 , a54 JTF_NUMBER_TABLE
256 , a55 JTF_NUMBER_TABLE
257 , a56 JTF_NUMBER_TABLE
258 , a57 JTF_NUMBER_TABLE
259 , a58 JTF_DATE_TABLE
260 , a59 JTF_DATE_TABLE
261 , a60 JTF_DATE_TABLE
262 , a61 JTF_DATE_TABLE
263 , a62 JTF_NUMBER_TABLE
264 , a63 JTF_NUMBER_TABLE
265 , a64 JTF_NUMBER_TABLE
266 , a65 JTF_NUMBER_TABLE
267 , a66 JTF_NUMBER_TABLE
268 , a67 JTF_NUMBER_TABLE
269 , a68 JTF_NUMBER_TABLE
270 , a69 JTF_VARCHAR2_TABLE_100
271 , a70 JTF_DATE_TABLE
272 , a71 JTF_NUMBER_TABLE
273 , a72 JTF_NUMBER_TABLE
274 , a73 JTF_NUMBER_TABLE
275 , a74 JTF_NUMBER_TABLE
276 , a75 JTF_NUMBER_TABLE
277 , a76 JTF_VARCHAR2_TABLE_100
278 , a77 JTF_NUMBER_TABLE
279 , a78 JTF_VARCHAR2_TABLE_100
280 , a79 JTF_VARCHAR2_TABLE_100
281 , a80 JTF_VARCHAR2_TABLE_200
282 , a81 JTF_VARCHAR2_TABLE_200
283 , a82 JTF_VARCHAR2_TABLE_200
284 , a83 JTF_VARCHAR2_TABLE_200
285 , a84 JTF_VARCHAR2_TABLE_200
286 , a85 JTF_VARCHAR2_TABLE_200
287 , a86 JTF_VARCHAR2_TABLE_200
288 , a87 JTF_VARCHAR2_TABLE_200
289 , a88 JTF_VARCHAR2_TABLE_200
290 , a89 JTF_VARCHAR2_TABLE_200
291 , a90 JTF_VARCHAR2_TABLE_200
292 , a91 JTF_VARCHAR2_TABLE_200
293 , a92 JTF_VARCHAR2_TABLE_200
294 , a93 JTF_VARCHAR2_TABLE_200
295 , a94 JTF_VARCHAR2_TABLE_200
296 , a95 JTF_VARCHAR2_TABLE_100
297 , a96 JTF_VARCHAR2_TABLE_100
298 , a97 JTF_NUMBER_TABLE
299 , a98 JTF_DATE_TABLE
300 , a99 JTF_DATE_TABLE
301 , a100 JTF_NUMBER_TABLE
302 , a101 JTF_NUMBER_TABLE
303 , a102 JTF_NUMBER_TABLE
304 , a103 JTF_NUMBER_TABLE
305 , a104 JTF_NUMBER_TABLE
306 , a105 JTF_NUMBER_TABLE
307 , a106 JTF_VARCHAR2_TABLE_100
308 , a107 JTF_VARCHAR2_TABLE_100
309 , a108 JTF_VARCHAR2_TABLE_100
310 , a109 JTF_NUMBER_TABLE
311 , a110 JTF_VARCHAR2_TABLE_100
312 ) as
313 ddindx binary_integer; indx binary_integer;
314 begin
315 if a0 is not null and a0.count > 0 then
316 if a0.count > 0 then
317 indx := a0.first;
318 ddindx := 1;
319 while true loop
320 t(ddindx).header_id := a0(indx);
321 t(ddindx).batch_id := a1(indx);
322 t(ddindx).row_id := a2(indx);
323 t(ddindx).wip_entity_name := a3(indx);
324 t(ddindx).wip_entity_id := a4(indx);
325 t(ddindx).organization_id := a5(indx);
326 t(ddindx).description := a6(indx);
327 t(ddindx).asset_number := a7(indx);
328 t(ddindx).asset_group_id := a8(indx);
329 t(ddindx).rebuild_item_id := a9(indx);
330 t(ddindx).rebuild_serial_number := a10(indx);
331 t(ddindx).maintenance_object_id := a11(indx);
332 t(ddindx).maintenance_object_type := a12(indx);
333 t(ddindx).maintenance_object_source := a13(indx);
334 t(ddindx).eam_linear_location_id := a14(indx);
335 t(ddindx).class_code := a15(indx);
336 t(ddindx).asset_activity_id := a16(indx);
337 t(ddindx).activity_type := a17(indx);
338 t(ddindx).activity_cause := a18(indx);
339 t(ddindx).activity_source := a19(indx);
340 t(ddindx).work_order_type := a20(indx);
341 t(ddindx).status_type := a21(indx);
342 t(ddindx).job_quantity := a22(indx);
343 t(ddindx).date_released := a23(indx);
344 t(ddindx).owning_department := a24(indx);
345 t(ddindx).priority := a25(indx);
346 t(ddindx).requested_start_date := a26(indx);
347 t(ddindx).due_date := a27(indx);
348 t(ddindx).shutdown_type := a28(indx);
349 t(ddindx).planner_type := a29(indx);
350 t(ddindx).firm_planned_flag := a30(indx);
351 t(ddindx).notification_required := a31(indx);
352 t(ddindx).tagout_required := a32(indx);
353 t(ddindx).plan_maintenance := a33(indx);
354 t(ddindx).project_id := a34(indx);
355 t(ddindx).task_id := a35(indx);
356 t(ddindx).end_item_unit_number := a36(indx);
357 t(ddindx).schedule_group_id := a37(indx);
358 t(ddindx).bom_revision_date := a38(indx);
359 t(ddindx).routing_revision_date := a39(indx);
360 t(ddindx).alternate_routing_designator := a40(indx);
361 t(ddindx).alternate_bom_designator := a41(indx);
362 t(ddindx).routing_revision := a42(indx);
363 t(ddindx).bom_revision := a43(indx);
364 t(ddindx).parent_wip_entity_id := a44(indx);
365 t(ddindx).manual_rebuild_flag := a45(indx);
366 t(ddindx).pm_schedule_id := a46(indx);
367 t(ddindx).wip_supply_type := a47(indx);
368 t(ddindx).material_account := a48(indx);
369 t(ddindx).material_overhead_account := a49(indx);
370 t(ddindx).resource_account := a50(indx);
371 t(ddindx).outside_processing_account := a51(indx);
372 t(ddindx).material_variance_account := a52(indx);
373 t(ddindx).resource_variance_account := a53(indx);
374 t(ddindx).outside_proc_variance_account := a54(indx);
375 t(ddindx).std_cost_adjustment_account := a55(indx);
376 t(ddindx).overhead_account := a56(indx);
377 t(ddindx).overhead_variance_account := a57(indx);
378 t(ddindx).scheduled_start_date := a58(indx);
379 t(ddindx).scheduled_completion_date := a59(indx);
380 t(ddindx).pm_suggested_start_date := a60(indx);
381 t(ddindx).pm_suggested_end_date := a61(indx);
382 t(ddindx).pm_base_meter_reading := a62(indx);
383 t(ddindx).pm_base_meter := a63(indx);
384 t(ddindx).common_bom_sequence_id := a64(indx);
385 t(ddindx).common_routing_sequence_id := a65(indx);
386 t(ddindx).po_creation_time := a66(indx);
387 t(ddindx).gen_object_id := a67(indx);
388 t(ddindx).user_defined_status_id := a68(indx);
389 t(ddindx).pending_flag := a69(indx);
390 t(ddindx).material_shortage_check_date := a70(indx);
391 t(ddindx).material_shortage_flag := a71(indx);
392 t(ddindx).workflow_type := a72(indx);
393 t(ddindx).warranty_claim_status := a73(indx);
394 t(ddindx).cycle_id := a74(indx);
395 t(ddindx).seq_id := a75(indx);
396 t(ddindx).ds_scheduled_flag := a76(indx);
397 t(ddindx).warranty_active := a77(indx);
398 t(ddindx).assignment_complete := a78(indx);
399 t(ddindx).attribute_category := a79(indx);
400 t(ddindx).attribute1 := a80(indx);
401 t(ddindx).attribute2 := a81(indx);
402 t(ddindx).attribute3 := a82(indx);
403 t(ddindx).attribute4 := a83(indx);
404 t(ddindx).attribute5 := a84(indx);
405 t(ddindx).attribute6 := a85(indx);
406 t(ddindx).attribute7 := a86(indx);
407 t(ddindx).attribute8 := a87(indx);
408 t(ddindx).attribute9 := a88(indx);
409 t(ddindx).attribute10 := a89(indx);
410 t(ddindx).attribute11 := a90(indx);
411 t(ddindx).attribute12 := a91(indx);
412 t(ddindx).attribute13 := a92(indx);
413 t(ddindx).attribute14 := a93(indx);
414 t(ddindx).attribute15 := a94(indx);
415 t(ddindx).material_issue_by_mo := a95(indx);
416 t(ddindx).issue_zero_cost_flag := a96(indx);
417 t(ddindx).report_type := a97(indx);
418 t(ddindx).actual_close_date := a98(indx);
419 t(ddindx).submission_date := a99(indx);
420 t(ddindx).user_id := a100(indx);
421 t(ddindx).responsibility_id := a101(indx);
422 t(ddindx).request_id := a102(indx);
423 t(ddindx).program_id := a103(indx);
424 t(ddindx).program_application_id := a104(indx);
425 t(ddindx).source_line_id := a105(indx);
426 t(ddindx).source_code := a106(indx);
427 t(ddindx).validate_structure := a107(indx);
428 t(ddindx).return_status := a108(indx);
429 t(ddindx).transaction_type := a109(indx);
430 t(ddindx).failure_code_required := a110(indx);
431 ddindx := ddindx+1;
432 if a0.last =indx
433 then exit;
434 end if;
435 indx := a0.next(indx);
436 end loop;
437 end if;
438 end if;
439 end rosetta_table_copy_in_p28;
440 procedure rosetta_table_copy_out_p28(t eam_process_wo_pub.eam_wo_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
441 , a1 out nocopy JTF_NUMBER_TABLE
442 , a2 out nocopy JTF_NUMBER_TABLE
443 , a3 out nocopy JTF_VARCHAR2_TABLE_300
444 , a4 out nocopy JTF_NUMBER_TABLE
445 , a5 out nocopy JTF_NUMBER_TABLE
446 , a6 out nocopy JTF_VARCHAR2_TABLE_300
447 , a7 out nocopy JTF_VARCHAR2_TABLE_100
448 , a8 out nocopy JTF_NUMBER_TABLE
449 , a9 out nocopy JTF_NUMBER_TABLE
450 , a10 out nocopy JTF_VARCHAR2_TABLE_100
451 , a11 out nocopy JTF_NUMBER_TABLE
452 , a12 out nocopy JTF_NUMBER_TABLE
453 , a13 out nocopy JTF_NUMBER_TABLE
454 , a14 out nocopy JTF_NUMBER_TABLE
455 , a15 out nocopy JTF_VARCHAR2_TABLE_100
456 , a16 out nocopy JTF_NUMBER_TABLE
457 , a17 out nocopy JTF_VARCHAR2_TABLE_100
458 , a18 out nocopy JTF_VARCHAR2_TABLE_100
459 , a19 out nocopy JTF_VARCHAR2_TABLE_100
460 , a20 out nocopy JTF_VARCHAR2_TABLE_100
461 , a21 out nocopy JTF_NUMBER_TABLE
462 , a22 out nocopy JTF_NUMBER_TABLE
463 , a23 out nocopy JTF_DATE_TABLE
464 , a24 out nocopy JTF_NUMBER_TABLE
465 , a25 out nocopy JTF_NUMBER_TABLE
466 , a26 out nocopy JTF_DATE_TABLE
467 , a27 out nocopy JTF_DATE_TABLE
468 , a28 out nocopy JTF_VARCHAR2_TABLE_100
469 , a29 out nocopy JTF_VARCHAR2_TABLE_100
470 , a30 out nocopy JTF_NUMBER_TABLE
471 , a31 out nocopy JTF_VARCHAR2_TABLE_100
472 , a32 out nocopy JTF_VARCHAR2_TABLE_100
473 , a33 out nocopy JTF_VARCHAR2_TABLE_100
474 , a34 out nocopy JTF_NUMBER_TABLE
475 , a35 out nocopy JTF_NUMBER_TABLE
476 , a36 out nocopy JTF_VARCHAR2_TABLE_100
477 , a37 out nocopy JTF_NUMBER_TABLE
478 , a38 out nocopy JTF_DATE_TABLE
479 , a39 out nocopy JTF_DATE_TABLE
480 , a40 out nocopy JTF_VARCHAR2_TABLE_100
481 , a41 out nocopy JTF_VARCHAR2_TABLE_100
482 , a42 out nocopy JTF_VARCHAR2_TABLE_100
483 , a43 out nocopy JTF_VARCHAR2_TABLE_100
484 , a44 out nocopy JTF_NUMBER_TABLE
485 , a45 out nocopy JTF_VARCHAR2_TABLE_100
486 , a46 out nocopy JTF_NUMBER_TABLE
487 , a47 out nocopy JTF_NUMBER_TABLE
488 , a48 out nocopy JTF_NUMBER_TABLE
489 , a49 out nocopy JTF_NUMBER_TABLE
490 , a50 out nocopy JTF_NUMBER_TABLE
491 , a51 out nocopy JTF_NUMBER_TABLE
492 , a52 out nocopy JTF_NUMBER_TABLE
493 , a53 out nocopy JTF_NUMBER_TABLE
494 , a54 out nocopy JTF_NUMBER_TABLE
495 , a55 out nocopy JTF_NUMBER_TABLE
496 , a56 out nocopy JTF_NUMBER_TABLE
497 , a57 out nocopy JTF_NUMBER_TABLE
498 , a58 out nocopy JTF_DATE_TABLE
499 , a59 out nocopy JTF_DATE_TABLE
500 , a60 out nocopy JTF_DATE_TABLE
501 , a61 out nocopy JTF_DATE_TABLE
502 , a62 out nocopy JTF_NUMBER_TABLE
503 , a63 out nocopy JTF_NUMBER_TABLE
504 , a64 out nocopy JTF_NUMBER_TABLE
505 , a65 out nocopy JTF_NUMBER_TABLE
506 , a66 out nocopy JTF_NUMBER_TABLE
507 , a67 out nocopy JTF_NUMBER_TABLE
508 , a68 out nocopy JTF_NUMBER_TABLE
509 , a69 out nocopy JTF_VARCHAR2_TABLE_100
510 , a70 out nocopy JTF_DATE_TABLE
511 , a71 out nocopy JTF_NUMBER_TABLE
512 , a72 out nocopy JTF_NUMBER_TABLE
513 , a73 out nocopy JTF_NUMBER_TABLE
514 , a74 out nocopy JTF_NUMBER_TABLE
515 , a75 out nocopy JTF_NUMBER_TABLE
516 , a76 out nocopy JTF_VARCHAR2_TABLE_100
517 , a77 out nocopy JTF_NUMBER_TABLE
518 , a78 out nocopy JTF_VARCHAR2_TABLE_100
519 , a79 out nocopy JTF_VARCHAR2_TABLE_100
520 , a80 out nocopy JTF_VARCHAR2_TABLE_200
521 , a81 out nocopy JTF_VARCHAR2_TABLE_200
522 , a82 out nocopy JTF_VARCHAR2_TABLE_200
523 , a83 out nocopy JTF_VARCHAR2_TABLE_200
524 , a84 out nocopy JTF_VARCHAR2_TABLE_200
525 , a85 out nocopy JTF_VARCHAR2_TABLE_200
526 , a86 out nocopy JTF_VARCHAR2_TABLE_200
527 , a87 out nocopy JTF_VARCHAR2_TABLE_200
528 , a88 out nocopy JTF_VARCHAR2_TABLE_200
529 , a89 out nocopy JTF_VARCHAR2_TABLE_200
530 , a90 out nocopy JTF_VARCHAR2_TABLE_200
531 , a91 out nocopy JTF_VARCHAR2_TABLE_200
532 , a92 out nocopy JTF_VARCHAR2_TABLE_200
533 , a93 out nocopy JTF_VARCHAR2_TABLE_200
534 , a94 out nocopy JTF_VARCHAR2_TABLE_200
535 , a95 out nocopy JTF_VARCHAR2_TABLE_100
536 , a96 out nocopy JTF_VARCHAR2_TABLE_100
537 , a97 out nocopy JTF_NUMBER_TABLE
538 , a98 out nocopy JTF_DATE_TABLE
539 , a99 out nocopy JTF_DATE_TABLE
540 , a100 out nocopy JTF_NUMBER_TABLE
541 , a101 out nocopy JTF_NUMBER_TABLE
542 , a102 out nocopy JTF_NUMBER_TABLE
543 , a103 out nocopy JTF_NUMBER_TABLE
544 , a104 out nocopy JTF_NUMBER_TABLE
545 , a105 out nocopy JTF_NUMBER_TABLE
546 , a106 out nocopy JTF_VARCHAR2_TABLE_100
547 , a107 out nocopy JTF_VARCHAR2_TABLE_100
548 , a108 out nocopy JTF_VARCHAR2_TABLE_100
549 , a109 out nocopy JTF_NUMBER_TABLE
550 , a110 out nocopy JTF_VARCHAR2_TABLE_100
551 ) as
552 ddindx binary_integer; indx binary_integer;
553 begin
554 if t is null or t.count = 0 then
555 a0 := JTF_NUMBER_TABLE();
556 a1 := JTF_NUMBER_TABLE();
557 a2 := JTF_NUMBER_TABLE();
558 a3 := JTF_VARCHAR2_TABLE_300();
559 a4 := JTF_NUMBER_TABLE();
560 a5 := JTF_NUMBER_TABLE();
561 a6 := JTF_VARCHAR2_TABLE_300();
562 a7 := JTF_VARCHAR2_TABLE_100();
563 a8 := JTF_NUMBER_TABLE();
564 a9 := JTF_NUMBER_TABLE();
565 a10 := JTF_VARCHAR2_TABLE_100();
566 a11 := JTF_NUMBER_TABLE();
567 a12 := JTF_NUMBER_TABLE();
568 a13 := JTF_NUMBER_TABLE();
569 a14 := JTF_NUMBER_TABLE();
570 a15 := JTF_VARCHAR2_TABLE_100();
571 a16 := JTF_NUMBER_TABLE();
572 a17 := JTF_VARCHAR2_TABLE_100();
573 a18 := JTF_VARCHAR2_TABLE_100();
574 a19 := JTF_VARCHAR2_TABLE_100();
575 a20 := JTF_VARCHAR2_TABLE_100();
576 a21 := JTF_NUMBER_TABLE();
577 a22 := JTF_NUMBER_TABLE();
578 a23 := JTF_DATE_TABLE();
579 a24 := JTF_NUMBER_TABLE();
580 a25 := JTF_NUMBER_TABLE();
581 a26 := JTF_DATE_TABLE();
582 a27 := JTF_DATE_TABLE();
583 a28 := JTF_VARCHAR2_TABLE_100();
584 a29 := JTF_VARCHAR2_TABLE_100();
585 a30 := JTF_NUMBER_TABLE();
586 a31 := JTF_VARCHAR2_TABLE_100();
587 a32 := JTF_VARCHAR2_TABLE_100();
588 a33 := JTF_VARCHAR2_TABLE_100();
589 a34 := JTF_NUMBER_TABLE();
590 a35 := JTF_NUMBER_TABLE();
591 a36 := JTF_VARCHAR2_TABLE_100();
592 a37 := JTF_NUMBER_TABLE();
593 a38 := JTF_DATE_TABLE();
594 a39 := JTF_DATE_TABLE();
595 a40 := JTF_VARCHAR2_TABLE_100();
596 a41 := JTF_VARCHAR2_TABLE_100();
597 a42 := JTF_VARCHAR2_TABLE_100();
598 a43 := JTF_VARCHAR2_TABLE_100();
599 a44 := JTF_NUMBER_TABLE();
600 a45 := JTF_VARCHAR2_TABLE_100();
601 a46 := JTF_NUMBER_TABLE();
602 a47 := JTF_NUMBER_TABLE();
603 a48 := JTF_NUMBER_TABLE();
604 a49 := JTF_NUMBER_TABLE();
605 a50 := JTF_NUMBER_TABLE();
606 a51 := JTF_NUMBER_TABLE();
607 a52 := JTF_NUMBER_TABLE();
608 a53 := JTF_NUMBER_TABLE();
609 a54 := JTF_NUMBER_TABLE();
610 a55 := JTF_NUMBER_TABLE();
611 a56 := JTF_NUMBER_TABLE();
612 a57 := JTF_NUMBER_TABLE();
613 a58 := JTF_DATE_TABLE();
614 a59 := JTF_DATE_TABLE();
615 a60 := JTF_DATE_TABLE();
616 a61 := JTF_DATE_TABLE();
617 a62 := JTF_NUMBER_TABLE();
618 a63 := JTF_NUMBER_TABLE();
619 a64 := JTF_NUMBER_TABLE();
620 a65 := JTF_NUMBER_TABLE();
621 a66 := JTF_NUMBER_TABLE();
622 a67 := JTF_NUMBER_TABLE();
623 a68 := JTF_NUMBER_TABLE();
624 a69 := JTF_VARCHAR2_TABLE_100();
625 a70 := JTF_DATE_TABLE();
626 a71 := JTF_NUMBER_TABLE();
627 a72 := JTF_NUMBER_TABLE();
628 a73 := JTF_NUMBER_TABLE();
629 a74 := JTF_NUMBER_TABLE();
630 a75 := JTF_NUMBER_TABLE();
631 a76 := JTF_VARCHAR2_TABLE_100();
632 a77 := JTF_NUMBER_TABLE();
633 a78 := JTF_VARCHAR2_TABLE_100();
634 a79 := JTF_VARCHAR2_TABLE_100();
635 a80 := JTF_VARCHAR2_TABLE_200();
636 a81 := JTF_VARCHAR2_TABLE_200();
637 a82 := JTF_VARCHAR2_TABLE_200();
638 a83 := JTF_VARCHAR2_TABLE_200();
639 a84 := JTF_VARCHAR2_TABLE_200();
640 a85 := JTF_VARCHAR2_TABLE_200();
641 a86 := JTF_VARCHAR2_TABLE_200();
642 a87 := JTF_VARCHAR2_TABLE_200();
643 a88 := JTF_VARCHAR2_TABLE_200();
644 a89 := JTF_VARCHAR2_TABLE_200();
645 a90 := JTF_VARCHAR2_TABLE_200();
646 a91 := JTF_VARCHAR2_TABLE_200();
647 a92 := JTF_VARCHAR2_TABLE_200();
648 a93 := JTF_VARCHAR2_TABLE_200();
649 a94 := JTF_VARCHAR2_TABLE_200();
650 a95 := JTF_VARCHAR2_TABLE_100();
651 a96 := JTF_VARCHAR2_TABLE_100();
652 a97 := JTF_NUMBER_TABLE();
653 a98 := JTF_DATE_TABLE();
654 a99 := JTF_DATE_TABLE();
655 a100 := JTF_NUMBER_TABLE();
656 a101 := JTF_NUMBER_TABLE();
657 a102 := JTF_NUMBER_TABLE();
658 a103 := JTF_NUMBER_TABLE();
659 a104 := JTF_NUMBER_TABLE();
660 a105 := JTF_NUMBER_TABLE();
661 a106 := JTF_VARCHAR2_TABLE_100();
662 a107 := JTF_VARCHAR2_TABLE_100();
663 a108 := JTF_VARCHAR2_TABLE_100();
664 a109 := JTF_NUMBER_TABLE();
665 a110 := JTF_VARCHAR2_TABLE_100();
666 else
667 a0 := JTF_NUMBER_TABLE();
668 a1 := JTF_NUMBER_TABLE();
669 a2 := JTF_NUMBER_TABLE();
670 a3 := JTF_VARCHAR2_TABLE_300();
671 a4 := JTF_NUMBER_TABLE();
672 a5 := JTF_NUMBER_TABLE();
673 a6 := JTF_VARCHAR2_TABLE_300();
674 a7 := JTF_VARCHAR2_TABLE_100();
675 a8 := JTF_NUMBER_TABLE();
676 a9 := JTF_NUMBER_TABLE();
677 a10 := JTF_VARCHAR2_TABLE_100();
678 a11 := JTF_NUMBER_TABLE();
679 a12 := JTF_NUMBER_TABLE();
680 a13 := JTF_NUMBER_TABLE();
681 a14 := JTF_NUMBER_TABLE();
682 a15 := JTF_VARCHAR2_TABLE_100();
683 a16 := JTF_NUMBER_TABLE();
684 a17 := JTF_VARCHAR2_TABLE_100();
685 a18 := JTF_VARCHAR2_TABLE_100();
686 a19 := JTF_VARCHAR2_TABLE_100();
687 a20 := JTF_VARCHAR2_TABLE_100();
688 a21 := JTF_NUMBER_TABLE();
689 a22 := JTF_NUMBER_TABLE();
690 a23 := JTF_DATE_TABLE();
691 a24 := JTF_NUMBER_TABLE();
692 a25 := JTF_NUMBER_TABLE();
693 a26 := JTF_DATE_TABLE();
694 a27 := JTF_DATE_TABLE();
695 a28 := JTF_VARCHAR2_TABLE_100();
696 a29 := JTF_VARCHAR2_TABLE_100();
697 a30 := JTF_NUMBER_TABLE();
698 a31 := JTF_VARCHAR2_TABLE_100();
699 a32 := JTF_VARCHAR2_TABLE_100();
700 a33 := JTF_VARCHAR2_TABLE_100();
701 a34 := JTF_NUMBER_TABLE();
702 a35 := JTF_NUMBER_TABLE();
703 a36 := JTF_VARCHAR2_TABLE_100();
704 a37 := JTF_NUMBER_TABLE();
705 a38 := JTF_DATE_TABLE();
706 a39 := JTF_DATE_TABLE();
707 a40 := JTF_VARCHAR2_TABLE_100();
708 a41 := JTF_VARCHAR2_TABLE_100();
709 a42 := JTF_VARCHAR2_TABLE_100();
710 a43 := JTF_VARCHAR2_TABLE_100();
711 a44 := JTF_NUMBER_TABLE();
712 a45 := JTF_VARCHAR2_TABLE_100();
713 a46 := JTF_NUMBER_TABLE();
714 a47 := JTF_NUMBER_TABLE();
715 a48 := JTF_NUMBER_TABLE();
716 a49 := JTF_NUMBER_TABLE();
717 a50 := JTF_NUMBER_TABLE();
718 a51 := JTF_NUMBER_TABLE();
719 a52 := JTF_NUMBER_TABLE();
720 a53 := JTF_NUMBER_TABLE();
721 a54 := JTF_NUMBER_TABLE();
722 a55 := JTF_NUMBER_TABLE();
723 a56 := JTF_NUMBER_TABLE();
724 a57 := JTF_NUMBER_TABLE();
725 a58 := JTF_DATE_TABLE();
726 a59 := JTF_DATE_TABLE();
727 a60 := JTF_DATE_TABLE();
728 a61 := JTF_DATE_TABLE();
729 a62 := JTF_NUMBER_TABLE();
730 a63 := JTF_NUMBER_TABLE();
731 a64 := JTF_NUMBER_TABLE();
732 a65 := JTF_NUMBER_TABLE();
733 a66 := JTF_NUMBER_TABLE();
734 a67 := JTF_NUMBER_TABLE();
735 a68 := JTF_NUMBER_TABLE();
736 a69 := JTF_VARCHAR2_TABLE_100();
737 a70 := JTF_DATE_TABLE();
738 a71 := JTF_NUMBER_TABLE();
739 a72 := JTF_NUMBER_TABLE();
740 a73 := JTF_NUMBER_TABLE();
741 a74 := JTF_NUMBER_TABLE();
742 a75 := JTF_NUMBER_TABLE();
743 a76 := JTF_VARCHAR2_TABLE_100();
744 a77 := JTF_NUMBER_TABLE();
745 a78 := JTF_VARCHAR2_TABLE_100();
746 a79 := JTF_VARCHAR2_TABLE_100();
747 a80 := JTF_VARCHAR2_TABLE_200();
748 a81 := JTF_VARCHAR2_TABLE_200();
749 a82 := JTF_VARCHAR2_TABLE_200();
750 a83 := JTF_VARCHAR2_TABLE_200();
751 a84 := JTF_VARCHAR2_TABLE_200();
752 a85 := JTF_VARCHAR2_TABLE_200();
753 a86 := JTF_VARCHAR2_TABLE_200();
754 a87 := JTF_VARCHAR2_TABLE_200();
755 a88 := JTF_VARCHAR2_TABLE_200();
756 a89 := JTF_VARCHAR2_TABLE_200();
757 a90 := JTF_VARCHAR2_TABLE_200();
758 a91 := JTF_VARCHAR2_TABLE_200();
759 a92 := JTF_VARCHAR2_TABLE_200();
760 a93 := JTF_VARCHAR2_TABLE_200();
761 a94 := JTF_VARCHAR2_TABLE_200();
762 a95 := JTF_VARCHAR2_TABLE_100();
763 a96 := JTF_VARCHAR2_TABLE_100();
764 a97 := JTF_NUMBER_TABLE();
765 a98 := JTF_DATE_TABLE();
766 a99 := JTF_DATE_TABLE();
767 a100 := JTF_NUMBER_TABLE();
768 a101 := JTF_NUMBER_TABLE();
769 a102 := JTF_NUMBER_TABLE();
770 a103 := JTF_NUMBER_TABLE();
771 a104 := JTF_NUMBER_TABLE();
772 a105 := JTF_NUMBER_TABLE();
773 a106 := JTF_VARCHAR2_TABLE_100();
774 a107 := JTF_VARCHAR2_TABLE_100();
775 a108 := JTF_VARCHAR2_TABLE_100();
776 a109 := JTF_NUMBER_TABLE();
777 a110 := JTF_VARCHAR2_TABLE_100();
778 if t.count > 0 then
779 a0.extend(t.count);
780 a1.extend(t.count);
781 a2.extend(t.count);
782 a3.extend(t.count);
783 a4.extend(t.count);
784 a5.extend(t.count);
785 a6.extend(t.count);
786 a7.extend(t.count);
787 a8.extend(t.count);
788 a9.extend(t.count);
789 a10.extend(t.count);
790 a11.extend(t.count);
791 a12.extend(t.count);
792 a13.extend(t.count);
793 a14.extend(t.count);
794 a15.extend(t.count);
795 a16.extend(t.count);
796 a17.extend(t.count);
797 a18.extend(t.count);
798 a19.extend(t.count);
799 a20.extend(t.count);
800 a21.extend(t.count);
801 a22.extend(t.count);
802 a23.extend(t.count);
803 a24.extend(t.count);
804 a25.extend(t.count);
805 a26.extend(t.count);
806 a27.extend(t.count);
807 a28.extend(t.count);
808 a29.extend(t.count);
809 a30.extend(t.count);
810 a31.extend(t.count);
811 a32.extend(t.count);
812 a33.extend(t.count);
813 a34.extend(t.count);
814 a35.extend(t.count);
815 a36.extend(t.count);
816 a37.extend(t.count);
817 a38.extend(t.count);
818 a39.extend(t.count);
819 a40.extend(t.count);
820 a41.extend(t.count);
821 a42.extend(t.count);
822 a43.extend(t.count);
823 a44.extend(t.count);
824 a45.extend(t.count);
825 a46.extend(t.count);
826 a47.extend(t.count);
827 a48.extend(t.count);
828 a49.extend(t.count);
829 a50.extend(t.count);
830 a51.extend(t.count);
831 a52.extend(t.count);
832 a53.extend(t.count);
833 a54.extend(t.count);
834 a55.extend(t.count);
835 a56.extend(t.count);
836 a57.extend(t.count);
837 a58.extend(t.count);
838 a59.extend(t.count);
839 a60.extend(t.count);
840 a61.extend(t.count);
841 a62.extend(t.count);
842 a63.extend(t.count);
843 a64.extend(t.count);
844 a65.extend(t.count);
845 a66.extend(t.count);
846 a67.extend(t.count);
847 a68.extend(t.count);
848 a69.extend(t.count);
849 a70.extend(t.count);
850 a71.extend(t.count);
851 a72.extend(t.count);
852 a73.extend(t.count);
853 a74.extend(t.count);
854 a75.extend(t.count);
855 a76.extend(t.count);
856 a77.extend(t.count);
857 a78.extend(t.count);
858 a79.extend(t.count);
859 a80.extend(t.count);
860 a81.extend(t.count);
861 a82.extend(t.count);
862 a83.extend(t.count);
863 a84.extend(t.count);
864 a85.extend(t.count);
865 a86.extend(t.count);
866 a87.extend(t.count);
867 a88.extend(t.count);
868 a89.extend(t.count);
869 a90.extend(t.count);
870 a91.extend(t.count);
871 a92.extend(t.count);
872 a93.extend(t.count);
873 a94.extend(t.count);
874 a95.extend(t.count);
875 a96.extend(t.count);
876 a97.extend(t.count);
877 a98.extend(t.count);
878 a99.extend(t.count);
879 a100.extend(t.count);
880 a101.extend(t.count);
881 a102.extend(t.count);
882 a103.extend(t.count);
883 a104.extend(t.count);
884 a105.extend(t.count);
885 a106.extend(t.count);
886 a107.extend(t.count);
887 a108.extend(t.count);
888 a109.extend(t.count);
889 a110.extend(t.count);
890 ddindx := t.first;
891 indx := 1;
892 while true loop
893 a0(indx) := t(ddindx).header_id;
894 a1(indx) := t(ddindx).batch_id;
895 a2(indx) := t(ddindx).row_id;
896 a3(indx) := t(ddindx).wip_entity_name;
897 a4(indx) := t(ddindx).wip_entity_id;
898 a5(indx) := t(ddindx).organization_id;
899 a6(indx) := t(ddindx).description;
900 a7(indx) := t(ddindx).asset_number;
901 a8(indx) := t(ddindx).asset_group_id;
902 a9(indx) := t(ddindx).rebuild_item_id;
903 a10(indx) := t(ddindx).rebuild_serial_number;
904 a11(indx) := t(ddindx).maintenance_object_id;
905 a12(indx) := t(ddindx).maintenance_object_type;
906 a13(indx) := t(ddindx).maintenance_object_source;
907 a14(indx) := t(ddindx).eam_linear_location_id;
908 a15(indx) := t(ddindx).class_code;
909 a16(indx) := t(ddindx).asset_activity_id;
910 a17(indx) := t(ddindx).activity_type;
911 a18(indx) := t(ddindx).activity_cause;
912 a19(indx) := t(ddindx).activity_source;
913 a20(indx) := t(ddindx).work_order_type;
914 a21(indx) := t(ddindx).status_type;
915 a22(indx) := t(ddindx).job_quantity;
916 a23(indx) := t(ddindx).date_released;
917 a24(indx) := t(ddindx).owning_department;
918 a25(indx) := t(ddindx).priority;
919 a26(indx) := t(ddindx).requested_start_date;
920 a27(indx) := t(ddindx).due_date;
921 a28(indx) := t(ddindx).shutdown_type;
922 a29(indx) := t(ddindx).planner_type;
923 a30(indx) := t(ddindx).firm_planned_flag;
924 a31(indx) := t(ddindx).notification_required;
925 a32(indx) := t(ddindx).tagout_required;
926 a33(indx) := t(ddindx).plan_maintenance;
927 a34(indx) := t(ddindx).project_id;
928 a35(indx) := t(ddindx).task_id;
929 a36(indx) := t(ddindx).end_item_unit_number;
930 a37(indx) := t(ddindx).schedule_group_id;
931 a38(indx) := t(ddindx).bom_revision_date;
932 a39(indx) := t(ddindx).routing_revision_date;
933 a40(indx) := t(ddindx).alternate_routing_designator;
934 a41(indx) := t(ddindx).alternate_bom_designator;
935 a42(indx) := t(ddindx).routing_revision;
936 a43(indx) := t(ddindx).bom_revision;
937 a44(indx) := t(ddindx).parent_wip_entity_id;
938 a45(indx) := t(ddindx).manual_rebuild_flag;
939 a46(indx) := t(ddindx).pm_schedule_id;
940 a47(indx) := t(ddindx).wip_supply_type;
941 a48(indx) := t(ddindx).material_account;
942 a49(indx) := t(ddindx).material_overhead_account;
943 a50(indx) := t(ddindx).resource_account;
944 a51(indx) := t(ddindx).outside_processing_account;
945 a52(indx) := t(ddindx).material_variance_account;
946 a53(indx) := t(ddindx).resource_variance_account;
947 a54(indx) := t(ddindx).outside_proc_variance_account;
948 a55(indx) := t(ddindx).std_cost_adjustment_account;
949 a56(indx) := t(ddindx).overhead_account;
950 a57(indx) := t(ddindx).overhead_variance_account;
951 a58(indx) := t(ddindx).scheduled_start_date;
952 a59(indx) := t(ddindx).scheduled_completion_date;
953 a60(indx) := t(ddindx).pm_suggested_start_date;
954 a61(indx) := t(ddindx).pm_suggested_end_date;
955 a62(indx) := t(ddindx).pm_base_meter_reading;
956 a63(indx) := t(ddindx).pm_base_meter;
957 a64(indx) := t(ddindx).common_bom_sequence_id;
958 a65(indx) := t(ddindx).common_routing_sequence_id;
959 a66(indx) := t(ddindx).po_creation_time;
960 a67(indx) := t(ddindx).gen_object_id;
961 a68(indx) := t(ddindx).user_defined_status_id;
962 a69(indx) := t(ddindx).pending_flag;
963 a70(indx) := t(ddindx).material_shortage_check_date;
964 a71(indx) := t(ddindx).material_shortage_flag;
965 a72(indx) := t(ddindx).workflow_type;
966 a73(indx) := t(ddindx).warranty_claim_status;
967 a74(indx) := t(ddindx).cycle_id;
968 a75(indx) := t(ddindx).seq_id;
969 a76(indx) := t(ddindx).ds_scheduled_flag;
970 a77(indx) := t(ddindx).warranty_active;
971 a78(indx) := t(ddindx).assignment_complete;
972 a79(indx) := t(ddindx).attribute_category;
973 a80(indx) := t(ddindx).attribute1;
974 a81(indx) := t(ddindx).attribute2;
975 a82(indx) := t(ddindx).attribute3;
976 a83(indx) := t(ddindx).attribute4;
977 a84(indx) := t(ddindx).attribute5;
978 a85(indx) := t(ddindx).attribute6;
979 a86(indx) := t(ddindx).attribute7;
980 a87(indx) := t(ddindx).attribute8;
981 a88(indx) := t(ddindx).attribute9;
982 a89(indx) := t(ddindx).attribute10;
983 a90(indx) := t(ddindx).attribute11;
984 a91(indx) := t(ddindx).attribute12;
985 a92(indx) := t(ddindx).attribute13;
986 a93(indx) := t(ddindx).attribute14;
987 a94(indx) := t(ddindx).attribute15;
988 a95(indx) := t(ddindx).material_issue_by_mo;
989 a96(indx) := t(ddindx).issue_zero_cost_flag;
990 a97(indx) := t(ddindx).report_type;
991 a98(indx) := t(ddindx).actual_close_date;
992 a99(indx) := t(ddindx).submission_date;
993 a100(indx) := t(ddindx).user_id;
994 a101(indx) := t(ddindx).responsibility_id;
995 a102(indx) := t(ddindx).request_id;
996 a103(indx) := t(ddindx).program_id;
997 a104(indx) := t(ddindx).program_application_id;
998 a105(indx) := t(ddindx).source_line_id;
999 a106(indx) := t(ddindx).source_code;
1000 a107(indx) := t(ddindx).validate_structure;
1001 a108(indx) := t(ddindx).return_status;
1002 a109(indx) := t(ddindx).transaction_type;
1003 a110(indx) := t(ddindx).failure_code_required;
1004 indx := indx+1;
1005 if t.last =ddindx
1006 then exit;
1007 end if;
1008 ddindx := t.next(ddindx);
1009 end loop;
1010 end if;
1011 end if;
1012 end rosetta_table_copy_out_p28;
1013
1014 procedure rosetta_table_copy_in_p29(t out nocopy eam_process_wo_pub.eam_op_tbl_type, a0 JTF_NUMBER_TABLE
1015 , a1 JTF_NUMBER_TABLE
1016 , a2 JTF_NUMBER_TABLE
1017 , a3 JTF_NUMBER_TABLE
1018 , a4 JTF_NUMBER_TABLE
1019 , a5 JTF_NUMBER_TABLE
1020 , a6 JTF_NUMBER_TABLE
1021 , a7 JTF_NUMBER_TABLE
1022 , a8 JTF_NUMBER_TABLE
1023 , a9 JTF_VARCHAR2_TABLE_300
1024 , a10 JTF_NUMBER_TABLE
1025 , a11 JTF_NUMBER_TABLE
1026 , a12 JTF_NUMBER_TABLE
1027 , a13 JTF_VARCHAR2_TABLE_100
1028 , a14 JTF_DATE_TABLE
1029 , a15 JTF_DATE_TABLE
1030 , a16 JTF_VARCHAR2_TABLE_100
1031 , a17 JTF_VARCHAR2_TABLE_200
1032 , a18 JTF_VARCHAR2_TABLE_200
1033 , a19 JTF_VARCHAR2_TABLE_200
1034 , a20 JTF_VARCHAR2_TABLE_200
1035 , a21 JTF_VARCHAR2_TABLE_200
1036 , a22 JTF_VARCHAR2_TABLE_200
1037 , a23 JTF_VARCHAR2_TABLE_200
1038 , a24 JTF_VARCHAR2_TABLE_200
1039 , a25 JTF_VARCHAR2_TABLE_200
1040 , a26 JTF_VARCHAR2_TABLE_200
1041 , a27 JTF_VARCHAR2_TABLE_200
1042 , a28 JTF_VARCHAR2_TABLE_200
1043 , a29 JTF_VARCHAR2_TABLE_200
1044 , a30 JTF_VARCHAR2_TABLE_200
1045 , a31 JTF_VARCHAR2_TABLE_200
1046 , a32 JTF_VARCHAR2_TABLE_4000
1047 , a33 JTF_NUMBER_TABLE
1048 , a34 JTF_NUMBER_TABLE
1049 , a35 JTF_NUMBER_TABLE
1050 , a36 JTF_VARCHAR2_TABLE_100
1051 , a37 JTF_NUMBER_TABLE
1052 , a38 JTF_NUMBER_TABLE
1053 , a39 JTF_NUMBER_TABLE
1054 ) as
1055 ddindx binary_integer; indx binary_integer;
1056 begin
1057 if a0 is not null and a0.count > 0 then
1058 if a0.count > 0 then
1059 indx := a0.first;
1060 ddindx := 1;
1061 while true loop
1062 t(ddindx).header_id := a0(indx);
1063 t(ddindx).batch_id := a1(indx);
1064 t(ddindx).row_id := a2(indx);
1065 t(ddindx).wip_entity_id := a3(indx);
1066 t(ddindx).organization_id := a4(indx);
1067 t(ddindx).operation_seq_num := a5(indx);
1068 t(ddindx).standard_operation_id := a6(indx);
1069 t(ddindx).department_id := a7(indx);
1070 t(ddindx).operation_sequence_id := a8(indx);
1071 t(ddindx).description := a9(indx);
1072 t(ddindx).minimum_transfer_quantity := a10(indx);
1073 t(ddindx).count_point_type := a11(indx);
1074 t(ddindx).backflush_flag := a12(indx);
1075 t(ddindx).shutdown_type := a13(indx);
1076 t(ddindx).start_date := a14(indx);
1077 t(ddindx).completion_date := a15(indx);
1078 t(ddindx).attribute_category := a16(indx);
1079 t(ddindx).attribute1 := a17(indx);
1080 t(ddindx).attribute2 := a18(indx);
1081 t(ddindx).attribute3 := a19(indx);
1082 t(ddindx).attribute4 := a20(indx);
1083 t(ddindx).attribute5 := a21(indx);
1084 t(ddindx).attribute6 := a22(indx);
1085 t(ddindx).attribute7 := a23(indx);
1086 t(ddindx).attribute8 := a24(indx);
1087 t(ddindx).attribute9 := a25(indx);
1088 t(ddindx).attribute10 := a26(indx);
1089 t(ddindx).attribute11 := a27(indx);
1090 t(ddindx).attribute12 := a28(indx);
1091 t(ddindx).attribute13 := a29(indx);
1092 t(ddindx).attribute14 := a30(indx);
1093 t(ddindx).attribute15 := a31(indx);
1094 t(ddindx).long_description := a32(indx);
1095 t(ddindx).request_id := a33(indx);
1096 t(ddindx).program_application_id := a34(indx);
1097 t(ddindx).program_id := a35(indx);
1098 t(ddindx).return_status := a36(indx);
1099 t(ddindx).transaction_type := a37(indx);
1100 t(ddindx).x_pos := a38(indx);
1101 t(ddindx).y_pos := a39(indx);
1102 ddindx := ddindx+1;
1103 if a0.last =indx
1104 then exit;
1105 end if;
1106 indx := a0.next(indx);
1107 end loop;
1108 end if;
1109 end if;
1110 end rosetta_table_copy_in_p29;
1111 procedure rosetta_table_copy_out_p29(t eam_process_wo_pub.eam_op_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
1112 , a1 out nocopy JTF_NUMBER_TABLE
1113 , a2 out nocopy JTF_NUMBER_TABLE
1114 , a3 out nocopy JTF_NUMBER_TABLE
1115 , a4 out nocopy JTF_NUMBER_TABLE
1116 , a5 out nocopy JTF_NUMBER_TABLE
1117 , a6 out nocopy JTF_NUMBER_TABLE
1118 , a7 out nocopy JTF_NUMBER_TABLE
1119 , a8 out nocopy JTF_NUMBER_TABLE
1120 , a9 out nocopy JTF_VARCHAR2_TABLE_300
1121 , a10 out nocopy JTF_NUMBER_TABLE
1122 , a11 out nocopy JTF_NUMBER_TABLE
1123 , a12 out nocopy JTF_NUMBER_TABLE
1124 , a13 out nocopy JTF_VARCHAR2_TABLE_100
1125 , a14 out nocopy JTF_DATE_TABLE
1126 , a15 out nocopy JTF_DATE_TABLE
1127 , a16 out nocopy JTF_VARCHAR2_TABLE_100
1128 , a17 out nocopy JTF_VARCHAR2_TABLE_200
1129 , a18 out nocopy JTF_VARCHAR2_TABLE_200
1130 , a19 out nocopy JTF_VARCHAR2_TABLE_200
1131 , a20 out nocopy JTF_VARCHAR2_TABLE_200
1132 , a21 out nocopy JTF_VARCHAR2_TABLE_200
1133 , a22 out nocopy JTF_VARCHAR2_TABLE_200
1134 , a23 out nocopy JTF_VARCHAR2_TABLE_200
1135 , a24 out nocopy JTF_VARCHAR2_TABLE_200
1136 , a25 out nocopy JTF_VARCHAR2_TABLE_200
1137 , a26 out nocopy JTF_VARCHAR2_TABLE_200
1138 , a27 out nocopy JTF_VARCHAR2_TABLE_200
1139 , a28 out nocopy JTF_VARCHAR2_TABLE_200
1140 , a29 out nocopy JTF_VARCHAR2_TABLE_200
1141 , a30 out nocopy JTF_VARCHAR2_TABLE_200
1142 , a31 out nocopy JTF_VARCHAR2_TABLE_200
1143 , a32 out nocopy JTF_VARCHAR2_TABLE_4000
1144 , a33 out nocopy JTF_NUMBER_TABLE
1145 , a34 out nocopy JTF_NUMBER_TABLE
1146 , a35 out nocopy JTF_NUMBER_TABLE
1147 , a36 out nocopy JTF_VARCHAR2_TABLE_100
1148 , a37 out nocopy JTF_NUMBER_TABLE
1149 , a38 out nocopy JTF_NUMBER_TABLE
1150 , a39 out nocopy JTF_NUMBER_TABLE
1151 ) as
1152 ddindx binary_integer; indx binary_integer;
1153 begin
1154 if t is null or t.count = 0 then
1155 a0 := JTF_NUMBER_TABLE();
1156 a1 := JTF_NUMBER_TABLE();
1157 a2 := JTF_NUMBER_TABLE();
1158 a3 := JTF_NUMBER_TABLE();
1159 a4 := JTF_NUMBER_TABLE();
1160 a5 := JTF_NUMBER_TABLE();
1161 a6 := JTF_NUMBER_TABLE();
1162 a7 := JTF_NUMBER_TABLE();
1163 a8 := JTF_NUMBER_TABLE();
1164 a9 := JTF_VARCHAR2_TABLE_300();
1165 a10 := JTF_NUMBER_TABLE();
1166 a11 := JTF_NUMBER_TABLE();
1167 a12 := JTF_NUMBER_TABLE();
1168 a13 := JTF_VARCHAR2_TABLE_100();
1169 a14 := JTF_DATE_TABLE();
1170 a15 := JTF_DATE_TABLE();
1171 a16 := JTF_VARCHAR2_TABLE_100();
1172 a17 := JTF_VARCHAR2_TABLE_200();
1173 a18 := JTF_VARCHAR2_TABLE_200();
1174 a19 := JTF_VARCHAR2_TABLE_200();
1175 a20 := JTF_VARCHAR2_TABLE_200();
1176 a21 := JTF_VARCHAR2_TABLE_200();
1177 a22 := JTF_VARCHAR2_TABLE_200();
1178 a23 := JTF_VARCHAR2_TABLE_200();
1179 a24 := JTF_VARCHAR2_TABLE_200();
1180 a25 := JTF_VARCHAR2_TABLE_200();
1181 a26 := JTF_VARCHAR2_TABLE_200();
1182 a27 := JTF_VARCHAR2_TABLE_200();
1183 a28 := JTF_VARCHAR2_TABLE_200();
1184 a29 := JTF_VARCHAR2_TABLE_200();
1185 a30 := JTF_VARCHAR2_TABLE_200();
1186 a31 := JTF_VARCHAR2_TABLE_200();
1187 a32 := JTF_VARCHAR2_TABLE_4000();
1188 a33 := JTF_NUMBER_TABLE();
1189 a34 := JTF_NUMBER_TABLE();
1190 a35 := JTF_NUMBER_TABLE();
1191 a36 := JTF_VARCHAR2_TABLE_100();
1192 a37 := JTF_NUMBER_TABLE();
1193 a38 := JTF_NUMBER_TABLE();
1194 a39 := JTF_NUMBER_TABLE();
1195 else
1196 a0 := JTF_NUMBER_TABLE();
1197 a1 := JTF_NUMBER_TABLE();
1198 a2 := JTF_NUMBER_TABLE();
1199 a3 := JTF_NUMBER_TABLE();
1200 a4 := JTF_NUMBER_TABLE();
1201 a5 := JTF_NUMBER_TABLE();
1202 a6 := JTF_NUMBER_TABLE();
1203 a7 := JTF_NUMBER_TABLE();
1204 a8 := JTF_NUMBER_TABLE();
1205 a9 := JTF_VARCHAR2_TABLE_300();
1206 a10 := JTF_NUMBER_TABLE();
1207 a11 := JTF_NUMBER_TABLE();
1208 a12 := JTF_NUMBER_TABLE();
1209 a13 := JTF_VARCHAR2_TABLE_100();
1210 a14 := JTF_DATE_TABLE();
1211 a15 := JTF_DATE_TABLE();
1212 a16 := JTF_VARCHAR2_TABLE_100();
1213 a17 := JTF_VARCHAR2_TABLE_200();
1214 a18 := JTF_VARCHAR2_TABLE_200();
1215 a19 := JTF_VARCHAR2_TABLE_200();
1216 a20 := JTF_VARCHAR2_TABLE_200();
1217 a21 := JTF_VARCHAR2_TABLE_200();
1218 a22 := JTF_VARCHAR2_TABLE_200();
1219 a23 := JTF_VARCHAR2_TABLE_200();
1220 a24 := JTF_VARCHAR2_TABLE_200();
1221 a25 := JTF_VARCHAR2_TABLE_200();
1222 a26 := JTF_VARCHAR2_TABLE_200();
1223 a27 := JTF_VARCHAR2_TABLE_200();
1224 a28 := JTF_VARCHAR2_TABLE_200();
1225 a29 := JTF_VARCHAR2_TABLE_200();
1226 a30 := JTF_VARCHAR2_TABLE_200();
1227 a31 := JTF_VARCHAR2_TABLE_200();
1228 a32 := JTF_VARCHAR2_TABLE_4000();
1229 a33 := JTF_NUMBER_TABLE();
1230 a34 := JTF_NUMBER_TABLE();
1231 a35 := JTF_NUMBER_TABLE();
1232 a36 := JTF_VARCHAR2_TABLE_100();
1233 a37 := JTF_NUMBER_TABLE();
1234 a38 := JTF_NUMBER_TABLE();
1235 a39 := JTF_NUMBER_TABLE();
1236 if t.count > 0 then
1237 a0.extend(t.count);
1238 a1.extend(t.count);
1239 a2.extend(t.count);
1240 a3.extend(t.count);
1241 a4.extend(t.count);
1242 a5.extend(t.count);
1243 a6.extend(t.count);
1244 a7.extend(t.count);
1245 a8.extend(t.count);
1246 a9.extend(t.count);
1247 a10.extend(t.count);
1248 a11.extend(t.count);
1249 a12.extend(t.count);
1250 a13.extend(t.count);
1251 a14.extend(t.count);
1252 a15.extend(t.count);
1253 a16.extend(t.count);
1254 a17.extend(t.count);
1255 a18.extend(t.count);
1256 a19.extend(t.count);
1257 a20.extend(t.count);
1258 a21.extend(t.count);
1259 a22.extend(t.count);
1260 a23.extend(t.count);
1261 a24.extend(t.count);
1262 a25.extend(t.count);
1263 a26.extend(t.count);
1264 a27.extend(t.count);
1265 a28.extend(t.count);
1266 a29.extend(t.count);
1267 a30.extend(t.count);
1268 a31.extend(t.count);
1269 a32.extend(t.count);
1270 a33.extend(t.count);
1271 a34.extend(t.count);
1272 a35.extend(t.count);
1273 a36.extend(t.count);
1274 a37.extend(t.count);
1275 a38.extend(t.count);
1276 a39.extend(t.count);
1277 ddindx := t.first;
1278 indx := 1;
1279 while true loop
1280 a0(indx) := t(ddindx).header_id;
1281 a1(indx) := t(ddindx).batch_id;
1282 a2(indx) := t(ddindx).row_id;
1283 a3(indx) := t(ddindx).wip_entity_id;
1284 a4(indx) := t(ddindx).organization_id;
1285 a5(indx) := t(ddindx).operation_seq_num;
1286 a6(indx) := t(ddindx).standard_operation_id;
1287 a7(indx) := t(ddindx).department_id;
1288 a8(indx) := t(ddindx).operation_sequence_id;
1289 a9(indx) := t(ddindx).description;
1290 a10(indx) := t(ddindx).minimum_transfer_quantity;
1291 a11(indx) := t(ddindx).count_point_type;
1292 a12(indx) := t(ddindx).backflush_flag;
1293 a13(indx) := t(ddindx).shutdown_type;
1294 a14(indx) := t(ddindx).start_date;
1295 a15(indx) := t(ddindx).completion_date;
1296 a16(indx) := t(ddindx).attribute_category;
1297 a17(indx) := t(ddindx).attribute1;
1298 a18(indx) := t(ddindx).attribute2;
1299 a19(indx) := t(ddindx).attribute3;
1300 a20(indx) := t(ddindx).attribute4;
1301 a21(indx) := t(ddindx).attribute5;
1302 a22(indx) := t(ddindx).attribute6;
1303 a23(indx) := t(ddindx).attribute7;
1304 a24(indx) := t(ddindx).attribute8;
1305 a25(indx) := t(ddindx).attribute9;
1306 a26(indx) := t(ddindx).attribute10;
1307 a27(indx) := t(ddindx).attribute11;
1308 a28(indx) := t(ddindx).attribute12;
1309 a29(indx) := t(ddindx).attribute13;
1310 a30(indx) := t(ddindx).attribute14;
1311 a31(indx) := t(ddindx).attribute15;
1312 a32(indx) := t(ddindx).long_description;
1313 a33(indx) := t(ddindx).request_id;
1314 a34(indx) := t(ddindx).program_application_id;
1315 a35(indx) := t(ddindx).program_id;
1316 a36(indx) := t(ddindx).return_status;
1317 a37(indx) := t(ddindx).transaction_type;
1318 a38(indx) := t(ddindx).x_pos;
1319 a39(indx) := t(ddindx).y_pos;
1320 indx := indx+1;
1321 if t.last =ddindx
1322 then exit;
1323 end if;
1324 ddindx := t.next(ddindx);
1325 end loop;
1326 end if;
1327 end if;
1328 end rosetta_table_copy_out_p29;
1329
1330 procedure rosetta_table_copy_in_p30(t out nocopy eam_process_wo_pub.eam_op_network_tbl_type, a0 JTF_NUMBER_TABLE
1331 , a1 JTF_NUMBER_TABLE
1332 , a2 JTF_NUMBER_TABLE
1333 , a3 JTF_NUMBER_TABLE
1334 , a4 JTF_NUMBER_TABLE
1335 , a5 JTF_NUMBER_TABLE
1336 , a6 JTF_NUMBER_TABLE
1337 , a7 JTF_VARCHAR2_TABLE_100
1338 , a8 JTF_VARCHAR2_TABLE_200
1339 , a9 JTF_VARCHAR2_TABLE_200
1340 , a10 JTF_VARCHAR2_TABLE_200
1341 , a11 JTF_VARCHAR2_TABLE_200
1342 , a12 JTF_VARCHAR2_TABLE_200
1343 , a13 JTF_VARCHAR2_TABLE_200
1344 , a14 JTF_VARCHAR2_TABLE_200
1345 , a15 JTF_VARCHAR2_TABLE_200
1346 , a16 JTF_VARCHAR2_TABLE_200
1347 , a17 JTF_VARCHAR2_TABLE_200
1348 , a18 JTF_VARCHAR2_TABLE_200
1349 , a19 JTF_VARCHAR2_TABLE_200
1350 , a20 JTF_VARCHAR2_TABLE_200
1351 , a21 JTF_VARCHAR2_TABLE_200
1352 , a22 JTF_VARCHAR2_TABLE_200
1353 , a23 JTF_VARCHAR2_TABLE_100
1354 , a24 JTF_NUMBER_TABLE
1355 ) as
1356 ddindx binary_integer; indx binary_integer;
1357 begin
1358 if a0 is not null and a0.count > 0 then
1359 if a0.count > 0 then
1360 indx := a0.first;
1361 ddindx := 1;
1362 while true loop
1363 t(ddindx).header_id := a0(indx);
1364 t(ddindx).batch_id := a1(indx);
1365 t(ddindx).row_id := a2(indx);
1366 t(ddindx).wip_entity_id := a3(indx);
1367 t(ddindx).organization_id := a4(indx);
1368 t(ddindx).prior_operation := a5(indx);
1369 t(ddindx).next_operation := a6(indx);
1370 t(ddindx).attribute_category := a7(indx);
1371 t(ddindx).attribute1 := a8(indx);
1372 t(ddindx).attribute2 := a9(indx);
1373 t(ddindx).attribute3 := a10(indx);
1374 t(ddindx).attribute4 := a11(indx);
1375 t(ddindx).attribute5 := a12(indx);
1376 t(ddindx).attribute6 := a13(indx);
1377 t(ddindx).attribute7 := a14(indx);
1378 t(ddindx).attribute8 := a15(indx);
1379 t(ddindx).attribute9 := a16(indx);
1380 t(ddindx).attribute10 := a17(indx);
1381 t(ddindx).attribute11 := a18(indx);
1382 t(ddindx).attribute12 := a19(indx);
1383 t(ddindx).attribute13 := a20(indx);
1384 t(ddindx).attribute14 := a21(indx);
1385 t(ddindx).attribute15 := a22(indx);
1386 t(ddindx).return_status := a23(indx);
1387 t(ddindx).transaction_type := a24(indx);
1388 ddindx := ddindx+1;
1389 if a0.last =indx
1390 then exit;
1391 end if;
1392 indx := a0.next(indx);
1393 end loop;
1394 end if;
1395 end if;
1396 end rosetta_table_copy_in_p30;
1397 procedure rosetta_table_copy_out_p30(t eam_process_wo_pub.eam_op_network_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
1398 , a1 out nocopy JTF_NUMBER_TABLE
1399 , a2 out nocopy JTF_NUMBER_TABLE
1400 , a3 out nocopy JTF_NUMBER_TABLE
1401 , a4 out nocopy JTF_NUMBER_TABLE
1402 , a5 out nocopy JTF_NUMBER_TABLE
1403 , a6 out nocopy JTF_NUMBER_TABLE
1404 , a7 out nocopy JTF_VARCHAR2_TABLE_100
1405 , a8 out nocopy JTF_VARCHAR2_TABLE_200
1406 , a9 out nocopy JTF_VARCHAR2_TABLE_200
1407 , a10 out nocopy JTF_VARCHAR2_TABLE_200
1408 , a11 out nocopy JTF_VARCHAR2_TABLE_200
1409 , a12 out nocopy JTF_VARCHAR2_TABLE_200
1410 , a13 out nocopy JTF_VARCHAR2_TABLE_200
1411 , a14 out nocopy JTF_VARCHAR2_TABLE_200
1412 , a15 out nocopy JTF_VARCHAR2_TABLE_200
1413 , a16 out nocopy JTF_VARCHAR2_TABLE_200
1414 , a17 out nocopy JTF_VARCHAR2_TABLE_200
1415 , a18 out nocopy JTF_VARCHAR2_TABLE_200
1416 , a19 out nocopy JTF_VARCHAR2_TABLE_200
1417 , a20 out nocopy JTF_VARCHAR2_TABLE_200
1418 , a21 out nocopy JTF_VARCHAR2_TABLE_200
1419 , a22 out nocopy JTF_VARCHAR2_TABLE_200
1420 , a23 out nocopy JTF_VARCHAR2_TABLE_100
1421 , a24 out nocopy JTF_NUMBER_TABLE
1422 ) as
1423 ddindx binary_integer; indx binary_integer;
1424 begin
1425 if t is null or t.count = 0 then
1426 a0 := JTF_NUMBER_TABLE();
1427 a1 := JTF_NUMBER_TABLE();
1428 a2 := JTF_NUMBER_TABLE();
1429 a3 := JTF_NUMBER_TABLE();
1430 a4 := JTF_NUMBER_TABLE();
1431 a5 := JTF_NUMBER_TABLE();
1432 a6 := JTF_NUMBER_TABLE();
1433 a7 := JTF_VARCHAR2_TABLE_100();
1434 a8 := JTF_VARCHAR2_TABLE_200();
1435 a9 := JTF_VARCHAR2_TABLE_200();
1436 a10 := JTF_VARCHAR2_TABLE_200();
1437 a11 := JTF_VARCHAR2_TABLE_200();
1438 a12 := JTF_VARCHAR2_TABLE_200();
1439 a13 := JTF_VARCHAR2_TABLE_200();
1440 a14 := JTF_VARCHAR2_TABLE_200();
1441 a15 := JTF_VARCHAR2_TABLE_200();
1442 a16 := JTF_VARCHAR2_TABLE_200();
1443 a17 := JTF_VARCHAR2_TABLE_200();
1444 a18 := JTF_VARCHAR2_TABLE_200();
1445 a19 := JTF_VARCHAR2_TABLE_200();
1446 a20 := JTF_VARCHAR2_TABLE_200();
1447 a21 := JTF_VARCHAR2_TABLE_200();
1448 a22 := JTF_VARCHAR2_TABLE_200();
1449 a23 := JTF_VARCHAR2_TABLE_100();
1450 a24 := JTF_NUMBER_TABLE();
1451 else
1452 a0 := JTF_NUMBER_TABLE();
1453 a1 := JTF_NUMBER_TABLE();
1454 a2 := JTF_NUMBER_TABLE();
1455 a3 := JTF_NUMBER_TABLE();
1456 a4 := JTF_NUMBER_TABLE();
1457 a5 := JTF_NUMBER_TABLE();
1458 a6 := JTF_NUMBER_TABLE();
1459 a7 := JTF_VARCHAR2_TABLE_100();
1460 a8 := JTF_VARCHAR2_TABLE_200();
1461 a9 := JTF_VARCHAR2_TABLE_200();
1462 a10 := JTF_VARCHAR2_TABLE_200();
1463 a11 := JTF_VARCHAR2_TABLE_200();
1464 a12 := JTF_VARCHAR2_TABLE_200();
1465 a13 := JTF_VARCHAR2_TABLE_200();
1466 a14 := JTF_VARCHAR2_TABLE_200();
1467 a15 := JTF_VARCHAR2_TABLE_200();
1468 a16 := JTF_VARCHAR2_TABLE_200();
1469 a17 := JTF_VARCHAR2_TABLE_200();
1470 a18 := JTF_VARCHAR2_TABLE_200();
1471 a19 := JTF_VARCHAR2_TABLE_200();
1472 a20 := JTF_VARCHAR2_TABLE_200();
1473 a21 := JTF_VARCHAR2_TABLE_200();
1474 a22 := JTF_VARCHAR2_TABLE_200();
1475 a23 := JTF_VARCHAR2_TABLE_100();
1476 a24 := JTF_NUMBER_TABLE();
1477 if t.count > 0 then
1478 a0.extend(t.count);
1479 a1.extend(t.count);
1480 a2.extend(t.count);
1481 a3.extend(t.count);
1482 a4.extend(t.count);
1483 a5.extend(t.count);
1484 a6.extend(t.count);
1485 a7.extend(t.count);
1486 a8.extend(t.count);
1487 a9.extend(t.count);
1488 a10.extend(t.count);
1489 a11.extend(t.count);
1490 a12.extend(t.count);
1491 a13.extend(t.count);
1492 a14.extend(t.count);
1493 a15.extend(t.count);
1494 a16.extend(t.count);
1495 a17.extend(t.count);
1496 a18.extend(t.count);
1497 a19.extend(t.count);
1498 a20.extend(t.count);
1499 a21.extend(t.count);
1500 a22.extend(t.count);
1501 a23.extend(t.count);
1502 a24.extend(t.count);
1503 ddindx := t.first;
1504 indx := 1;
1505 while true loop
1506 a0(indx) := t(ddindx).header_id;
1507 a1(indx) := t(ddindx).batch_id;
1508 a2(indx) := t(ddindx).row_id;
1509 a3(indx) := t(ddindx).wip_entity_id;
1510 a4(indx) := t(ddindx).organization_id;
1511 a5(indx) := t(ddindx).prior_operation;
1512 a6(indx) := t(ddindx).next_operation;
1513 a7(indx) := t(ddindx).attribute_category;
1514 a8(indx) := t(ddindx).attribute1;
1515 a9(indx) := t(ddindx).attribute2;
1516 a10(indx) := t(ddindx).attribute3;
1517 a11(indx) := t(ddindx).attribute4;
1518 a12(indx) := t(ddindx).attribute5;
1519 a13(indx) := t(ddindx).attribute6;
1520 a14(indx) := t(ddindx).attribute7;
1521 a15(indx) := t(ddindx).attribute8;
1522 a16(indx) := t(ddindx).attribute9;
1523 a17(indx) := t(ddindx).attribute10;
1524 a18(indx) := t(ddindx).attribute11;
1525 a19(indx) := t(ddindx).attribute12;
1526 a20(indx) := t(ddindx).attribute13;
1527 a21(indx) := t(ddindx).attribute14;
1528 a22(indx) := t(ddindx).attribute15;
1529 a23(indx) := t(ddindx).return_status;
1530 a24(indx) := t(ddindx).transaction_type;
1531 indx := indx+1;
1532 if t.last =ddindx
1533 then exit;
1534 end if;
1535 ddindx := t.next(ddindx);
1536 end loop;
1537 end if;
1538 end if;
1539 end rosetta_table_copy_out_p30;
1540
1541 procedure rosetta_table_copy_in_p31(t out nocopy eam_process_wo_pub.eam_res_tbl_type, a0 JTF_NUMBER_TABLE
1542 , a1 JTF_NUMBER_TABLE
1543 , a2 JTF_NUMBER_TABLE
1544 , a3 JTF_NUMBER_TABLE
1545 , a4 JTF_NUMBER_TABLE
1546 , a5 JTF_NUMBER_TABLE
1547 , a6 JTF_NUMBER_TABLE
1548 , a7 JTF_NUMBER_TABLE
1549 , a8 JTF_VARCHAR2_TABLE_100
1550 , a9 JTF_NUMBER_TABLE
1551 , a10 JTF_NUMBER_TABLE
1552 , a11 JTF_NUMBER_TABLE
1553 , a12 JTF_NUMBER_TABLE
1554 , a13 JTF_NUMBER_TABLE
1555 , a14 JTF_NUMBER_TABLE
1556 , a15 JTF_NUMBER_TABLE
1557 , a16 JTF_NUMBER_TABLE
1558 , a17 JTF_NUMBER_TABLE
1559 , a18 JTF_NUMBER_TABLE
1560 , a19 JTF_NUMBER_TABLE
1561 , a20 JTF_DATE_TABLE
1562 , a21 JTF_DATE_TABLE
1563 , a22 JTF_NUMBER_TABLE
1564 , a23 JTF_NUMBER_TABLE
1565 , a24 JTF_NUMBER_TABLE
1566 , a25 JTF_VARCHAR2_TABLE_100
1567 , a26 JTF_VARCHAR2_TABLE_200
1568 , a27 JTF_VARCHAR2_TABLE_200
1569 , a28 JTF_VARCHAR2_TABLE_200
1570 , a29 JTF_VARCHAR2_TABLE_200
1571 , a30 JTF_VARCHAR2_TABLE_200
1572 , a31 JTF_VARCHAR2_TABLE_200
1573 , a32 JTF_VARCHAR2_TABLE_200
1574 , a33 JTF_VARCHAR2_TABLE_200
1575 , a34 JTF_VARCHAR2_TABLE_200
1576 , a35 JTF_VARCHAR2_TABLE_200
1577 , a36 JTF_VARCHAR2_TABLE_200
1578 , a37 JTF_VARCHAR2_TABLE_200
1579 , a38 JTF_VARCHAR2_TABLE_200
1580 , a39 JTF_VARCHAR2_TABLE_200
1581 , a40 JTF_VARCHAR2_TABLE_200
1582 , a41 JTF_NUMBER_TABLE
1583 , a42 JTF_NUMBER_TABLE
1584 , a43 JTF_NUMBER_TABLE
1585 , a44 JTF_NUMBER_TABLE
1586 , a45 JTF_DATE_TABLE
1587 , a46 JTF_VARCHAR2_TABLE_100
1588 , a47 JTF_NUMBER_TABLE
1589 ) as
1590 ddindx binary_integer; indx binary_integer;
1591 begin
1592 if a0 is not null and a0.count > 0 then
1593 if a0.count > 0 then
1594 indx := a0.first;
1595 ddindx := 1;
1596 while true loop
1597 t(ddindx).header_id := a0(indx);
1598 t(ddindx).batch_id := a1(indx);
1599 t(ddindx).row_id := a2(indx);
1600 t(ddindx).wip_entity_id := a3(indx);
1601 t(ddindx).organization_id := a4(indx);
1602 t(ddindx).operation_seq_num := a5(indx);
1603 t(ddindx).resource_seq_num := a6(indx);
1604 t(ddindx).resource_id := a7(indx);
1605 t(ddindx).uom_code := a8(indx);
1606 t(ddindx).basis_type := a9(indx);
1607 t(ddindx).usage_rate_or_amount := a10(indx);
1608 t(ddindx).activity_id := a11(indx);
1609 t(ddindx).scheduled_flag := a12(indx);
1610 t(ddindx).firm_flag := a13(indx);
1611 t(ddindx).assigned_units := a14(indx);
1612 t(ddindx).maximum_assigned_units := a15(indx);
1613 t(ddindx).autocharge_type := a16(indx);
1614 t(ddindx).standard_rate_flag := a17(indx);
1615 t(ddindx).applied_resource_units := a18(indx);
1616 t(ddindx).applied_resource_value := a19(indx);
1617 t(ddindx).start_date := a20(indx);
1618 t(ddindx).completion_date := a21(indx);
1619 t(ddindx).schedule_seq_num := a22(indx);
1620 t(ddindx).substitute_group_num := a23(indx);
1621 t(ddindx).replacement_group_num := a24(indx);
1622 t(ddindx).attribute_category := a25(indx);
1623 t(ddindx).attribute1 := a26(indx);
1624 t(ddindx).attribute2 := a27(indx);
1625 t(ddindx).attribute3 := a28(indx);
1626 t(ddindx).attribute4 := a29(indx);
1627 t(ddindx).attribute5 := a30(indx);
1628 t(ddindx).attribute6 := a31(indx);
1629 t(ddindx).attribute7 := a32(indx);
1630 t(ddindx).attribute8 := a33(indx);
1631 t(ddindx).attribute9 := a34(indx);
1632 t(ddindx).attribute10 := a35(indx);
1633 t(ddindx).attribute11 := a36(indx);
1634 t(ddindx).attribute12 := a37(indx);
1635 t(ddindx).attribute13 := a38(indx);
1636 t(ddindx).attribute14 := a39(indx);
1637 t(ddindx).attribute15 := a40(indx);
1638 t(ddindx).department_id := a41(indx);
1639 t(ddindx).request_id := a42(indx);
1640 t(ddindx).program_application_id := a43(indx);
1641 t(ddindx).program_id := a44(indx);
1642 t(ddindx).program_update_date := a45(indx);
1643 t(ddindx).return_status := a46(indx);
1644 t(ddindx).transaction_type := a47(indx);
1645 ddindx := ddindx+1;
1646 if a0.last =indx
1647 then exit;
1648 end if;
1649 indx := a0.next(indx);
1650 end loop;
1651 end if;
1652 end if;
1653 end rosetta_table_copy_in_p31;
1654 procedure rosetta_table_copy_out_p31(t eam_process_wo_pub.eam_res_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
1655 , a1 out nocopy JTF_NUMBER_TABLE
1656 , a2 out nocopy JTF_NUMBER_TABLE
1657 , a3 out nocopy JTF_NUMBER_TABLE
1658 , a4 out nocopy JTF_NUMBER_TABLE
1659 , a5 out nocopy JTF_NUMBER_TABLE
1660 , a6 out nocopy JTF_NUMBER_TABLE
1661 , a7 out nocopy JTF_NUMBER_TABLE
1662 , a8 out nocopy JTF_VARCHAR2_TABLE_100
1663 , a9 out nocopy JTF_NUMBER_TABLE
1664 , a10 out nocopy JTF_NUMBER_TABLE
1665 , a11 out nocopy JTF_NUMBER_TABLE
1666 , a12 out nocopy JTF_NUMBER_TABLE
1667 , a13 out nocopy JTF_NUMBER_TABLE
1668 , a14 out nocopy JTF_NUMBER_TABLE
1669 , a15 out nocopy JTF_NUMBER_TABLE
1670 , a16 out nocopy JTF_NUMBER_TABLE
1671 , a17 out nocopy JTF_NUMBER_TABLE
1672 , a18 out nocopy JTF_NUMBER_TABLE
1673 , a19 out nocopy JTF_NUMBER_TABLE
1674 , a20 out nocopy JTF_DATE_TABLE
1675 , a21 out nocopy JTF_DATE_TABLE
1676 , a22 out nocopy JTF_NUMBER_TABLE
1677 , a23 out nocopy JTF_NUMBER_TABLE
1678 , a24 out nocopy JTF_NUMBER_TABLE
1679 , a25 out nocopy JTF_VARCHAR2_TABLE_100
1680 , a26 out nocopy JTF_VARCHAR2_TABLE_200
1681 , a27 out nocopy JTF_VARCHAR2_TABLE_200
1682 , a28 out nocopy JTF_VARCHAR2_TABLE_200
1683 , a29 out nocopy JTF_VARCHAR2_TABLE_200
1684 , a30 out nocopy JTF_VARCHAR2_TABLE_200
1685 , a31 out nocopy JTF_VARCHAR2_TABLE_200
1686 , a32 out nocopy JTF_VARCHAR2_TABLE_200
1687 , a33 out nocopy JTF_VARCHAR2_TABLE_200
1688 , a34 out nocopy JTF_VARCHAR2_TABLE_200
1689 , a35 out nocopy JTF_VARCHAR2_TABLE_200
1690 , a36 out nocopy JTF_VARCHAR2_TABLE_200
1691 , a37 out nocopy JTF_VARCHAR2_TABLE_200
1692 , a38 out nocopy JTF_VARCHAR2_TABLE_200
1693 , a39 out nocopy JTF_VARCHAR2_TABLE_200
1694 , a40 out nocopy JTF_VARCHAR2_TABLE_200
1695 , a41 out nocopy JTF_NUMBER_TABLE
1696 , a42 out nocopy JTF_NUMBER_TABLE
1697 , a43 out nocopy JTF_NUMBER_TABLE
1698 , a44 out nocopy JTF_NUMBER_TABLE
1699 , a45 out nocopy JTF_DATE_TABLE
1700 , a46 out nocopy JTF_VARCHAR2_TABLE_100
1701 , a47 out nocopy JTF_NUMBER_TABLE
1702 ) as
1703 ddindx binary_integer; indx binary_integer;
1704 begin
1705 if t is null or t.count = 0 then
1706 a0 := JTF_NUMBER_TABLE();
1707 a1 := JTF_NUMBER_TABLE();
1708 a2 := JTF_NUMBER_TABLE();
1709 a3 := JTF_NUMBER_TABLE();
1710 a4 := JTF_NUMBER_TABLE();
1711 a5 := JTF_NUMBER_TABLE();
1712 a6 := JTF_NUMBER_TABLE();
1713 a7 := JTF_NUMBER_TABLE();
1714 a8 := JTF_VARCHAR2_TABLE_100();
1715 a9 := JTF_NUMBER_TABLE();
1716 a10 := JTF_NUMBER_TABLE();
1717 a11 := JTF_NUMBER_TABLE();
1718 a12 := JTF_NUMBER_TABLE();
1719 a13 := JTF_NUMBER_TABLE();
1720 a14 := JTF_NUMBER_TABLE();
1721 a15 := JTF_NUMBER_TABLE();
1722 a16 := JTF_NUMBER_TABLE();
1723 a17 := JTF_NUMBER_TABLE();
1724 a18 := JTF_NUMBER_TABLE();
1725 a19 := JTF_NUMBER_TABLE();
1726 a20 := JTF_DATE_TABLE();
1727 a21 := JTF_DATE_TABLE();
1728 a22 := JTF_NUMBER_TABLE();
1729 a23 := JTF_NUMBER_TABLE();
1730 a24 := JTF_NUMBER_TABLE();
1731 a25 := JTF_VARCHAR2_TABLE_100();
1732 a26 := JTF_VARCHAR2_TABLE_200();
1733 a27 := JTF_VARCHAR2_TABLE_200();
1734 a28 := JTF_VARCHAR2_TABLE_200();
1735 a29 := JTF_VARCHAR2_TABLE_200();
1736 a30 := JTF_VARCHAR2_TABLE_200();
1737 a31 := JTF_VARCHAR2_TABLE_200();
1738 a32 := JTF_VARCHAR2_TABLE_200();
1739 a33 := JTF_VARCHAR2_TABLE_200();
1740 a34 := JTF_VARCHAR2_TABLE_200();
1741 a35 := JTF_VARCHAR2_TABLE_200();
1742 a36 := JTF_VARCHAR2_TABLE_200();
1743 a37 := JTF_VARCHAR2_TABLE_200();
1744 a38 := JTF_VARCHAR2_TABLE_200();
1745 a39 := JTF_VARCHAR2_TABLE_200();
1746 a40 := JTF_VARCHAR2_TABLE_200();
1747 a41 := JTF_NUMBER_TABLE();
1748 a42 := JTF_NUMBER_TABLE();
1749 a43 := JTF_NUMBER_TABLE();
1750 a44 := JTF_NUMBER_TABLE();
1751 a45 := JTF_DATE_TABLE();
1752 a46 := JTF_VARCHAR2_TABLE_100();
1753 a47 := JTF_NUMBER_TABLE();
1754 else
1755 a0 := JTF_NUMBER_TABLE();
1756 a1 := JTF_NUMBER_TABLE();
1757 a2 := JTF_NUMBER_TABLE();
1758 a3 := JTF_NUMBER_TABLE();
1759 a4 := JTF_NUMBER_TABLE();
1760 a5 := JTF_NUMBER_TABLE();
1761 a6 := JTF_NUMBER_TABLE();
1762 a7 := JTF_NUMBER_TABLE();
1763 a8 := JTF_VARCHAR2_TABLE_100();
1764 a9 := JTF_NUMBER_TABLE();
1765 a10 := JTF_NUMBER_TABLE();
1766 a11 := JTF_NUMBER_TABLE();
1767 a12 := JTF_NUMBER_TABLE();
1768 a13 := JTF_NUMBER_TABLE();
1769 a14 := JTF_NUMBER_TABLE();
1770 a15 := JTF_NUMBER_TABLE();
1771 a16 := JTF_NUMBER_TABLE();
1772 a17 := JTF_NUMBER_TABLE();
1773 a18 := JTF_NUMBER_TABLE();
1774 a19 := JTF_NUMBER_TABLE();
1775 a20 := JTF_DATE_TABLE();
1776 a21 := JTF_DATE_TABLE();
1777 a22 := JTF_NUMBER_TABLE();
1778 a23 := JTF_NUMBER_TABLE();
1779 a24 := JTF_NUMBER_TABLE();
1780 a25 := JTF_VARCHAR2_TABLE_100();
1781 a26 := JTF_VARCHAR2_TABLE_200();
1782 a27 := JTF_VARCHAR2_TABLE_200();
1783 a28 := JTF_VARCHAR2_TABLE_200();
1784 a29 := JTF_VARCHAR2_TABLE_200();
1785 a30 := JTF_VARCHAR2_TABLE_200();
1786 a31 := JTF_VARCHAR2_TABLE_200();
1787 a32 := JTF_VARCHAR2_TABLE_200();
1788 a33 := JTF_VARCHAR2_TABLE_200();
1789 a34 := JTF_VARCHAR2_TABLE_200();
1790 a35 := JTF_VARCHAR2_TABLE_200();
1791 a36 := JTF_VARCHAR2_TABLE_200();
1792 a37 := JTF_VARCHAR2_TABLE_200();
1793 a38 := JTF_VARCHAR2_TABLE_200();
1794 a39 := JTF_VARCHAR2_TABLE_200();
1795 a40 := JTF_VARCHAR2_TABLE_200();
1796 a41 := JTF_NUMBER_TABLE();
1797 a42 := JTF_NUMBER_TABLE();
1798 a43 := JTF_NUMBER_TABLE();
1799 a44 := JTF_NUMBER_TABLE();
1800 a45 := JTF_DATE_TABLE();
1801 a46 := JTF_VARCHAR2_TABLE_100();
1802 a47 := JTF_NUMBER_TABLE();
1803 if t.count > 0 then
1804 a0.extend(t.count);
1805 a1.extend(t.count);
1806 a2.extend(t.count);
1807 a3.extend(t.count);
1808 a4.extend(t.count);
1809 a5.extend(t.count);
1810 a6.extend(t.count);
1811 a7.extend(t.count);
1812 a8.extend(t.count);
1813 a9.extend(t.count);
1814 a10.extend(t.count);
1815 a11.extend(t.count);
1816 a12.extend(t.count);
1817 a13.extend(t.count);
1818 a14.extend(t.count);
1819 a15.extend(t.count);
1820 a16.extend(t.count);
1821 a17.extend(t.count);
1822 a18.extend(t.count);
1823 a19.extend(t.count);
1824 a20.extend(t.count);
1825 a21.extend(t.count);
1826 a22.extend(t.count);
1827 a23.extend(t.count);
1828 a24.extend(t.count);
1829 a25.extend(t.count);
1830 a26.extend(t.count);
1831 a27.extend(t.count);
1832 a28.extend(t.count);
1833 a29.extend(t.count);
1834 a30.extend(t.count);
1835 a31.extend(t.count);
1836 a32.extend(t.count);
1837 a33.extend(t.count);
1838 a34.extend(t.count);
1839 a35.extend(t.count);
1840 a36.extend(t.count);
1841 a37.extend(t.count);
1842 a38.extend(t.count);
1843 a39.extend(t.count);
1844 a40.extend(t.count);
1845 a41.extend(t.count);
1846 a42.extend(t.count);
1847 a43.extend(t.count);
1848 a44.extend(t.count);
1849 a45.extend(t.count);
1850 a46.extend(t.count);
1851 a47.extend(t.count);
1852 ddindx := t.first;
1853 indx := 1;
1854 while true loop
1855 a0(indx) := t(ddindx).header_id;
1856 a1(indx) := t(ddindx).batch_id;
1857 a2(indx) := t(ddindx).row_id;
1858 a3(indx) := t(ddindx).wip_entity_id;
1859 a4(indx) := t(ddindx).organization_id;
1860 a5(indx) := t(ddindx).operation_seq_num;
1861 a6(indx) := t(ddindx).resource_seq_num;
1862 a7(indx) := t(ddindx).resource_id;
1863 a8(indx) := t(ddindx).uom_code;
1864 a9(indx) := t(ddindx).basis_type;
1865 a10(indx) := t(ddindx).usage_rate_or_amount;
1866 a11(indx) := t(ddindx).activity_id;
1867 a12(indx) := t(ddindx).scheduled_flag;
1868 a13(indx) := t(ddindx).firm_flag;
1869 a14(indx) := t(ddindx).assigned_units;
1870 a15(indx) := t(ddindx).maximum_assigned_units;
1871 a16(indx) := t(ddindx).autocharge_type;
1872 a17(indx) := t(ddindx).standard_rate_flag;
1873 a18(indx) := t(ddindx).applied_resource_units;
1874 a19(indx) := t(ddindx).applied_resource_value;
1875 a20(indx) := t(ddindx).start_date;
1876 a21(indx) := t(ddindx).completion_date;
1877 a22(indx) := t(ddindx).schedule_seq_num;
1878 a23(indx) := t(ddindx).substitute_group_num;
1879 a24(indx) := t(ddindx).replacement_group_num;
1880 a25(indx) := t(ddindx).attribute_category;
1881 a26(indx) := t(ddindx).attribute1;
1882 a27(indx) := t(ddindx).attribute2;
1883 a28(indx) := t(ddindx).attribute3;
1884 a29(indx) := t(ddindx).attribute4;
1885 a30(indx) := t(ddindx).attribute5;
1886 a31(indx) := t(ddindx).attribute6;
1887 a32(indx) := t(ddindx).attribute7;
1888 a33(indx) := t(ddindx).attribute8;
1889 a34(indx) := t(ddindx).attribute9;
1890 a35(indx) := t(ddindx).attribute10;
1891 a36(indx) := t(ddindx).attribute11;
1892 a37(indx) := t(ddindx).attribute12;
1893 a38(indx) := t(ddindx).attribute13;
1894 a39(indx) := t(ddindx).attribute14;
1895 a40(indx) := t(ddindx).attribute15;
1896 a41(indx) := t(ddindx).department_id;
1897 a42(indx) := t(ddindx).request_id;
1898 a43(indx) := t(ddindx).program_application_id;
1899 a44(indx) := t(ddindx).program_id;
1900 a45(indx) := t(ddindx).program_update_date;
1901 a46(indx) := t(ddindx).return_status;
1902 a47(indx) := t(ddindx).transaction_type;
1903 indx := indx+1;
1904 if t.last =ddindx
1905 then exit;
1906 end if;
1907 ddindx := t.next(ddindx);
1908 end loop;
1909 end if;
1910 end if;
1911 end rosetta_table_copy_out_p31;
1912
1913 procedure rosetta_table_copy_in_p32(t out nocopy eam_process_wo_pub.eam_res_inst_tbl_type, a0 JTF_NUMBER_TABLE
1914 , a1 JTF_NUMBER_TABLE
1915 , a2 JTF_NUMBER_TABLE
1916 , a3 JTF_NUMBER_TABLE
1917 , a4 JTF_NUMBER_TABLE
1918 , a5 JTF_NUMBER_TABLE
1919 , a6 JTF_NUMBER_TABLE
1920 , a7 JTF_NUMBER_TABLE
1921 , a8 JTF_VARCHAR2_TABLE_100
1922 , a9 JTF_DATE_TABLE
1923 , a10 JTF_DATE_TABLE
1924 , a11 JTF_NUMBER_TABLE
1925 , a12 JTF_VARCHAR2_TABLE_100
1926 , a13 JTF_NUMBER_TABLE
1927 ) as
1928 ddindx binary_integer; indx binary_integer;
1929 begin
1930 if a0 is not null and a0.count > 0 then
1931 if a0.count > 0 then
1932 indx := a0.first;
1933 ddindx := 1;
1934 while true loop
1935 t(ddindx).header_id := a0(indx);
1936 t(ddindx).batch_id := a1(indx);
1937 t(ddindx).row_id := a2(indx);
1938 t(ddindx).wip_entity_id := a3(indx);
1939 t(ddindx).organization_id := a4(indx);
1940 t(ddindx).operation_seq_num := a5(indx);
1941 t(ddindx).resource_seq_num := a6(indx);
1942 t(ddindx).instance_id := a7(indx);
1943 t(ddindx).serial_number := a8(indx);
1944 t(ddindx).start_date := a9(indx);
1945 t(ddindx).completion_date := a10(indx);
1946 t(ddindx).top_level_batch_id := a11(indx);
1947 t(ddindx).return_status := a12(indx);
1948 t(ddindx).transaction_type := a13(indx);
1949 ddindx := ddindx+1;
1950 if a0.last =indx
1951 then exit;
1952 end if;
1953 indx := a0.next(indx);
1954 end loop;
1955 end if;
1956 end if;
1957 end rosetta_table_copy_in_p32;
1958 procedure rosetta_table_copy_out_p32(t eam_process_wo_pub.eam_res_inst_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
1959 , a1 out nocopy JTF_NUMBER_TABLE
1960 , a2 out nocopy JTF_NUMBER_TABLE
1961 , a3 out nocopy JTF_NUMBER_TABLE
1962 , a4 out nocopy JTF_NUMBER_TABLE
1963 , a5 out nocopy JTF_NUMBER_TABLE
1964 , a6 out nocopy JTF_NUMBER_TABLE
1965 , a7 out nocopy JTF_NUMBER_TABLE
1966 , a8 out nocopy JTF_VARCHAR2_TABLE_100
1967 , a9 out nocopy JTF_DATE_TABLE
1968 , a10 out nocopy JTF_DATE_TABLE
1969 , a11 out nocopy JTF_NUMBER_TABLE
1970 , a12 out nocopy JTF_VARCHAR2_TABLE_100
1971 , a13 out nocopy JTF_NUMBER_TABLE
1972 ) as
1973 ddindx binary_integer; indx binary_integer;
1974 begin
1975 if t is null or t.count = 0 then
1976 a0 := JTF_NUMBER_TABLE();
1977 a1 := JTF_NUMBER_TABLE();
1978 a2 := JTF_NUMBER_TABLE();
1979 a3 := JTF_NUMBER_TABLE();
1980 a4 := JTF_NUMBER_TABLE();
1981 a5 := JTF_NUMBER_TABLE();
1982 a6 := JTF_NUMBER_TABLE();
1983 a7 := JTF_NUMBER_TABLE();
1984 a8 := JTF_VARCHAR2_TABLE_100();
1985 a9 := JTF_DATE_TABLE();
1986 a10 := JTF_DATE_TABLE();
1987 a11 := JTF_NUMBER_TABLE();
1988 a12 := JTF_VARCHAR2_TABLE_100();
1989 a13 := JTF_NUMBER_TABLE();
1990 else
1991 a0 := JTF_NUMBER_TABLE();
1992 a1 := JTF_NUMBER_TABLE();
1993 a2 := JTF_NUMBER_TABLE();
1994 a3 := JTF_NUMBER_TABLE();
1995 a4 := JTF_NUMBER_TABLE();
1996 a5 := JTF_NUMBER_TABLE();
1997 a6 := JTF_NUMBER_TABLE();
1998 a7 := JTF_NUMBER_TABLE();
1999 a8 := JTF_VARCHAR2_TABLE_100();
2000 a9 := JTF_DATE_TABLE();
2001 a10 := JTF_DATE_TABLE();
2002 a11 := JTF_NUMBER_TABLE();
2003 a12 := JTF_VARCHAR2_TABLE_100();
2004 a13 := JTF_NUMBER_TABLE();
2005 if t.count > 0 then
2006 a0.extend(t.count);
2007 a1.extend(t.count);
2008 a2.extend(t.count);
2009 a3.extend(t.count);
2010 a4.extend(t.count);
2011 a5.extend(t.count);
2012 a6.extend(t.count);
2013 a7.extend(t.count);
2014 a8.extend(t.count);
2015 a9.extend(t.count);
2016 a10.extend(t.count);
2017 a11.extend(t.count);
2018 a12.extend(t.count);
2019 a13.extend(t.count);
2020 ddindx := t.first;
2021 indx := 1;
2022 while true loop
2023 a0(indx) := t(ddindx).header_id;
2024 a1(indx) := t(ddindx).batch_id;
2025 a2(indx) := t(ddindx).row_id;
2026 a3(indx) := t(ddindx).wip_entity_id;
2027 a4(indx) := t(ddindx).organization_id;
2028 a5(indx) := t(ddindx).operation_seq_num;
2029 a6(indx) := t(ddindx).resource_seq_num;
2030 a7(indx) := t(ddindx).instance_id;
2031 a8(indx) := t(ddindx).serial_number;
2032 a9(indx) := t(ddindx).start_date;
2033 a10(indx) := t(ddindx).completion_date;
2034 a11(indx) := t(ddindx).top_level_batch_id;
2035 a12(indx) := t(ddindx).return_status;
2036 a13(indx) := t(ddindx).transaction_type;
2037 indx := indx+1;
2038 if t.last =ddindx
2039 then exit;
2040 end if;
2041 ddindx := t.next(ddindx);
2042 end loop;
2043 end if;
2044 end if;
2045 end rosetta_table_copy_out_p32;
2046
2047 procedure rosetta_table_copy_in_p33(t out nocopy eam_process_wo_pub.eam_sub_res_tbl_type, a0 JTF_NUMBER_TABLE
2048 , a1 JTF_NUMBER_TABLE
2049 , a2 JTF_NUMBER_TABLE
2050 , a3 JTF_NUMBER_TABLE
2051 , a4 JTF_NUMBER_TABLE
2052 , a5 JTF_NUMBER_TABLE
2053 , a6 JTF_NUMBER_TABLE
2054 , a7 JTF_NUMBER_TABLE
2055 , a8 JTF_VARCHAR2_TABLE_100
2056 , a9 JTF_NUMBER_TABLE
2057 , a10 JTF_NUMBER_TABLE
2058 , a11 JTF_NUMBER_TABLE
2059 , a12 JTF_NUMBER_TABLE
2060 , a13 JTF_NUMBER_TABLE
2061 , a14 JTF_NUMBER_TABLE
2062 , a15 JTF_NUMBER_TABLE
2063 , a16 JTF_NUMBER_TABLE
2064 , a17 JTF_NUMBER_TABLE
2065 , a18 JTF_DATE_TABLE
2066 , a19 JTF_DATE_TABLE
2067 , a20 JTF_NUMBER_TABLE
2068 , a21 JTF_NUMBER_TABLE
2069 , a22 JTF_NUMBER_TABLE
2070 , a23 JTF_VARCHAR2_TABLE_100
2071 , a24 JTF_VARCHAR2_TABLE_200
2072 , a25 JTF_VARCHAR2_TABLE_200
2073 , a26 JTF_VARCHAR2_TABLE_200
2074 , a27 JTF_VARCHAR2_TABLE_200
2075 , a28 JTF_VARCHAR2_TABLE_200
2076 , a29 JTF_VARCHAR2_TABLE_200
2077 , a30 JTF_VARCHAR2_TABLE_200
2078 , a31 JTF_VARCHAR2_TABLE_200
2079 , a32 JTF_VARCHAR2_TABLE_200
2080 , a33 JTF_VARCHAR2_TABLE_200
2081 , a34 JTF_VARCHAR2_TABLE_200
2082 , a35 JTF_VARCHAR2_TABLE_200
2083 , a36 JTF_VARCHAR2_TABLE_200
2084 , a37 JTF_VARCHAR2_TABLE_200
2085 , a38 JTF_VARCHAR2_TABLE_200
2086 , a39 JTF_NUMBER_TABLE
2087 , a40 JTF_NUMBER_TABLE
2088 , a41 JTF_NUMBER_TABLE
2089 , a42 JTF_NUMBER_TABLE
2090 , a43 JTF_DATE_TABLE
2091 , a44 JTF_VARCHAR2_TABLE_100
2092 , a45 JTF_NUMBER_TABLE
2093 ) as
2094 ddindx binary_integer; indx binary_integer;
2095 begin
2096 if a0 is not null and a0.count > 0 then
2097 if a0.count > 0 then
2098 indx := a0.first;
2099 ddindx := 1;
2100 while true loop
2101 t(ddindx).header_id := a0(indx);
2102 t(ddindx).batch_id := a1(indx);
2103 t(ddindx).row_id := a2(indx);
2104 t(ddindx).wip_entity_id := a3(indx);
2105 t(ddindx).organization_id := a4(indx);
2106 t(ddindx).operation_seq_num := a5(indx);
2107 t(ddindx).resource_seq_num := a6(indx);
2108 t(ddindx).resource_id := a7(indx);
2109 t(ddindx).uom_code := a8(indx);
2110 t(ddindx).basis_type := a9(indx);
2111 t(ddindx).usage_rate_or_amount := a10(indx);
2112 t(ddindx).activity_id := a11(indx);
2113 t(ddindx).scheduled_flag := a12(indx);
2114 t(ddindx).assigned_units := a13(indx);
2115 t(ddindx).autocharge_type := a14(indx);
2116 t(ddindx).standard_rate_flag := a15(indx);
2117 t(ddindx).applied_resource_units := a16(indx);
2118 t(ddindx).applied_resource_value := a17(indx);
2119 t(ddindx).start_date := a18(indx);
2120 t(ddindx).completion_date := a19(indx);
2121 t(ddindx).schedule_seq_num := a20(indx);
2122 t(ddindx).substitute_group_num := a21(indx);
2123 t(ddindx).replacement_group_num := a22(indx);
2124 t(ddindx).attribute_category := a23(indx);
2125 t(ddindx).attribute1 := a24(indx);
2126 t(ddindx).attribute2 := a25(indx);
2127 t(ddindx).attribute3 := a26(indx);
2128 t(ddindx).attribute4 := a27(indx);
2129 t(ddindx).attribute5 := a28(indx);
2130 t(ddindx).attribute6 := a29(indx);
2131 t(ddindx).attribute7 := a30(indx);
2132 t(ddindx).attribute8 := a31(indx);
2133 t(ddindx).attribute9 := a32(indx);
2134 t(ddindx).attribute10 := a33(indx);
2135 t(ddindx).attribute11 := a34(indx);
2136 t(ddindx).attribute12 := a35(indx);
2137 t(ddindx).attribute13 := a36(indx);
2138 t(ddindx).attribute14 := a37(indx);
2139 t(ddindx).attribute15 := a38(indx);
2140 t(ddindx).department_id := a39(indx);
2141 t(ddindx).request_id := a40(indx);
2142 t(ddindx).program_application_id := a41(indx);
2143 t(ddindx).program_id := a42(indx);
2144 t(ddindx).program_update_date := a43(indx);
2145 t(ddindx).return_status := a44(indx);
2146 t(ddindx).transaction_type := a45(indx);
2147 ddindx := ddindx+1;
2148 if a0.last =indx
2149 then exit;
2150 end if;
2151 indx := a0.next(indx);
2152 end loop;
2153 end if;
2154 end if;
2155 end rosetta_table_copy_in_p33;
2156 procedure rosetta_table_copy_out_p33(t eam_process_wo_pub.eam_sub_res_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
2157 , a1 out nocopy JTF_NUMBER_TABLE
2158 , a2 out nocopy JTF_NUMBER_TABLE
2159 , a3 out nocopy JTF_NUMBER_TABLE
2160 , a4 out nocopy JTF_NUMBER_TABLE
2161 , a5 out nocopy JTF_NUMBER_TABLE
2162 , a6 out nocopy JTF_NUMBER_TABLE
2163 , a7 out nocopy JTF_NUMBER_TABLE
2164 , a8 out nocopy JTF_VARCHAR2_TABLE_100
2165 , a9 out nocopy JTF_NUMBER_TABLE
2166 , a10 out nocopy JTF_NUMBER_TABLE
2167 , a11 out nocopy JTF_NUMBER_TABLE
2168 , a12 out nocopy JTF_NUMBER_TABLE
2169 , a13 out nocopy JTF_NUMBER_TABLE
2170 , a14 out nocopy JTF_NUMBER_TABLE
2171 , a15 out nocopy JTF_NUMBER_TABLE
2172 , a16 out nocopy JTF_NUMBER_TABLE
2173 , a17 out nocopy JTF_NUMBER_TABLE
2174 , a18 out nocopy JTF_DATE_TABLE
2175 , a19 out nocopy JTF_DATE_TABLE
2176 , a20 out nocopy JTF_NUMBER_TABLE
2177 , a21 out nocopy JTF_NUMBER_TABLE
2178 , a22 out nocopy JTF_NUMBER_TABLE
2179 , a23 out nocopy JTF_VARCHAR2_TABLE_100
2180 , a24 out nocopy JTF_VARCHAR2_TABLE_200
2181 , a25 out nocopy JTF_VARCHAR2_TABLE_200
2182 , a26 out nocopy JTF_VARCHAR2_TABLE_200
2183 , a27 out nocopy JTF_VARCHAR2_TABLE_200
2184 , a28 out nocopy JTF_VARCHAR2_TABLE_200
2185 , a29 out nocopy JTF_VARCHAR2_TABLE_200
2186 , a30 out nocopy JTF_VARCHAR2_TABLE_200
2187 , a31 out nocopy JTF_VARCHAR2_TABLE_200
2188 , a32 out nocopy JTF_VARCHAR2_TABLE_200
2189 , a33 out nocopy JTF_VARCHAR2_TABLE_200
2190 , a34 out nocopy JTF_VARCHAR2_TABLE_200
2191 , a35 out nocopy JTF_VARCHAR2_TABLE_200
2192 , a36 out nocopy JTF_VARCHAR2_TABLE_200
2193 , a37 out nocopy JTF_VARCHAR2_TABLE_200
2194 , a38 out nocopy JTF_VARCHAR2_TABLE_200
2195 , a39 out nocopy JTF_NUMBER_TABLE
2196 , a40 out nocopy JTF_NUMBER_TABLE
2197 , a41 out nocopy JTF_NUMBER_TABLE
2198 , a42 out nocopy JTF_NUMBER_TABLE
2199 , a43 out nocopy JTF_DATE_TABLE
2200 , a44 out nocopy JTF_VARCHAR2_TABLE_100
2201 , a45 out nocopy JTF_NUMBER_TABLE
2202 ) as
2203 ddindx binary_integer; indx binary_integer;
2204 begin
2205 if t is null or t.count = 0 then
2206 a0 := JTF_NUMBER_TABLE();
2207 a1 := JTF_NUMBER_TABLE();
2208 a2 := JTF_NUMBER_TABLE();
2209 a3 := JTF_NUMBER_TABLE();
2210 a4 := JTF_NUMBER_TABLE();
2211 a5 := JTF_NUMBER_TABLE();
2212 a6 := JTF_NUMBER_TABLE();
2213 a7 := JTF_NUMBER_TABLE();
2214 a8 := JTF_VARCHAR2_TABLE_100();
2215 a9 := JTF_NUMBER_TABLE();
2216 a10 := JTF_NUMBER_TABLE();
2217 a11 := JTF_NUMBER_TABLE();
2218 a12 := JTF_NUMBER_TABLE();
2219 a13 := JTF_NUMBER_TABLE();
2220 a14 := JTF_NUMBER_TABLE();
2221 a15 := JTF_NUMBER_TABLE();
2222 a16 := JTF_NUMBER_TABLE();
2223 a17 := JTF_NUMBER_TABLE();
2224 a18 := JTF_DATE_TABLE();
2225 a19 := JTF_DATE_TABLE();
2226 a20 := JTF_NUMBER_TABLE();
2227 a21 := JTF_NUMBER_TABLE();
2228 a22 := JTF_NUMBER_TABLE();
2229 a23 := JTF_VARCHAR2_TABLE_100();
2230 a24 := JTF_VARCHAR2_TABLE_200();
2231 a25 := JTF_VARCHAR2_TABLE_200();
2232 a26 := JTF_VARCHAR2_TABLE_200();
2233 a27 := JTF_VARCHAR2_TABLE_200();
2234 a28 := JTF_VARCHAR2_TABLE_200();
2235 a29 := JTF_VARCHAR2_TABLE_200();
2236 a30 := JTF_VARCHAR2_TABLE_200();
2237 a31 := JTF_VARCHAR2_TABLE_200();
2238 a32 := JTF_VARCHAR2_TABLE_200();
2239 a33 := JTF_VARCHAR2_TABLE_200();
2240 a34 := JTF_VARCHAR2_TABLE_200();
2241 a35 := JTF_VARCHAR2_TABLE_200();
2242 a36 := JTF_VARCHAR2_TABLE_200();
2243 a37 := JTF_VARCHAR2_TABLE_200();
2244 a38 := JTF_VARCHAR2_TABLE_200();
2245 a39 := JTF_NUMBER_TABLE();
2246 a40 := JTF_NUMBER_TABLE();
2247 a41 := JTF_NUMBER_TABLE();
2248 a42 := JTF_NUMBER_TABLE();
2249 a43 := JTF_DATE_TABLE();
2250 a44 := JTF_VARCHAR2_TABLE_100();
2251 a45 := JTF_NUMBER_TABLE();
2252 else
2253 a0 := JTF_NUMBER_TABLE();
2254 a1 := JTF_NUMBER_TABLE();
2255 a2 := JTF_NUMBER_TABLE();
2256 a3 := JTF_NUMBER_TABLE();
2257 a4 := JTF_NUMBER_TABLE();
2258 a5 := JTF_NUMBER_TABLE();
2259 a6 := JTF_NUMBER_TABLE();
2260 a7 := JTF_NUMBER_TABLE();
2261 a8 := JTF_VARCHAR2_TABLE_100();
2262 a9 := JTF_NUMBER_TABLE();
2263 a10 := JTF_NUMBER_TABLE();
2264 a11 := JTF_NUMBER_TABLE();
2265 a12 := JTF_NUMBER_TABLE();
2266 a13 := JTF_NUMBER_TABLE();
2267 a14 := JTF_NUMBER_TABLE();
2268 a15 := JTF_NUMBER_TABLE();
2269 a16 := JTF_NUMBER_TABLE();
2270 a17 := JTF_NUMBER_TABLE();
2271 a18 := JTF_DATE_TABLE();
2272 a19 := JTF_DATE_TABLE();
2273 a20 := JTF_NUMBER_TABLE();
2274 a21 := JTF_NUMBER_TABLE();
2275 a22 := JTF_NUMBER_TABLE();
2276 a23 := JTF_VARCHAR2_TABLE_100();
2277 a24 := JTF_VARCHAR2_TABLE_200();
2278 a25 := JTF_VARCHAR2_TABLE_200();
2279 a26 := JTF_VARCHAR2_TABLE_200();
2280 a27 := JTF_VARCHAR2_TABLE_200();
2281 a28 := JTF_VARCHAR2_TABLE_200();
2282 a29 := JTF_VARCHAR2_TABLE_200();
2283 a30 := JTF_VARCHAR2_TABLE_200();
2284 a31 := JTF_VARCHAR2_TABLE_200();
2285 a32 := JTF_VARCHAR2_TABLE_200();
2286 a33 := JTF_VARCHAR2_TABLE_200();
2287 a34 := JTF_VARCHAR2_TABLE_200();
2288 a35 := JTF_VARCHAR2_TABLE_200();
2289 a36 := JTF_VARCHAR2_TABLE_200();
2290 a37 := JTF_VARCHAR2_TABLE_200();
2291 a38 := JTF_VARCHAR2_TABLE_200();
2292 a39 := JTF_NUMBER_TABLE();
2293 a40 := JTF_NUMBER_TABLE();
2294 a41 := JTF_NUMBER_TABLE();
2295 a42 := JTF_NUMBER_TABLE();
2296 a43 := JTF_DATE_TABLE();
2297 a44 := JTF_VARCHAR2_TABLE_100();
2298 a45 := JTF_NUMBER_TABLE();
2299 if t.count > 0 then
2300 a0.extend(t.count);
2301 a1.extend(t.count);
2302 a2.extend(t.count);
2303 a3.extend(t.count);
2304 a4.extend(t.count);
2305 a5.extend(t.count);
2306 a6.extend(t.count);
2307 a7.extend(t.count);
2308 a8.extend(t.count);
2309 a9.extend(t.count);
2310 a10.extend(t.count);
2311 a11.extend(t.count);
2312 a12.extend(t.count);
2313 a13.extend(t.count);
2314 a14.extend(t.count);
2315 a15.extend(t.count);
2316 a16.extend(t.count);
2317 a17.extend(t.count);
2318 a18.extend(t.count);
2319 a19.extend(t.count);
2320 a20.extend(t.count);
2321 a21.extend(t.count);
2322 a22.extend(t.count);
2323 a23.extend(t.count);
2324 a24.extend(t.count);
2325 a25.extend(t.count);
2326 a26.extend(t.count);
2327 a27.extend(t.count);
2328 a28.extend(t.count);
2329 a29.extend(t.count);
2330 a30.extend(t.count);
2331 a31.extend(t.count);
2332 a32.extend(t.count);
2333 a33.extend(t.count);
2334 a34.extend(t.count);
2335 a35.extend(t.count);
2336 a36.extend(t.count);
2337 a37.extend(t.count);
2338 a38.extend(t.count);
2339 a39.extend(t.count);
2340 a40.extend(t.count);
2341 a41.extend(t.count);
2342 a42.extend(t.count);
2343 a43.extend(t.count);
2344 a44.extend(t.count);
2345 a45.extend(t.count);
2346 ddindx := t.first;
2347 indx := 1;
2348 while true loop
2349 a0(indx) := t(ddindx).header_id;
2350 a1(indx) := t(ddindx).batch_id;
2351 a2(indx) := t(ddindx).row_id;
2352 a3(indx) := t(ddindx).wip_entity_id;
2353 a4(indx) := t(ddindx).organization_id;
2354 a5(indx) := t(ddindx).operation_seq_num;
2355 a6(indx) := t(ddindx).resource_seq_num;
2356 a7(indx) := t(ddindx).resource_id;
2357 a8(indx) := t(ddindx).uom_code;
2358 a9(indx) := t(ddindx).basis_type;
2359 a10(indx) := t(ddindx).usage_rate_or_amount;
2360 a11(indx) := t(ddindx).activity_id;
2361 a12(indx) := t(ddindx).scheduled_flag;
2362 a13(indx) := t(ddindx).assigned_units;
2363 a14(indx) := t(ddindx).autocharge_type;
2364 a15(indx) := t(ddindx).standard_rate_flag;
2365 a16(indx) := t(ddindx).applied_resource_units;
2366 a17(indx) := t(ddindx).applied_resource_value;
2367 a18(indx) := t(ddindx).start_date;
2368 a19(indx) := t(ddindx).completion_date;
2369 a20(indx) := t(ddindx).schedule_seq_num;
2370 a21(indx) := t(ddindx).substitute_group_num;
2371 a22(indx) := t(ddindx).replacement_group_num;
2372 a23(indx) := t(ddindx).attribute_category;
2373 a24(indx) := t(ddindx).attribute1;
2374 a25(indx) := t(ddindx).attribute2;
2375 a26(indx) := t(ddindx).attribute3;
2376 a27(indx) := t(ddindx).attribute4;
2377 a28(indx) := t(ddindx).attribute5;
2378 a29(indx) := t(ddindx).attribute6;
2379 a30(indx) := t(ddindx).attribute7;
2380 a31(indx) := t(ddindx).attribute8;
2381 a32(indx) := t(ddindx).attribute9;
2382 a33(indx) := t(ddindx).attribute10;
2383 a34(indx) := t(ddindx).attribute11;
2384 a35(indx) := t(ddindx).attribute12;
2385 a36(indx) := t(ddindx).attribute13;
2386 a37(indx) := t(ddindx).attribute14;
2387 a38(indx) := t(ddindx).attribute15;
2388 a39(indx) := t(ddindx).department_id;
2389 a40(indx) := t(ddindx).request_id;
2390 a41(indx) := t(ddindx).program_application_id;
2391 a42(indx) := t(ddindx).program_id;
2392 a43(indx) := t(ddindx).program_update_date;
2393 a44(indx) := t(ddindx).return_status;
2394 a45(indx) := t(ddindx).transaction_type;
2395 indx := indx+1;
2396 if t.last =ddindx
2397 then exit;
2398 end if;
2399 ddindx := t.next(ddindx);
2400 end loop;
2401 end if;
2402 end if;
2403 end rosetta_table_copy_out_p33;
2404
2405 procedure rosetta_table_copy_in_p34(t out nocopy eam_process_wo_pub.eam_res_usage_tbl_type, a0 JTF_NUMBER_TABLE
2406 , a1 JTF_NUMBER_TABLE
2407 , a2 JTF_NUMBER_TABLE
2408 , a3 JTF_NUMBER_TABLE
2409 , a4 JTF_NUMBER_TABLE
2410 , a5 JTF_NUMBER_TABLE
2411 , a6 JTF_NUMBER_TABLE
2412 , a7 JTF_DATE_TABLE
2413 , a8 JTF_DATE_TABLE
2414 , a9 JTF_DATE_TABLE
2415 , a10 JTF_DATE_TABLE
2416 , a11 JTF_NUMBER_TABLE
2417 , a12 JTF_NUMBER_TABLE
2418 , a13 JTF_NUMBER_TABLE
2419 , a14 JTF_NUMBER_TABLE
2420 , a15 JTF_DATE_TABLE
2421 , a16 JTF_NUMBER_TABLE
2422 , a17 JTF_VARCHAR2_TABLE_100
2423 , a18 JTF_VARCHAR2_TABLE_100
2424 , a19 JTF_NUMBER_TABLE
2425 ) as
2426 ddindx binary_integer; indx binary_integer;
2427 begin
2428 if a0 is not null and a0.count > 0 then
2429 if a0.count > 0 then
2430 indx := a0.first;
2431 ddindx := 1;
2432 while true loop
2433 t(ddindx).header_id := a0(indx);
2434 t(ddindx).batch_id := a1(indx);
2435 t(ddindx).row_id := a2(indx);
2436 t(ddindx).wip_entity_id := a3(indx);
2437 t(ddindx).operation_seq_num := a4(indx);
2438 t(ddindx).resource_seq_num := a5(indx);
2439 t(ddindx).organization_id := a6(indx);
2440 t(ddindx).start_date := a7(indx);
2441 t(ddindx).completion_date := a8(indx);
2442 t(ddindx).old_start_date := a9(indx);
2443 t(ddindx).old_completion_date := a10(indx);
2444 t(ddindx).assigned_units := a11(indx);
2445 t(ddindx).request_id := a12(indx);
2446 t(ddindx).program_application_id := a13(indx);
2447 t(ddindx).program_id := a14(indx);
2448 t(ddindx).program_update_date := a15(indx);
2449 t(ddindx).instance_id := a16(indx);
2450 t(ddindx).serial_number := a17(indx);
2451 t(ddindx).return_status := a18(indx);
2452 t(ddindx).transaction_type := a19(indx);
2453 ddindx := ddindx+1;
2454 if a0.last =indx
2455 then exit;
2456 end if;
2457 indx := a0.next(indx);
2458 end loop;
2459 end if;
2460 end if;
2461 end rosetta_table_copy_in_p34;
2462 procedure rosetta_table_copy_out_p34(t eam_process_wo_pub.eam_res_usage_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
2463 , a1 out nocopy JTF_NUMBER_TABLE
2464 , a2 out nocopy JTF_NUMBER_TABLE
2465 , a3 out nocopy JTF_NUMBER_TABLE
2466 , a4 out nocopy JTF_NUMBER_TABLE
2467 , a5 out nocopy JTF_NUMBER_TABLE
2468 , a6 out nocopy JTF_NUMBER_TABLE
2469 , a7 out nocopy JTF_DATE_TABLE
2470 , a8 out nocopy JTF_DATE_TABLE
2471 , a9 out nocopy JTF_DATE_TABLE
2472 , a10 out nocopy JTF_DATE_TABLE
2473 , a11 out nocopy JTF_NUMBER_TABLE
2474 , a12 out nocopy JTF_NUMBER_TABLE
2475 , a13 out nocopy JTF_NUMBER_TABLE
2476 , a14 out nocopy JTF_NUMBER_TABLE
2477 , a15 out nocopy JTF_DATE_TABLE
2478 , a16 out nocopy JTF_NUMBER_TABLE
2479 , a17 out nocopy JTF_VARCHAR2_TABLE_100
2480 , a18 out nocopy JTF_VARCHAR2_TABLE_100
2481 , a19 out nocopy JTF_NUMBER_TABLE
2482 ) as
2483 ddindx binary_integer; indx binary_integer;
2484 begin
2485 if t is null or t.count = 0 then
2486 a0 := JTF_NUMBER_TABLE();
2487 a1 := JTF_NUMBER_TABLE();
2488 a2 := JTF_NUMBER_TABLE();
2489 a3 := JTF_NUMBER_TABLE();
2490 a4 := JTF_NUMBER_TABLE();
2491 a5 := JTF_NUMBER_TABLE();
2492 a6 := JTF_NUMBER_TABLE();
2493 a7 := JTF_DATE_TABLE();
2494 a8 := JTF_DATE_TABLE();
2495 a9 := JTF_DATE_TABLE();
2496 a10 := JTF_DATE_TABLE();
2497 a11 := JTF_NUMBER_TABLE();
2498 a12 := JTF_NUMBER_TABLE();
2499 a13 := JTF_NUMBER_TABLE();
2500 a14 := JTF_NUMBER_TABLE();
2501 a15 := JTF_DATE_TABLE();
2502 a16 := JTF_NUMBER_TABLE();
2503 a17 := JTF_VARCHAR2_TABLE_100();
2504 a18 := JTF_VARCHAR2_TABLE_100();
2505 a19 := JTF_NUMBER_TABLE();
2506 else
2507 a0 := JTF_NUMBER_TABLE();
2508 a1 := JTF_NUMBER_TABLE();
2509 a2 := JTF_NUMBER_TABLE();
2510 a3 := JTF_NUMBER_TABLE();
2511 a4 := JTF_NUMBER_TABLE();
2512 a5 := JTF_NUMBER_TABLE();
2513 a6 := JTF_NUMBER_TABLE();
2514 a7 := JTF_DATE_TABLE();
2515 a8 := JTF_DATE_TABLE();
2516 a9 := JTF_DATE_TABLE();
2517 a10 := JTF_DATE_TABLE();
2518 a11 := JTF_NUMBER_TABLE();
2519 a12 := JTF_NUMBER_TABLE();
2520 a13 := JTF_NUMBER_TABLE();
2521 a14 := JTF_NUMBER_TABLE();
2522 a15 := JTF_DATE_TABLE();
2523 a16 := JTF_NUMBER_TABLE();
2524 a17 := JTF_VARCHAR2_TABLE_100();
2525 a18 := JTF_VARCHAR2_TABLE_100();
2526 a19 := JTF_NUMBER_TABLE();
2527 if t.count > 0 then
2528 a0.extend(t.count);
2529 a1.extend(t.count);
2530 a2.extend(t.count);
2531 a3.extend(t.count);
2532 a4.extend(t.count);
2533 a5.extend(t.count);
2534 a6.extend(t.count);
2535 a7.extend(t.count);
2536 a8.extend(t.count);
2537 a9.extend(t.count);
2538 a10.extend(t.count);
2539 a11.extend(t.count);
2540 a12.extend(t.count);
2541 a13.extend(t.count);
2542 a14.extend(t.count);
2543 a15.extend(t.count);
2544 a16.extend(t.count);
2545 a17.extend(t.count);
2546 a18.extend(t.count);
2547 a19.extend(t.count);
2548 ddindx := t.first;
2549 indx := 1;
2550 while true loop
2551 a0(indx) := t(ddindx).header_id;
2552 a1(indx) := t(ddindx).batch_id;
2553 a2(indx) := t(ddindx).row_id;
2554 a3(indx) := t(ddindx).wip_entity_id;
2555 a4(indx) := t(ddindx).operation_seq_num;
2556 a5(indx) := t(ddindx).resource_seq_num;
2557 a6(indx) := t(ddindx).organization_id;
2558 a7(indx) := t(ddindx).start_date;
2559 a8(indx) := t(ddindx).completion_date;
2560 a9(indx) := t(ddindx).old_start_date;
2561 a10(indx) := t(ddindx).old_completion_date;
2562 a11(indx) := t(ddindx).assigned_units;
2563 a12(indx) := t(ddindx).request_id;
2564 a13(indx) := t(ddindx).program_application_id;
2565 a14(indx) := t(ddindx).program_id;
2566 a15(indx) := t(ddindx).program_update_date;
2567 a16(indx) := t(ddindx).instance_id;
2568 a17(indx) := t(ddindx).serial_number;
2569 a18(indx) := t(ddindx).return_status;
2570 a19(indx) := t(ddindx).transaction_type;
2571 indx := indx+1;
2572 if t.last =ddindx
2573 then exit;
2574 end if;
2575 ddindx := t.next(ddindx);
2576 end loop;
2577 end if;
2578 end if;
2579 end rosetta_table_copy_out_p34;
2580
2581 procedure rosetta_table_copy_in_p35(t out nocopy eam_process_wo_pub.eam_mat_req_tbl_type, a0 JTF_NUMBER_TABLE
2582 , a1 JTF_NUMBER_TABLE
2583 , a2 JTF_NUMBER_TABLE
2584 , a3 JTF_NUMBER_TABLE
2585 , a4 JTF_NUMBER_TABLE
2586 , a5 JTF_NUMBER_TABLE
2587 , a6 JTF_NUMBER_TABLE
2588 , a7 JTF_NUMBER_TABLE
2589 , a8 JTF_NUMBER_TABLE
2590 , a9 JTF_NUMBER_TABLE
2591 , a10 JTF_DATE_TABLE
2592 , a11 JTF_NUMBER_TABLE
2593 , a12 JTF_NUMBER_TABLE
2594 , a13 JTF_NUMBER_TABLE
2595 , a14 JTF_NUMBER_TABLE
2596 , a15 JTF_VARCHAR2_TABLE_100
2597 , a16 JTF_NUMBER_TABLE
2598 , a17 JTF_NUMBER_TABLE
2599 , a18 JTF_NUMBER_TABLE
2600 , a19 JTF_DATE_TABLE
2601 , a20 JTF_NUMBER_TABLE
2602 , a21 JTF_VARCHAR2_TABLE_300
2603 , a22 JTF_VARCHAR2_TABLE_100
2604 , a23 JTF_VARCHAR2_TABLE_200
2605 , a24 JTF_VARCHAR2_TABLE_200
2606 , a25 JTF_VARCHAR2_TABLE_200
2607 , a26 JTF_VARCHAR2_TABLE_200
2608 , a27 JTF_VARCHAR2_TABLE_200
2609 , a28 JTF_VARCHAR2_TABLE_200
2610 , a29 JTF_VARCHAR2_TABLE_200
2611 , a30 JTF_VARCHAR2_TABLE_200
2612 , a31 JTF_VARCHAR2_TABLE_200
2613 , a32 JTF_VARCHAR2_TABLE_200
2614 , a33 JTF_VARCHAR2_TABLE_200
2615 , a34 JTF_VARCHAR2_TABLE_200
2616 , a35 JTF_VARCHAR2_TABLE_200
2617 , a36 JTF_VARCHAR2_TABLE_200
2618 , a37 JTF_VARCHAR2_TABLE_200
2619 , a38 JTF_VARCHAR2_TABLE_100
2620 , a39 JTF_VARCHAR2_TABLE_300
2621 , a40 JTF_NUMBER_TABLE
2622 , a41 JTF_NUMBER_TABLE
2623 , a42 JTF_NUMBER_TABLE
2624 , a43 JTF_NUMBER_TABLE
2625 , a44 JTF_NUMBER_TABLE
2626 , a45 JTF_DATE_TABLE
2627 , a46 JTF_VARCHAR2_TABLE_100
2628 , a47 JTF_NUMBER_TABLE
2629 , a48 JTF_VARCHAR2_TABLE_100
2630 ) as
2631 ddindx binary_integer; indx binary_integer;
2632 begin
2633 if a0 is not null and a0.count > 0 then
2634 if a0.count > 0 then
2635 indx := a0.first;
2636 ddindx := 1;
2637 while true loop
2638 t(ddindx).header_id := a0(indx);
2639 t(ddindx).batch_id := a1(indx);
2640 t(ddindx).row_id := a2(indx);
2641 t(ddindx).wip_entity_id := a3(indx);
2642 t(ddindx).organization_id := a4(indx);
2643 t(ddindx).operation_seq_num := a5(indx);
2644 t(ddindx).inventory_item_id := a6(indx);
2645 t(ddindx).quantity_per_assembly := a7(indx);
2646 t(ddindx).department_id := a8(indx);
2647 t(ddindx).wip_supply_type := a9(indx);
2648 t(ddindx).date_required := a10(indx);
2649 t(ddindx).required_quantity := a11(indx);
2650 t(ddindx).requested_quantity := a12(indx);
2651 t(ddindx).released_quantity := a13(indx);
2652 t(ddindx).quantity_issued := a14(indx);
2653 t(ddindx).supply_subinventory := a15(indx);
2654 t(ddindx).supply_locator_id := a16(indx);
2655 t(ddindx).mrp_net_flag := a17(indx);
2656 t(ddindx).mps_required_quantity := a18(indx);
2657 t(ddindx).mps_date_required := a19(indx);
2658 t(ddindx).component_sequence_id := a20(indx);
2659 t(ddindx).comments := a21(indx);
2660 t(ddindx).attribute_category := a22(indx);
2661 t(ddindx).attribute1 := a23(indx);
2662 t(ddindx).attribute2 := a24(indx);
2663 t(ddindx).attribute3 := a25(indx);
2664 t(ddindx).attribute4 := a26(indx);
2665 t(ddindx).attribute5 := a27(indx);
2666 t(ddindx).attribute6 := a28(indx);
2667 t(ddindx).attribute7 := a29(indx);
2668 t(ddindx).attribute8 := a30(indx);
2669 t(ddindx).attribute9 := a31(indx);
2670 t(ddindx).attribute10 := a32(indx);
2671 t(ddindx).attribute11 := a33(indx);
2672 t(ddindx).attribute12 := a34(indx);
2673 t(ddindx).attribute13 := a35(indx);
2674 t(ddindx).attribute14 := a36(indx);
2675 t(ddindx).attribute15 := a37(indx);
2676 t(ddindx).auto_request_material := a38(indx);
2677 t(ddindx).suggested_vendor_name := a39(indx);
2678 t(ddindx).vendor_id := a40(indx);
2679 t(ddindx).unit_price := a41(indx);
2680 t(ddindx).request_id := a42(indx);
2681 t(ddindx).program_application_id := a43(indx);
2682 t(ddindx).program_id := a44(indx);
2683 t(ddindx).program_update_date := a45(indx);
2684 t(ddindx).return_status := a46(indx);
2685 t(ddindx).transaction_type := a47(indx);
2686 t(ddindx).invoke_allocations_api := a48(indx);
2687 ddindx := ddindx+1;
2688 if a0.last =indx
2689 then exit;
2690 end if;
2691 indx := a0.next(indx);
2692 end loop;
2693 end if;
2694 end if;
2695 end rosetta_table_copy_in_p35;
2696 procedure rosetta_table_copy_out_p35(t eam_process_wo_pub.eam_mat_req_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
2697 , a1 out nocopy JTF_NUMBER_TABLE
2698 , a2 out nocopy JTF_NUMBER_TABLE
2699 , a3 out nocopy JTF_NUMBER_TABLE
2700 , a4 out nocopy JTF_NUMBER_TABLE
2701 , a5 out nocopy JTF_NUMBER_TABLE
2702 , a6 out nocopy JTF_NUMBER_TABLE
2703 , a7 out nocopy JTF_NUMBER_TABLE
2704 , a8 out nocopy JTF_NUMBER_TABLE
2705 , a9 out nocopy JTF_NUMBER_TABLE
2706 , a10 out nocopy JTF_DATE_TABLE
2707 , a11 out nocopy JTF_NUMBER_TABLE
2708 , a12 out nocopy JTF_NUMBER_TABLE
2709 , a13 out nocopy JTF_NUMBER_TABLE
2710 , a14 out nocopy JTF_NUMBER_TABLE
2711 , a15 out nocopy JTF_VARCHAR2_TABLE_100
2712 , a16 out nocopy JTF_NUMBER_TABLE
2713 , a17 out nocopy JTF_NUMBER_TABLE
2714 , a18 out nocopy JTF_NUMBER_TABLE
2715 , a19 out nocopy JTF_DATE_TABLE
2716 , a20 out nocopy JTF_NUMBER_TABLE
2717 , a21 out nocopy JTF_VARCHAR2_TABLE_300
2718 , a22 out nocopy JTF_VARCHAR2_TABLE_100
2719 , a23 out nocopy JTF_VARCHAR2_TABLE_200
2720 , a24 out nocopy JTF_VARCHAR2_TABLE_200
2721 , a25 out nocopy JTF_VARCHAR2_TABLE_200
2722 , a26 out nocopy JTF_VARCHAR2_TABLE_200
2723 , a27 out nocopy JTF_VARCHAR2_TABLE_200
2724 , a28 out nocopy JTF_VARCHAR2_TABLE_200
2725 , a29 out nocopy JTF_VARCHAR2_TABLE_200
2726 , a30 out nocopy JTF_VARCHAR2_TABLE_200
2727 , a31 out nocopy JTF_VARCHAR2_TABLE_200
2728 , a32 out nocopy JTF_VARCHAR2_TABLE_200
2729 , a33 out nocopy JTF_VARCHAR2_TABLE_200
2730 , a34 out nocopy JTF_VARCHAR2_TABLE_200
2731 , a35 out nocopy JTF_VARCHAR2_TABLE_200
2732 , a36 out nocopy JTF_VARCHAR2_TABLE_200
2733 , a37 out nocopy JTF_VARCHAR2_TABLE_200
2734 , a38 out nocopy JTF_VARCHAR2_TABLE_100
2735 , a39 out nocopy JTF_VARCHAR2_TABLE_300
2736 , a40 out nocopy JTF_NUMBER_TABLE
2737 , a41 out nocopy JTF_NUMBER_TABLE
2738 , a42 out nocopy JTF_NUMBER_TABLE
2739 , a43 out nocopy JTF_NUMBER_TABLE
2740 , a44 out nocopy JTF_NUMBER_TABLE
2741 , a45 out nocopy JTF_DATE_TABLE
2742 , a46 out nocopy JTF_VARCHAR2_TABLE_100
2743 , a47 out nocopy JTF_NUMBER_TABLE
2744 , a48 out nocopy JTF_VARCHAR2_TABLE_100
2745 ) as
2746 ddindx binary_integer; indx binary_integer;
2747 begin
2748 if t is null or t.count = 0 then
2749 a0 := JTF_NUMBER_TABLE();
2750 a1 := JTF_NUMBER_TABLE();
2751 a2 := JTF_NUMBER_TABLE();
2752 a3 := JTF_NUMBER_TABLE();
2753 a4 := JTF_NUMBER_TABLE();
2754 a5 := JTF_NUMBER_TABLE();
2755 a6 := JTF_NUMBER_TABLE();
2756 a7 := JTF_NUMBER_TABLE();
2757 a8 := JTF_NUMBER_TABLE();
2758 a9 := JTF_NUMBER_TABLE();
2759 a10 := JTF_DATE_TABLE();
2760 a11 := JTF_NUMBER_TABLE();
2761 a12 := JTF_NUMBER_TABLE();
2762 a13 := JTF_NUMBER_TABLE();
2763 a14 := JTF_NUMBER_TABLE();
2764 a15 := JTF_VARCHAR2_TABLE_100();
2765 a16 := JTF_NUMBER_TABLE();
2766 a17 := JTF_NUMBER_TABLE();
2767 a18 := JTF_NUMBER_TABLE();
2768 a19 := JTF_DATE_TABLE();
2769 a20 := JTF_NUMBER_TABLE();
2770 a21 := JTF_VARCHAR2_TABLE_300();
2771 a22 := JTF_VARCHAR2_TABLE_100();
2772 a23 := JTF_VARCHAR2_TABLE_200();
2773 a24 := JTF_VARCHAR2_TABLE_200();
2774 a25 := JTF_VARCHAR2_TABLE_200();
2775 a26 := JTF_VARCHAR2_TABLE_200();
2776 a27 := JTF_VARCHAR2_TABLE_200();
2777 a28 := JTF_VARCHAR2_TABLE_200();
2778 a29 := JTF_VARCHAR2_TABLE_200();
2779 a30 := JTF_VARCHAR2_TABLE_200();
2780 a31 := JTF_VARCHAR2_TABLE_200();
2781 a32 := JTF_VARCHAR2_TABLE_200();
2782 a33 := JTF_VARCHAR2_TABLE_200();
2783 a34 := JTF_VARCHAR2_TABLE_200();
2784 a35 := JTF_VARCHAR2_TABLE_200();
2785 a36 := JTF_VARCHAR2_TABLE_200();
2786 a37 := JTF_VARCHAR2_TABLE_200();
2787 a38 := JTF_VARCHAR2_TABLE_100();
2788 a39 := JTF_VARCHAR2_TABLE_300();
2789 a40 := JTF_NUMBER_TABLE();
2790 a41 := JTF_NUMBER_TABLE();
2791 a42 := JTF_NUMBER_TABLE();
2792 a43 := JTF_NUMBER_TABLE();
2793 a44 := JTF_NUMBER_TABLE();
2794 a45 := JTF_DATE_TABLE();
2795 a46 := JTF_VARCHAR2_TABLE_100();
2796 a47 := JTF_NUMBER_TABLE();
2797 a48 := JTF_VARCHAR2_TABLE_100();
2798 else
2799 a0 := JTF_NUMBER_TABLE();
2800 a1 := JTF_NUMBER_TABLE();
2801 a2 := JTF_NUMBER_TABLE();
2802 a3 := JTF_NUMBER_TABLE();
2803 a4 := JTF_NUMBER_TABLE();
2804 a5 := JTF_NUMBER_TABLE();
2805 a6 := JTF_NUMBER_TABLE();
2806 a7 := JTF_NUMBER_TABLE();
2807 a8 := JTF_NUMBER_TABLE();
2808 a9 := JTF_NUMBER_TABLE();
2809 a10 := JTF_DATE_TABLE();
2810 a11 := JTF_NUMBER_TABLE();
2811 a12 := JTF_NUMBER_TABLE();
2812 a13 := JTF_NUMBER_TABLE();
2813 a14 := JTF_NUMBER_TABLE();
2814 a15 := JTF_VARCHAR2_TABLE_100();
2815 a16 := JTF_NUMBER_TABLE();
2816 a17 := JTF_NUMBER_TABLE();
2817 a18 := JTF_NUMBER_TABLE();
2818 a19 := JTF_DATE_TABLE();
2819 a20 := JTF_NUMBER_TABLE();
2820 a21 := JTF_VARCHAR2_TABLE_300();
2821 a22 := JTF_VARCHAR2_TABLE_100();
2822 a23 := JTF_VARCHAR2_TABLE_200();
2823 a24 := JTF_VARCHAR2_TABLE_200();
2824 a25 := JTF_VARCHAR2_TABLE_200();
2825 a26 := JTF_VARCHAR2_TABLE_200();
2826 a27 := JTF_VARCHAR2_TABLE_200();
2827 a28 := JTF_VARCHAR2_TABLE_200();
2828 a29 := JTF_VARCHAR2_TABLE_200();
2829 a30 := JTF_VARCHAR2_TABLE_200();
2830 a31 := JTF_VARCHAR2_TABLE_200();
2831 a32 := JTF_VARCHAR2_TABLE_200();
2832 a33 := JTF_VARCHAR2_TABLE_200();
2833 a34 := JTF_VARCHAR2_TABLE_200();
2834 a35 := JTF_VARCHAR2_TABLE_200();
2835 a36 := JTF_VARCHAR2_TABLE_200();
2836 a37 := JTF_VARCHAR2_TABLE_200();
2837 a38 := JTF_VARCHAR2_TABLE_100();
2838 a39 := JTF_VARCHAR2_TABLE_300();
2839 a40 := JTF_NUMBER_TABLE();
2840 a41 := JTF_NUMBER_TABLE();
2841 a42 := JTF_NUMBER_TABLE();
2842 a43 := JTF_NUMBER_TABLE();
2843 a44 := JTF_NUMBER_TABLE();
2844 a45 := JTF_DATE_TABLE();
2845 a46 := JTF_VARCHAR2_TABLE_100();
2846 a47 := JTF_NUMBER_TABLE();
2847 a48 := JTF_VARCHAR2_TABLE_100();
2848 if t.count > 0 then
2849 a0.extend(t.count);
2850 a1.extend(t.count);
2851 a2.extend(t.count);
2852 a3.extend(t.count);
2853 a4.extend(t.count);
2854 a5.extend(t.count);
2855 a6.extend(t.count);
2856 a7.extend(t.count);
2857 a8.extend(t.count);
2858 a9.extend(t.count);
2859 a10.extend(t.count);
2860 a11.extend(t.count);
2861 a12.extend(t.count);
2862 a13.extend(t.count);
2863 a14.extend(t.count);
2864 a15.extend(t.count);
2865 a16.extend(t.count);
2866 a17.extend(t.count);
2867 a18.extend(t.count);
2868 a19.extend(t.count);
2869 a20.extend(t.count);
2870 a21.extend(t.count);
2871 a22.extend(t.count);
2872 a23.extend(t.count);
2873 a24.extend(t.count);
2874 a25.extend(t.count);
2875 a26.extend(t.count);
2876 a27.extend(t.count);
2877 a28.extend(t.count);
2878 a29.extend(t.count);
2879 a30.extend(t.count);
2880 a31.extend(t.count);
2881 a32.extend(t.count);
2882 a33.extend(t.count);
2883 a34.extend(t.count);
2884 a35.extend(t.count);
2885 a36.extend(t.count);
2886 a37.extend(t.count);
2887 a38.extend(t.count);
2888 a39.extend(t.count);
2889 a40.extend(t.count);
2890 a41.extend(t.count);
2891 a42.extend(t.count);
2892 a43.extend(t.count);
2893 a44.extend(t.count);
2894 a45.extend(t.count);
2895 a46.extend(t.count);
2896 a47.extend(t.count);
2897 a48.extend(t.count);
2898 ddindx := t.first;
2899 indx := 1;
2900 while true loop
2901 a0(indx) := t(ddindx).header_id;
2902 a1(indx) := t(ddindx).batch_id;
2903 a2(indx) := t(ddindx).row_id;
2904 a3(indx) := t(ddindx).wip_entity_id;
2905 a4(indx) := t(ddindx).organization_id;
2906 a5(indx) := t(ddindx).operation_seq_num;
2907 a6(indx) := t(ddindx).inventory_item_id;
2908 a7(indx) := t(ddindx).quantity_per_assembly;
2909 a8(indx) := t(ddindx).department_id;
2910 a9(indx) := t(ddindx).wip_supply_type;
2911 a10(indx) := t(ddindx).date_required;
2912 a11(indx) := t(ddindx).required_quantity;
2913 a12(indx) := t(ddindx).requested_quantity;
2914 a13(indx) := t(ddindx).released_quantity;
2915 a14(indx) := t(ddindx).quantity_issued;
2916 a15(indx) := t(ddindx).supply_subinventory;
2917 a16(indx) := t(ddindx).supply_locator_id;
2918 a17(indx) := t(ddindx).mrp_net_flag;
2919 a18(indx) := t(ddindx).mps_required_quantity;
2920 a19(indx) := t(ddindx).mps_date_required;
2921 a20(indx) := t(ddindx).component_sequence_id;
2922 a21(indx) := t(ddindx).comments;
2923 a22(indx) := t(ddindx).attribute_category;
2924 a23(indx) := t(ddindx).attribute1;
2925 a24(indx) := t(ddindx).attribute2;
2926 a25(indx) := t(ddindx).attribute3;
2927 a26(indx) := t(ddindx).attribute4;
2928 a27(indx) := t(ddindx).attribute5;
2929 a28(indx) := t(ddindx).attribute6;
2930 a29(indx) := t(ddindx).attribute7;
2931 a30(indx) := t(ddindx).attribute8;
2932 a31(indx) := t(ddindx).attribute9;
2933 a32(indx) := t(ddindx).attribute10;
2934 a33(indx) := t(ddindx).attribute11;
2935 a34(indx) := t(ddindx).attribute12;
2936 a35(indx) := t(ddindx).attribute13;
2937 a36(indx) := t(ddindx).attribute14;
2938 a37(indx) := t(ddindx).attribute15;
2939 a38(indx) := t(ddindx).auto_request_material;
2940 a39(indx) := t(ddindx).suggested_vendor_name;
2941 a40(indx) := t(ddindx).vendor_id;
2942 a41(indx) := t(ddindx).unit_price;
2943 a42(indx) := t(ddindx).request_id;
2944 a43(indx) := t(ddindx).program_application_id;
2945 a44(indx) := t(ddindx).program_id;
2946 a45(indx) := t(ddindx).program_update_date;
2947 a46(indx) := t(ddindx).return_status;
2948 a47(indx) := t(ddindx).transaction_type;
2949 a48(indx) := t(ddindx).invoke_allocations_api;
2950 indx := indx+1;
2951 if t.last =ddindx
2952 then exit;
2953 end if;
2954 ddindx := t.next(ddindx);
2955 end loop;
2956 end if;
2957 end if;
2958 end rosetta_table_copy_out_p35;
2959
2960 procedure rosetta_table_copy_in_p36(t out nocopy eam_process_wo_pub.eam_direct_items_tbl_type, a0 JTF_NUMBER_TABLE
2961 , a1 JTF_NUMBER_TABLE
2962 , a2 JTF_NUMBER_TABLE
2963 , a3 JTF_VARCHAR2_TABLE_300
2964 , a4 JTF_NUMBER_TABLE
2965 , a5 JTF_NUMBER_TABLE
2966 , a6 JTF_NUMBER_TABLE
2967 , a7 JTF_NUMBER_TABLE
2968 , a8 JTF_NUMBER_TABLE
2969 , a9 JTF_NUMBER_TABLE
2970 , a10 JTF_VARCHAR2_TABLE_300
2971 , a11 JTF_NUMBER_TABLE
2972 , a12 JTF_VARCHAR2_TABLE_100
2973 , a13 JTF_NUMBER_TABLE
2974 , a14 JTF_VARCHAR2_TABLE_100
2975 , a15 JTF_NUMBER_TABLE
2976 , a16 JTF_VARCHAR2_TABLE_100
2977 , a17 JTF_VARCHAR2_TABLE_100
2978 , a18 JTF_NUMBER_TABLE
2979 , a19 JTF_VARCHAR2_TABLE_100
2980 , a20 JTF_NUMBER_TABLE
2981 , a21 JTF_NUMBER_TABLE
2982 , a22 JTF_VARCHAR2_TABLE_100
2983 , a23 JTF_DATE_TABLE
2984 , a24 JTF_VARCHAR2_TABLE_100
2985 , a25 JTF_VARCHAR2_TABLE_200
2986 , a26 JTF_VARCHAR2_TABLE_200
2987 , a27 JTF_VARCHAR2_TABLE_200
2988 , a28 JTF_VARCHAR2_TABLE_200
2989 , a29 JTF_VARCHAR2_TABLE_200
2990 , a30 JTF_VARCHAR2_TABLE_200
2991 , a31 JTF_VARCHAR2_TABLE_200
2992 , a32 JTF_VARCHAR2_TABLE_200
2993 , a33 JTF_VARCHAR2_TABLE_200
2994 , a34 JTF_VARCHAR2_TABLE_200
2995 , a35 JTF_VARCHAR2_TABLE_200
2996 , a36 JTF_VARCHAR2_TABLE_200
2997 , a37 JTF_VARCHAR2_TABLE_200
2998 , a38 JTF_VARCHAR2_TABLE_200
2999 , a39 JTF_VARCHAR2_TABLE_200
3000 , a40 JTF_NUMBER_TABLE
3001 , a41 JTF_NUMBER_TABLE
3002 , a42 JTF_DATE_TABLE
3003 , a43 JTF_NUMBER_TABLE
3004 , a44 JTF_VARCHAR2_TABLE_100
3005 , a45 JTF_NUMBER_TABLE
3006 ) as
3007 ddindx binary_integer; indx binary_integer;
3008 begin
3009 if a0 is not null and a0.count > 0 then
3010 if a0.count > 0 then
3011 indx := a0.first;
3012 ddindx := 1;
3013 while true loop
3014 t(ddindx).header_id := a0(indx);
3015 t(ddindx).batch_id := a1(indx);
3016 t(ddindx).row_id := a2(indx);
3017 t(ddindx).description := a3(indx);
3018 t(ddindx).purchasing_category_id := a4(indx);
3019 t(ddindx).direct_item_sequence_id := a5(indx);
3020 t(ddindx).operation_seq_num := a6(indx);
3021 t(ddindx).department_id := a7(indx);
3022 t(ddindx).wip_entity_id := a8(indx);
3023 t(ddindx).organization_id := a9(indx);
3024 t(ddindx).suggested_vendor_name := a10(indx);
3025 t(ddindx).suggested_vendor_id := a11(indx);
3026 t(ddindx).suggested_vendor_site := a12(indx);
3027 t(ddindx).suggested_vendor_site_id := a13(indx);
3028 t(ddindx).suggested_vendor_contact := a14(indx);
3029 t(ddindx).suggested_vendor_contact_id := a15(indx);
3030 t(ddindx).suggested_vendor_phone := a16(indx);
3031 t(ddindx).suggested_vendor_item_num := a17(indx);
3032 t(ddindx).unit_price := a18(indx);
3033 t(ddindx).auto_request_material := a19(indx);
3034 t(ddindx).required_quantity := a20(indx);
3035 t(ddindx).requested_quantity := a21(indx);
3036 t(ddindx).uom := a22(indx);
3037 t(ddindx).need_by_date := a23(indx);
3038 t(ddindx).attribute_category := a24(indx);
3039 t(ddindx).attribute1 := a25(indx);
3040 t(ddindx).attribute2 := a26(indx);
3041 t(ddindx).attribute3 := a27(indx);
3042 t(ddindx).attribute4 := a28(indx);
3043 t(ddindx).attribute5 := a29(indx);
3044 t(ddindx).attribute6 := a30(indx);
3045 t(ddindx).attribute7 := a31(indx);
3046 t(ddindx).attribute8 := a32(indx);
3047 t(ddindx).attribute9 := a33(indx);
3048 t(ddindx).attribute10 := a34(indx);
3049 t(ddindx).attribute11 := a35(indx);
3050 t(ddindx).attribute12 := a36(indx);
3051 t(ddindx).attribute13 := a37(indx);
3052 t(ddindx).attribute14 := a38(indx);
3053 t(ddindx).attribute15 := a39(indx);
3054 t(ddindx).program_application_id := a40(indx);
3055 t(ddindx).program_id := a41(indx);
3056 t(ddindx).program_update_date := a42(indx);
3057 t(ddindx).request_id := a43(indx);
3058 t(ddindx).return_status := a44(indx);
3059 t(ddindx).transaction_type := a45(indx);
3060 ddindx := ddindx+1;
3061 if a0.last =indx
3062 then exit;
3063 end if;
3064 indx := a0.next(indx);
3065 end loop;
3066 end if;
3067 end if;
3068 end rosetta_table_copy_in_p36;
3069 procedure rosetta_table_copy_out_p36(t eam_process_wo_pub.eam_direct_items_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
3070 , a1 out nocopy JTF_NUMBER_TABLE
3071 , a2 out nocopy JTF_NUMBER_TABLE
3072 , a3 out nocopy JTF_VARCHAR2_TABLE_300
3073 , a4 out nocopy JTF_NUMBER_TABLE
3074 , a5 out nocopy JTF_NUMBER_TABLE
3075 , a6 out nocopy JTF_NUMBER_TABLE
3076 , a7 out nocopy JTF_NUMBER_TABLE
3077 , a8 out nocopy JTF_NUMBER_TABLE
3078 , a9 out nocopy JTF_NUMBER_TABLE
3079 , a10 out nocopy JTF_VARCHAR2_TABLE_300
3080 , a11 out nocopy JTF_NUMBER_TABLE
3081 , a12 out nocopy JTF_VARCHAR2_TABLE_100
3082 , a13 out nocopy JTF_NUMBER_TABLE
3083 , a14 out nocopy JTF_VARCHAR2_TABLE_100
3084 , a15 out nocopy JTF_NUMBER_TABLE
3085 , a16 out nocopy JTF_VARCHAR2_TABLE_100
3086 , a17 out nocopy JTF_VARCHAR2_TABLE_100
3087 , a18 out nocopy JTF_NUMBER_TABLE
3088 , a19 out nocopy JTF_VARCHAR2_TABLE_100
3089 , a20 out nocopy JTF_NUMBER_TABLE
3090 , a21 out nocopy JTF_NUMBER_TABLE
3091 , a22 out nocopy JTF_VARCHAR2_TABLE_100
3092 , a23 out nocopy JTF_DATE_TABLE
3093 , a24 out nocopy JTF_VARCHAR2_TABLE_100
3094 , a25 out nocopy JTF_VARCHAR2_TABLE_200
3095 , a26 out nocopy JTF_VARCHAR2_TABLE_200
3096 , a27 out nocopy JTF_VARCHAR2_TABLE_200
3097 , a28 out nocopy JTF_VARCHAR2_TABLE_200
3098 , a29 out nocopy JTF_VARCHAR2_TABLE_200
3099 , a30 out nocopy JTF_VARCHAR2_TABLE_200
3100 , a31 out nocopy JTF_VARCHAR2_TABLE_200
3101 , a32 out nocopy JTF_VARCHAR2_TABLE_200
3102 , a33 out nocopy JTF_VARCHAR2_TABLE_200
3103 , a34 out nocopy JTF_VARCHAR2_TABLE_200
3104 , a35 out nocopy JTF_VARCHAR2_TABLE_200
3105 , a36 out nocopy JTF_VARCHAR2_TABLE_200
3106 , a37 out nocopy JTF_VARCHAR2_TABLE_200
3107 , a38 out nocopy JTF_VARCHAR2_TABLE_200
3108 , a39 out nocopy JTF_VARCHAR2_TABLE_200
3109 , a40 out nocopy JTF_NUMBER_TABLE
3110 , a41 out nocopy JTF_NUMBER_TABLE
3111 , a42 out nocopy JTF_DATE_TABLE
3112 , a43 out nocopy JTF_NUMBER_TABLE
3113 , a44 out nocopy JTF_VARCHAR2_TABLE_100
3114 , a45 out nocopy JTF_NUMBER_TABLE
3115 ) as
3116 ddindx binary_integer; indx binary_integer;
3117 begin
3118 if t is null or t.count = 0 then
3119 a0 := JTF_NUMBER_TABLE();
3120 a1 := JTF_NUMBER_TABLE();
3121 a2 := JTF_NUMBER_TABLE();
3122 a3 := JTF_VARCHAR2_TABLE_300();
3123 a4 := JTF_NUMBER_TABLE();
3124 a5 := JTF_NUMBER_TABLE();
3125 a6 := JTF_NUMBER_TABLE();
3126 a7 := JTF_NUMBER_TABLE();
3127 a8 := JTF_NUMBER_TABLE();
3128 a9 := JTF_NUMBER_TABLE();
3129 a10 := JTF_VARCHAR2_TABLE_300();
3130 a11 := JTF_NUMBER_TABLE();
3131 a12 := JTF_VARCHAR2_TABLE_100();
3132 a13 := JTF_NUMBER_TABLE();
3133 a14 := JTF_VARCHAR2_TABLE_100();
3134 a15 := JTF_NUMBER_TABLE();
3135 a16 := JTF_VARCHAR2_TABLE_100();
3136 a17 := JTF_VARCHAR2_TABLE_100();
3137 a18 := JTF_NUMBER_TABLE();
3138 a19 := JTF_VARCHAR2_TABLE_100();
3139 a20 := JTF_NUMBER_TABLE();
3140 a21 := JTF_NUMBER_TABLE();
3141 a22 := JTF_VARCHAR2_TABLE_100();
3142 a23 := JTF_DATE_TABLE();
3143 a24 := JTF_VARCHAR2_TABLE_100();
3144 a25 := JTF_VARCHAR2_TABLE_200();
3145 a26 := JTF_VARCHAR2_TABLE_200();
3146 a27 := JTF_VARCHAR2_TABLE_200();
3147 a28 := JTF_VARCHAR2_TABLE_200();
3148 a29 := JTF_VARCHAR2_TABLE_200();
3149 a30 := JTF_VARCHAR2_TABLE_200();
3150 a31 := JTF_VARCHAR2_TABLE_200();
3151 a32 := JTF_VARCHAR2_TABLE_200();
3152 a33 := JTF_VARCHAR2_TABLE_200();
3153 a34 := JTF_VARCHAR2_TABLE_200();
3154 a35 := JTF_VARCHAR2_TABLE_200();
3155 a36 := JTF_VARCHAR2_TABLE_200();
3156 a37 := JTF_VARCHAR2_TABLE_200();
3157 a38 := JTF_VARCHAR2_TABLE_200();
3158 a39 := JTF_VARCHAR2_TABLE_200();
3159 a40 := JTF_NUMBER_TABLE();
3160 a41 := JTF_NUMBER_TABLE();
3161 a42 := JTF_DATE_TABLE();
3162 a43 := JTF_NUMBER_TABLE();
3163 a44 := JTF_VARCHAR2_TABLE_100();
3164 a45 := JTF_NUMBER_TABLE();
3165 else
3166 a0 := JTF_NUMBER_TABLE();
3167 a1 := JTF_NUMBER_TABLE();
3168 a2 := JTF_NUMBER_TABLE();
3169 a3 := JTF_VARCHAR2_TABLE_300();
3170 a4 := JTF_NUMBER_TABLE();
3171 a5 := JTF_NUMBER_TABLE();
3172 a6 := JTF_NUMBER_TABLE();
3173 a7 := JTF_NUMBER_TABLE();
3174 a8 := JTF_NUMBER_TABLE();
3175 a9 := JTF_NUMBER_TABLE();
3176 a10 := JTF_VARCHAR2_TABLE_300();
3177 a11 := JTF_NUMBER_TABLE();
3178 a12 := JTF_VARCHAR2_TABLE_100();
3179 a13 := JTF_NUMBER_TABLE();
3180 a14 := JTF_VARCHAR2_TABLE_100();
3181 a15 := JTF_NUMBER_TABLE();
3182 a16 := JTF_VARCHAR2_TABLE_100();
3183 a17 := JTF_VARCHAR2_TABLE_100();
3184 a18 := JTF_NUMBER_TABLE();
3185 a19 := JTF_VARCHAR2_TABLE_100();
3186 a20 := JTF_NUMBER_TABLE();
3187 a21 := JTF_NUMBER_TABLE();
3188 a22 := JTF_VARCHAR2_TABLE_100();
3189 a23 := JTF_DATE_TABLE();
3190 a24 := JTF_VARCHAR2_TABLE_100();
3191 a25 := JTF_VARCHAR2_TABLE_200();
3192 a26 := JTF_VARCHAR2_TABLE_200();
3193 a27 := JTF_VARCHAR2_TABLE_200();
3194 a28 := JTF_VARCHAR2_TABLE_200();
3195 a29 := JTF_VARCHAR2_TABLE_200();
3196 a30 := JTF_VARCHAR2_TABLE_200();
3197 a31 := JTF_VARCHAR2_TABLE_200();
3198 a32 := JTF_VARCHAR2_TABLE_200();
3199 a33 := JTF_VARCHAR2_TABLE_200();
3200 a34 := JTF_VARCHAR2_TABLE_200();
3201 a35 := JTF_VARCHAR2_TABLE_200();
3202 a36 := JTF_VARCHAR2_TABLE_200();
3203 a37 := JTF_VARCHAR2_TABLE_200();
3204 a38 := JTF_VARCHAR2_TABLE_200();
3205 a39 := JTF_VARCHAR2_TABLE_200();
3206 a40 := JTF_NUMBER_TABLE();
3207 a41 := JTF_NUMBER_TABLE();
3208 a42 := JTF_DATE_TABLE();
3209 a43 := JTF_NUMBER_TABLE();
3210 a44 := JTF_VARCHAR2_TABLE_100();
3211 a45 := JTF_NUMBER_TABLE();
3212 if t.count > 0 then
3213 a0.extend(t.count);
3214 a1.extend(t.count);
3215 a2.extend(t.count);
3216 a3.extend(t.count);
3217 a4.extend(t.count);
3218 a5.extend(t.count);
3219 a6.extend(t.count);
3220 a7.extend(t.count);
3221 a8.extend(t.count);
3222 a9.extend(t.count);
3223 a10.extend(t.count);
3224 a11.extend(t.count);
3225 a12.extend(t.count);
3226 a13.extend(t.count);
3227 a14.extend(t.count);
3228 a15.extend(t.count);
3229 a16.extend(t.count);
3230 a17.extend(t.count);
3231 a18.extend(t.count);
3232 a19.extend(t.count);
3233 a20.extend(t.count);
3234 a21.extend(t.count);
3235 a22.extend(t.count);
3236 a23.extend(t.count);
3237 a24.extend(t.count);
3238 a25.extend(t.count);
3239 a26.extend(t.count);
3240 a27.extend(t.count);
3241 a28.extend(t.count);
3242 a29.extend(t.count);
3243 a30.extend(t.count);
3244 a31.extend(t.count);
3245 a32.extend(t.count);
3246 a33.extend(t.count);
3247 a34.extend(t.count);
3248 a35.extend(t.count);
3249 a36.extend(t.count);
3250 a37.extend(t.count);
3251 a38.extend(t.count);
3252 a39.extend(t.count);
3253 a40.extend(t.count);
3254 a41.extend(t.count);
3255 a42.extend(t.count);
3256 a43.extend(t.count);
3257 a44.extend(t.count);
3258 a45.extend(t.count);
3259 ddindx := t.first;
3260 indx := 1;
3261 while true loop
3262 a0(indx) := t(ddindx).header_id;
3263 a1(indx) := t(ddindx).batch_id;
3264 a2(indx) := t(ddindx).row_id;
3265 a3(indx) := t(ddindx).description;
3266 a4(indx) := t(ddindx).purchasing_category_id;
3267 a5(indx) := t(ddindx).direct_item_sequence_id;
3268 a6(indx) := t(ddindx).operation_seq_num;
3269 a7(indx) := t(ddindx).department_id;
3270 a8(indx) := t(ddindx).wip_entity_id;
3271 a9(indx) := t(ddindx).organization_id;
3272 a10(indx) := t(ddindx).suggested_vendor_name;
3273 a11(indx) := t(ddindx).suggested_vendor_id;
3274 a12(indx) := t(ddindx).suggested_vendor_site;
3275 a13(indx) := t(ddindx).suggested_vendor_site_id;
3276 a14(indx) := t(ddindx).suggested_vendor_contact;
3277 a15(indx) := t(ddindx).suggested_vendor_contact_id;
3278 a16(indx) := t(ddindx).suggested_vendor_phone;
3279 a17(indx) := t(ddindx).suggested_vendor_item_num;
3280 a18(indx) := t(ddindx).unit_price;
3281 a19(indx) := t(ddindx).auto_request_material;
3282 a20(indx) := t(ddindx).required_quantity;
3283 a21(indx) := t(ddindx).requested_quantity;
3284 a22(indx) := t(ddindx).uom;
3285 a23(indx) := t(ddindx).need_by_date;
3286 a24(indx) := t(ddindx).attribute_category;
3287 a25(indx) := t(ddindx).attribute1;
3288 a26(indx) := t(ddindx).attribute2;
3289 a27(indx) := t(ddindx).attribute3;
3290 a28(indx) := t(ddindx).attribute4;
3291 a29(indx) := t(ddindx).attribute5;
3292 a30(indx) := t(ddindx).attribute6;
3293 a31(indx) := t(ddindx).attribute7;
3294 a32(indx) := t(ddindx).attribute8;
3295 a33(indx) := t(ddindx).attribute9;
3296 a34(indx) := t(ddindx).attribute10;
3297 a35(indx) := t(ddindx).attribute11;
3298 a36(indx) := t(ddindx).attribute12;
3299 a37(indx) := t(ddindx).attribute13;
3300 a38(indx) := t(ddindx).attribute14;
3301 a39(indx) := t(ddindx).attribute15;
3302 a40(indx) := t(ddindx).program_application_id;
3303 a41(indx) := t(ddindx).program_id;
3304 a42(indx) := t(ddindx).program_update_date;
3305 a43(indx) := t(ddindx).request_id;
3306 a44(indx) := t(ddindx).return_status;
3307 a45(indx) := t(ddindx).transaction_type;
3308 indx := indx+1;
3309 if t.last =ddindx
3310 then exit;
3311 end if;
3312 ddindx := t.next(ddindx);
3313 end loop;
3314 end if;
3315 end if;
3316 end rosetta_table_copy_out_p36;
3317
3318 procedure rosetta_table_copy_in_p37(t out nocopy eam_process_wo_pub.eam_wo_comp_tbl_type, a0 JTF_NUMBER_TABLE
3319 , a1 JTF_NUMBER_TABLE
3320 , a2 JTF_NUMBER_TABLE
3321 , a3 JTF_NUMBER_TABLE
3322 , a4 JTF_DATE_TABLE
3323 , a5 JTF_NUMBER_TABLE
3324 , a6 JTF_NUMBER_TABLE
3325 , a7 JTF_VARCHAR2_TABLE_300
3326 , a8 JTF_NUMBER_TABLE
3327 , a9 JTF_NUMBER_TABLE
3328 , a10 JTF_VARCHAR2_TABLE_300
3329 , a11 JTF_VARCHAR2_TABLE_100
3330 , a12 JTF_NUMBER_TABLE
3331 , a13 JTF_NUMBER_TABLE
3332 , a14 JTF_DATE_TABLE
3333 , a15 JTF_DATE_TABLE
3334 , a16 JTF_NUMBER_TABLE
3335 , a17 JTF_NUMBER_TABLE
3336 , a18 JTF_NUMBER_TABLE
3337 , a19 JTF_NUMBER_TABLE
3338 , a20 JTF_VARCHAR2_TABLE_100
3339 , a21 JTF_VARCHAR2_TABLE_100
3340 , a22 JTF_VARCHAR2_TABLE_100
3341 , a23 JTF_VARCHAR2_TABLE_100
3342 , a24 JTF_VARCHAR2_TABLE_100
3343 , a25 JTF_NUMBER_TABLE
3344 , a26 JTF_VARCHAR2_TABLE_100
3345 , a27 JTF_DATE_TABLE
3346 , a28 JTF_DATE_TABLE
3347 , a29 JTF_VARCHAR2_TABLE_100
3348 , a30 JTF_VARCHAR2_TABLE_200
3349 , a31 JTF_VARCHAR2_TABLE_200
3350 , a32 JTF_VARCHAR2_TABLE_200
3351 , a33 JTF_VARCHAR2_TABLE_200
3352 , a34 JTF_VARCHAR2_TABLE_200
3353 , a35 JTF_VARCHAR2_TABLE_200
3354 , a36 JTF_VARCHAR2_TABLE_200
3355 , a37 JTF_VARCHAR2_TABLE_200
3356 , a38 JTF_VARCHAR2_TABLE_200
3357 , a39 JTF_VARCHAR2_TABLE_200
3358 , a40 JTF_VARCHAR2_TABLE_200
3359 , a41 JTF_VARCHAR2_TABLE_200
3360 , a42 JTF_VARCHAR2_TABLE_200
3361 , a43 JTF_VARCHAR2_TABLE_200
3362 , a44 JTF_VARCHAR2_TABLE_200
3363 , a45 JTF_NUMBER_TABLE
3364 , a46 JTF_DATE_TABLE
3365 , a47 JTF_NUMBER_TABLE
3366 , a48 JTF_NUMBER_TABLE
3367 , a49 JTF_VARCHAR2_TABLE_100
3368 , a50 JTF_NUMBER_TABLE
3369 ) as
3370 ddindx binary_integer; indx binary_integer;
3371 begin
3372 if a0 is not null and a0.count > 0 then
3373 if a0.count > 0 then
3374 indx := a0.first;
3375 ddindx := 1;
3376 while true loop
3377 t(ddindx).header_id := a0(indx);
3378 t(ddindx).batch_id := a1(indx);
3379 t(ddindx).row_id := a2(indx);
3380 t(ddindx).transaction_id := a3(indx);
3381 t(ddindx).transaction_date := a4(indx);
3382 t(ddindx).wip_entity_id := a5(indx);
3383 t(ddindx).user_status_id := a6(indx);
3384 t(ddindx).wip_entity_name := a7(indx);
3385 t(ddindx).organization_id := a8(indx);
3386 t(ddindx).parent_wip_entity_id := a9(indx);
3387 t(ddindx).reference := a10(indx);
3388 t(ddindx).reconciliation_code := a11(indx);
3389 t(ddindx).acct_period_id := a12(indx);
3390 t(ddindx).qa_collection_id := a13(indx);
3391 t(ddindx).actual_start_date := a14(indx);
3392 t(ddindx).actual_end_date := a15(indx);
3393 t(ddindx).actual_duration := a16(indx);
3394 t(ddindx).primary_item_id := a17(indx);
3395 t(ddindx).asset_group_id := a18(indx);
3396 t(ddindx).rebuild_item_id := a19(indx);
3397 t(ddindx).asset_number := a20(indx);
3398 t(ddindx).rebuild_serial_number := a21(indx);
3399 t(ddindx).manual_rebuild_flag := a22(indx);
3400 t(ddindx).rebuild_job := a23(indx);
3401 t(ddindx).completion_subinventory := a24(indx);
3402 t(ddindx).completion_locator_id := a25(indx);
3403 t(ddindx).lot_number := a26(indx);
3404 t(ddindx).shutdown_start_date := a27(indx);
3405 t(ddindx).shutdown_end_date := a28(indx);
3406 t(ddindx).attribute_category := a29(indx);
3407 t(ddindx).attribute1 := a30(indx);
3408 t(ddindx).attribute2 := a31(indx);
3409 t(ddindx).attribute3 := a32(indx);
3410 t(ddindx).attribute4 := a33(indx);
3411 t(ddindx).attribute5 := a34(indx);
3412 t(ddindx).attribute6 := a35(indx);
3413 t(ddindx).attribute7 := a36(indx);
3414 t(ddindx).attribute8 := a37(indx);
3415 t(ddindx).attribute9 := a38(indx);
3416 t(ddindx).attribute10 := a39(indx);
3417 t(ddindx).attribute11 := a40(indx);
3418 t(ddindx).attribute12 := a41(indx);
3419 t(ddindx).attribute13 := a42(indx);
3420 t(ddindx).attribute14 := a43(indx);
3421 t(ddindx).attribute15 := a44(indx);
3422 t(ddindx).request_id := a45(indx);
3423 t(ddindx).program_update_date := a46(indx);
3424 t(ddindx).program_application_id := a47(indx);
3425 t(ddindx).program_id := a48(indx);
3426 t(ddindx).return_status := a49(indx);
3427 t(ddindx).transaction_type := a50(indx);
3428 ddindx := ddindx+1;
3429 if a0.last =indx
3430 then exit;
3431 end if;
3432 indx := a0.next(indx);
3433 end loop;
3434 end if;
3435 end if;
3436 end rosetta_table_copy_in_p37;
3437 procedure rosetta_table_copy_out_p37(t eam_process_wo_pub.eam_wo_comp_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
3438 , a1 out nocopy JTF_NUMBER_TABLE
3439 , a2 out nocopy JTF_NUMBER_TABLE
3440 , a3 out nocopy JTF_NUMBER_TABLE
3441 , a4 out nocopy JTF_DATE_TABLE
3442 , a5 out nocopy JTF_NUMBER_TABLE
3443 , a6 out nocopy JTF_NUMBER_TABLE
3444 , a7 out nocopy JTF_VARCHAR2_TABLE_300
3445 , a8 out nocopy JTF_NUMBER_TABLE
3446 , a9 out nocopy JTF_NUMBER_TABLE
3447 , a10 out nocopy JTF_VARCHAR2_TABLE_300
3448 , a11 out nocopy JTF_VARCHAR2_TABLE_100
3449 , a12 out nocopy JTF_NUMBER_TABLE
3450 , a13 out nocopy JTF_NUMBER_TABLE
3451 , a14 out nocopy JTF_DATE_TABLE
3452 , a15 out nocopy JTF_DATE_TABLE
3453 , a16 out nocopy JTF_NUMBER_TABLE
3454 , a17 out nocopy JTF_NUMBER_TABLE
3455 , a18 out nocopy JTF_NUMBER_TABLE
3456 , a19 out nocopy JTF_NUMBER_TABLE
3457 , a20 out nocopy JTF_VARCHAR2_TABLE_100
3458 , a21 out nocopy JTF_VARCHAR2_TABLE_100
3459 , a22 out nocopy JTF_VARCHAR2_TABLE_100
3460 , a23 out nocopy JTF_VARCHAR2_TABLE_100
3461 , a24 out nocopy JTF_VARCHAR2_TABLE_100
3462 , a25 out nocopy JTF_NUMBER_TABLE
3463 , a26 out nocopy JTF_VARCHAR2_TABLE_100
3464 , a27 out nocopy JTF_DATE_TABLE
3465 , a28 out nocopy JTF_DATE_TABLE
3466 , a29 out nocopy JTF_VARCHAR2_TABLE_100
3467 , a30 out nocopy JTF_VARCHAR2_TABLE_200
3468 , a31 out nocopy JTF_VARCHAR2_TABLE_200
3469 , a32 out nocopy JTF_VARCHAR2_TABLE_200
3470 , a33 out nocopy JTF_VARCHAR2_TABLE_200
3471 , a34 out nocopy JTF_VARCHAR2_TABLE_200
3472 , a35 out nocopy JTF_VARCHAR2_TABLE_200
3473 , a36 out nocopy JTF_VARCHAR2_TABLE_200
3474 , a37 out nocopy JTF_VARCHAR2_TABLE_200
3475 , a38 out nocopy JTF_VARCHAR2_TABLE_200
3476 , a39 out nocopy JTF_VARCHAR2_TABLE_200
3477 , a40 out nocopy JTF_VARCHAR2_TABLE_200
3478 , a41 out nocopy JTF_VARCHAR2_TABLE_200
3479 , a42 out nocopy JTF_VARCHAR2_TABLE_200
3480 , a43 out nocopy JTF_VARCHAR2_TABLE_200
3481 , a44 out nocopy JTF_VARCHAR2_TABLE_200
3482 , a45 out nocopy JTF_NUMBER_TABLE
3483 , a46 out nocopy JTF_DATE_TABLE
3484 , a47 out nocopy JTF_NUMBER_TABLE
3485 , a48 out nocopy JTF_NUMBER_TABLE
3486 , a49 out nocopy JTF_VARCHAR2_TABLE_100
3487 , a50 out nocopy JTF_NUMBER_TABLE
3488 ) as
3489 ddindx binary_integer; indx binary_integer;
3490 begin
3491 if t is null or t.count = 0 then
3492 a0 := JTF_NUMBER_TABLE();
3493 a1 := JTF_NUMBER_TABLE();
3494 a2 := JTF_NUMBER_TABLE();
3495 a3 := JTF_NUMBER_TABLE();
3496 a4 := JTF_DATE_TABLE();
3497 a5 := JTF_NUMBER_TABLE();
3498 a6 := JTF_NUMBER_TABLE();
3499 a7 := JTF_VARCHAR2_TABLE_300();
3500 a8 := JTF_NUMBER_TABLE();
3501 a9 := JTF_NUMBER_TABLE();
3502 a10 := JTF_VARCHAR2_TABLE_300();
3503 a11 := JTF_VARCHAR2_TABLE_100();
3504 a12 := JTF_NUMBER_TABLE();
3505 a13 := JTF_NUMBER_TABLE();
3506 a14 := JTF_DATE_TABLE();
3507 a15 := JTF_DATE_TABLE();
3508 a16 := JTF_NUMBER_TABLE();
3509 a17 := JTF_NUMBER_TABLE();
3510 a18 := JTF_NUMBER_TABLE();
3511 a19 := JTF_NUMBER_TABLE();
3512 a20 := JTF_VARCHAR2_TABLE_100();
3513 a21 := JTF_VARCHAR2_TABLE_100();
3514 a22 := JTF_VARCHAR2_TABLE_100();
3515 a23 := JTF_VARCHAR2_TABLE_100();
3516 a24 := JTF_VARCHAR2_TABLE_100();
3517 a25 := JTF_NUMBER_TABLE();
3518 a26 := JTF_VARCHAR2_TABLE_100();
3519 a27 := JTF_DATE_TABLE();
3520 a28 := JTF_DATE_TABLE();
3521 a29 := JTF_VARCHAR2_TABLE_100();
3522 a30 := JTF_VARCHAR2_TABLE_200();
3523 a31 := JTF_VARCHAR2_TABLE_200();
3524 a32 := JTF_VARCHAR2_TABLE_200();
3525 a33 := JTF_VARCHAR2_TABLE_200();
3526 a34 := JTF_VARCHAR2_TABLE_200();
3527 a35 := JTF_VARCHAR2_TABLE_200();
3528 a36 := JTF_VARCHAR2_TABLE_200();
3529 a37 := JTF_VARCHAR2_TABLE_200();
3530 a38 := JTF_VARCHAR2_TABLE_200();
3531 a39 := JTF_VARCHAR2_TABLE_200();
3532 a40 := JTF_VARCHAR2_TABLE_200();
3533 a41 := JTF_VARCHAR2_TABLE_200();
3534 a42 := JTF_VARCHAR2_TABLE_200();
3535 a43 := JTF_VARCHAR2_TABLE_200();
3536 a44 := JTF_VARCHAR2_TABLE_200();
3537 a45 := JTF_NUMBER_TABLE();
3538 a46 := JTF_DATE_TABLE();
3539 a47 := JTF_NUMBER_TABLE();
3540 a48 := JTF_NUMBER_TABLE();
3541 a49 := JTF_VARCHAR2_TABLE_100();
3542 a50 := JTF_NUMBER_TABLE();
3543 else
3544 a0 := JTF_NUMBER_TABLE();
3545 a1 := JTF_NUMBER_TABLE();
3546 a2 := JTF_NUMBER_TABLE();
3547 a3 := JTF_NUMBER_TABLE();
3548 a4 := JTF_DATE_TABLE();
3549 a5 := JTF_NUMBER_TABLE();
3550 a6 := JTF_NUMBER_TABLE();
3551 a7 := JTF_VARCHAR2_TABLE_300();
3552 a8 := JTF_NUMBER_TABLE();
3553 a9 := JTF_NUMBER_TABLE();
3554 a10 := JTF_VARCHAR2_TABLE_300();
3555 a11 := JTF_VARCHAR2_TABLE_100();
3556 a12 := JTF_NUMBER_TABLE();
3557 a13 := JTF_NUMBER_TABLE();
3558 a14 := JTF_DATE_TABLE();
3559 a15 := JTF_DATE_TABLE();
3560 a16 := JTF_NUMBER_TABLE();
3561 a17 := JTF_NUMBER_TABLE();
3562 a18 := JTF_NUMBER_TABLE();
3563 a19 := JTF_NUMBER_TABLE();
3564 a20 := JTF_VARCHAR2_TABLE_100();
3565 a21 := JTF_VARCHAR2_TABLE_100();
3566 a22 := JTF_VARCHAR2_TABLE_100();
3567 a23 := JTF_VARCHAR2_TABLE_100();
3568 a24 := JTF_VARCHAR2_TABLE_100();
3569 a25 := JTF_NUMBER_TABLE();
3570 a26 := JTF_VARCHAR2_TABLE_100();
3571 a27 := JTF_DATE_TABLE();
3572 a28 := JTF_DATE_TABLE();
3573 a29 := JTF_VARCHAR2_TABLE_100();
3574 a30 := JTF_VARCHAR2_TABLE_200();
3575 a31 := JTF_VARCHAR2_TABLE_200();
3576 a32 := JTF_VARCHAR2_TABLE_200();
3577 a33 := JTF_VARCHAR2_TABLE_200();
3578 a34 := JTF_VARCHAR2_TABLE_200();
3579 a35 := JTF_VARCHAR2_TABLE_200();
3580 a36 := JTF_VARCHAR2_TABLE_200();
3581 a37 := JTF_VARCHAR2_TABLE_200();
3582 a38 := JTF_VARCHAR2_TABLE_200();
3583 a39 := JTF_VARCHAR2_TABLE_200();
3584 a40 := JTF_VARCHAR2_TABLE_200();
3585 a41 := JTF_VARCHAR2_TABLE_200();
3586 a42 := JTF_VARCHAR2_TABLE_200();
3587 a43 := JTF_VARCHAR2_TABLE_200();
3588 a44 := JTF_VARCHAR2_TABLE_200();
3589 a45 := JTF_NUMBER_TABLE();
3590 a46 := JTF_DATE_TABLE();
3591 a47 := JTF_NUMBER_TABLE();
3592 a48 := JTF_NUMBER_TABLE();
3593 a49 := JTF_VARCHAR2_TABLE_100();
3594 a50 := JTF_NUMBER_TABLE();
3595 if t.count > 0 then
3596 a0.extend(t.count);
3597 a1.extend(t.count);
3598 a2.extend(t.count);
3599 a3.extend(t.count);
3600 a4.extend(t.count);
3601 a5.extend(t.count);
3602 a6.extend(t.count);
3603 a7.extend(t.count);
3604 a8.extend(t.count);
3605 a9.extend(t.count);
3606 a10.extend(t.count);
3607 a11.extend(t.count);
3608 a12.extend(t.count);
3609 a13.extend(t.count);
3610 a14.extend(t.count);
3611 a15.extend(t.count);
3612 a16.extend(t.count);
3613 a17.extend(t.count);
3614 a18.extend(t.count);
3615 a19.extend(t.count);
3616 a20.extend(t.count);
3617 a21.extend(t.count);
3618 a22.extend(t.count);
3619 a23.extend(t.count);
3620 a24.extend(t.count);
3621 a25.extend(t.count);
3622 a26.extend(t.count);
3623 a27.extend(t.count);
3624 a28.extend(t.count);
3625 a29.extend(t.count);
3626 a30.extend(t.count);
3627 a31.extend(t.count);
3628 a32.extend(t.count);
3629 a33.extend(t.count);
3630 a34.extend(t.count);
3631 a35.extend(t.count);
3632 a36.extend(t.count);
3633 a37.extend(t.count);
3634 a38.extend(t.count);
3635 a39.extend(t.count);
3636 a40.extend(t.count);
3637 a41.extend(t.count);
3638 a42.extend(t.count);
3639 a43.extend(t.count);
3640 a44.extend(t.count);
3641 a45.extend(t.count);
3642 a46.extend(t.count);
3643 a47.extend(t.count);
3644 a48.extend(t.count);
3645 a49.extend(t.count);
3646 a50.extend(t.count);
3647 ddindx := t.first;
3648 indx := 1;
3649 while true loop
3650 a0(indx) := t(ddindx).header_id;
3651 a1(indx) := t(ddindx).batch_id;
3652 a2(indx) := t(ddindx).row_id;
3653 a3(indx) := t(ddindx).transaction_id;
3654 a4(indx) := t(ddindx).transaction_date;
3655 a5(indx) := t(ddindx).wip_entity_id;
3656 a6(indx) := t(ddindx).user_status_id;
3657 a7(indx) := t(ddindx).wip_entity_name;
3658 a8(indx) := t(ddindx).organization_id;
3659 a9(indx) := t(ddindx).parent_wip_entity_id;
3660 a10(indx) := t(ddindx).reference;
3661 a11(indx) := t(ddindx).reconciliation_code;
3662 a12(indx) := t(ddindx).acct_period_id;
3663 a13(indx) := t(ddindx).qa_collection_id;
3664 a14(indx) := t(ddindx).actual_start_date;
3665 a15(indx) := t(ddindx).actual_end_date;
3666 a16(indx) := t(ddindx).actual_duration;
3667 a17(indx) := t(ddindx).primary_item_id;
3668 a18(indx) := t(ddindx).asset_group_id;
3669 a19(indx) := t(ddindx).rebuild_item_id;
3670 a20(indx) := t(ddindx).asset_number;
3671 a21(indx) := t(ddindx).rebuild_serial_number;
3672 a22(indx) := t(ddindx).manual_rebuild_flag;
3673 a23(indx) := t(ddindx).rebuild_job;
3674 a24(indx) := t(ddindx).completion_subinventory;
3675 a25(indx) := t(ddindx).completion_locator_id;
3676 a26(indx) := t(ddindx).lot_number;
3677 a27(indx) := t(ddindx).shutdown_start_date;
3678 a28(indx) := t(ddindx).shutdown_end_date;
3679 a29(indx) := t(ddindx).attribute_category;
3680 a30(indx) := t(ddindx).attribute1;
3681 a31(indx) := t(ddindx).attribute2;
3682 a32(indx) := t(ddindx).attribute3;
3683 a33(indx) := t(ddindx).attribute4;
3684 a34(indx) := t(ddindx).attribute5;
3685 a35(indx) := t(ddindx).attribute6;
3686 a36(indx) := t(ddindx).attribute7;
3687 a37(indx) := t(ddindx).attribute8;
3688 a38(indx) := t(ddindx).attribute9;
3689 a39(indx) := t(ddindx).attribute10;
3690 a40(indx) := t(ddindx).attribute11;
3691 a41(indx) := t(ddindx).attribute12;
3692 a42(indx) := t(ddindx).attribute13;
3693 a43(indx) := t(ddindx).attribute14;
3694 a44(indx) := t(ddindx).attribute15;
3695 a45(indx) := t(ddindx).request_id;
3696 a46(indx) := t(ddindx).program_update_date;
3697 a47(indx) := t(ddindx).program_application_id;
3698 a48(indx) := t(ddindx).program_id;
3699 a49(indx) := t(ddindx).return_status;
3700 a50(indx) := t(ddindx).transaction_type;
3701 indx := indx+1;
3702 if t.last =ddindx
3703 then exit;
3704 end if;
3705 ddindx := t.next(ddindx);
3706 end loop;
3707 end if;
3708 end if;
3709 end rosetta_table_copy_out_p37;
3710
3711 procedure rosetta_table_copy_in_p38(t out nocopy eam_process_wo_pub.eam_op_comp_tbl_type, a0 JTF_NUMBER_TABLE
3712 , a1 JTF_NUMBER_TABLE
3713 , a2 JTF_NUMBER_TABLE
3714 , a3 JTF_NUMBER_TABLE
3715 , a4 JTF_DATE_TABLE
3716 , a5 JTF_NUMBER_TABLE
3717 , a6 JTF_NUMBER_TABLE
3718 , a7 JTF_NUMBER_TABLE
3719 , a8 JTF_NUMBER_TABLE
3720 , a9 JTF_VARCHAR2_TABLE_300
3721 , a10 JTF_VARCHAR2_TABLE_100
3722 , a11 JTF_NUMBER_TABLE
3723 , a12 JTF_NUMBER_TABLE
3724 , a13 JTF_DATE_TABLE
3725 , a14 JTF_DATE_TABLE
3726 , a15 JTF_NUMBER_TABLE
3727 , a16 JTF_DATE_TABLE
3728 , a17 JTF_DATE_TABLE
3729 , a18 JTF_NUMBER_TABLE
3730 , a19 JTF_NUMBER_TABLE
3731 , a20 JTF_NUMBER_TABLE
3732 , a21 JTF_NUMBER_TABLE
3733 , a22 JTF_NUMBER_TABLE
3734 , a23 JTF_VARCHAR2_TABLE_300
3735 , a24 JTF_VARCHAR2_TABLE_100
3736 , a25 JTF_VARCHAR2_TABLE_200
3737 , a26 JTF_VARCHAR2_TABLE_200
3738 , a27 JTF_VARCHAR2_TABLE_200
3739 , a28 JTF_VARCHAR2_TABLE_200
3740 , a29 JTF_VARCHAR2_TABLE_200
3741 , a30 JTF_VARCHAR2_TABLE_200
3742 , a31 JTF_VARCHAR2_TABLE_200
3743 , a32 JTF_VARCHAR2_TABLE_200
3744 , a33 JTF_VARCHAR2_TABLE_200
3745 , a34 JTF_VARCHAR2_TABLE_200
3746 , a35 JTF_VARCHAR2_TABLE_200
3747 , a36 JTF_VARCHAR2_TABLE_200
3748 , a37 JTF_VARCHAR2_TABLE_200
3749 , a38 JTF_VARCHAR2_TABLE_200
3750 , a39 JTF_VARCHAR2_TABLE_200
3751 , a40 JTF_NUMBER_TABLE
3752 , a41 JTF_DATE_TABLE
3753 , a42 JTF_NUMBER_TABLE
3754 , a43 JTF_NUMBER_TABLE
3755 , a44 JTF_VARCHAR2_TABLE_100
3756 , a45 JTF_NUMBER_TABLE
3757 ) as
3758 ddindx binary_integer; indx binary_integer;
3759 begin
3760 if a0 is not null and a0.count > 0 then
3761 if a0.count > 0 then
3762 indx := a0.first;
3763 ddindx := 1;
3764 while true loop
3765 t(ddindx).header_id := a0(indx);
3766 t(ddindx).batch_id := a1(indx);
3767 t(ddindx).row_id := a2(indx);
3768 t(ddindx).transaction_id := a3(indx);
3769 t(ddindx).transaction_date := a4(indx);
3770 t(ddindx).wip_entity_id := a5(indx);
3771 t(ddindx).organization_id := a6(indx);
3772 t(ddindx).operation_seq_num := a7(indx);
3773 t(ddindx).department_id := a8(indx);
3774 t(ddindx).reference := a9(indx);
3775 t(ddindx).reconciliation_code := a10(indx);
3776 t(ddindx).acct_period_id := a11(indx);
3777 t(ddindx).qa_collection_id := a12(indx);
3778 t(ddindx).actual_start_date := a13(indx);
3779 t(ddindx).actual_end_date := a14(indx);
3780 t(ddindx).actual_duration := a15(indx);
3781 t(ddindx).shutdown_start_date := a16(indx);
3782 t(ddindx).shutdown_end_date := a17(indx);
3783 t(ddindx).handover_operation_seq_num := a18(indx);
3784 t(ddindx).reason_id := a19(indx);
3785 t(ddindx).vendor_contact_id := a20(indx);
3786 t(ddindx).vendor_id := a21(indx);
3787 t(ddindx).vendor_site_id := a22(indx);
3788 t(ddindx).transaction_reference := a23(indx);
3789 t(ddindx).attribute_category := a24(indx);
3790 t(ddindx).attribute1 := a25(indx);
3791 t(ddindx).attribute2 := a26(indx);
3792 t(ddindx).attribute3 := a27(indx);
3793 t(ddindx).attribute4 := a28(indx);
3794 t(ddindx).attribute5 := a29(indx);
3795 t(ddindx).attribute6 := a30(indx);
3796 t(ddindx).attribute7 := a31(indx);
3797 t(ddindx).attribute8 := a32(indx);
3798 t(ddindx).attribute9 := a33(indx);
3799 t(ddindx).attribute10 := a34(indx);
3800 t(ddindx).attribute11 := a35(indx);
3801 t(ddindx).attribute12 := a36(indx);
3802 t(ddindx).attribute13 := a37(indx);
3803 t(ddindx).attribute14 := a38(indx);
3804 t(ddindx).attribute15 := a39(indx);
3805 t(ddindx).request_id := a40(indx);
3806 t(ddindx).program_update_date := a41(indx);
3807 t(ddindx).program_application_id := a42(indx);
3808 t(ddindx).program_id := a43(indx);
3809 t(ddindx).return_status := a44(indx);
3810 t(ddindx).transaction_type := a45(indx);
3811 ddindx := ddindx+1;
3812 if a0.last =indx
3813 then exit;
3814 end if;
3815 indx := a0.next(indx);
3816 end loop;
3817 end if;
3818 end if;
3819 end rosetta_table_copy_in_p38;
3820 procedure rosetta_table_copy_out_p38(t eam_process_wo_pub.eam_op_comp_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
3821 , a1 out nocopy JTF_NUMBER_TABLE
3822 , a2 out nocopy JTF_NUMBER_TABLE
3823 , a3 out nocopy JTF_NUMBER_TABLE
3824 , a4 out nocopy JTF_DATE_TABLE
3825 , a5 out nocopy JTF_NUMBER_TABLE
3826 , a6 out nocopy JTF_NUMBER_TABLE
3827 , a7 out nocopy JTF_NUMBER_TABLE
3828 , a8 out nocopy JTF_NUMBER_TABLE
3829 , a9 out nocopy JTF_VARCHAR2_TABLE_300
3830 , a10 out nocopy JTF_VARCHAR2_TABLE_100
3831 , a11 out nocopy JTF_NUMBER_TABLE
3832 , a12 out nocopy JTF_NUMBER_TABLE
3833 , a13 out nocopy JTF_DATE_TABLE
3834 , a14 out nocopy JTF_DATE_TABLE
3835 , a15 out nocopy JTF_NUMBER_TABLE
3836 , a16 out nocopy JTF_DATE_TABLE
3837 , a17 out nocopy JTF_DATE_TABLE
3838 , a18 out nocopy JTF_NUMBER_TABLE
3839 , a19 out nocopy JTF_NUMBER_TABLE
3840 , a20 out nocopy JTF_NUMBER_TABLE
3841 , a21 out nocopy JTF_NUMBER_TABLE
3842 , a22 out nocopy JTF_NUMBER_TABLE
3843 , a23 out nocopy JTF_VARCHAR2_TABLE_300
3844 , a24 out nocopy JTF_VARCHAR2_TABLE_100
3845 , a25 out nocopy JTF_VARCHAR2_TABLE_200
3846 , a26 out nocopy JTF_VARCHAR2_TABLE_200
3847 , a27 out nocopy JTF_VARCHAR2_TABLE_200
3848 , a28 out nocopy JTF_VARCHAR2_TABLE_200
3849 , a29 out nocopy JTF_VARCHAR2_TABLE_200
3850 , a30 out nocopy JTF_VARCHAR2_TABLE_200
3851 , a31 out nocopy JTF_VARCHAR2_TABLE_200
3852 , a32 out nocopy JTF_VARCHAR2_TABLE_200
3853 , a33 out nocopy JTF_VARCHAR2_TABLE_200
3854 , a34 out nocopy JTF_VARCHAR2_TABLE_200
3855 , a35 out nocopy JTF_VARCHAR2_TABLE_200
3856 , a36 out nocopy JTF_VARCHAR2_TABLE_200
3857 , a37 out nocopy JTF_VARCHAR2_TABLE_200
3858 , a38 out nocopy JTF_VARCHAR2_TABLE_200
3859 , a39 out nocopy JTF_VARCHAR2_TABLE_200
3860 , a40 out nocopy JTF_NUMBER_TABLE
3861 , a41 out nocopy JTF_DATE_TABLE
3862 , a42 out nocopy JTF_NUMBER_TABLE
3863 , a43 out nocopy JTF_NUMBER_TABLE
3864 , a44 out nocopy JTF_VARCHAR2_TABLE_100
3865 , a45 out nocopy JTF_NUMBER_TABLE
3866 ) as
3867 ddindx binary_integer; indx binary_integer;
3868 begin
3869 if t is null or t.count = 0 then
3870 a0 := JTF_NUMBER_TABLE();
3871 a1 := JTF_NUMBER_TABLE();
3872 a2 := JTF_NUMBER_TABLE();
3873 a3 := JTF_NUMBER_TABLE();
3874 a4 := JTF_DATE_TABLE();
3875 a5 := JTF_NUMBER_TABLE();
3876 a6 := JTF_NUMBER_TABLE();
3877 a7 := JTF_NUMBER_TABLE();
3878 a8 := JTF_NUMBER_TABLE();
3879 a9 := JTF_VARCHAR2_TABLE_300();
3880 a10 := JTF_VARCHAR2_TABLE_100();
3881 a11 := JTF_NUMBER_TABLE();
3882 a12 := JTF_NUMBER_TABLE();
3883 a13 := JTF_DATE_TABLE();
3884 a14 := JTF_DATE_TABLE();
3885 a15 := JTF_NUMBER_TABLE();
3886 a16 := JTF_DATE_TABLE();
3887 a17 := JTF_DATE_TABLE();
3888 a18 := JTF_NUMBER_TABLE();
3889 a19 := JTF_NUMBER_TABLE();
3890 a20 := JTF_NUMBER_TABLE();
3891 a21 := JTF_NUMBER_TABLE();
3892 a22 := JTF_NUMBER_TABLE();
3893 a23 := JTF_VARCHAR2_TABLE_300();
3894 a24 := JTF_VARCHAR2_TABLE_100();
3895 a25 := JTF_VARCHAR2_TABLE_200();
3896 a26 := JTF_VARCHAR2_TABLE_200();
3897 a27 := JTF_VARCHAR2_TABLE_200();
3898 a28 := JTF_VARCHAR2_TABLE_200();
3899 a29 := JTF_VARCHAR2_TABLE_200();
3900 a30 := JTF_VARCHAR2_TABLE_200();
3901 a31 := JTF_VARCHAR2_TABLE_200();
3902 a32 := JTF_VARCHAR2_TABLE_200();
3903 a33 := JTF_VARCHAR2_TABLE_200();
3904 a34 := JTF_VARCHAR2_TABLE_200();
3905 a35 := JTF_VARCHAR2_TABLE_200();
3906 a36 := JTF_VARCHAR2_TABLE_200();
3907 a37 := JTF_VARCHAR2_TABLE_200();
3908 a38 := JTF_VARCHAR2_TABLE_200();
3909 a39 := JTF_VARCHAR2_TABLE_200();
3910 a40 := JTF_NUMBER_TABLE();
3911 a41 := JTF_DATE_TABLE();
3912 a42 := JTF_NUMBER_TABLE();
3913 a43 := JTF_NUMBER_TABLE();
3914 a44 := JTF_VARCHAR2_TABLE_100();
3915 a45 := JTF_NUMBER_TABLE();
3916 else
3917 a0 := JTF_NUMBER_TABLE();
3918 a1 := JTF_NUMBER_TABLE();
3919 a2 := JTF_NUMBER_TABLE();
3920 a3 := JTF_NUMBER_TABLE();
3921 a4 := JTF_DATE_TABLE();
3922 a5 := JTF_NUMBER_TABLE();
3923 a6 := JTF_NUMBER_TABLE();
3924 a7 := JTF_NUMBER_TABLE();
3925 a8 := JTF_NUMBER_TABLE();
3926 a9 := JTF_VARCHAR2_TABLE_300();
3927 a10 := JTF_VARCHAR2_TABLE_100();
3928 a11 := JTF_NUMBER_TABLE();
3929 a12 := JTF_NUMBER_TABLE();
3930 a13 := JTF_DATE_TABLE();
3931 a14 := JTF_DATE_TABLE();
3932 a15 := JTF_NUMBER_TABLE();
3933 a16 := JTF_DATE_TABLE();
3934 a17 := JTF_DATE_TABLE();
3935 a18 := JTF_NUMBER_TABLE();
3936 a19 := JTF_NUMBER_TABLE();
3937 a20 := JTF_NUMBER_TABLE();
3938 a21 := JTF_NUMBER_TABLE();
3939 a22 := JTF_NUMBER_TABLE();
3940 a23 := JTF_VARCHAR2_TABLE_300();
3941 a24 := JTF_VARCHAR2_TABLE_100();
3942 a25 := JTF_VARCHAR2_TABLE_200();
3943 a26 := JTF_VARCHAR2_TABLE_200();
3944 a27 := JTF_VARCHAR2_TABLE_200();
3945 a28 := JTF_VARCHAR2_TABLE_200();
3946 a29 := JTF_VARCHAR2_TABLE_200();
3947 a30 := JTF_VARCHAR2_TABLE_200();
3948 a31 := JTF_VARCHAR2_TABLE_200();
3949 a32 := JTF_VARCHAR2_TABLE_200();
3950 a33 := JTF_VARCHAR2_TABLE_200();
3951 a34 := JTF_VARCHAR2_TABLE_200();
3952 a35 := JTF_VARCHAR2_TABLE_200();
3953 a36 := JTF_VARCHAR2_TABLE_200();
3954 a37 := JTF_VARCHAR2_TABLE_200();
3955 a38 := JTF_VARCHAR2_TABLE_200();
3956 a39 := JTF_VARCHAR2_TABLE_200();
3957 a40 := JTF_NUMBER_TABLE();
3958 a41 := JTF_DATE_TABLE();
3959 a42 := JTF_NUMBER_TABLE();
3960 a43 := JTF_NUMBER_TABLE();
3961 a44 := JTF_VARCHAR2_TABLE_100();
3962 a45 := JTF_NUMBER_TABLE();
3963 if t.count > 0 then
3964 a0.extend(t.count);
3965 a1.extend(t.count);
3966 a2.extend(t.count);
3967 a3.extend(t.count);
3968 a4.extend(t.count);
3969 a5.extend(t.count);
3970 a6.extend(t.count);
3971 a7.extend(t.count);
3972 a8.extend(t.count);
3973 a9.extend(t.count);
3974 a10.extend(t.count);
3975 a11.extend(t.count);
3976 a12.extend(t.count);
3977 a13.extend(t.count);
3978 a14.extend(t.count);
3979 a15.extend(t.count);
3980 a16.extend(t.count);
3981 a17.extend(t.count);
3982 a18.extend(t.count);
3983 a19.extend(t.count);
3984 a20.extend(t.count);
3985 a21.extend(t.count);
3986 a22.extend(t.count);
3987 a23.extend(t.count);
3988 a24.extend(t.count);
3989 a25.extend(t.count);
3990 a26.extend(t.count);
3991 a27.extend(t.count);
3992 a28.extend(t.count);
3993 a29.extend(t.count);
3994 a30.extend(t.count);
3995 a31.extend(t.count);
3996 a32.extend(t.count);
3997 a33.extend(t.count);
3998 a34.extend(t.count);
3999 a35.extend(t.count);
4000 a36.extend(t.count);
4001 a37.extend(t.count);
4002 a38.extend(t.count);
4003 a39.extend(t.count);
4004 a40.extend(t.count);
4005 a41.extend(t.count);
4006 a42.extend(t.count);
4007 a43.extend(t.count);
4008 a44.extend(t.count);
4009 a45.extend(t.count);
4010 ddindx := t.first;
4011 indx := 1;
4012 while true loop
4013 a0(indx) := t(ddindx).header_id;
4014 a1(indx) := t(ddindx).batch_id;
4015 a2(indx) := t(ddindx).row_id;
4016 a3(indx) := t(ddindx).transaction_id;
4017 a4(indx) := t(ddindx).transaction_date;
4018 a5(indx) := t(ddindx).wip_entity_id;
4019 a6(indx) := t(ddindx).organization_id;
4020 a7(indx) := t(ddindx).operation_seq_num;
4021 a8(indx) := t(ddindx).department_id;
4022 a9(indx) := t(ddindx).reference;
4023 a10(indx) := t(ddindx).reconciliation_code;
4024 a11(indx) := t(ddindx).acct_period_id;
4025 a12(indx) := t(ddindx).qa_collection_id;
4026 a13(indx) := t(ddindx).actual_start_date;
4027 a14(indx) := t(ddindx).actual_end_date;
4028 a15(indx) := t(ddindx).actual_duration;
4029 a16(indx) := t(ddindx).shutdown_start_date;
4030 a17(indx) := t(ddindx).shutdown_end_date;
4031 a18(indx) := t(ddindx).handover_operation_seq_num;
4032 a19(indx) := t(ddindx).reason_id;
4033 a20(indx) := t(ddindx).vendor_contact_id;
4034 a21(indx) := t(ddindx).vendor_id;
4035 a22(indx) := t(ddindx).vendor_site_id;
4036 a23(indx) := t(ddindx).transaction_reference;
4037 a24(indx) := t(ddindx).attribute_category;
4038 a25(indx) := t(ddindx).attribute1;
4039 a26(indx) := t(ddindx).attribute2;
4040 a27(indx) := t(ddindx).attribute3;
4041 a28(indx) := t(ddindx).attribute4;
4042 a29(indx) := t(ddindx).attribute5;
4043 a30(indx) := t(ddindx).attribute6;
4044 a31(indx) := t(ddindx).attribute7;
4045 a32(indx) := t(ddindx).attribute8;
4046 a33(indx) := t(ddindx).attribute9;
4047 a34(indx) := t(ddindx).attribute10;
4048 a35(indx) := t(ddindx).attribute11;
4049 a36(indx) := t(ddindx).attribute12;
4050 a37(indx) := t(ddindx).attribute13;
4051 a38(indx) := t(ddindx).attribute14;
4052 a39(indx) := t(ddindx).attribute15;
4053 a40(indx) := t(ddindx).request_id;
4054 a41(indx) := t(ddindx).program_update_date;
4055 a42(indx) := t(ddindx).program_application_id;
4056 a43(indx) := t(ddindx).program_id;
4057 a44(indx) := t(ddindx).return_status;
4058 a45(indx) := t(ddindx).transaction_type;
4059 indx := indx+1;
4060 if t.last =ddindx
4061 then exit;
4062 end if;
4063 ddindx := t.next(ddindx);
4064 end loop;
4065 end if;
4066 end if;
4067 end rosetta_table_copy_out_p38;
4068
4069 procedure rosetta_table_copy_in_p39(t out nocopy eam_process_wo_pub.eam_meter_reading_tbl_type, a0 JTF_NUMBER_TABLE
4070 , a1 JTF_NUMBER_TABLE
4071 , a2 JTF_NUMBER_TABLE
4072 , a3 JTF_NUMBER_TABLE
4073 , a4 JTF_NUMBER_TABLE
4074 , a5 JTF_NUMBER_TABLE
4075 , a6 JTF_NUMBER_TABLE
4076 , a7 JTF_DATE_TABLE
4077 , a8 JTF_DATE_TABLE
4078 , a9 JTF_VARCHAR2_TABLE_100
4079 , a10 JTF_NUMBER_TABLE
4080 , a11 JTF_VARCHAR2_TABLE_100
4081 , a12 JTF_VARCHAR2_TABLE_100
4082 , a13 JTF_VARCHAR2_TABLE_200
4083 , a14 JTF_VARCHAR2_TABLE_200
4084 , a15 JTF_VARCHAR2_TABLE_200
4085 , a16 JTF_VARCHAR2_TABLE_200
4086 , a17 JTF_VARCHAR2_TABLE_200
4087 , a18 JTF_VARCHAR2_TABLE_200
4088 , a19 JTF_VARCHAR2_TABLE_200
4089 , a20 JTF_VARCHAR2_TABLE_200
4090 , a21 JTF_VARCHAR2_TABLE_200
4091 , a22 JTF_VARCHAR2_TABLE_200
4092 , a23 JTF_VARCHAR2_TABLE_200
4093 , a24 JTF_VARCHAR2_TABLE_200
4094 , a25 JTF_VARCHAR2_TABLE_200
4095 , a26 JTF_VARCHAR2_TABLE_200
4096 , a27 JTF_VARCHAR2_TABLE_200
4097 , a28 JTF_VARCHAR2_TABLE_200
4098 , a29 JTF_VARCHAR2_TABLE_200
4099 , a30 JTF_VARCHAR2_TABLE_200
4100 , a31 JTF_VARCHAR2_TABLE_200
4101 , a32 JTF_VARCHAR2_TABLE_200
4102 , a33 JTF_VARCHAR2_TABLE_200
4103 , a34 JTF_VARCHAR2_TABLE_200
4104 , a35 JTF_VARCHAR2_TABLE_200
4105 , a36 JTF_VARCHAR2_TABLE_200
4106 , a37 JTF_VARCHAR2_TABLE_200
4107 , a38 JTF_VARCHAR2_TABLE_200
4108 , a39 JTF_VARCHAR2_TABLE_200
4109 , a40 JTF_VARCHAR2_TABLE_200
4110 , a41 JTF_VARCHAR2_TABLE_200
4111 , a42 JTF_VARCHAR2_TABLE_200
4112 , a43 JTF_NUMBER_TABLE
4113 , a44 JTF_VARCHAR2_TABLE_100
4114 , a45 JTF_VARCHAR2_TABLE_100
4115 , a46 JTF_VARCHAR2_TABLE_100
4116 , a47 JTF_NUMBER_TABLE
4117 ) as
4118 ddindx binary_integer; indx binary_integer;
4119 begin
4120 if a0 is not null and a0.count > 0 then
4121 if a0.count > 0 then
4122 indx := a0.first;
4123 ddindx := 1;
4124 while true loop
4125 t(ddindx).header_id := a0(indx);
4126 t(ddindx).batch_id := a1(indx);
4127 t(ddindx).row_id := a2(indx);
4128 t(ddindx).wip_entity_id := a3(indx);
4129 t(ddindx).meter_id := a4(indx);
4130 t(ddindx).meter_reading_id := a5(indx);
4131 t(ddindx).current_reading := a6(indx);
4132 t(ddindx).current_reading_date := a7(indx);
4133 t(ddindx).wo_end_date := a8(indx);
4134 t(ddindx).reset_flag := a9(indx);
4135 t(ddindx).value_before_reset := a10(indx);
4136 t(ddindx).ignore_meter_warnings := a11(indx);
4137 t(ddindx).attribute_category := a12(indx);
4138 t(ddindx).attribute1 := a13(indx);
4139 t(ddindx).attribute2 := a14(indx);
4140 t(ddindx).attribute3 := a15(indx);
4141 t(ddindx).attribute4 := a16(indx);
4142 t(ddindx).attribute5 := a17(indx);
4143 t(ddindx).attribute6 := a18(indx);
4144 t(ddindx).attribute7 := a19(indx);
4145 t(ddindx).attribute8 := a20(indx);
4146 t(ddindx).attribute9 := a21(indx);
4147 t(ddindx).attribute10 := a22(indx);
4148 t(ddindx).attribute11 := a23(indx);
4149 t(ddindx).attribute12 := a24(indx);
4150 t(ddindx).attribute13 := a25(indx);
4151 t(ddindx).attribute14 := a26(indx);
4152 t(ddindx).attribute15 := a27(indx);
4153 t(ddindx).attribute16 := a28(indx);
4154 t(ddindx).attribute17 := a29(indx);
4155 t(ddindx).attribute18 := a30(indx);
4156 t(ddindx).attribute19 := a31(indx);
4157 t(ddindx).attribute20 := a32(indx);
4158 t(ddindx).attribute21 := a33(indx);
4159 t(ddindx).attribute22 := a34(indx);
4160 t(ddindx).attribute23 := a35(indx);
4161 t(ddindx).attribute24 := a36(indx);
4162 t(ddindx).attribute25 := a37(indx);
4163 t(ddindx).attribute26 := a38(indx);
4164 t(ddindx).attribute27 := a39(indx);
4165 t(ddindx).attribute28 := a40(indx);
4166 t(ddindx).attribute29 := a41(indx);
4167 t(ddindx).attribute30 := a42(indx);
4168 t(ddindx).source_line_id := a43(indx);
4169 t(ddindx).source_code := a44(indx);
4170 t(ddindx).wo_entry_fake_flag := a45(indx);
4171 t(ddindx).return_status := a46(indx);
4172 t(ddindx).transaction_type := a47(indx);
4173 ddindx := ddindx+1;
4174 if a0.last =indx
4175 then exit;
4176 end if;
4177 indx := a0.next(indx);
4178 end loop;
4179 end if;
4180 end if;
4181 end rosetta_table_copy_in_p39;
4182 procedure rosetta_table_copy_out_p39(t eam_process_wo_pub.eam_meter_reading_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
4183 , a1 out nocopy JTF_NUMBER_TABLE
4184 , a2 out nocopy JTF_NUMBER_TABLE
4185 , a3 out nocopy JTF_NUMBER_TABLE
4186 , a4 out nocopy JTF_NUMBER_TABLE
4187 , a5 out nocopy JTF_NUMBER_TABLE
4188 , a6 out nocopy JTF_NUMBER_TABLE
4189 , a7 out nocopy JTF_DATE_TABLE
4190 , a8 out nocopy JTF_DATE_TABLE
4191 , a9 out nocopy JTF_VARCHAR2_TABLE_100
4192 , a10 out nocopy JTF_NUMBER_TABLE
4193 , a11 out nocopy JTF_VARCHAR2_TABLE_100
4194 , a12 out nocopy JTF_VARCHAR2_TABLE_100
4195 , a13 out nocopy JTF_VARCHAR2_TABLE_200
4196 , a14 out nocopy JTF_VARCHAR2_TABLE_200
4197 , a15 out nocopy JTF_VARCHAR2_TABLE_200
4198 , a16 out nocopy JTF_VARCHAR2_TABLE_200
4199 , a17 out nocopy JTF_VARCHAR2_TABLE_200
4200 , a18 out nocopy JTF_VARCHAR2_TABLE_200
4201 , a19 out nocopy JTF_VARCHAR2_TABLE_200
4202 , a20 out nocopy JTF_VARCHAR2_TABLE_200
4203 , a21 out nocopy JTF_VARCHAR2_TABLE_200
4204 , a22 out nocopy JTF_VARCHAR2_TABLE_200
4205 , a23 out nocopy JTF_VARCHAR2_TABLE_200
4206 , a24 out nocopy JTF_VARCHAR2_TABLE_200
4207 , a25 out nocopy JTF_VARCHAR2_TABLE_200
4208 , a26 out nocopy JTF_VARCHAR2_TABLE_200
4209 , a27 out nocopy JTF_VARCHAR2_TABLE_200
4210 , a28 out nocopy JTF_VARCHAR2_TABLE_200
4211 , a29 out nocopy JTF_VARCHAR2_TABLE_200
4212 , a30 out nocopy JTF_VARCHAR2_TABLE_200
4213 , a31 out nocopy JTF_VARCHAR2_TABLE_200
4214 , a32 out nocopy JTF_VARCHAR2_TABLE_200
4215 , a33 out nocopy JTF_VARCHAR2_TABLE_200
4216 , a34 out nocopy JTF_VARCHAR2_TABLE_200
4217 , a35 out nocopy JTF_VARCHAR2_TABLE_200
4218 , a36 out nocopy JTF_VARCHAR2_TABLE_200
4219 , a37 out nocopy JTF_VARCHAR2_TABLE_200
4220 , a38 out nocopy JTF_VARCHAR2_TABLE_200
4221 , a39 out nocopy JTF_VARCHAR2_TABLE_200
4222 , a40 out nocopy JTF_VARCHAR2_TABLE_200
4223 , a41 out nocopy JTF_VARCHAR2_TABLE_200
4224 , a42 out nocopy JTF_VARCHAR2_TABLE_200
4225 , a43 out nocopy JTF_NUMBER_TABLE
4226 , a44 out nocopy JTF_VARCHAR2_TABLE_100
4227 , a45 out nocopy JTF_VARCHAR2_TABLE_100
4228 , a46 out nocopy JTF_VARCHAR2_TABLE_100
4229 , a47 out nocopy JTF_NUMBER_TABLE
4230 ) as
4231 ddindx binary_integer; indx binary_integer;
4232 begin
4233 if t is null or t.count = 0 then
4234 a0 := JTF_NUMBER_TABLE();
4235 a1 := JTF_NUMBER_TABLE();
4236 a2 := JTF_NUMBER_TABLE();
4237 a3 := JTF_NUMBER_TABLE();
4238 a4 := JTF_NUMBER_TABLE();
4239 a5 := JTF_NUMBER_TABLE();
4240 a6 := JTF_NUMBER_TABLE();
4241 a7 := JTF_DATE_TABLE();
4242 a8 := JTF_DATE_TABLE();
4243 a9 := JTF_VARCHAR2_TABLE_100();
4244 a10 := JTF_NUMBER_TABLE();
4245 a11 := JTF_VARCHAR2_TABLE_100();
4246 a12 := JTF_VARCHAR2_TABLE_100();
4247 a13 := JTF_VARCHAR2_TABLE_200();
4248 a14 := JTF_VARCHAR2_TABLE_200();
4249 a15 := JTF_VARCHAR2_TABLE_200();
4250 a16 := JTF_VARCHAR2_TABLE_200();
4251 a17 := JTF_VARCHAR2_TABLE_200();
4252 a18 := JTF_VARCHAR2_TABLE_200();
4253 a19 := JTF_VARCHAR2_TABLE_200();
4254 a20 := JTF_VARCHAR2_TABLE_200();
4255 a21 := JTF_VARCHAR2_TABLE_200();
4256 a22 := JTF_VARCHAR2_TABLE_200();
4257 a23 := JTF_VARCHAR2_TABLE_200();
4258 a24 := JTF_VARCHAR2_TABLE_200();
4259 a25 := JTF_VARCHAR2_TABLE_200();
4260 a26 := JTF_VARCHAR2_TABLE_200();
4261 a27 := JTF_VARCHAR2_TABLE_200();
4262 a28 := JTF_VARCHAR2_TABLE_200();
4263 a29 := JTF_VARCHAR2_TABLE_200();
4264 a30 := JTF_VARCHAR2_TABLE_200();
4265 a31 := JTF_VARCHAR2_TABLE_200();
4266 a32 := JTF_VARCHAR2_TABLE_200();
4267 a33 := JTF_VARCHAR2_TABLE_200();
4268 a34 := JTF_VARCHAR2_TABLE_200();
4269 a35 := JTF_VARCHAR2_TABLE_200();
4270 a36 := JTF_VARCHAR2_TABLE_200();
4271 a37 := JTF_VARCHAR2_TABLE_200();
4272 a38 := JTF_VARCHAR2_TABLE_200();
4273 a39 := JTF_VARCHAR2_TABLE_200();
4274 a40 := JTF_VARCHAR2_TABLE_200();
4275 a41 := JTF_VARCHAR2_TABLE_200();
4276 a42 := JTF_VARCHAR2_TABLE_200();
4277 a43 := JTF_NUMBER_TABLE();
4278 a44 := JTF_VARCHAR2_TABLE_100();
4279 a45 := JTF_VARCHAR2_TABLE_100();
4280 a46 := JTF_VARCHAR2_TABLE_100();
4281 a47 := JTF_NUMBER_TABLE();
4282 else
4283 a0 := JTF_NUMBER_TABLE();
4284 a1 := JTF_NUMBER_TABLE();
4285 a2 := JTF_NUMBER_TABLE();
4286 a3 := JTF_NUMBER_TABLE();
4287 a4 := JTF_NUMBER_TABLE();
4288 a5 := JTF_NUMBER_TABLE();
4289 a6 := JTF_NUMBER_TABLE();
4290 a7 := JTF_DATE_TABLE();
4291 a8 := JTF_DATE_TABLE();
4292 a9 := JTF_VARCHAR2_TABLE_100();
4293 a10 := JTF_NUMBER_TABLE();
4294 a11 := JTF_VARCHAR2_TABLE_100();
4295 a12 := JTF_VARCHAR2_TABLE_100();
4296 a13 := JTF_VARCHAR2_TABLE_200();
4297 a14 := JTF_VARCHAR2_TABLE_200();
4298 a15 := JTF_VARCHAR2_TABLE_200();
4299 a16 := JTF_VARCHAR2_TABLE_200();
4300 a17 := JTF_VARCHAR2_TABLE_200();
4301 a18 := JTF_VARCHAR2_TABLE_200();
4302 a19 := JTF_VARCHAR2_TABLE_200();
4303 a20 := JTF_VARCHAR2_TABLE_200();
4304 a21 := JTF_VARCHAR2_TABLE_200();
4305 a22 := JTF_VARCHAR2_TABLE_200();
4306 a23 := JTF_VARCHAR2_TABLE_200();
4307 a24 := JTF_VARCHAR2_TABLE_200();
4308 a25 := JTF_VARCHAR2_TABLE_200();
4309 a26 := JTF_VARCHAR2_TABLE_200();
4310 a27 := JTF_VARCHAR2_TABLE_200();
4311 a28 := JTF_VARCHAR2_TABLE_200();
4312 a29 := JTF_VARCHAR2_TABLE_200();
4313 a30 := JTF_VARCHAR2_TABLE_200();
4314 a31 := JTF_VARCHAR2_TABLE_200();
4315 a32 := JTF_VARCHAR2_TABLE_200();
4316 a33 := JTF_VARCHAR2_TABLE_200();
4317 a34 := JTF_VARCHAR2_TABLE_200();
4318 a35 := JTF_VARCHAR2_TABLE_200();
4319 a36 := JTF_VARCHAR2_TABLE_200();
4320 a37 := JTF_VARCHAR2_TABLE_200();
4321 a38 := JTF_VARCHAR2_TABLE_200();
4322 a39 := JTF_VARCHAR2_TABLE_200();
4323 a40 := JTF_VARCHAR2_TABLE_200();
4324 a41 := JTF_VARCHAR2_TABLE_200();
4325 a42 := JTF_VARCHAR2_TABLE_200();
4326 a43 := JTF_NUMBER_TABLE();
4327 a44 := JTF_VARCHAR2_TABLE_100();
4328 a45 := JTF_VARCHAR2_TABLE_100();
4329 a46 := JTF_VARCHAR2_TABLE_100();
4330 a47 := JTF_NUMBER_TABLE();
4331 if t.count > 0 then
4332 a0.extend(t.count);
4333 a1.extend(t.count);
4334 a2.extend(t.count);
4335 a3.extend(t.count);
4336 a4.extend(t.count);
4337 a5.extend(t.count);
4338 a6.extend(t.count);
4339 a7.extend(t.count);
4340 a8.extend(t.count);
4341 a9.extend(t.count);
4342 a10.extend(t.count);
4343 a11.extend(t.count);
4344 a12.extend(t.count);
4345 a13.extend(t.count);
4346 a14.extend(t.count);
4347 a15.extend(t.count);
4348 a16.extend(t.count);
4349 a17.extend(t.count);
4350 a18.extend(t.count);
4351 a19.extend(t.count);
4352 a20.extend(t.count);
4353 a21.extend(t.count);
4354 a22.extend(t.count);
4355 a23.extend(t.count);
4356 a24.extend(t.count);
4357 a25.extend(t.count);
4358 a26.extend(t.count);
4359 a27.extend(t.count);
4360 a28.extend(t.count);
4361 a29.extend(t.count);
4362 a30.extend(t.count);
4363 a31.extend(t.count);
4364 a32.extend(t.count);
4365 a33.extend(t.count);
4366 a34.extend(t.count);
4367 a35.extend(t.count);
4368 a36.extend(t.count);
4369 a37.extend(t.count);
4370 a38.extend(t.count);
4371 a39.extend(t.count);
4372 a40.extend(t.count);
4373 a41.extend(t.count);
4374 a42.extend(t.count);
4375 a43.extend(t.count);
4376 a44.extend(t.count);
4377 a45.extend(t.count);
4378 a46.extend(t.count);
4379 a47.extend(t.count);
4380 ddindx := t.first;
4381 indx := 1;
4382 while true loop
4383 a0(indx) := t(ddindx).header_id;
4384 a1(indx) := t(ddindx).batch_id;
4385 a2(indx) := t(ddindx).row_id;
4386 a3(indx) := t(ddindx).wip_entity_id;
4387 a4(indx) := t(ddindx).meter_id;
4388 a5(indx) := t(ddindx).meter_reading_id;
4389 a6(indx) := t(ddindx).current_reading;
4390 a7(indx) := t(ddindx).current_reading_date;
4391 a8(indx) := t(ddindx).wo_end_date;
4392 a9(indx) := t(ddindx).reset_flag;
4393 a10(indx) := t(ddindx).value_before_reset;
4394 a11(indx) := t(ddindx).ignore_meter_warnings;
4395 a12(indx) := t(ddindx).attribute_category;
4396 a13(indx) := t(ddindx).attribute1;
4397 a14(indx) := t(ddindx).attribute2;
4398 a15(indx) := t(ddindx).attribute3;
4399 a16(indx) := t(ddindx).attribute4;
4400 a17(indx) := t(ddindx).attribute5;
4401 a18(indx) := t(ddindx).attribute6;
4402 a19(indx) := t(ddindx).attribute7;
4403 a20(indx) := t(ddindx).attribute8;
4404 a21(indx) := t(ddindx).attribute9;
4405 a22(indx) := t(ddindx).attribute10;
4406 a23(indx) := t(ddindx).attribute11;
4407 a24(indx) := t(ddindx).attribute12;
4408 a25(indx) := t(ddindx).attribute13;
4409 a26(indx) := t(ddindx).attribute14;
4410 a27(indx) := t(ddindx).attribute15;
4411 a28(indx) := t(ddindx).attribute16;
4412 a29(indx) := t(ddindx).attribute17;
4413 a30(indx) := t(ddindx).attribute18;
4414 a31(indx) := t(ddindx).attribute19;
4415 a32(indx) := t(ddindx).attribute20;
4416 a33(indx) := t(ddindx).attribute21;
4417 a34(indx) := t(ddindx).attribute22;
4418 a35(indx) := t(ddindx).attribute23;
4419 a36(indx) := t(ddindx).attribute24;
4420 a37(indx) := t(ddindx).attribute25;
4421 a38(indx) := t(ddindx).attribute26;
4422 a39(indx) := t(ddindx).attribute27;
4423 a40(indx) := t(ddindx).attribute28;
4424 a41(indx) := t(ddindx).attribute29;
4425 a42(indx) := t(ddindx).attribute30;
4426 a43(indx) := t(ddindx).source_line_id;
4427 a44(indx) := t(ddindx).source_code;
4428 a45(indx) := t(ddindx).wo_entry_fake_flag;
4429 a46(indx) := t(ddindx).return_status;
4430 a47(indx) := t(ddindx).transaction_type;
4431 indx := indx+1;
4432 if t.last =ddindx
4433 then exit;
4434 end if;
4435 ddindx := t.next(ddindx);
4436 end loop;
4437 end if;
4438 end if;
4439 end rosetta_table_copy_out_p39;
4440
4441 procedure rosetta_table_copy_in_p40(t out nocopy eam_process_wo_pub.eam_counter_prop_tbl_type, a0 JTF_NUMBER_TABLE
4442 , a1 JTF_NUMBER_TABLE
4443 , a2 JTF_NUMBER_TABLE
4444 , a3 JTF_NUMBER_TABLE
4445 , a4 JTF_NUMBER_TABLE
4446 , a5 JTF_NUMBER_TABLE
4447 , a6 JTF_VARCHAR2_TABLE_300
4448 , a7 JTF_DATE_TABLE
4449 , a8 JTF_VARCHAR2_TABLE_100
4450 , a9 JTF_VARCHAR2_TABLE_100
4451 , a10 JTF_VARCHAR2_TABLE_200
4452 , a11 JTF_VARCHAR2_TABLE_200
4453 , a12 JTF_VARCHAR2_TABLE_200
4454 , a13 JTF_VARCHAR2_TABLE_200
4455 , a14 JTF_VARCHAR2_TABLE_200
4456 , a15 JTF_VARCHAR2_TABLE_200
4457 , a16 JTF_VARCHAR2_TABLE_200
4458 , a17 JTF_VARCHAR2_TABLE_200
4459 , a18 JTF_VARCHAR2_TABLE_200
4460 , a19 JTF_VARCHAR2_TABLE_200
4461 , a20 JTF_VARCHAR2_TABLE_200
4462 , a21 JTF_VARCHAR2_TABLE_200
4463 , a22 JTF_VARCHAR2_TABLE_200
4464 , a23 JTF_VARCHAR2_TABLE_200
4465 , a24 JTF_VARCHAR2_TABLE_200
4466 , a25 JTF_VARCHAR2_TABLE_100
4467 , a26 JTF_NUMBER_TABLE
4468 ) as
4469 ddindx binary_integer; indx binary_integer;
4470 begin
4471 if a0 is not null and a0.count > 0 then
4472 if a0.count > 0 then
4473 indx := a0.first;
4474 ddindx := 1;
4475 while true loop
4476 t(ddindx).header_id := a0(indx);
4477 t(ddindx).batch_id := a1(indx);
4478 t(ddindx).row_id := a2(indx);
4479 t(ddindx).wip_entity_id := a3(indx);
4480 t(ddindx).counter_id := a4(indx);
4481 t(ddindx).property_id := a5(indx);
4482 t(ddindx).property_value := a6(indx);
4483 t(ddindx).value_timestamp := a7(indx);
4484 t(ddindx).migrated_flag := a8(indx);
4485 t(ddindx).attribute_category := a9(indx);
4486 t(ddindx).attribute1 := a10(indx);
4487 t(ddindx).attribute2 := a11(indx);
4488 t(ddindx).attribute3 := a12(indx);
4489 t(ddindx).attribute4 := a13(indx);
4490 t(ddindx).attribute5 := a14(indx);
4491 t(ddindx).attribute6 := a15(indx);
4492 t(ddindx).attribute7 := a16(indx);
4493 t(ddindx).attribute8 := a17(indx);
4494 t(ddindx).attribute9 := a18(indx);
4495 t(ddindx).attribute10 := a19(indx);
4496 t(ddindx).attribute11 := a20(indx);
4497 t(ddindx).attribute12 := a21(indx);
4498 t(ddindx).attribute13 := a22(indx);
4499 t(ddindx).attribute14 := a23(indx);
4500 t(ddindx).attribute15 := a24(indx);
4501 t(ddindx).return_status := a25(indx);
4502 t(ddindx).transaction_type := a26(indx);
4503 ddindx := ddindx+1;
4504 if a0.last =indx
4505 then exit;
4506 end if;
4507 indx := a0.next(indx);
4508 end loop;
4509 end if;
4510 end if;
4511 end rosetta_table_copy_in_p40;
4512 procedure rosetta_table_copy_out_p40(t eam_process_wo_pub.eam_counter_prop_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
4513 , a1 out nocopy JTF_NUMBER_TABLE
4514 , a2 out nocopy JTF_NUMBER_TABLE
4515 , a3 out nocopy JTF_NUMBER_TABLE
4516 , a4 out nocopy JTF_NUMBER_TABLE
4517 , a5 out nocopy JTF_NUMBER_TABLE
4518 , a6 out nocopy JTF_VARCHAR2_TABLE_300
4519 , a7 out nocopy JTF_DATE_TABLE
4520 , a8 out nocopy JTF_VARCHAR2_TABLE_100
4521 , a9 out nocopy JTF_VARCHAR2_TABLE_100
4522 , a10 out nocopy JTF_VARCHAR2_TABLE_200
4523 , a11 out nocopy JTF_VARCHAR2_TABLE_200
4524 , a12 out nocopy JTF_VARCHAR2_TABLE_200
4525 , a13 out nocopy JTF_VARCHAR2_TABLE_200
4526 , a14 out nocopy JTF_VARCHAR2_TABLE_200
4527 , a15 out nocopy JTF_VARCHAR2_TABLE_200
4528 , a16 out nocopy JTF_VARCHAR2_TABLE_200
4529 , a17 out nocopy JTF_VARCHAR2_TABLE_200
4530 , a18 out nocopy JTF_VARCHAR2_TABLE_200
4531 , a19 out nocopy JTF_VARCHAR2_TABLE_200
4532 , a20 out nocopy JTF_VARCHAR2_TABLE_200
4533 , a21 out nocopy JTF_VARCHAR2_TABLE_200
4534 , a22 out nocopy JTF_VARCHAR2_TABLE_200
4535 , a23 out nocopy JTF_VARCHAR2_TABLE_200
4536 , a24 out nocopy JTF_VARCHAR2_TABLE_200
4537 , a25 out nocopy JTF_VARCHAR2_TABLE_100
4538 , a26 out nocopy JTF_NUMBER_TABLE
4539 ) as
4540 ddindx binary_integer; indx binary_integer;
4541 begin
4542 if t is null or t.count = 0 then
4543 a0 := JTF_NUMBER_TABLE();
4544 a1 := JTF_NUMBER_TABLE();
4545 a2 := JTF_NUMBER_TABLE();
4546 a3 := JTF_NUMBER_TABLE();
4547 a4 := JTF_NUMBER_TABLE();
4548 a5 := JTF_NUMBER_TABLE();
4549 a6 := JTF_VARCHAR2_TABLE_300();
4550 a7 := JTF_DATE_TABLE();
4551 a8 := JTF_VARCHAR2_TABLE_100();
4552 a9 := JTF_VARCHAR2_TABLE_100();
4553 a10 := JTF_VARCHAR2_TABLE_200();
4554 a11 := JTF_VARCHAR2_TABLE_200();
4555 a12 := JTF_VARCHAR2_TABLE_200();
4556 a13 := JTF_VARCHAR2_TABLE_200();
4557 a14 := JTF_VARCHAR2_TABLE_200();
4558 a15 := JTF_VARCHAR2_TABLE_200();
4559 a16 := JTF_VARCHAR2_TABLE_200();
4560 a17 := JTF_VARCHAR2_TABLE_200();
4561 a18 := JTF_VARCHAR2_TABLE_200();
4562 a19 := JTF_VARCHAR2_TABLE_200();
4563 a20 := JTF_VARCHAR2_TABLE_200();
4564 a21 := JTF_VARCHAR2_TABLE_200();
4565 a22 := JTF_VARCHAR2_TABLE_200();
4566 a23 := JTF_VARCHAR2_TABLE_200();
4567 a24 := JTF_VARCHAR2_TABLE_200();
4568 a25 := JTF_VARCHAR2_TABLE_100();
4569 a26 := JTF_NUMBER_TABLE();
4570 else
4571 a0 := JTF_NUMBER_TABLE();
4572 a1 := JTF_NUMBER_TABLE();
4573 a2 := JTF_NUMBER_TABLE();
4574 a3 := JTF_NUMBER_TABLE();
4575 a4 := JTF_NUMBER_TABLE();
4576 a5 := JTF_NUMBER_TABLE();
4577 a6 := JTF_VARCHAR2_TABLE_300();
4578 a7 := JTF_DATE_TABLE();
4579 a8 := JTF_VARCHAR2_TABLE_100();
4580 a9 := JTF_VARCHAR2_TABLE_100();
4581 a10 := JTF_VARCHAR2_TABLE_200();
4582 a11 := JTF_VARCHAR2_TABLE_200();
4583 a12 := JTF_VARCHAR2_TABLE_200();
4584 a13 := JTF_VARCHAR2_TABLE_200();
4585 a14 := JTF_VARCHAR2_TABLE_200();
4586 a15 := JTF_VARCHAR2_TABLE_200();
4587 a16 := JTF_VARCHAR2_TABLE_200();
4588 a17 := JTF_VARCHAR2_TABLE_200();
4589 a18 := JTF_VARCHAR2_TABLE_200();
4590 a19 := JTF_VARCHAR2_TABLE_200();
4591 a20 := JTF_VARCHAR2_TABLE_200();
4592 a21 := JTF_VARCHAR2_TABLE_200();
4593 a22 := JTF_VARCHAR2_TABLE_200();
4594 a23 := JTF_VARCHAR2_TABLE_200();
4595 a24 := JTF_VARCHAR2_TABLE_200();
4596 a25 := JTF_VARCHAR2_TABLE_100();
4597 a26 := JTF_NUMBER_TABLE();
4598 if t.count > 0 then
4599 a0.extend(t.count);
4600 a1.extend(t.count);
4601 a2.extend(t.count);
4602 a3.extend(t.count);
4603 a4.extend(t.count);
4604 a5.extend(t.count);
4605 a6.extend(t.count);
4606 a7.extend(t.count);
4607 a8.extend(t.count);
4608 a9.extend(t.count);
4609 a10.extend(t.count);
4610 a11.extend(t.count);
4611 a12.extend(t.count);
4612 a13.extend(t.count);
4613 a14.extend(t.count);
4614 a15.extend(t.count);
4615 a16.extend(t.count);
4616 a17.extend(t.count);
4617 a18.extend(t.count);
4618 a19.extend(t.count);
4619 a20.extend(t.count);
4620 a21.extend(t.count);
4621 a22.extend(t.count);
4622 a23.extend(t.count);
4623 a24.extend(t.count);
4624 a25.extend(t.count);
4625 a26.extend(t.count);
4626 ddindx := t.first;
4627 indx := 1;
4628 while true loop
4629 a0(indx) := t(ddindx).header_id;
4630 a1(indx) := t(ddindx).batch_id;
4631 a2(indx) := t(ddindx).row_id;
4632 a3(indx) := t(ddindx).wip_entity_id;
4633 a4(indx) := t(ddindx).counter_id;
4634 a5(indx) := t(ddindx).property_id;
4635 a6(indx) := t(ddindx).property_value;
4636 a7(indx) := t(ddindx).value_timestamp;
4637 a8(indx) := t(ddindx).migrated_flag;
4638 a9(indx) := t(ddindx).attribute_category;
4639 a10(indx) := t(ddindx).attribute1;
4640 a11(indx) := t(ddindx).attribute2;
4641 a12(indx) := t(ddindx).attribute3;
4642 a13(indx) := t(ddindx).attribute4;
4643 a14(indx) := t(ddindx).attribute5;
4644 a15(indx) := t(ddindx).attribute6;
4645 a16(indx) := t(ddindx).attribute7;
4646 a17(indx) := t(ddindx).attribute8;
4647 a18(indx) := t(ddindx).attribute9;
4648 a19(indx) := t(ddindx).attribute10;
4649 a20(indx) := t(ddindx).attribute11;
4650 a21(indx) := t(ddindx).attribute12;
4651 a22(indx) := t(ddindx).attribute13;
4652 a23(indx) := t(ddindx).attribute14;
4653 a24(indx) := t(ddindx).attribute15;
4654 a25(indx) := t(ddindx).return_status;
4655 a26(indx) := t(ddindx).transaction_type;
4656 indx := indx+1;
4657 if t.last =ddindx
4658 then exit;
4659 end if;
4660 ddindx := t.next(ddindx);
4661 end loop;
4662 end if;
4663 end if;
4664 end rosetta_table_copy_out_p40;
4665
4666 procedure rosetta_table_copy_in_p41(t out nocopy eam_process_wo_pub.eam_wo_quality_tbl_type, a0 JTF_NUMBER_TABLE
4667 , a1 JTF_NUMBER_TABLE
4668 , a2 JTF_NUMBER_TABLE
4669 , a3 JTF_NUMBER_TABLE
4670 , a4 JTF_NUMBER_TABLE
4671 , a5 JTF_NUMBER_TABLE
4672 , a6 JTF_NUMBER_TABLE
4673 , a7 JTF_NUMBER_TABLE
4674 , a8 JTF_NUMBER_TABLE
4675 , a9 JTF_NUMBER_TABLE
4676 , a10 JTF_VARCHAR2_TABLE_2000
4677 , a11 JTF_VARCHAR2_TABLE_100
4678 , a12 JTF_NUMBER_TABLE
4679 , a13 JTF_NUMBER_TABLE
4680 , a14 JTF_NUMBER_TABLE
4681 , a15 JTF_VARCHAR2_TABLE_100
4682 , a16 JTF_NUMBER_TABLE
4683 ) as
4684 ddindx binary_integer; indx binary_integer;
4685 begin
4686 if a0 is not null and a0.count > 0 then
4687 if a0.count > 0 then
4688 indx := a0.first;
4689 ddindx := 1;
4690 while true loop
4691 t(ddindx).header_id := a0(indx);
4692 t(ddindx).batch_id := a1(indx);
4693 t(ddindx).row_id := a2(indx);
4694 t(ddindx).wip_entity_id := a3(indx);
4695 t(ddindx).organization_id := a4(indx);
4696 t(ddindx).operation_seq_number := a5(indx);
4697 t(ddindx).plan_id := a6(indx);
4698 t(ddindx).spec_id := a7(indx);
4699 t(ddindx).p_enable_flag := a8(indx);
4700 t(ddindx).element_id := a9(indx);
4701 t(ddindx).element_value := a10(indx);
4702 t(ddindx).element_validation_flag := a11(indx);
4703 t(ddindx).transaction_number := a12(indx);
4704 t(ddindx).collection_id := a13(indx);
4705 t(ddindx).occurrence := a14(indx);
4706 t(ddindx).return_status := a15(indx);
4707 t(ddindx).transaction_type := a16(indx);
4708 ddindx := ddindx+1;
4709 if a0.last =indx
4710 then exit;
4711 end if;
4712 indx := a0.next(indx);
4713 end loop;
4714 end if;
4715 end if;
4716 end rosetta_table_copy_in_p41;
4717 procedure rosetta_table_copy_out_p41(t eam_process_wo_pub.eam_wo_quality_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
4718 , a1 out nocopy JTF_NUMBER_TABLE
4719 , a2 out nocopy JTF_NUMBER_TABLE
4720 , a3 out nocopy JTF_NUMBER_TABLE
4721 , a4 out nocopy JTF_NUMBER_TABLE
4722 , a5 out nocopy JTF_NUMBER_TABLE
4723 , a6 out nocopy JTF_NUMBER_TABLE
4724 , a7 out nocopy JTF_NUMBER_TABLE
4725 , a8 out nocopy JTF_NUMBER_TABLE
4726 , a9 out nocopy JTF_NUMBER_TABLE
4727 , a10 out nocopy JTF_VARCHAR2_TABLE_2000
4728 , a11 out nocopy JTF_VARCHAR2_TABLE_100
4729 , a12 out nocopy JTF_NUMBER_TABLE
4730 , a13 out nocopy JTF_NUMBER_TABLE
4731 , a14 out nocopy JTF_NUMBER_TABLE
4732 , a15 out nocopy JTF_VARCHAR2_TABLE_100
4733 , a16 out nocopy JTF_NUMBER_TABLE
4734 ) as
4735 ddindx binary_integer; indx binary_integer;
4736 begin
4737 if t is null or t.count = 0 then
4738 a0 := JTF_NUMBER_TABLE();
4739 a1 := JTF_NUMBER_TABLE();
4740 a2 := JTF_NUMBER_TABLE();
4741 a3 := JTF_NUMBER_TABLE();
4742 a4 := JTF_NUMBER_TABLE();
4743 a5 := JTF_NUMBER_TABLE();
4744 a6 := JTF_NUMBER_TABLE();
4745 a7 := JTF_NUMBER_TABLE();
4746 a8 := JTF_NUMBER_TABLE();
4747 a9 := JTF_NUMBER_TABLE();
4748 a10 := JTF_VARCHAR2_TABLE_2000();
4749 a11 := JTF_VARCHAR2_TABLE_100();
4750 a12 := JTF_NUMBER_TABLE();
4751 a13 := JTF_NUMBER_TABLE();
4752 a14 := JTF_NUMBER_TABLE();
4753 a15 := JTF_VARCHAR2_TABLE_100();
4754 a16 := JTF_NUMBER_TABLE();
4755 else
4756 a0 := JTF_NUMBER_TABLE();
4757 a1 := JTF_NUMBER_TABLE();
4758 a2 := JTF_NUMBER_TABLE();
4759 a3 := JTF_NUMBER_TABLE();
4760 a4 := JTF_NUMBER_TABLE();
4761 a5 := JTF_NUMBER_TABLE();
4762 a6 := JTF_NUMBER_TABLE();
4763 a7 := JTF_NUMBER_TABLE();
4764 a8 := JTF_NUMBER_TABLE();
4765 a9 := JTF_NUMBER_TABLE();
4766 a10 := JTF_VARCHAR2_TABLE_2000();
4767 a11 := JTF_VARCHAR2_TABLE_100();
4768 a12 := JTF_NUMBER_TABLE();
4769 a13 := JTF_NUMBER_TABLE();
4770 a14 := JTF_NUMBER_TABLE();
4771 a15 := JTF_VARCHAR2_TABLE_100();
4772 a16 := JTF_NUMBER_TABLE();
4773 if t.count > 0 then
4774 a0.extend(t.count);
4775 a1.extend(t.count);
4776 a2.extend(t.count);
4777 a3.extend(t.count);
4778 a4.extend(t.count);
4779 a5.extend(t.count);
4780 a6.extend(t.count);
4781 a7.extend(t.count);
4782 a8.extend(t.count);
4783 a9.extend(t.count);
4784 a10.extend(t.count);
4785 a11.extend(t.count);
4786 a12.extend(t.count);
4787 a13.extend(t.count);
4788 a14.extend(t.count);
4789 a15.extend(t.count);
4790 a16.extend(t.count);
4791 ddindx := t.first;
4792 indx := 1;
4793 while true loop
4794 a0(indx) := t(ddindx).header_id;
4795 a1(indx) := t(ddindx).batch_id;
4796 a2(indx) := t(ddindx).row_id;
4797 a3(indx) := t(ddindx).wip_entity_id;
4798 a4(indx) := t(ddindx).organization_id;
4799 a5(indx) := t(ddindx).operation_seq_number;
4800 a6(indx) := t(ddindx).plan_id;
4801 a7(indx) := t(ddindx).spec_id;
4802 a8(indx) := t(ddindx).p_enable_flag;
4803 a9(indx) := t(ddindx).element_id;
4804 a10(indx) := t(ddindx).element_value;
4805 a11(indx) := t(ddindx).element_validation_flag;
4806 a12(indx) := t(ddindx).transaction_number;
4807 a13(indx) := t(ddindx).collection_id;
4808 a14(indx) := t(ddindx).occurrence;
4809 a15(indx) := t(ddindx).return_status;
4810 a16(indx) := t(ddindx).transaction_type;
4811 indx := indx+1;
4812 if t.last =ddindx
4813 then exit;
4814 end if;
4815 ddindx := t.next(ddindx);
4816 end loop;
4817 end if;
4818 end if;
4819 end rosetta_table_copy_out_p41;
4820
4821 procedure rosetta_table_copy_in_p42(t out nocopy eam_process_wo_pub.eam_wo_comp_rebuild_tbl_type, a0 JTF_NUMBER_TABLE
4822 , a1 JTF_NUMBER_TABLE
4823 , a2 JTF_NUMBER_TABLE
4824 , a3 JTF_NUMBER_TABLE
4825 , a4 JTF_NUMBER_TABLE
4826 , a5 JTF_NUMBER_TABLE
4827 , a6 JTF_NUMBER_TABLE
4828 , a7 JTF_NUMBER_TABLE
4829 , a8 JTF_VARCHAR2_TABLE_100
4830 , a9 JTF_NUMBER_TABLE
4831 , a10 JTF_VARCHAR2_TABLE_100
4832 , a11 JTF_NUMBER_TABLE
4833 ) as
4834 ddindx binary_integer; indx binary_integer;
4835 begin
4836 if a0 is not null and a0.count > 0 then
4837 if a0.count > 0 then
4838 indx := a0.first;
4839 ddindx := 1;
4840 while true loop
4841 t(ddindx).header_id := a0(indx);
4842 t(ddindx).batch_id := a1(indx);
4843 t(ddindx).row_id := a2(indx);
4844 t(ddindx).wip_entity_id := a3(indx);
4845 t(ddindx).rebuild_wip_entity_id := a4(indx);
4846 t(ddindx).organization_id := a5(indx);
4847 t(ddindx).item_removed := a6(indx);
4848 t(ddindx).instance_id_removed := a7(indx);
4849 t(ddindx).uninst_serial_removed := a8(indx);
4850 t(ddindx).activity_id := a9(indx);
4851 t(ddindx).return_status := a10(indx);
4852 t(ddindx).transaction_type := a11(indx);
4853 ddindx := ddindx+1;
4854 if a0.last =indx
4855 then exit;
4856 end if;
4857 indx := a0.next(indx);
4858 end loop;
4859 end if;
4860 end if;
4861 end rosetta_table_copy_in_p42;
4862 procedure rosetta_table_copy_out_p42(t eam_process_wo_pub.eam_wo_comp_rebuild_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
4863 , a1 out nocopy JTF_NUMBER_TABLE
4864 , a2 out nocopy JTF_NUMBER_TABLE
4865 , a3 out nocopy JTF_NUMBER_TABLE
4866 , a4 out nocopy JTF_NUMBER_TABLE
4867 , a5 out nocopy JTF_NUMBER_TABLE
4868 , a6 out nocopy JTF_NUMBER_TABLE
4869 , a7 out nocopy JTF_NUMBER_TABLE
4870 , a8 out nocopy JTF_VARCHAR2_TABLE_100
4871 , a9 out nocopy JTF_NUMBER_TABLE
4872 , a10 out nocopy JTF_VARCHAR2_TABLE_100
4873 , a11 out nocopy JTF_NUMBER_TABLE
4874 ) as
4875 ddindx binary_integer; indx binary_integer;
4876 begin
4877 if t is null or t.count = 0 then
4878 a0 := JTF_NUMBER_TABLE();
4879 a1 := JTF_NUMBER_TABLE();
4880 a2 := JTF_NUMBER_TABLE();
4881 a3 := JTF_NUMBER_TABLE();
4882 a4 := JTF_NUMBER_TABLE();
4883 a5 := JTF_NUMBER_TABLE();
4884 a6 := JTF_NUMBER_TABLE();
4885 a7 := JTF_NUMBER_TABLE();
4886 a8 := JTF_VARCHAR2_TABLE_100();
4887 a9 := JTF_NUMBER_TABLE();
4888 a10 := JTF_VARCHAR2_TABLE_100();
4889 a11 := JTF_NUMBER_TABLE();
4890 else
4891 a0 := JTF_NUMBER_TABLE();
4892 a1 := JTF_NUMBER_TABLE();
4893 a2 := JTF_NUMBER_TABLE();
4894 a3 := JTF_NUMBER_TABLE();
4895 a4 := JTF_NUMBER_TABLE();
4896 a5 := JTF_NUMBER_TABLE();
4897 a6 := JTF_NUMBER_TABLE();
4898 a7 := JTF_NUMBER_TABLE();
4899 a8 := JTF_VARCHAR2_TABLE_100();
4900 a9 := JTF_NUMBER_TABLE();
4901 a10 := JTF_VARCHAR2_TABLE_100();
4902 a11 := JTF_NUMBER_TABLE();
4903 if t.count > 0 then
4904 a0.extend(t.count);
4905 a1.extend(t.count);
4906 a2.extend(t.count);
4907 a3.extend(t.count);
4908 a4.extend(t.count);
4909 a5.extend(t.count);
4910 a6.extend(t.count);
4911 a7.extend(t.count);
4912 a8.extend(t.count);
4913 a9.extend(t.count);
4914 a10.extend(t.count);
4915 a11.extend(t.count);
4916 ddindx := t.first;
4917 indx := 1;
4918 while true loop
4919 a0(indx) := t(ddindx).header_id;
4920 a1(indx) := t(ddindx).batch_id;
4921 a2(indx) := t(ddindx).row_id;
4922 a3(indx) := t(ddindx).wip_entity_id;
4923 a4(indx) := t(ddindx).rebuild_wip_entity_id;
4924 a5(indx) := t(ddindx).organization_id;
4925 a6(indx) := t(ddindx).item_removed;
4926 a7(indx) := t(ddindx).instance_id_removed;
4927 a8(indx) := t(ddindx).uninst_serial_removed;
4928 a9(indx) := t(ddindx).activity_id;
4929 a10(indx) := t(ddindx).return_status;
4930 a11(indx) := t(ddindx).transaction_type;
4931 indx := indx+1;
4932 if t.last =ddindx
4933 then exit;
4934 end if;
4935 ddindx := t.next(ddindx);
4936 end loop;
4937 end if;
4938 end if;
4939 end rosetta_table_copy_out_p42;
4940
4941 procedure rosetta_table_copy_in_p43(t out nocopy eam_process_wo_pub.eam_wo_comp_mr_read_tbl_type, a0 JTF_NUMBER_TABLE
4942 , a1 JTF_NUMBER_TABLE
4943 , a2 JTF_NUMBER_TABLE
4944 , a3 JTF_NUMBER_TABLE
4945 , a4 JTF_NUMBER_TABLE
4946 , a5 JTF_VARCHAR2_TABLE_100
4947 , a6 JTF_NUMBER_TABLE
4948 , a7 JTF_NUMBER_TABLE
4949 , a8 JTF_VARCHAR2_TABLE_100
4950 , a9 JTF_NUMBER_TABLE
4951 ) as
4952 ddindx binary_integer; indx binary_integer;
4953 begin
4954 if a0 is not null and a0.count > 0 then
4955 if a0.count > 0 then
4956 indx := a0.first;
4957 ddindx := 1;
4958 while true loop
4959 t(ddindx).header_id := a0(indx);
4960 t(ddindx).batch_id := a1(indx);
4961 t(ddindx).row_id := a2(indx);
4962 t(ddindx).wip_entity_id := a3(indx);
4963 t(ddindx).organization_id := a4(indx);
4964 t(ddindx).instance_id_issued := a5(indx);
4965 t(ddindx).meter_issued_serial := a6(indx);
4966 t(ddindx).source_meter := a7(indx);
4967 t(ddindx).return_status := a8(indx);
4968 t(ddindx).transaction_type := a9(indx);
4969 ddindx := ddindx+1;
4970 if a0.last =indx
4971 then exit;
4972 end if;
4973 indx := a0.next(indx);
4974 end loop;
4975 end if;
4976 end if;
4977 end rosetta_table_copy_in_p43;
4978 procedure rosetta_table_copy_out_p43(t eam_process_wo_pub.eam_wo_comp_mr_read_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
4979 , a1 out nocopy JTF_NUMBER_TABLE
4980 , a2 out nocopy JTF_NUMBER_TABLE
4981 , a3 out nocopy JTF_NUMBER_TABLE
4982 , a4 out nocopy JTF_NUMBER_TABLE
4983 , a5 out nocopy JTF_VARCHAR2_TABLE_100
4984 , a6 out nocopy JTF_NUMBER_TABLE
4985 , a7 out nocopy JTF_NUMBER_TABLE
4986 , a8 out nocopy JTF_VARCHAR2_TABLE_100
4987 , a9 out nocopy JTF_NUMBER_TABLE
4988 ) as
4989 ddindx binary_integer; indx binary_integer;
4990 begin
4991 if t is null or t.count = 0 then
4992 a0 := JTF_NUMBER_TABLE();
4993 a1 := JTF_NUMBER_TABLE();
4994 a2 := JTF_NUMBER_TABLE();
4995 a3 := JTF_NUMBER_TABLE();
4996 a4 := JTF_NUMBER_TABLE();
4997 a5 := JTF_VARCHAR2_TABLE_100();
4998 a6 := JTF_NUMBER_TABLE();
4999 a7 := JTF_NUMBER_TABLE();
5000 a8 := JTF_VARCHAR2_TABLE_100();
5001 a9 := JTF_NUMBER_TABLE();
5002 else
5003 a0 := JTF_NUMBER_TABLE();
5004 a1 := JTF_NUMBER_TABLE();
5005 a2 := JTF_NUMBER_TABLE();
5006 a3 := JTF_NUMBER_TABLE();
5007 a4 := JTF_NUMBER_TABLE();
5008 a5 := JTF_VARCHAR2_TABLE_100();
5009 a6 := JTF_NUMBER_TABLE();
5010 a7 := JTF_NUMBER_TABLE();
5011 a8 := JTF_VARCHAR2_TABLE_100();
5012 a9 := JTF_NUMBER_TABLE();
5013 if t.count > 0 then
5014 a0.extend(t.count);
5015 a1.extend(t.count);
5016 a2.extend(t.count);
5017 a3.extend(t.count);
5018 a4.extend(t.count);
5019 a5.extend(t.count);
5020 a6.extend(t.count);
5021 a7.extend(t.count);
5022 a8.extend(t.count);
5023 a9.extend(t.count);
5024 ddindx := t.first;
5025 indx := 1;
5026 while true loop
5027 a0(indx) := t(ddindx).header_id;
5028 a1(indx) := t(ddindx).batch_id;
5029 a2(indx) := t(ddindx).row_id;
5030 a3(indx) := t(ddindx).wip_entity_id;
5031 a4(indx) := t(ddindx).organization_id;
5032 a5(indx) := t(ddindx).instance_id_issued;
5033 a6(indx) := t(ddindx).meter_issued_serial;
5034 a7(indx) := t(ddindx).source_meter;
5035 a8(indx) := t(ddindx).return_status;
5036 a9(indx) := t(ddindx).transaction_type;
5037 indx := indx+1;
5038 if t.last =ddindx
5039 then exit;
5040 end if;
5041 ddindx := t.next(ddindx);
5042 end loop;
5043 end if;
5044 end if;
5045 end rosetta_table_copy_out_p43;
5046
5047 procedure rosetta_table_copy_in_p44(t out nocopy eam_process_wo_pub.eam_request_tbl_type, a0 JTF_NUMBER_TABLE
5048 , a1 JTF_NUMBER_TABLE
5049 , a2 JTF_NUMBER_TABLE
5050 , a3 JTF_NUMBER_TABLE
5051 , a4 JTF_VARCHAR2_TABLE_300
5052 , a5 JTF_NUMBER_TABLE
5053 , a6 JTF_VARCHAR2_TABLE_100
5054 , a7 JTF_NUMBER_TABLE
5055 , a8 JTF_NUMBER_TABLE
5056 , a9 JTF_VARCHAR2_TABLE_300
5057 , a10 JTF_VARCHAR2_TABLE_100
5058 , a11 JTF_VARCHAR2_TABLE_200
5059 , a12 JTF_VARCHAR2_TABLE_200
5060 , a13 JTF_VARCHAR2_TABLE_200
5061 , a14 JTF_VARCHAR2_TABLE_200
5062 , a15 JTF_VARCHAR2_TABLE_200
5063 , a16 JTF_VARCHAR2_TABLE_200
5064 , a17 JTF_VARCHAR2_TABLE_200
5065 , a18 JTF_VARCHAR2_TABLE_200
5066 , a19 JTF_VARCHAR2_TABLE_200
5067 , a20 JTF_VARCHAR2_TABLE_200
5068 , a21 JTF_VARCHAR2_TABLE_200
5069 , a22 JTF_VARCHAR2_TABLE_200
5070 , a23 JTF_VARCHAR2_TABLE_200
5071 , a24 JTF_VARCHAR2_TABLE_200
5072 , a25 JTF_VARCHAR2_TABLE_200
5073 , a26 JTF_NUMBER_TABLE
5074 , a27 JTF_NUMBER_TABLE
5075 , a28 JTF_DATE_TABLE
5076 , a29 JTF_NUMBER_TABLE
5077 , a30 JTF_NUMBER_TABLE
5078 , a31 JTF_NUMBER_TABLE
5079 , a32 JTF_VARCHAR2_TABLE_100
5080 , a33 JTF_NUMBER_TABLE
5081 ) as
5082 ddindx binary_integer; indx binary_integer;
5083 begin
5084 if a0 is not null and a0.count > 0 then
5085 if a0.count > 0 then
5086 indx := a0.first;
5087 ddindx := 1;
5088 while true loop
5089 t(ddindx).header_id := a0(indx);
5090 t(ddindx).batch_id := a1(indx);
5091 t(ddindx).row_id := a2(indx);
5092 t(ddindx).wip_entity_id := a3(indx);
5093 t(ddindx).wip_entity_name := a4(indx);
5094 t(ddindx).organization_id := a5(indx);
5095 t(ddindx).organization_code := a6(indx);
5096 t(ddindx).request_type := a7(indx);
5097 t(ddindx).request_id := a8(indx);
5098 t(ddindx).request_number := a9(indx);
5099 t(ddindx).attribute_category := a10(indx);
5100 t(ddindx).attribute1 := a11(indx);
5101 t(ddindx).attribute2 := a12(indx);
5102 t(ddindx).attribute3 := a13(indx);
5103 t(ddindx).attribute4 := a14(indx);
5104 t(ddindx).attribute5 := a15(indx);
5105 t(ddindx).attribute6 := a16(indx);
5106 t(ddindx).attribute7 := a17(indx);
5107 t(ddindx).attribute8 := a18(indx);
5108 t(ddindx).attribute9 := a19(indx);
5109 t(ddindx).attribute10 := a20(indx);
5110 t(ddindx).attribute11 := a21(indx);
5111 t(ddindx).attribute12 := a22(indx);
5112 t(ddindx).attribute13 := a23(indx);
5113 t(ddindx).attribute14 := a24(indx);
5114 t(ddindx).attribute15 := a25(indx);
5115 t(ddindx).program_id := a26(indx);
5116 t(ddindx).program_request_id := a27(indx);
5117 t(ddindx).program_update_date := a28(indx);
5118 t(ddindx).program_application_id := a29(indx);
5119 t(ddindx).work_request_status_id := a30(indx);
5120 t(ddindx).service_assoc_id := a31(indx);
5121 t(ddindx).return_status := a32(indx);
5122 t(ddindx).transaction_type := a33(indx);
5123 ddindx := ddindx+1;
5124 if a0.last =indx
5125 then exit;
5126 end if;
5127 indx := a0.next(indx);
5128 end loop;
5129 end if;
5130 end if;
5131 end rosetta_table_copy_in_p44;
5132 procedure rosetta_table_copy_out_p44(t eam_process_wo_pub.eam_request_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
5133 , a1 out nocopy JTF_NUMBER_TABLE
5134 , a2 out nocopy JTF_NUMBER_TABLE
5135 , a3 out nocopy JTF_NUMBER_TABLE
5136 , a4 out nocopy JTF_VARCHAR2_TABLE_300
5137 , a5 out nocopy JTF_NUMBER_TABLE
5138 , a6 out nocopy JTF_VARCHAR2_TABLE_100
5139 , a7 out nocopy JTF_NUMBER_TABLE
5140 , a8 out nocopy JTF_NUMBER_TABLE
5141 , a9 out nocopy JTF_VARCHAR2_TABLE_300
5142 , a10 out nocopy JTF_VARCHAR2_TABLE_100
5143 , a11 out nocopy JTF_VARCHAR2_TABLE_200
5144 , a12 out nocopy JTF_VARCHAR2_TABLE_200
5145 , a13 out nocopy JTF_VARCHAR2_TABLE_200
5146 , a14 out nocopy JTF_VARCHAR2_TABLE_200
5147 , a15 out nocopy JTF_VARCHAR2_TABLE_200
5148 , a16 out nocopy JTF_VARCHAR2_TABLE_200
5149 , a17 out nocopy JTF_VARCHAR2_TABLE_200
5150 , a18 out nocopy JTF_VARCHAR2_TABLE_200
5151 , a19 out nocopy JTF_VARCHAR2_TABLE_200
5152 , a20 out nocopy JTF_VARCHAR2_TABLE_200
5153 , a21 out nocopy JTF_VARCHAR2_TABLE_200
5154 , a22 out nocopy JTF_VARCHAR2_TABLE_200
5155 , a23 out nocopy JTF_VARCHAR2_TABLE_200
5156 , a24 out nocopy JTF_VARCHAR2_TABLE_200
5157 , a25 out nocopy JTF_VARCHAR2_TABLE_200
5158 , a26 out nocopy JTF_NUMBER_TABLE
5159 , a27 out nocopy JTF_NUMBER_TABLE
5160 , a28 out nocopy JTF_DATE_TABLE
5161 , a29 out nocopy JTF_NUMBER_TABLE
5162 , a30 out nocopy JTF_NUMBER_TABLE
5163 , a31 out nocopy JTF_NUMBER_TABLE
5164 , a32 out nocopy JTF_VARCHAR2_TABLE_100
5165 , a33 out nocopy JTF_NUMBER_TABLE
5166 ) as
5167 ddindx binary_integer; indx binary_integer;
5168 begin
5169 if t is null or t.count = 0 then
5170 a0 := JTF_NUMBER_TABLE();
5171 a1 := JTF_NUMBER_TABLE();
5172 a2 := JTF_NUMBER_TABLE();
5173 a3 := JTF_NUMBER_TABLE();
5174 a4 := JTF_VARCHAR2_TABLE_300();
5175 a5 := JTF_NUMBER_TABLE();
5176 a6 := JTF_VARCHAR2_TABLE_100();
5177 a7 := JTF_NUMBER_TABLE();
5178 a8 := JTF_NUMBER_TABLE();
5179 a9 := JTF_VARCHAR2_TABLE_300();
5180 a10 := JTF_VARCHAR2_TABLE_100();
5181 a11 := JTF_VARCHAR2_TABLE_200();
5182 a12 := JTF_VARCHAR2_TABLE_200();
5183 a13 := JTF_VARCHAR2_TABLE_200();
5184 a14 := JTF_VARCHAR2_TABLE_200();
5185 a15 := JTF_VARCHAR2_TABLE_200();
5186 a16 := JTF_VARCHAR2_TABLE_200();
5187 a17 := JTF_VARCHAR2_TABLE_200();
5188 a18 := JTF_VARCHAR2_TABLE_200();
5189 a19 := JTF_VARCHAR2_TABLE_200();
5190 a20 := JTF_VARCHAR2_TABLE_200();
5191 a21 := JTF_VARCHAR2_TABLE_200();
5192 a22 := JTF_VARCHAR2_TABLE_200();
5193 a23 := JTF_VARCHAR2_TABLE_200();
5194 a24 := JTF_VARCHAR2_TABLE_200();
5195 a25 := JTF_VARCHAR2_TABLE_200();
5196 a26 := JTF_NUMBER_TABLE();
5197 a27 := JTF_NUMBER_TABLE();
5198 a28 := JTF_DATE_TABLE();
5199 a29 := JTF_NUMBER_TABLE();
5200 a30 := JTF_NUMBER_TABLE();
5201 a31 := JTF_NUMBER_TABLE();
5202 a32 := JTF_VARCHAR2_TABLE_100();
5203 a33 := JTF_NUMBER_TABLE();
5204 else
5205 a0 := JTF_NUMBER_TABLE();
5206 a1 := JTF_NUMBER_TABLE();
5207 a2 := JTF_NUMBER_TABLE();
5208 a3 := JTF_NUMBER_TABLE();
5209 a4 := JTF_VARCHAR2_TABLE_300();
5210 a5 := JTF_NUMBER_TABLE();
5211 a6 := JTF_VARCHAR2_TABLE_100();
5212 a7 := JTF_NUMBER_TABLE();
5213 a8 := JTF_NUMBER_TABLE();
5214 a9 := JTF_VARCHAR2_TABLE_300();
5215 a10 := JTF_VARCHAR2_TABLE_100();
5216 a11 := JTF_VARCHAR2_TABLE_200();
5217 a12 := JTF_VARCHAR2_TABLE_200();
5218 a13 := JTF_VARCHAR2_TABLE_200();
5219 a14 := JTF_VARCHAR2_TABLE_200();
5220 a15 := JTF_VARCHAR2_TABLE_200();
5221 a16 := JTF_VARCHAR2_TABLE_200();
5222 a17 := JTF_VARCHAR2_TABLE_200();
5223 a18 := JTF_VARCHAR2_TABLE_200();
5224 a19 := JTF_VARCHAR2_TABLE_200();
5225 a20 := JTF_VARCHAR2_TABLE_200();
5226 a21 := JTF_VARCHAR2_TABLE_200();
5227 a22 := JTF_VARCHAR2_TABLE_200();
5228 a23 := JTF_VARCHAR2_TABLE_200();
5229 a24 := JTF_VARCHAR2_TABLE_200();
5230 a25 := JTF_VARCHAR2_TABLE_200();
5231 a26 := JTF_NUMBER_TABLE();
5232 a27 := JTF_NUMBER_TABLE();
5233 a28 := JTF_DATE_TABLE();
5234 a29 := JTF_NUMBER_TABLE();
5235 a30 := JTF_NUMBER_TABLE();
5236 a31 := JTF_NUMBER_TABLE();
5237 a32 := JTF_VARCHAR2_TABLE_100();
5238 a33 := JTF_NUMBER_TABLE();
5239 if t.count > 0 then
5240 a0.extend(t.count);
5241 a1.extend(t.count);
5242 a2.extend(t.count);
5243 a3.extend(t.count);
5244 a4.extend(t.count);
5245 a5.extend(t.count);
5246 a6.extend(t.count);
5247 a7.extend(t.count);
5248 a8.extend(t.count);
5249 a9.extend(t.count);
5250 a10.extend(t.count);
5251 a11.extend(t.count);
5252 a12.extend(t.count);
5253 a13.extend(t.count);
5254 a14.extend(t.count);
5255 a15.extend(t.count);
5256 a16.extend(t.count);
5257 a17.extend(t.count);
5258 a18.extend(t.count);
5259 a19.extend(t.count);
5260 a20.extend(t.count);
5261 a21.extend(t.count);
5262 a22.extend(t.count);
5263 a23.extend(t.count);
5264 a24.extend(t.count);
5265 a25.extend(t.count);
5266 a26.extend(t.count);
5267 a27.extend(t.count);
5268 a28.extend(t.count);
5269 a29.extend(t.count);
5270 a30.extend(t.count);
5271 a31.extend(t.count);
5272 a32.extend(t.count);
5273 a33.extend(t.count);
5274 ddindx := t.first;
5275 indx := 1;
5276 while true loop
5277 a0(indx) := t(ddindx).header_id;
5278 a1(indx) := t(ddindx).batch_id;
5279 a2(indx) := t(ddindx).row_id;
5280 a3(indx) := t(ddindx).wip_entity_id;
5281 a4(indx) := t(ddindx).wip_entity_name;
5282 a5(indx) := t(ddindx).organization_id;
5283 a6(indx) := t(ddindx).organization_code;
5284 a7(indx) := t(ddindx).request_type;
5285 a8(indx) := t(ddindx).request_id;
5286 a9(indx) := t(ddindx).request_number;
5287 a10(indx) := t(ddindx).attribute_category;
5288 a11(indx) := t(ddindx).attribute1;
5289 a12(indx) := t(ddindx).attribute2;
5290 a13(indx) := t(ddindx).attribute3;
5291 a14(indx) := t(ddindx).attribute4;
5292 a15(indx) := t(ddindx).attribute5;
5293 a16(indx) := t(ddindx).attribute6;
5294 a17(indx) := t(ddindx).attribute7;
5295 a18(indx) := t(ddindx).attribute8;
5296 a19(indx) := t(ddindx).attribute9;
5297 a20(indx) := t(ddindx).attribute10;
5298 a21(indx) := t(ddindx).attribute11;
5299 a22(indx) := t(ddindx).attribute12;
5300 a23(indx) := t(ddindx).attribute13;
5301 a24(indx) := t(ddindx).attribute14;
5302 a25(indx) := t(ddindx).attribute15;
5303 a26(indx) := t(ddindx).program_id;
5304 a27(indx) := t(ddindx).program_request_id;
5305 a28(indx) := t(ddindx).program_update_date;
5306 a29(indx) := t(ddindx).program_application_id;
5307 a30(indx) := t(ddindx).work_request_status_id;
5308 a31(indx) := t(ddindx).service_assoc_id;
5309 a32(indx) := t(ddindx).return_status;
5310 a33(indx) := t(ddindx).transaction_type;
5311 indx := indx+1;
5312 if t.last =ddindx
5313 then exit;
5314 end if;
5315 ddindx := t.next(ddindx);
5316 end loop;
5317 end if;
5318 end if;
5319 end rosetta_table_copy_out_p44;
5320
5321 procedure rosetta_table_copy_in_p45(t out nocopy eam_process_wo_pub.wo_relationship_exc_tbl_type, a0 JTF_VARCHAR2_TABLE_1000) as
5322 ddindx binary_integer; indx binary_integer;
5323 begin
5324 if a0 is not null and a0.count > 0 then
5325 if a0.count > 0 then
5326 indx := a0.first;
5327 ddindx := 1;
5328 while true loop
5329 t(ddindx) := a0(indx);
5330 ddindx := ddindx+1;
5331 if a0.last =indx
5332 then exit;
5333 end if;
5334 indx := a0.next(indx);
5335 end loop;
5336 end if;
5337 end if;
5338 end rosetta_table_copy_in_p45;
5339 procedure rosetta_table_copy_out_p45(t eam_process_wo_pub.wo_relationship_exc_tbl_type, a0 out nocopy JTF_VARCHAR2_TABLE_1000) as
5340 ddindx binary_integer; indx binary_integer;
5341 begin
5342 if t is null or t.count = 0 then
5343 a0 := JTF_VARCHAR2_TABLE_1000();
5344 else
5345 a0 := JTF_VARCHAR2_TABLE_1000();
5346 if t.count > 0 then
5347 a0.extend(t.count);
5348 ddindx := t.first;
5349 indx := 1;
5350 while true loop
5351 a0(indx) := t(ddindx);
5352 indx := indx+1;
5353 if t.last =ddindx
5354 then exit;
5355 end if;
5356 ddindx := t.next(ddindx);
5357 end loop;
5358 end if;
5359 end if;
5360 end rosetta_table_copy_out_p45;
5361
5362 procedure rosetta_table_copy_in_p72(t out nocopy eam_process_wo_pub.eam_wo_list_type, a0 JTF_VARCHAR2_TABLE_300) as
5363 ddindx binary_integer; indx binary_integer;
5364 begin
5365 if a0 is not null and a0.count > 0 then
5366 if a0.count > 0 then
5367 indx := a0.first;
5368 ddindx := 1;
5369 while true loop
5370 t(ddindx) := a0(indx);
5371 ddindx := ddindx+1;
5372 if a0.last =indx
5373 then exit;
5374 end if;
5375 indx := a0.next(indx);
5376 end loop;
5377 end if;
5378 end if;
5379 end rosetta_table_copy_in_p72;
5380 procedure rosetta_table_copy_out_p72(t eam_process_wo_pub.eam_wo_list_type, a0 out nocopy JTF_VARCHAR2_TABLE_300) as
5381 ddindx binary_integer; indx binary_integer;
5382 begin
5383 if t is null or t.count = 0 then
5384 a0 := JTF_VARCHAR2_TABLE_300();
5385 else
5386 a0 := JTF_VARCHAR2_TABLE_300();
5387 if t.count > 0 then
5388 a0.extend(t.count);
5389 ddindx := t.first;
5390 indx := 1;
5391 while true loop
5392 a0(indx) := t(ddindx);
5393 indx := indx+1;
5394 if t.last =ddindx
5395 then exit;
5396 end if;
5397 ddindx := t.next(ddindx);
5398 end loop;
5399 end if;
5400 end if;
5401 end rosetta_table_copy_out_p72;
5402
5403 end eam_process_wo_pub_w;