[Home] [Help]
PACKAGE BODY: APPS.CSE_DATASTRUCTURES_PUB_W
Source
1 package body cse_datastructures_pub_w as
2 /* $Header: CSEDATWB.pls 120.1 2008/01/16 21:31:52 devijay ship $ */
3 rosetta_g_mistake_date date := to_date('01/01/+4713', 'MM/DD/SYYYY');
4 rosetta_g_miss_date date := to_date('01/01/-4712', 'MM/DD/SYYYY');
5 rosetta_g_mistake_date_high date := to_date('01/01/+4710', 'MM/DD/SYYYY');
6 rosetta_g_mistake_date_low date := to_date('01/01/-4710', 'MM/DD/SYYYY');
7
8 -- this is to workaround the JDBC bug regarding IN DATE of value GMiss
9 function rosetta_g_miss_date_in_map(d date) return date as
10 begin
11 if d > rosetta_g_mistake_date_high then return fnd_api.g_miss_date; end if;
12 if d < rosetta_g_mistake_date_low then return fnd_api.g_miss_date; end if;
13 return d;
14 end;
15
16 function rosetta_g_miss_num_map(n number) return number as
17 a number := fnd_api.g_miss_num;
18 b number := 0-1962.0724;
19 begin
20 if n=a then return b; end if;
21 if n=b then return a; end if;
22 return n;
23 end;
24
25 procedure rosetta_table_copy_in_p24(t out nocopy cse_datastructures_pub.mtl_item_tbl_type, a0 JTF_NUMBER_TABLE
26 , a1 JTF_NUMBER_TABLE
27 , a2 JTF_VARCHAR2_TABLE_100
28 , a3 JTF_VARCHAR2_TABLE_100
29 , a4 JTF_NUMBER_TABLE
30 , a5 JTF_VARCHAR2_TABLE_100
31 , a6 JTF_NUMBER_TABLE
32 , a7 JTF_NUMBER_TABLE
33 , a8 JTF_NUMBER_TABLE
34 , a9 JTF_NUMBER_TABLE
35 , a10 JTF_NUMBER_TABLE
36 , a11 JTF_NUMBER_TABLE
37 , a12 JTF_VARCHAR2_TABLE_100
38 , a13 JTF_NUMBER_TABLE
39 , a14 JTF_NUMBER_TABLE
40 , a15 JTF_NUMBER_TABLE
41 , a16 JTF_NUMBER_TABLE
42 , a17 JTF_NUMBER_TABLE
43 , a18 JTF_NUMBER_TABLE
44 , a19 JTF_NUMBER_TABLE
45 , a20 JTF_DATE_TABLE
46 , a21 JTF_NUMBER_TABLE
47 , a22 JTF_VARCHAR2_TABLE_100
48 , a23 JTF_VARCHAR2_TABLE_100
49 , a24 JTF_NUMBER_TABLE
50 , a25 JTF_NUMBER_TABLE
51 , a26 JTF_NUMBER_TABLE
52 , a27 JTF_VARCHAR2_TABLE_100
53 , a28 JTF_NUMBER_TABLE
54 , a29 JTF_NUMBER_TABLE
55 , a30 JTF_NUMBER_TABLE
56 , a31 JTF_NUMBER_TABLE
57 ) as
58 ddindx binary_integer; indx binary_integer;
59 begin
60 if a0 is not null and a0.count > 0 then
61 if a0.count > 0 then
62 indx := a0.first;
63 ddindx := 1;
64 while true loop
65 t(ddindx).inventory_item_id := rosetta_g_miss_num_map(a0(indx));
66 t(ddindx).organization_id := rosetta_g_miss_num_map(a1(indx));
67 t(ddindx).subinventory_code := a2(indx);
68 t(ddindx).revision := a3(indx);
69 t(ddindx).transaction_quantity := rosetta_g_miss_num_map(a4(indx));
70 t(ddindx).transaction_uom := a5(indx);
71 t(ddindx).transaction_type_id := rosetta_g_miss_num_map(a6(indx));
72 t(ddindx).transaction_action_id := rosetta_g_miss_num_map(a7(indx));
73 t(ddindx).transaction_source_id := rosetta_g_miss_num_map(a8(indx));
74 t(ddindx).transaction_source_type_id := rosetta_g_miss_num_map(a9(indx));
75 t(ddindx).transfer_locator_id := rosetta_g_miss_num_map(a10(indx));
76 t(ddindx).transfer_organization_id := rosetta_g_miss_num_map(a11(indx));
77 t(ddindx).transfer_subinventory := a12(indx);
78 t(ddindx).locator_id := rosetta_g_miss_num_map(a13(indx));
79 t(ddindx).source_project_id := rosetta_g_miss_num_map(a14(indx));
80 t(ddindx).source_task_id := rosetta_g_miss_num_map(a15(indx));
81 t(ddindx).from_project_id := rosetta_g_miss_num_map(a16(indx));
82 t(ddindx).from_task_id := rosetta_g_miss_num_map(a17(indx));
83 t(ddindx).to_project_id := rosetta_g_miss_num_map(a18(indx));
84 t(ddindx).to_task_id := rosetta_g_miss_num_map(a19(indx));
85 t(ddindx).transaction_date := rosetta_g_miss_date_in_map(a20(indx));
86 t(ddindx).last_updated_by := rosetta_g_miss_num_map(a21(indx));
87 t(ddindx).serial_number := a22(indx);
88 t(ddindx).lot_number := a23(indx);
89 t(ddindx).hr_location_id := rosetta_g_miss_num_map(a24(indx));
90 t(ddindx).po_distribution_id := rosetta_g_miss_num_map(a25(indx));
91 t(ddindx).subinv_location_id := rosetta_g_miss_num_map(a26(indx));
92 t(ddindx).shipment_number := a27(indx);
93 t(ddindx).trx_source_line_id := rosetta_g_miss_num_map(a28(indx));
94 t(ddindx).move_order_line_id := rosetta_g_miss_num_map(a29(indx));
95 t(ddindx).serial_number_control_code := rosetta_g_miss_num_map(a30(indx));
96 t(ddindx).ship_to_location_id := rosetta_g_miss_num_map(a31(indx));
97 ddindx := ddindx+1;
98 if a0.last =indx
99 then exit;
100 end if;
101 indx := a0.next(indx);
102 end loop;
103 end if;
104 end if;
105 end rosetta_table_copy_in_p24;
106 procedure rosetta_table_copy_out_p24(t cse_datastructures_pub.mtl_item_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
107 , a1 out nocopy JTF_NUMBER_TABLE
108 , a2 out nocopy JTF_VARCHAR2_TABLE_100
109 , a3 out nocopy JTF_VARCHAR2_TABLE_100
110 , a4 out nocopy JTF_NUMBER_TABLE
111 , a5 out nocopy JTF_VARCHAR2_TABLE_100
112 , a6 out nocopy JTF_NUMBER_TABLE
113 , a7 out nocopy JTF_NUMBER_TABLE
114 , a8 out nocopy JTF_NUMBER_TABLE
115 , a9 out nocopy JTF_NUMBER_TABLE
116 , a10 out nocopy JTF_NUMBER_TABLE
117 , a11 out nocopy JTF_NUMBER_TABLE
118 , a12 out nocopy JTF_VARCHAR2_TABLE_100
119 , a13 out nocopy JTF_NUMBER_TABLE
120 , a14 out nocopy JTF_NUMBER_TABLE
121 , a15 out nocopy JTF_NUMBER_TABLE
122 , a16 out nocopy JTF_NUMBER_TABLE
123 , a17 out nocopy JTF_NUMBER_TABLE
124 , a18 out nocopy JTF_NUMBER_TABLE
125 , a19 out nocopy JTF_NUMBER_TABLE
126 , a20 out nocopy JTF_DATE_TABLE
127 , a21 out nocopy JTF_NUMBER_TABLE
128 , a22 out nocopy JTF_VARCHAR2_TABLE_100
129 , a23 out nocopy JTF_VARCHAR2_TABLE_100
130 , a24 out nocopy JTF_NUMBER_TABLE
131 , a25 out nocopy JTF_NUMBER_TABLE
132 , a26 out nocopy JTF_NUMBER_TABLE
133 , a27 out nocopy JTF_VARCHAR2_TABLE_100
134 , a28 out nocopy JTF_NUMBER_TABLE
135 , a29 out nocopy JTF_NUMBER_TABLE
136 , a30 out nocopy JTF_NUMBER_TABLE
137 , a31 out nocopy JTF_NUMBER_TABLE
138 ) as
139 ddindx binary_integer; indx binary_integer;
140 begin
141 if t is null or t.count = 0 then
142 a0 := JTF_NUMBER_TABLE();
143 a1 := JTF_NUMBER_TABLE();
144 a2 := JTF_VARCHAR2_TABLE_100();
145 a3 := JTF_VARCHAR2_TABLE_100();
146 a4 := JTF_NUMBER_TABLE();
147 a5 := JTF_VARCHAR2_TABLE_100();
148 a6 := JTF_NUMBER_TABLE();
149 a7 := JTF_NUMBER_TABLE();
150 a8 := JTF_NUMBER_TABLE();
151 a9 := JTF_NUMBER_TABLE();
152 a10 := JTF_NUMBER_TABLE();
153 a11 := JTF_NUMBER_TABLE();
154 a12 := JTF_VARCHAR2_TABLE_100();
155 a13 := JTF_NUMBER_TABLE();
156 a14 := JTF_NUMBER_TABLE();
157 a15 := JTF_NUMBER_TABLE();
158 a16 := JTF_NUMBER_TABLE();
159 a17 := JTF_NUMBER_TABLE();
160 a18 := JTF_NUMBER_TABLE();
161 a19 := JTF_NUMBER_TABLE();
162 a20 := JTF_DATE_TABLE();
163 a21 := JTF_NUMBER_TABLE();
164 a22 := JTF_VARCHAR2_TABLE_100();
165 a23 := JTF_VARCHAR2_TABLE_100();
166 a24 := JTF_NUMBER_TABLE();
167 a25 := JTF_NUMBER_TABLE();
168 a26 := JTF_NUMBER_TABLE();
169 a27 := JTF_VARCHAR2_TABLE_100();
170 a28 := JTF_NUMBER_TABLE();
171 a29 := JTF_NUMBER_TABLE();
172 a30 := JTF_NUMBER_TABLE();
173 a31 := JTF_NUMBER_TABLE();
174 else
175 a0 := JTF_NUMBER_TABLE();
176 a1 := JTF_NUMBER_TABLE();
177 a2 := JTF_VARCHAR2_TABLE_100();
178 a3 := JTF_VARCHAR2_TABLE_100();
179 a4 := JTF_NUMBER_TABLE();
180 a5 := JTF_VARCHAR2_TABLE_100();
181 a6 := JTF_NUMBER_TABLE();
182 a7 := JTF_NUMBER_TABLE();
183 a8 := JTF_NUMBER_TABLE();
184 a9 := JTF_NUMBER_TABLE();
185 a10 := JTF_NUMBER_TABLE();
186 a11 := JTF_NUMBER_TABLE();
187 a12 := JTF_VARCHAR2_TABLE_100();
188 a13 := JTF_NUMBER_TABLE();
189 a14 := JTF_NUMBER_TABLE();
190 a15 := JTF_NUMBER_TABLE();
191 a16 := JTF_NUMBER_TABLE();
192 a17 := JTF_NUMBER_TABLE();
193 a18 := JTF_NUMBER_TABLE();
194 a19 := JTF_NUMBER_TABLE();
195 a20 := JTF_DATE_TABLE();
196 a21 := JTF_NUMBER_TABLE();
197 a22 := JTF_VARCHAR2_TABLE_100();
198 a23 := JTF_VARCHAR2_TABLE_100();
199 a24 := JTF_NUMBER_TABLE();
200 a25 := JTF_NUMBER_TABLE();
201 a26 := JTF_NUMBER_TABLE();
202 a27 := JTF_VARCHAR2_TABLE_100();
203 a28 := JTF_NUMBER_TABLE();
204 a29 := JTF_NUMBER_TABLE();
205 a30 := JTF_NUMBER_TABLE();
206 a31 := JTF_NUMBER_TABLE();
207 if t.count > 0 then
208 a0.extend(t.count);
209 a1.extend(t.count);
210 a2.extend(t.count);
211 a3.extend(t.count);
212 a4.extend(t.count);
213 a5.extend(t.count);
214 a6.extend(t.count);
215 a7.extend(t.count);
216 a8.extend(t.count);
217 a9.extend(t.count);
218 a10.extend(t.count);
219 a11.extend(t.count);
220 a12.extend(t.count);
221 a13.extend(t.count);
222 a14.extend(t.count);
223 a15.extend(t.count);
224 a16.extend(t.count);
225 a17.extend(t.count);
226 a18.extend(t.count);
227 a19.extend(t.count);
228 a20.extend(t.count);
229 a21.extend(t.count);
230 a22.extend(t.count);
231 a23.extend(t.count);
232 a24.extend(t.count);
233 a25.extend(t.count);
234 a26.extend(t.count);
235 a27.extend(t.count);
236 a28.extend(t.count);
237 a29.extend(t.count);
238 a30.extend(t.count);
239 a31.extend(t.count);
240 ddindx := t.first;
241 indx := 1;
242 while true loop
243 a0(indx) := rosetta_g_miss_num_map(t(ddindx).inventory_item_id);
244 a1(indx) := rosetta_g_miss_num_map(t(ddindx).organization_id);
245 a2(indx) := t(ddindx).subinventory_code;
246 a3(indx) := t(ddindx).revision;
247 a4(indx) := rosetta_g_miss_num_map(t(ddindx).transaction_quantity);
248 a5(indx) := t(ddindx).transaction_uom;
249 a6(indx) := rosetta_g_miss_num_map(t(ddindx).transaction_type_id);
250 a7(indx) := rosetta_g_miss_num_map(t(ddindx).transaction_action_id);
251 a8(indx) := rosetta_g_miss_num_map(t(ddindx).transaction_source_id);
252 a9(indx) := rosetta_g_miss_num_map(t(ddindx).transaction_source_type_id);
253 a10(indx) := rosetta_g_miss_num_map(t(ddindx).transfer_locator_id);
254 a11(indx) := rosetta_g_miss_num_map(t(ddindx).transfer_organization_id);
255 a12(indx) := t(ddindx).transfer_subinventory;
256 a13(indx) := rosetta_g_miss_num_map(t(ddindx).locator_id);
257 a14(indx) := rosetta_g_miss_num_map(t(ddindx).source_project_id);
258 a15(indx) := rosetta_g_miss_num_map(t(ddindx).source_task_id);
259 a16(indx) := rosetta_g_miss_num_map(t(ddindx).from_project_id);
260 a17(indx) := rosetta_g_miss_num_map(t(ddindx).from_task_id);
261 a18(indx) := rosetta_g_miss_num_map(t(ddindx).to_project_id);
262 a19(indx) := rosetta_g_miss_num_map(t(ddindx).to_task_id);
263 a20(indx) := t(ddindx).transaction_date;
264 a21(indx) := rosetta_g_miss_num_map(t(ddindx).last_updated_by);
265 a22(indx) := t(ddindx).serial_number;
266 a23(indx) := t(ddindx).lot_number;
267 a24(indx) := rosetta_g_miss_num_map(t(ddindx).hr_location_id);
268 a25(indx) := rosetta_g_miss_num_map(t(ddindx).po_distribution_id);
269 a26(indx) := rosetta_g_miss_num_map(t(ddindx).subinv_location_id);
270 a27(indx) := t(ddindx).shipment_number;
271 a28(indx) := rosetta_g_miss_num_map(t(ddindx).trx_source_line_id);
272 a29(indx) := rosetta_g_miss_num_map(t(ddindx).move_order_line_id);
273 a30(indx) := rosetta_g_miss_num_map(t(ddindx).serial_number_control_code);
274 a31(indx) := rosetta_g_miss_num_map(t(ddindx).ship_to_location_id);
275 indx := indx+1;
276 if t.last =ddindx
277 then exit;
278 end if;
279 ddindx := t.next(ddindx);
280 end loop;
281 end if;
282 end if;
283 end rosetta_table_copy_out_p24;
284
285 procedure rosetta_table_copy_in_p26(t out nocopy cse_datastructures_pub.mtl_instance_tbl_type, a0 JTF_NUMBER_TABLE
286 , a1 JTF_VARCHAR2_TABLE_100
287 , a2 JTF_NUMBER_TABLE
288 , a3 JTF_VARCHAR2_TABLE_100
289 , a4 JTF_NUMBER_TABLE
290 , a5 JTF_VARCHAR2_TABLE_100
291 , a6 JTF_VARCHAR2_TABLE_100
292 , a7 JTF_VARCHAR2_TABLE_100
293 , a8 JTF_NUMBER_TABLE
294 , a9 JTF_VARCHAR2_TABLE_100
295 , a10 JTF_NUMBER_TABLE
296 , a11 JTF_VARCHAR2_TABLE_100
297 , a12 JTF_VARCHAR2_TABLE_100
298 , a13 JTF_VARCHAR2_TABLE_100
299 , a14 JTF_VARCHAR2_TABLE_100
300 , a15 JTF_NUMBER_TABLE
301 , a16 JTF_NUMBER_TABLE
302 , a17 JTF_VARCHAR2_TABLE_100
303 , a18 JTF_NUMBER_TABLE
304 , a19 JTF_NUMBER_TABLE
305 , a20 JTF_NUMBER_TABLE
306 ) as
307 ddindx binary_integer; indx binary_integer;
308 begin
309 if a0 is not null and a0.count > 0 then
310 if a0.count > 0 then
311 indx := a0.first;
312 ddindx := 1;
313 while true loop
314 t(ddindx).instance_id := rosetta_g_miss_num_map(a0(indx));
315 t(ddindx).instance_number := a1(indx);
316 t(ddindx).inventory_item_id := rosetta_g_miss_num_map(a2(indx));
317 t(ddindx).inventory_revision := a3(indx);
318 t(ddindx).inv_master_organization_id := rosetta_g_miss_num_map(a4(indx));
319 t(ddindx).serial_number := a5(indx);
320 t(ddindx).mfg_serial_number_flag := a6(indx);
321 t(ddindx).lot_number := a7(indx);
322 t(ddindx).quantity := rosetta_g_miss_num_map(a8(indx));
323 t(ddindx).unit_of_measure := a9(indx);
324 t(ddindx).instance_status_id := rosetta_g_miss_num_map(a10(indx));
325 t(ddindx).customer_view_flag := a11(indx);
326 t(ddindx).merchant_view_flag := a12(indx);
327 t(ddindx).instance_type_code := a13(indx);
328 t(ddindx).location_type_code := a14(indx);
329 t(ddindx).location_id := rosetta_g_miss_num_map(a15(indx));
330 t(ddindx).inv_organization_id := rosetta_g_miss_num_map(a16(indx));
331 t(ddindx).inv_subinventory_name := a17(indx);
332 t(ddindx).inv_locator_id := rosetta_g_miss_num_map(a18(indx));
333 t(ddindx).pa_project_id := rosetta_g_miss_num_map(a19(indx));
334 t(ddindx).pa_project_task_id := rosetta_g_miss_num_map(a20(indx));
335 ddindx := ddindx+1;
336 if a0.last =indx
337 then exit;
338 end if;
339 indx := a0.next(indx);
340 end loop;
341 end if;
342 end if;
343 end rosetta_table_copy_in_p26;
344 procedure rosetta_table_copy_out_p26(t cse_datastructures_pub.mtl_instance_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
345 , a1 out nocopy JTF_VARCHAR2_TABLE_100
346 , a2 out nocopy JTF_NUMBER_TABLE
347 , a3 out nocopy JTF_VARCHAR2_TABLE_100
348 , a4 out nocopy JTF_NUMBER_TABLE
349 , a5 out nocopy JTF_VARCHAR2_TABLE_100
350 , a6 out nocopy JTF_VARCHAR2_TABLE_100
351 , a7 out nocopy JTF_VARCHAR2_TABLE_100
352 , a8 out nocopy JTF_NUMBER_TABLE
353 , a9 out nocopy JTF_VARCHAR2_TABLE_100
354 , a10 out nocopy JTF_NUMBER_TABLE
355 , a11 out nocopy JTF_VARCHAR2_TABLE_100
356 , a12 out nocopy JTF_VARCHAR2_TABLE_100
357 , a13 out nocopy JTF_VARCHAR2_TABLE_100
358 , a14 out nocopy JTF_VARCHAR2_TABLE_100
359 , a15 out nocopy JTF_NUMBER_TABLE
360 , a16 out nocopy JTF_NUMBER_TABLE
361 , a17 out nocopy JTF_VARCHAR2_TABLE_100
362 , a18 out nocopy JTF_NUMBER_TABLE
363 , a19 out nocopy JTF_NUMBER_TABLE
364 , a20 out nocopy JTF_NUMBER_TABLE
365 ) as
366 ddindx binary_integer; indx binary_integer;
367 begin
371 a2 := JTF_NUMBER_TABLE();
368 if t is null or t.count = 0 then
369 a0 := JTF_NUMBER_TABLE();
370 a1 := JTF_VARCHAR2_TABLE_100();
372 a3 := JTF_VARCHAR2_TABLE_100();
373 a4 := JTF_NUMBER_TABLE();
374 a5 := JTF_VARCHAR2_TABLE_100();
375 a6 := JTF_VARCHAR2_TABLE_100();
376 a7 := JTF_VARCHAR2_TABLE_100();
377 a8 := JTF_NUMBER_TABLE();
378 a9 := JTF_VARCHAR2_TABLE_100();
379 a10 := JTF_NUMBER_TABLE();
380 a11 := JTF_VARCHAR2_TABLE_100();
381 a12 := JTF_VARCHAR2_TABLE_100();
382 a13 := JTF_VARCHAR2_TABLE_100();
383 a14 := JTF_VARCHAR2_TABLE_100();
384 a15 := JTF_NUMBER_TABLE();
385 a16 := JTF_NUMBER_TABLE();
386 a17 := JTF_VARCHAR2_TABLE_100();
387 a18 := JTF_NUMBER_TABLE();
388 a19 := JTF_NUMBER_TABLE();
389 a20 := JTF_NUMBER_TABLE();
390 else
391 a0 := JTF_NUMBER_TABLE();
392 a1 := JTF_VARCHAR2_TABLE_100();
393 a2 := JTF_NUMBER_TABLE();
394 a3 := JTF_VARCHAR2_TABLE_100();
395 a4 := JTF_NUMBER_TABLE();
396 a5 := JTF_VARCHAR2_TABLE_100();
397 a6 := JTF_VARCHAR2_TABLE_100();
398 a7 := JTF_VARCHAR2_TABLE_100();
399 a8 := JTF_NUMBER_TABLE();
400 a9 := JTF_VARCHAR2_TABLE_100();
401 a10 := JTF_NUMBER_TABLE();
402 a11 := JTF_VARCHAR2_TABLE_100();
403 a12 := JTF_VARCHAR2_TABLE_100();
404 a13 := JTF_VARCHAR2_TABLE_100();
405 a14 := JTF_VARCHAR2_TABLE_100();
406 a15 := JTF_NUMBER_TABLE();
407 a16 := JTF_NUMBER_TABLE();
408 a17 := JTF_VARCHAR2_TABLE_100();
409 a18 := JTF_NUMBER_TABLE();
410 a19 := JTF_NUMBER_TABLE();
411 a20 := JTF_NUMBER_TABLE();
412 if t.count > 0 then
413 a0.extend(t.count);
414 a1.extend(t.count);
415 a2.extend(t.count);
416 a3.extend(t.count);
417 a4.extend(t.count);
418 a5.extend(t.count);
419 a6.extend(t.count);
420 a7.extend(t.count);
421 a8.extend(t.count);
422 a9.extend(t.count);
423 a10.extend(t.count);
424 a11.extend(t.count);
425 a12.extend(t.count);
426 a13.extend(t.count);
427 a14.extend(t.count);
428 a15.extend(t.count);
429 a16.extend(t.count);
430 a17.extend(t.count);
431 a18.extend(t.count);
432 a19.extend(t.count);
433 a20.extend(t.count);
434 ddindx := t.first;
435 indx := 1;
436 while true loop
437 a0(indx) := rosetta_g_miss_num_map(t(ddindx).instance_id);
438 a1(indx) := t(ddindx).instance_number;
439 a2(indx) := rosetta_g_miss_num_map(t(ddindx).inventory_item_id);
440 a3(indx) := t(ddindx).inventory_revision;
441 a4(indx) := rosetta_g_miss_num_map(t(ddindx).inv_master_organization_id);
442 a5(indx) := t(ddindx).serial_number;
443 a6(indx) := t(ddindx).mfg_serial_number_flag;
444 a7(indx) := t(ddindx).lot_number;
445 a8(indx) := rosetta_g_miss_num_map(t(ddindx).quantity);
446 a9(indx) := t(ddindx).unit_of_measure;
447 a10(indx) := rosetta_g_miss_num_map(t(ddindx).instance_status_id);
448 a11(indx) := t(ddindx).customer_view_flag;
449 a12(indx) := t(ddindx).merchant_view_flag;
450 a13(indx) := t(ddindx).instance_type_code;
451 a14(indx) := t(ddindx).location_type_code;
452 a15(indx) := rosetta_g_miss_num_map(t(ddindx).location_id);
453 a16(indx) := rosetta_g_miss_num_map(t(ddindx).inv_organization_id);
454 a17(indx) := t(ddindx).inv_subinventory_name;
455 a18(indx) := rosetta_g_miss_num_map(t(ddindx).inv_locator_id);
456 a19(indx) := rosetta_g_miss_num_map(t(ddindx).pa_project_id);
457 a20(indx) := rosetta_g_miss_num_map(t(ddindx).pa_project_task_id);
458 indx := indx+1;
459 if t.last =ddindx
460 then exit;
461 end if;
462 ddindx := t.next(ddindx);
463 end loop;
464 end if;
465 end if;
466 end rosetta_table_copy_out_p26;
467
468 procedure rosetta_table_copy_in_p29(t out nocopy cse_datastructures_pub.proj_item_uninst_attr_tbl_type, a0 JTF_NUMBER_TABLE
469 , a1 JTF_VARCHAR2_TABLE_100
470 , a2 JTF_VARCHAR2_TABLE_100
471 , a3 JTF_VARCHAR2_TABLE_100
472 , a4 JTF_NUMBER_TABLE
473 , a5 JTF_NUMBER_TABLE
474 , a6 JTF_NUMBER_TABLE
475 , a7 JTF_VARCHAR2_TABLE_100
476 , a8 JTF_NUMBER_TABLE
477 , a9 JTF_NUMBER_TABLE
478 , a10 JTF_DATE_TABLE
479 , a11 JTF_NUMBER_TABLE
480 , a12 JTF_NUMBER_TABLE
481 ) as
482 ddindx binary_integer; indx binary_integer;
483 begin
484 if a0 is not null and a0.count > 0 then
485 if a0.count > 0 then
486 indx := a0.first;
487 ddindx := 1;
488 while true loop
489 t(ddindx).item_id := rosetta_g_miss_num_map(a0(indx));
490 t(ddindx).revision := a1(indx);
491 t(ddindx).lot_number := a2(indx);
492 t(ddindx).serial_number := a3(indx);
493 t(ddindx).quantity := rosetta_g_miss_num_map(a4(indx));
494 t(ddindx).network_location_id := rosetta_g_miss_num_map(a5(indx));
495 t(ddindx).party_site_id := rosetta_g_miss_num_map(a6(indx));
499 t(ddindx).transaction_date := rosetta_g_miss_date_in_map(a10(indx));
496 t(ddindx).work_order_number := a7(indx);
497 t(ddindx).project_id := rosetta_g_miss_num_map(a8(indx));
498 t(ddindx).task_id := rosetta_g_miss_num_map(a9(indx));
500 t(ddindx).transacted_by := rosetta_g_miss_num_map(a11(indx));
501 t(ddindx).message_id := rosetta_g_miss_num_map(a12(indx));
502 ddindx := ddindx+1;
503 if a0.last =indx
504 then exit;
505 end if;
506 indx := a0.next(indx);
507 end loop;
508 end if;
509 end if;
510 end rosetta_table_copy_in_p29;
511 procedure rosetta_table_copy_out_p29(t cse_datastructures_pub.proj_item_uninst_attr_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
512 , a1 out nocopy JTF_VARCHAR2_TABLE_100
513 , a2 out nocopy JTF_VARCHAR2_TABLE_100
514 , a3 out nocopy JTF_VARCHAR2_TABLE_100
515 , a4 out nocopy JTF_NUMBER_TABLE
516 , a5 out nocopy JTF_NUMBER_TABLE
517 , a6 out nocopy JTF_NUMBER_TABLE
518 , a7 out nocopy JTF_VARCHAR2_TABLE_100
519 , a8 out nocopy JTF_NUMBER_TABLE
520 , a9 out nocopy JTF_NUMBER_TABLE
521 , a10 out nocopy JTF_DATE_TABLE
522 , a11 out nocopy JTF_NUMBER_TABLE
523 , a12 out nocopy JTF_NUMBER_TABLE
524 ) as
525 ddindx binary_integer; indx binary_integer;
526 begin
527 if t is null or t.count = 0 then
528 a0 := JTF_NUMBER_TABLE();
529 a1 := JTF_VARCHAR2_TABLE_100();
530 a2 := JTF_VARCHAR2_TABLE_100();
531 a3 := JTF_VARCHAR2_TABLE_100();
532 a4 := JTF_NUMBER_TABLE();
533 a5 := JTF_NUMBER_TABLE();
534 a6 := JTF_NUMBER_TABLE();
535 a7 := JTF_VARCHAR2_TABLE_100();
536 a8 := JTF_NUMBER_TABLE();
537 a9 := JTF_NUMBER_TABLE();
538 a10 := JTF_DATE_TABLE();
539 a11 := JTF_NUMBER_TABLE();
540 a12 := JTF_NUMBER_TABLE();
541 else
542 a0 := JTF_NUMBER_TABLE();
543 a1 := JTF_VARCHAR2_TABLE_100();
544 a2 := JTF_VARCHAR2_TABLE_100();
545 a3 := JTF_VARCHAR2_TABLE_100();
546 a4 := JTF_NUMBER_TABLE();
547 a5 := JTF_NUMBER_TABLE();
548 a6 := JTF_NUMBER_TABLE();
549 a7 := JTF_VARCHAR2_TABLE_100();
550 a8 := JTF_NUMBER_TABLE();
551 a9 := JTF_NUMBER_TABLE();
552 a10 := JTF_DATE_TABLE();
553 a11 := JTF_NUMBER_TABLE();
554 a12 := JTF_NUMBER_TABLE();
555 if t.count > 0 then
556 a0.extend(t.count);
557 a1.extend(t.count);
558 a2.extend(t.count);
559 a3.extend(t.count);
560 a4.extend(t.count);
561 a5.extend(t.count);
562 a6.extend(t.count);
563 a7.extend(t.count);
564 a8.extend(t.count);
565 a9.extend(t.count);
566 a10.extend(t.count);
567 a11.extend(t.count);
568 a12.extend(t.count);
569 ddindx := t.first;
570 indx := 1;
571 while true loop
572 a0(indx) := rosetta_g_miss_num_map(t(ddindx).item_id);
573 a1(indx) := t(ddindx).revision;
574 a2(indx) := t(ddindx).lot_number;
575 a3(indx) := t(ddindx).serial_number;
576 a4(indx) := rosetta_g_miss_num_map(t(ddindx).quantity);
577 a5(indx) := rosetta_g_miss_num_map(t(ddindx).network_location_id);
578 a6(indx) := rosetta_g_miss_num_map(t(ddindx).party_site_id);
579 a7(indx) := t(ddindx).work_order_number;
580 a8(indx) := rosetta_g_miss_num_map(t(ddindx).project_id);
581 a9(indx) := rosetta_g_miss_num_map(t(ddindx).task_id);
582 a10(indx) := t(ddindx).transaction_date;
583 a11(indx) := rosetta_g_miss_num_map(t(ddindx).transacted_by);
584 a12(indx) := rosetta_g_miss_num_map(t(ddindx).message_id);
585 indx := indx+1;
586 if t.last =ddindx
587 then exit;
588 end if;
589 ddindx := t.next(ddindx);
590 end loop;
591 end if;
592 end if;
593 end rosetta_table_copy_out_p29;
594
595 procedure rosetta_table_copy_in_p31(t out nocopy cse_datastructures_pub.proj_item_inst_attr_tbl_type, a0 JTF_NUMBER_TABLE
596 , a1 JTF_VARCHAR2_TABLE_100
597 , a2 JTF_VARCHAR2_TABLE_100
598 , a3 JTF_VARCHAR2_TABLE_100
599 , a4 JTF_NUMBER_TABLE
600 , a5 JTF_NUMBER_TABLE
601 , a6 JTF_NUMBER_TABLE
602 , a7 JTF_VARCHAR2_TABLE_100
603 , a8 JTF_NUMBER_TABLE
604 , a9 JTF_NUMBER_TABLE
605 , a10 JTF_DATE_TABLE
606 , a11 JTF_NUMBER_TABLE
607 , a12 JTF_NUMBER_TABLE
608 ) as
609 ddindx binary_integer; indx binary_integer;
610 begin
611 if a0 is not null and a0.count > 0 then
612 if a0.count > 0 then
613 indx := a0.first;
614 ddindx := 1;
615 while true loop
616 t(ddindx).item_id := rosetta_g_miss_num_map(a0(indx));
617 t(ddindx).revision := a1(indx);
618 t(ddindx).lot_number := a2(indx);
619 t(ddindx).serial_number := a3(indx);
620 t(ddindx).quantity := rosetta_g_miss_num_map(a4(indx));
621 t(ddindx).network_location_id := rosetta_g_miss_num_map(a5(indx));
622 t(ddindx).party_site_id := rosetta_g_miss_num_map(a6(indx));
623 t(ddindx).work_order_number := a7(indx);
627 t(ddindx).transacted_by := rosetta_g_miss_num_map(a11(indx));
624 t(ddindx).project_id := rosetta_g_miss_num_map(a8(indx));
625 t(ddindx).task_id := rosetta_g_miss_num_map(a9(indx));
626 t(ddindx).transaction_date := rosetta_g_miss_date_in_map(a10(indx));
628 t(ddindx).message_id := rosetta_g_miss_num_map(a12(indx));
629 ddindx := ddindx+1;
630 if a0.last =indx
631 then exit;
632 end if;
633 indx := a0.next(indx);
634 end loop;
635 end if;
636 end if;
637 end rosetta_table_copy_in_p31;
638 procedure rosetta_table_copy_out_p31(t cse_datastructures_pub.proj_item_inst_attr_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
639 , a1 out nocopy JTF_VARCHAR2_TABLE_100
640 , a2 out nocopy JTF_VARCHAR2_TABLE_100
641 , a3 out nocopy JTF_VARCHAR2_TABLE_100
642 , a4 out nocopy JTF_NUMBER_TABLE
643 , a5 out nocopy JTF_NUMBER_TABLE
644 , a6 out nocopy JTF_NUMBER_TABLE
645 , a7 out nocopy JTF_VARCHAR2_TABLE_100
646 , a8 out nocopy JTF_NUMBER_TABLE
647 , a9 out nocopy JTF_NUMBER_TABLE
648 , a10 out nocopy JTF_DATE_TABLE
649 , a11 out nocopy JTF_NUMBER_TABLE
650 , a12 out nocopy JTF_NUMBER_TABLE
651 ) as
652 ddindx binary_integer; indx binary_integer;
653 begin
654 if t is null or t.count = 0 then
655 a0 := JTF_NUMBER_TABLE();
656 a1 := JTF_VARCHAR2_TABLE_100();
657 a2 := JTF_VARCHAR2_TABLE_100();
658 a3 := JTF_VARCHAR2_TABLE_100();
659 a4 := JTF_NUMBER_TABLE();
660 a5 := JTF_NUMBER_TABLE();
661 a6 := JTF_NUMBER_TABLE();
662 a7 := JTF_VARCHAR2_TABLE_100();
663 a8 := JTF_NUMBER_TABLE();
664 a9 := JTF_NUMBER_TABLE();
665 a10 := JTF_DATE_TABLE();
666 a11 := JTF_NUMBER_TABLE();
667 a12 := JTF_NUMBER_TABLE();
668 else
669 a0 := JTF_NUMBER_TABLE();
670 a1 := JTF_VARCHAR2_TABLE_100();
671 a2 := JTF_VARCHAR2_TABLE_100();
672 a3 := JTF_VARCHAR2_TABLE_100();
673 a4 := JTF_NUMBER_TABLE();
674 a5 := JTF_NUMBER_TABLE();
675 a6 := JTF_NUMBER_TABLE();
676 a7 := JTF_VARCHAR2_TABLE_100();
677 a8 := JTF_NUMBER_TABLE();
678 a9 := JTF_NUMBER_TABLE();
679 a10 := JTF_DATE_TABLE();
680 a11 := JTF_NUMBER_TABLE();
681 a12 := JTF_NUMBER_TABLE();
682 if t.count > 0 then
683 a0.extend(t.count);
684 a1.extend(t.count);
685 a2.extend(t.count);
686 a3.extend(t.count);
687 a4.extend(t.count);
688 a5.extend(t.count);
689 a6.extend(t.count);
690 a7.extend(t.count);
691 a8.extend(t.count);
692 a9.extend(t.count);
693 a10.extend(t.count);
694 a11.extend(t.count);
695 a12.extend(t.count);
696 ddindx := t.first;
697 indx := 1;
698 while true loop
699 a0(indx) := rosetta_g_miss_num_map(t(ddindx).item_id);
700 a1(indx) := t(ddindx).revision;
701 a2(indx) := t(ddindx).lot_number;
702 a3(indx) := t(ddindx).serial_number;
703 a4(indx) := rosetta_g_miss_num_map(t(ddindx).quantity);
704 a5(indx) := rosetta_g_miss_num_map(t(ddindx).network_location_id);
705 a6(indx) := rosetta_g_miss_num_map(t(ddindx).party_site_id);
706 a7(indx) := t(ddindx).work_order_number;
707 a8(indx) := rosetta_g_miss_num_map(t(ddindx).project_id);
708 a9(indx) := rosetta_g_miss_num_map(t(ddindx).task_id);
709 a10(indx) := t(ddindx).transaction_date;
710 a11(indx) := rosetta_g_miss_num_map(t(ddindx).transacted_by);
711 a12(indx) := rosetta_g_miss_num_map(t(ddindx).message_id);
712 indx := indx+1;
713 if t.last =ddindx
714 then exit;
715 end if;
716 ddindx := t.next(ddindx);
717 end loop;
718 end if;
719 end if;
720 end rosetta_table_copy_out_p31;
721
722 procedure rosetta_table_copy_in_p33(t out nocopy cse_datastructures_pub.out_of_service_attr_tbl_type, a0 JTF_NUMBER_TABLE
723 , a1 JTF_VARCHAR2_TABLE_100
724 , a2 JTF_VARCHAR2_TABLE_100
725 , a3 JTF_VARCHAR2_TABLE_100
726 , a4 JTF_NUMBER_TABLE
727 , a5 JTF_NUMBER_TABLE
728 , a6 JTF_NUMBER_TABLE
729 , a7 JTF_VARCHAR2_TABLE_100
730 , a8 JTF_DATE_TABLE
731 , a9 JTF_NUMBER_TABLE
732 , a10 JTF_NUMBER_TABLE
733 ) as
734 ddindx binary_integer; indx binary_integer;
735 begin
736 if a0 is not null and a0.count > 0 then
737 if a0.count > 0 then
738 indx := a0.first;
739 ddindx := 1;
740 while true loop
741 t(ddindx).item_id := rosetta_g_miss_num_map(a0(indx));
742 t(ddindx).revision := a1(indx);
743 t(ddindx).lot_number := a2(indx);
744 t(ddindx).serial_number := a3(indx);
745 t(ddindx).quantity := rosetta_g_miss_num_map(a4(indx));
746 t(ddindx).network_location_id := rosetta_g_miss_num_map(a5(indx));
747 t(ddindx).party_site_id := rosetta_g_miss_num_map(a6(indx));
748 t(ddindx).work_order_number := a7(indx);
749 t(ddindx).transaction_date := rosetta_g_miss_date_in_map(a8(indx));
750 t(ddindx).transacted_by := rosetta_g_miss_num_map(a9(indx));
754 then exit;
751 t(ddindx).message_id := rosetta_g_miss_num_map(a10(indx));
752 ddindx := ddindx+1;
753 if a0.last =indx
755 end if;
756 indx := a0.next(indx);
757 end loop;
758 end if;
759 end if;
760 end rosetta_table_copy_in_p33;
761 procedure rosetta_table_copy_out_p33(t cse_datastructures_pub.out_of_service_attr_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
762 , a1 out nocopy JTF_VARCHAR2_TABLE_100
763 , a2 out nocopy JTF_VARCHAR2_TABLE_100
764 , a3 out nocopy JTF_VARCHAR2_TABLE_100
765 , a4 out nocopy JTF_NUMBER_TABLE
766 , a5 out nocopy JTF_NUMBER_TABLE
767 , a6 out nocopy JTF_NUMBER_TABLE
768 , a7 out nocopy JTF_VARCHAR2_TABLE_100
769 , a8 out nocopy JTF_DATE_TABLE
770 , a9 out nocopy JTF_NUMBER_TABLE
771 , a10 out nocopy JTF_NUMBER_TABLE
772 ) as
773 ddindx binary_integer; indx binary_integer;
774 begin
775 if t is null or t.count = 0 then
776 a0 := JTF_NUMBER_TABLE();
777 a1 := JTF_VARCHAR2_TABLE_100();
778 a2 := JTF_VARCHAR2_TABLE_100();
779 a3 := JTF_VARCHAR2_TABLE_100();
780 a4 := JTF_NUMBER_TABLE();
781 a5 := JTF_NUMBER_TABLE();
782 a6 := JTF_NUMBER_TABLE();
783 a7 := JTF_VARCHAR2_TABLE_100();
784 a8 := JTF_DATE_TABLE();
785 a9 := JTF_NUMBER_TABLE();
786 a10 := JTF_NUMBER_TABLE();
787 else
788 a0 := JTF_NUMBER_TABLE();
789 a1 := JTF_VARCHAR2_TABLE_100();
790 a2 := JTF_VARCHAR2_TABLE_100();
791 a3 := JTF_VARCHAR2_TABLE_100();
792 a4 := JTF_NUMBER_TABLE();
793 a5 := JTF_NUMBER_TABLE();
794 a6 := JTF_NUMBER_TABLE();
795 a7 := JTF_VARCHAR2_TABLE_100();
796 a8 := JTF_DATE_TABLE();
797 a9 := JTF_NUMBER_TABLE();
798 a10 := JTF_NUMBER_TABLE();
799 if t.count > 0 then
800 a0.extend(t.count);
801 a1.extend(t.count);
802 a2.extend(t.count);
803 a3.extend(t.count);
804 a4.extend(t.count);
805 a5.extend(t.count);
806 a6.extend(t.count);
807 a7.extend(t.count);
808 a8.extend(t.count);
809 a9.extend(t.count);
810 a10.extend(t.count);
811 ddindx := t.first;
812 indx := 1;
813 while true loop
814 a0(indx) := rosetta_g_miss_num_map(t(ddindx).item_id);
815 a1(indx) := t(ddindx).revision;
816 a2(indx) := t(ddindx).lot_number;
817 a3(indx) := t(ddindx).serial_number;
818 a4(indx) := rosetta_g_miss_num_map(t(ddindx).quantity);
819 a5(indx) := rosetta_g_miss_num_map(t(ddindx).network_location_id);
820 a6(indx) := rosetta_g_miss_num_map(t(ddindx).party_site_id);
821 a7(indx) := t(ddindx).work_order_number;
822 a8(indx) := t(ddindx).transaction_date;
823 a9(indx) := rosetta_g_miss_num_map(t(ddindx).transacted_by);
824 a10(indx) := rosetta_g_miss_num_map(t(ddindx).message_id);
825 indx := indx+1;
826 if t.last =ddindx
827 then exit;
828 end if;
829 ddindx := t.next(ddindx);
830 end loop;
831 end if;
832 end if;
833 end rosetta_table_copy_out_p33;
834
835 procedure rosetta_table_copy_in_p35(t out nocopy cse_datastructures_pub.in_service_attr_tbl_type, a0 JTF_NUMBER_TABLE
836 , a1 JTF_VARCHAR2_TABLE_100
837 , a2 JTF_VARCHAR2_TABLE_100
838 , a3 JTF_VARCHAR2_TABLE_100
839 , a4 JTF_NUMBER_TABLE
840 , a5 JTF_NUMBER_TABLE
841 , a6 JTF_NUMBER_TABLE
842 , a7 JTF_VARCHAR2_TABLE_100
843 , a8 JTF_DATE_TABLE
844 , a9 JTF_NUMBER_TABLE
845 , a10 JTF_NUMBER_TABLE
846 ) as
847 ddindx binary_integer; indx binary_integer;
848 begin
849 if a0 is not null and a0.count > 0 then
850 if a0.count > 0 then
851 indx := a0.first;
852 ddindx := 1;
853 while true loop
854 t(ddindx).item_id := rosetta_g_miss_num_map(a0(indx));
855 t(ddindx).revision := a1(indx);
856 t(ddindx).lot_number := a2(indx);
857 t(ddindx).serial_number := a3(indx);
858 t(ddindx).quantity := rosetta_g_miss_num_map(a4(indx));
859 t(ddindx).network_location_id := rosetta_g_miss_num_map(a5(indx));
860 t(ddindx).party_site_id := rosetta_g_miss_num_map(a6(indx));
861 t(ddindx).work_order_number := a7(indx);
862 t(ddindx).transaction_date := rosetta_g_miss_date_in_map(a8(indx));
863 t(ddindx).transacted_by := rosetta_g_miss_num_map(a9(indx));
864 t(ddindx).message_id := rosetta_g_miss_num_map(a10(indx));
865 ddindx := ddindx+1;
866 if a0.last =indx
867 then exit;
868 end if;
869 indx := a0.next(indx);
870 end loop;
871 end if;
872 end if;
873 end rosetta_table_copy_in_p35;
874 procedure rosetta_table_copy_out_p35(t cse_datastructures_pub.in_service_attr_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
875 , a1 out nocopy JTF_VARCHAR2_TABLE_100
876 , a2 out nocopy JTF_VARCHAR2_TABLE_100
877 , a3 out nocopy JTF_VARCHAR2_TABLE_100
878 , a4 out nocopy JTF_NUMBER_TABLE
879 , a5 out nocopy JTF_NUMBER_TABLE
880 , a6 out nocopy JTF_NUMBER_TABLE
884 , a10 out nocopy JTF_NUMBER_TABLE
881 , a7 out nocopy JTF_VARCHAR2_TABLE_100
882 , a8 out nocopy JTF_DATE_TABLE
883 , a9 out nocopy JTF_NUMBER_TABLE
885 ) as
886 ddindx binary_integer; indx binary_integer;
887 begin
888 if t is null or t.count = 0 then
889 a0 := JTF_NUMBER_TABLE();
890 a1 := JTF_VARCHAR2_TABLE_100();
891 a2 := JTF_VARCHAR2_TABLE_100();
892 a3 := JTF_VARCHAR2_TABLE_100();
893 a4 := JTF_NUMBER_TABLE();
894 a5 := JTF_NUMBER_TABLE();
895 a6 := JTF_NUMBER_TABLE();
896 a7 := JTF_VARCHAR2_TABLE_100();
897 a8 := JTF_DATE_TABLE();
898 a9 := JTF_NUMBER_TABLE();
899 a10 := JTF_NUMBER_TABLE();
900 else
901 a0 := JTF_NUMBER_TABLE();
902 a1 := JTF_VARCHAR2_TABLE_100();
903 a2 := JTF_VARCHAR2_TABLE_100();
904 a3 := JTF_VARCHAR2_TABLE_100();
905 a4 := JTF_NUMBER_TABLE();
906 a5 := JTF_NUMBER_TABLE();
907 a6 := JTF_NUMBER_TABLE();
908 a7 := JTF_VARCHAR2_TABLE_100();
909 a8 := JTF_DATE_TABLE();
910 a9 := JTF_NUMBER_TABLE();
911 a10 := JTF_NUMBER_TABLE();
912 if t.count > 0 then
913 a0.extend(t.count);
914 a1.extend(t.count);
915 a2.extend(t.count);
916 a3.extend(t.count);
917 a4.extend(t.count);
918 a5.extend(t.count);
919 a6.extend(t.count);
920 a7.extend(t.count);
921 a8.extend(t.count);
922 a9.extend(t.count);
923 a10.extend(t.count);
924 ddindx := t.first;
925 indx := 1;
926 while true loop
927 a0(indx) := rosetta_g_miss_num_map(t(ddindx).item_id);
928 a1(indx) := t(ddindx).revision;
929 a2(indx) := t(ddindx).lot_number;
930 a3(indx) := t(ddindx).serial_number;
931 a4(indx) := rosetta_g_miss_num_map(t(ddindx).quantity);
932 a5(indx) := rosetta_g_miss_num_map(t(ddindx).network_location_id);
933 a6(indx) := rosetta_g_miss_num_map(t(ddindx).party_site_id);
934 a7(indx) := t(ddindx).work_order_number;
935 a8(indx) := t(ddindx).transaction_date;
936 a9(indx) := rosetta_g_miss_num_map(t(ddindx).transacted_by);
937 a10(indx) := rosetta_g_miss_num_map(t(ddindx).message_id);
938 indx := indx+1;
939 if t.last =ddindx
940 then exit;
941 end if;
942 ddindx := t.next(ddindx);
943 end loop;
944 end if;
945 end if;
946 end rosetta_table_copy_out_p35;
947
948 procedure rosetta_table_copy_in_p37(t out nocopy cse_datastructures_pub.item_move_attr_tbl_type, a0 JTF_NUMBER_TABLE
949 , a1 JTF_VARCHAR2_TABLE_100
950 , a2 JTF_VARCHAR2_TABLE_100
951 , a3 JTF_VARCHAR2_TABLE_100
952 , a4 JTF_NUMBER_TABLE
953 , a5 JTF_NUMBER_TABLE
954 , a6 JTF_NUMBER_TABLE
955 , a7 JTF_NUMBER_TABLE
956 , a8 JTF_NUMBER_TABLE
957 , a9 JTF_VARCHAR2_TABLE_100
958 , a10 JTF_DATE_TABLE
959 , a11 JTF_NUMBER_TABLE
960 , a12 JTF_NUMBER_TABLE
961 ) as
962 ddindx binary_integer; indx binary_integer;
963 begin
964 if a0 is not null and a0.count > 0 then
965 if a0.count > 0 then
966 indx := a0.first;
967 ddindx := 1;
968 while true loop
969 t(ddindx).item_id := rosetta_g_miss_num_map(a0(indx));
970 t(ddindx).revision := a1(indx);
971 t(ddindx).lot_number := a2(indx);
972 t(ddindx).serial_number := a3(indx);
973 t(ddindx).quantity := rosetta_g_miss_num_map(a4(indx));
974 t(ddindx).from_network_location_id := rosetta_g_miss_num_map(a5(indx));
975 t(ddindx).to_network_location_id := rosetta_g_miss_num_map(a6(indx));
976 t(ddindx).from_party_site_id := rosetta_g_miss_num_map(a7(indx));
977 t(ddindx).to_party_site_id := rosetta_g_miss_num_map(a8(indx));
978 t(ddindx).work_order_number := a9(indx);
979 t(ddindx).transaction_date := rosetta_g_miss_date_in_map(a10(indx));
980 t(ddindx).transacted_by := rosetta_g_miss_num_map(a11(indx));
981 t(ddindx).message_id := rosetta_g_miss_num_map(a12(indx));
982 ddindx := ddindx+1;
983 if a0.last =indx
984 then exit;
985 end if;
986 indx := a0.next(indx);
987 end loop;
988 end if;
989 end if;
990 end rosetta_table_copy_in_p37;
991 procedure rosetta_table_copy_out_p37(t cse_datastructures_pub.item_move_attr_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
992 , a1 out nocopy JTF_VARCHAR2_TABLE_100
993 , a2 out nocopy JTF_VARCHAR2_TABLE_100
994 , a3 out nocopy JTF_VARCHAR2_TABLE_100
995 , a4 out nocopy JTF_NUMBER_TABLE
996 , a5 out nocopy JTF_NUMBER_TABLE
997 , a6 out nocopy JTF_NUMBER_TABLE
998 , a7 out nocopy JTF_NUMBER_TABLE
999 , a8 out nocopy JTF_NUMBER_TABLE
1000 , a9 out nocopy JTF_VARCHAR2_TABLE_100
1001 , a10 out nocopy JTF_DATE_TABLE
1002 , a11 out nocopy JTF_NUMBER_TABLE
1003 , a12 out nocopy JTF_NUMBER_TABLE
1004 ) as
1005 ddindx binary_integer; indx binary_integer;
1006 begin
1007 if t is null or t.count = 0 then
1008 a0 := JTF_NUMBER_TABLE();
1009 a1 := JTF_VARCHAR2_TABLE_100();
1010 a2 := JTF_VARCHAR2_TABLE_100();
1014 a6 := JTF_NUMBER_TABLE();
1011 a3 := JTF_VARCHAR2_TABLE_100();
1012 a4 := JTF_NUMBER_TABLE();
1013 a5 := JTF_NUMBER_TABLE();
1015 a7 := JTF_NUMBER_TABLE();
1016 a8 := JTF_NUMBER_TABLE();
1017 a9 := JTF_VARCHAR2_TABLE_100();
1018 a10 := JTF_DATE_TABLE();
1019 a11 := JTF_NUMBER_TABLE();
1020 a12 := JTF_NUMBER_TABLE();
1021 else
1022 a0 := JTF_NUMBER_TABLE();
1023 a1 := JTF_VARCHAR2_TABLE_100();
1024 a2 := JTF_VARCHAR2_TABLE_100();
1025 a3 := JTF_VARCHAR2_TABLE_100();
1026 a4 := JTF_NUMBER_TABLE();
1027 a5 := JTF_NUMBER_TABLE();
1028 a6 := JTF_NUMBER_TABLE();
1029 a7 := JTF_NUMBER_TABLE();
1030 a8 := JTF_NUMBER_TABLE();
1031 a9 := JTF_VARCHAR2_TABLE_100();
1032 a10 := JTF_DATE_TABLE();
1033 a11 := JTF_NUMBER_TABLE();
1034 a12 := JTF_NUMBER_TABLE();
1035 if t.count > 0 then
1036 a0.extend(t.count);
1037 a1.extend(t.count);
1038 a2.extend(t.count);
1039 a3.extend(t.count);
1040 a4.extend(t.count);
1041 a5.extend(t.count);
1042 a6.extend(t.count);
1043 a7.extend(t.count);
1044 a8.extend(t.count);
1045 a9.extend(t.count);
1046 a10.extend(t.count);
1047 a11.extend(t.count);
1048 a12.extend(t.count);
1049 ddindx := t.first;
1050 indx := 1;
1051 while true loop
1052 a0(indx) := rosetta_g_miss_num_map(t(ddindx).item_id);
1053 a1(indx) := t(ddindx).revision;
1054 a2(indx) := t(ddindx).lot_number;
1055 a3(indx) := t(ddindx).serial_number;
1056 a4(indx) := rosetta_g_miss_num_map(t(ddindx).quantity);
1057 a5(indx) := rosetta_g_miss_num_map(t(ddindx).from_network_location_id);
1058 a6(indx) := rosetta_g_miss_num_map(t(ddindx).to_network_location_id);
1059 a7(indx) := rosetta_g_miss_num_map(t(ddindx).from_party_site_id);
1060 a8(indx) := rosetta_g_miss_num_map(t(ddindx).to_party_site_id);
1061 a9(indx) := t(ddindx).work_order_number;
1062 a10(indx) := t(ddindx).transaction_date;
1063 a11(indx) := rosetta_g_miss_num_map(t(ddindx).transacted_by);
1064 a12(indx) := rosetta_g_miss_num_map(t(ddindx).message_id);
1065 indx := indx+1;
1066 if t.last =ddindx
1067 then exit;
1068 end if;
1069 ddindx := t.next(ddindx);
1070 end loop;
1071 end if;
1072 end if;
1073 end rosetta_table_copy_out_p37;
1074
1075 procedure rosetta_table_copy_in_p39(t out nocopy cse_datastructures_pub.proj_itm_insv_attr_tbl_type, a0 JTF_NUMBER_TABLE
1076 , a1 JTF_VARCHAR2_TABLE_100
1077 , a2 JTF_VARCHAR2_TABLE_100
1078 , a3 JTF_VARCHAR2_TABLE_100
1079 , a4 JTF_NUMBER_TABLE
1080 , a5 JTF_NUMBER_TABLE
1081 , a6 JTF_NUMBER_TABLE
1082 , a7 JTF_VARCHAR2_TABLE_100
1083 , a8 JTF_NUMBER_TABLE
1084 , a9 JTF_NUMBER_TABLE
1085 , a10 JTF_DATE_TABLE
1086 , a11 JTF_DATE_TABLE
1087 , a12 JTF_NUMBER_TABLE
1088 , a13 JTF_NUMBER_TABLE
1089 ) as
1090 ddindx binary_integer; indx binary_integer;
1091 begin
1092 if a0 is not null and a0.count > 0 then
1093 if a0.count > 0 then
1094 indx := a0.first;
1095 ddindx := 1;
1096 while true loop
1097 t(ddindx).item_id := rosetta_g_miss_num_map(a0(indx));
1098 t(ddindx).revision := a1(indx);
1099 t(ddindx).lot_number := a2(indx);
1100 t(ddindx).serial_number := a3(indx);
1101 t(ddindx).quantity := rosetta_g_miss_num_map(a4(indx));
1102 t(ddindx).network_location_id := rosetta_g_miss_num_map(a5(indx));
1103 t(ddindx).party_site_id := rosetta_g_miss_num_map(a6(indx));
1104 t(ddindx).work_order_number := a7(indx);
1105 t(ddindx).project_id := rosetta_g_miss_num_map(a8(indx));
1106 t(ddindx).task_id := rosetta_g_miss_num_map(a9(indx));
1107 t(ddindx).effective_date := rosetta_g_miss_date_in_map(a10(indx));
1108 t(ddindx).transaction_date := rosetta_g_miss_date_in_map(a11(indx));
1109 t(ddindx).transacted_by := rosetta_g_miss_num_map(a12(indx));
1110 t(ddindx).message_id := rosetta_g_miss_num_map(a13(indx));
1111 ddindx := ddindx+1;
1112 if a0.last =indx
1113 then exit;
1114 end if;
1115 indx := a0.next(indx);
1116 end loop;
1117 end if;
1118 end if;
1119 end rosetta_table_copy_in_p39;
1120 procedure rosetta_table_copy_out_p39(t cse_datastructures_pub.proj_itm_insv_attr_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
1121 , a1 out nocopy JTF_VARCHAR2_TABLE_100
1122 , a2 out nocopy JTF_VARCHAR2_TABLE_100
1123 , a3 out nocopy JTF_VARCHAR2_TABLE_100
1124 , a4 out nocopy JTF_NUMBER_TABLE
1125 , a5 out nocopy JTF_NUMBER_TABLE
1126 , a6 out nocopy JTF_NUMBER_TABLE
1127 , a7 out nocopy JTF_VARCHAR2_TABLE_100
1128 , a8 out nocopy JTF_NUMBER_TABLE
1129 , a9 out nocopy JTF_NUMBER_TABLE
1130 , a10 out nocopy JTF_DATE_TABLE
1131 , a11 out nocopy JTF_DATE_TABLE
1132 , a12 out nocopy JTF_NUMBER_TABLE
1133 , a13 out nocopy JTF_NUMBER_TABLE
1134 ) as
1135 ddindx binary_integer; indx binary_integer;
1136 begin
1137 if t is null or t.count = 0 then
1138 a0 := JTF_NUMBER_TABLE();
1142 a4 := JTF_NUMBER_TABLE();
1139 a1 := JTF_VARCHAR2_TABLE_100();
1140 a2 := JTF_VARCHAR2_TABLE_100();
1141 a3 := JTF_VARCHAR2_TABLE_100();
1143 a5 := JTF_NUMBER_TABLE();
1144 a6 := JTF_NUMBER_TABLE();
1145 a7 := JTF_VARCHAR2_TABLE_100();
1146 a8 := JTF_NUMBER_TABLE();
1147 a9 := JTF_NUMBER_TABLE();
1148 a10 := JTF_DATE_TABLE();
1149 a11 := JTF_DATE_TABLE();
1150 a12 := JTF_NUMBER_TABLE();
1151 a13 := JTF_NUMBER_TABLE();
1152 else
1153 a0 := JTF_NUMBER_TABLE();
1154 a1 := JTF_VARCHAR2_TABLE_100();
1155 a2 := JTF_VARCHAR2_TABLE_100();
1156 a3 := JTF_VARCHAR2_TABLE_100();
1157 a4 := JTF_NUMBER_TABLE();
1158 a5 := JTF_NUMBER_TABLE();
1159 a6 := JTF_NUMBER_TABLE();
1160 a7 := JTF_VARCHAR2_TABLE_100();
1161 a8 := JTF_NUMBER_TABLE();
1162 a9 := JTF_NUMBER_TABLE();
1163 a10 := JTF_DATE_TABLE();
1164 a11 := JTF_DATE_TABLE();
1165 a12 := JTF_NUMBER_TABLE();
1166 a13 := JTF_NUMBER_TABLE();
1167 if t.count > 0 then
1168 a0.extend(t.count);
1169 a1.extend(t.count);
1170 a2.extend(t.count);
1171 a3.extend(t.count);
1172 a4.extend(t.count);
1173 a5.extend(t.count);
1174 a6.extend(t.count);
1175 a7.extend(t.count);
1176 a8.extend(t.count);
1177 a9.extend(t.count);
1178 a10.extend(t.count);
1179 a11.extend(t.count);
1180 a12.extend(t.count);
1181 a13.extend(t.count);
1182 ddindx := t.first;
1183 indx := 1;
1184 while true loop
1185 a0(indx) := rosetta_g_miss_num_map(t(ddindx).item_id);
1186 a1(indx) := t(ddindx).revision;
1187 a2(indx) := t(ddindx).lot_number;
1188 a3(indx) := t(ddindx).serial_number;
1189 a4(indx) := rosetta_g_miss_num_map(t(ddindx).quantity);
1190 a5(indx) := rosetta_g_miss_num_map(t(ddindx).network_location_id);
1191 a6(indx) := rosetta_g_miss_num_map(t(ddindx).party_site_id);
1192 a7(indx) := t(ddindx).work_order_number;
1193 a8(indx) := rosetta_g_miss_num_map(t(ddindx).project_id);
1194 a9(indx) := rosetta_g_miss_num_map(t(ddindx).task_id);
1195 a10(indx) := t(ddindx).effective_date;
1196 a11(indx) := t(ddindx).transaction_date;
1197 a12(indx) := rosetta_g_miss_num_map(t(ddindx).transacted_by);
1198 a13(indx) := rosetta_g_miss_num_map(t(ddindx).message_id);
1199 indx := indx+1;
1200 if t.last =ddindx
1201 then exit;
1202 end if;
1203 ddindx := t.next(ddindx);
1204 end loop;
1205 end if;
1206 end if;
1207 end rosetta_table_copy_out_p39;
1208
1209 procedure rosetta_table_copy_in_p41(t out nocopy cse_datastructures_pub.proj_itm_insv_pa_attr_tbl_type, a0 JTF_NUMBER_TABLE
1210 , a1 JTF_NUMBER_TABLE
1211 , a2 JTF_VARCHAR2_TABLE_100
1212 , a3 JTF_NUMBER_TABLE
1213 , a4 JTF_NUMBER_TABLE
1214 , a5 JTF_VARCHAR2_TABLE_100
1215 , a6 JTF_NUMBER_TABLE
1216 , a7 JTF_NUMBER_TABLE
1217 , a8 JTF_NUMBER_TABLE
1218 , a9 JTF_NUMBER_TABLE
1219 , a10 JTF_NUMBER_TABLE
1220 , a11 JTF_DATE_TABLE
1221 , a12 JTF_NUMBER_TABLE
1222 , a13 JTF_NUMBER_TABLE
1223 , a14 JTF_NUMBER_TABLE
1224 ) as
1225 ddindx binary_integer; indx binary_integer;
1226 begin
1227 if a0 is not null and a0.count > 0 then
1228 if a0.count > 0 then
1229 indx := a0.first;
1230 ddindx := 1;
1231 while true loop
1232 t(ddindx).item_id := rosetta_g_miss_num_map(a0(indx));
1233 t(ddindx).inv_master_org_id := rosetta_g_miss_num_map(a1(indx));
1234 t(ddindx).serial_number := a2(indx);
1235 t(ddindx).quantity := rosetta_g_miss_num_map(a3(indx));
1236 t(ddindx).location_id := rosetta_g_miss_num_map(a4(indx));
1237 t(ddindx).location_type := a5(indx);
1238 t(ddindx).project_id := rosetta_g_miss_num_map(a6(indx));
1239 t(ddindx).task_id := rosetta_g_miss_num_map(a7(indx));
1240 t(ddindx).instance_id := rosetta_g_miss_num_map(a8(indx));
1241 t(ddindx).object_version_number := rosetta_g_miss_num_map(a9(indx));
1242 t(ddindx).transaction_id := rosetta_g_miss_num_map(a10(indx));
1243 t(ddindx).transaction_date := rosetta_g_miss_date_in_map(a11(indx));
1244 t(ddindx).transacted_by := rosetta_g_miss_num_map(a12(indx));
1245 t(ddindx).message_id := rosetta_g_miss_num_map(a13(indx));
1246 t(ddindx).org_id := rosetta_g_miss_num_map(a14(indx));
1247 ddindx := ddindx+1;
1248 if a0.last =indx
1249 then exit;
1250 end if;
1251 indx := a0.next(indx);
1252 end loop;
1253 end if;
1254 end if;
1255 end rosetta_table_copy_in_p41;
1256 procedure rosetta_table_copy_out_p41(t cse_datastructures_pub.proj_itm_insv_pa_attr_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
1257 , a1 out nocopy JTF_NUMBER_TABLE
1258 , a2 out nocopy JTF_VARCHAR2_TABLE_100
1259 , a3 out nocopy JTF_NUMBER_TABLE
1260 , a4 out nocopy JTF_NUMBER_TABLE
1261 , a5 out nocopy JTF_VARCHAR2_TABLE_100
1262 , a6 out nocopy JTF_NUMBER_TABLE
1263 , a7 out nocopy JTF_NUMBER_TABLE
1264 , a8 out nocopy JTF_NUMBER_TABLE
1265 , a9 out nocopy JTF_NUMBER_TABLE
1269 , a13 out nocopy JTF_NUMBER_TABLE
1266 , a10 out nocopy JTF_NUMBER_TABLE
1267 , a11 out nocopy JTF_DATE_TABLE
1268 , a12 out nocopy JTF_NUMBER_TABLE
1270 , a14 out nocopy JTF_NUMBER_TABLE
1271 ) as
1272 ddindx binary_integer; indx binary_integer;
1273 begin
1274 if t is null or t.count = 0 then
1275 a0 := JTF_NUMBER_TABLE();
1276 a1 := JTF_NUMBER_TABLE();
1277 a2 := JTF_VARCHAR2_TABLE_100();
1278 a3 := JTF_NUMBER_TABLE();
1279 a4 := JTF_NUMBER_TABLE();
1280 a5 := JTF_VARCHAR2_TABLE_100();
1281 a6 := JTF_NUMBER_TABLE();
1282 a7 := JTF_NUMBER_TABLE();
1283 a8 := JTF_NUMBER_TABLE();
1284 a9 := JTF_NUMBER_TABLE();
1285 a10 := JTF_NUMBER_TABLE();
1286 a11 := JTF_DATE_TABLE();
1287 a12 := JTF_NUMBER_TABLE();
1288 a13 := JTF_NUMBER_TABLE();
1289 a14 := JTF_NUMBER_TABLE();
1290 else
1291 a0 := JTF_NUMBER_TABLE();
1292 a1 := JTF_NUMBER_TABLE();
1293 a2 := JTF_VARCHAR2_TABLE_100();
1294 a3 := JTF_NUMBER_TABLE();
1295 a4 := JTF_NUMBER_TABLE();
1296 a5 := JTF_VARCHAR2_TABLE_100();
1297 a6 := JTF_NUMBER_TABLE();
1298 a7 := JTF_NUMBER_TABLE();
1299 a8 := JTF_NUMBER_TABLE();
1300 a9 := JTF_NUMBER_TABLE();
1301 a10 := JTF_NUMBER_TABLE();
1302 a11 := JTF_DATE_TABLE();
1303 a12 := JTF_NUMBER_TABLE();
1304 a13 := JTF_NUMBER_TABLE();
1305 a14 := JTF_NUMBER_TABLE();
1306 if t.count > 0 then
1307 a0.extend(t.count);
1308 a1.extend(t.count);
1309 a2.extend(t.count);
1310 a3.extend(t.count);
1311 a4.extend(t.count);
1312 a5.extend(t.count);
1313 a6.extend(t.count);
1314 a7.extend(t.count);
1315 a8.extend(t.count);
1316 a9.extend(t.count);
1317 a10.extend(t.count);
1318 a11.extend(t.count);
1319 a12.extend(t.count);
1320 a13.extend(t.count);
1321 a14.extend(t.count);
1322 ddindx := t.first;
1323 indx := 1;
1324 while true loop
1325 a0(indx) := rosetta_g_miss_num_map(t(ddindx).item_id);
1326 a1(indx) := rosetta_g_miss_num_map(t(ddindx).inv_master_org_id);
1327 a2(indx) := t(ddindx).serial_number;
1328 a3(indx) := rosetta_g_miss_num_map(t(ddindx).quantity);
1329 a4(indx) := rosetta_g_miss_num_map(t(ddindx).location_id);
1330 a5(indx) := t(ddindx).location_type;
1331 a6(indx) := rosetta_g_miss_num_map(t(ddindx).project_id);
1332 a7(indx) := rosetta_g_miss_num_map(t(ddindx).task_id);
1333 a8(indx) := rosetta_g_miss_num_map(t(ddindx).instance_id);
1334 a9(indx) := rosetta_g_miss_num_map(t(ddindx).object_version_number);
1335 a10(indx) := rosetta_g_miss_num_map(t(ddindx).transaction_id);
1336 a11(indx) := t(ddindx).transaction_date;
1337 a12(indx) := rosetta_g_miss_num_map(t(ddindx).transacted_by);
1338 a13(indx) := rosetta_g_miss_num_map(t(ddindx).message_id);
1339 a14(indx) := rosetta_g_miss_num_map(t(ddindx).org_id);
1340 indx := indx+1;
1341 if t.last =ddindx
1342 then exit;
1343 end if;
1344 ddindx := t.next(ddindx);
1345 end loop;
1346 end if;
1347 end if;
1348 end rosetta_table_copy_out_p41;
1349
1350 procedure rosetta_table_copy_in_p43(t out nocopy cse_datastructures_pub.rcv_txn_tbl_type, a0 JTF_NUMBER_TABLE
1351 , a1 JTF_NUMBER_TABLE
1352 , a2 JTF_NUMBER_TABLE
1353 , a3 JTF_NUMBER_TABLE
1354 , a4 JTF_NUMBER_TABLE
1355 , a5 JTF_NUMBER_TABLE
1356 , a6 JTF_NUMBER_TABLE
1357 , a7 JTF_NUMBER_TABLE
1358 , a8 JTF_NUMBER_TABLE
1359 , a9 JTF_NUMBER_TABLE
1360 , a10 JTF_DATE_TABLE
1361 , a11 JTF_NUMBER_TABLE
1362 , a12 JTF_VARCHAR2_TABLE_100
1363 , a13 JTF_VARCHAR2_TABLE_100
1364 , a14 JTF_VARCHAR2_TABLE_100
1365 , a15 JTF_NUMBER_TABLE
1366 , a16 JTF_VARCHAR2_TABLE_100
1367 , a17 JTF_NUMBER_TABLE
1368 , a18 JTF_NUMBER_TABLE
1369 , a19 JTF_VARCHAR2_TABLE_100
1370 , a20 JTF_VARCHAR2_TABLE_100
1371 , a21 JTF_NUMBER_TABLE
1372 , a22 JTF_VARCHAR2_TABLE_100
1373 , a23 JTF_VARCHAR2_TABLE_100
1374 ) as
1375 ddindx binary_integer; indx binary_integer;
1376 begin
1377 if a0 is not null and a0.count > 0 then
1378 if a0.count > 0 then
1379 indx := a0.first;
1380 ddindx := 1;
1381 while true loop
1382 t(ddindx).rcv_transaction_id := rosetta_g_miss_num_map(a0(indx));
1383 t(ddindx).temp_txn_id := rosetta_g_miss_num_map(a1(indx));
1384 t(ddindx).organization_id := rosetta_g_miss_num_map(a2(indx));
1385 t(ddindx).txn_organization_id := rosetta_g_miss_num_map(a3(indx));
1386 t(ddindx).po_header_id := rosetta_g_miss_num_map(a4(indx));
1387 t(ddindx).po_line_id := rosetta_g_miss_num_map(a5(indx));
1388 t(ddindx).po_distribution_id := rosetta_g_miss_num_map(a6(indx));
1389 t(ddindx).project_id := rosetta_g_miss_num_map(a7(indx));
1390 t(ddindx).task_id := rosetta_g_miss_num_map(a8(indx));
1391 t(ddindx).transacted_by := rosetta_g_miss_num_map(a9(indx));
1392 t(ddindx).transaction_date := rosetta_g_miss_date_in_map(a10(indx));
1396 t(ddindx).serial_number := a14(indx);
1393 t(ddindx).inventory_item_id := rosetta_g_miss_num_map(a11(indx));
1394 t(ddindx).revision_id := a12(indx);
1395 t(ddindx).lot_number := a13(indx);
1397 t(ddindx).quantity := rosetta_g_miss_num_map(a15(indx));
1398 t(ddindx).uom := a16(indx);
1399 t(ddindx).amount := rosetta_g_miss_num_map(a17(indx));
1400 t(ddindx).csi_transaction_id := rosetta_g_miss_num_map(a18(indx));
1401 t(ddindx).po_number := a19(indx);
1402 t(ddindx).po_line_number := a20(indx);
1403 t(ddindx).po_vendor_id := rosetta_g_miss_num_map(a21(indx));
1404 t(ddindx).transaction_type := a22(indx);
1405 t(ddindx).destination_type_code := a23(indx);
1406 ddindx := ddindx+1;
1407 if a0.last =indx
1408 then exit;
1409 end if;
1410 indx := a0.next(indx);
1411 end loop;
1412 end if;
1413 end if;
1414 end rosetta_table_copy_in_p43;
1415 procedure rosetta_table_copy_out_p43(t cse_datastructures_pub.rcv_txn_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
1416 , a1 out nocopy JTF_NUMBER_TABLE
1417 , a2 out nocopy JTF_NUMBER_TABLE
1418 , a3 out nocopy JTF_NUMBER_TABLE
1419 , a4 out nocopy JTF_NUMBER_TABLE
1420 , a5 out nocopy JTF_NUMBER_TABLE
1421 , a6 out nocopy JTF_NUMBER_TABLE
1422 , a7 out nocopy JTF_NUMBER_TABLE
1423 , a8 out nocopy JTF_NUMBER_TABLE
1424 , a9 out nocopy JTF_NUMBER_TABLE
1425 , a10 out nocopy JTF_DATE_TABLE
1426 , a11 out nocopy JTF_NUMBER_TABLE
1427 , a12 out nocopy JTF_VARCHAR2_TABLE_100
1428 , a13 out nocopy JTF_VARCHAR2_TABLE_100
1429 , a14 out nocopy JTF_VARCHAR2_TABLE_100
1430 , a15 out nocopy JTF_NUMBER_TABLE
1431 , a16 out nocopy JTF_VARCHAR2_TABLE_100
1432 , a17 out nocopy JTF_NUMBER_TABLE
1433 , a18 out nocopy JTF_NUMBER_TABLE
1434 , a19 out nocopy JTF_VARCHAR2_TABLE_100
1435 , a20 out nocopy JTF_VARCHAR2_TABLE_100
1436 , a21 out nocopy JTF_NUMBER_TABLE
1437 , a22 out nocopy JTF_VARCHAR2_TABLE_100
1438 , a23 out nocopy JTF_VARCHAR2_TABLE_100
1439 ) as
1440 ddindx binary_integer; indx binary_integer;
1441 begin
1442 if t is null or t.count = 0 then
1443 a0 := JTF_NUMBER_TABLE();
1444 a1 := JTF_NUMBER_TABLE();
1445 a2 := JTF_NUMBER_TABLE();
1446 a3 := JTF_NUMBER_TABLE();
1447 a4 := JTF_NUMBER_TABLE();
1448 a5 := JTF_NUMBER_TABLE();
1449 a6 := JTF_NUMBER_TABLE();
1450 a7 := JTF_NUMBER_TABLE();
1451 a8 := JTF_NUMBER_TABLE();
1452 a9 := JTF_NUMBER_TABLE();
1453 a10 := JTF_DATE_TABLE();
1454 a11 := JTF_NUMBER_TABLE();
1455 a12 := JTF_VARCHAR2_TABLE_100();
1456 a13 := JTF_VARCHAR2_TABLE_100();
1457 a14 := JTF_VARCHAR2_TABLE_100();
1458 a15 := JTF_NUMBER_TABLE();
1459 a16 := JTF_VARCHAR2_TABLE_100();
1460 a17 := JTF_NUMBER_TABLE();
1461 a18 := JTF_NUMBER_TABLE();
1462 a19 := JTF_VARCHAR2_TABLE_100();
1463 a20 := JTF_VARCHAR2_TABLE_100();
1464 a21 := JTF_NUMBER_TABLE();
1465 a22 := JTF_VARCHAR2_TABLE_100();
1466 a23 := JTF_VARCHAR2_TABLE_100();
1467 else
1468 a0 := JTF_NUMBER_TABLE();
1469 a1 := JTF_NUMBER_TABLE();
1470 a2 := JTF_NUMBER_TABLE();
1471 a3 := JTF_NUMBER_TABLE();
1472 a4 := JTF_NUMBER_TABLE();
1473 a5 := JTF_NUMBER_TABLE();
1474 a6 := JTF_NUMBER_TABLE();
1475 a7 := JTF_NUMBER_TABLE();
1476 a8 := JTF_NUMBER_TABLE();
1477 a9 := JTF_NUMBER_TABLE();
1478 a10 := JTF_DATE_TABLE();
1479 a11 := JTF_NUMBER_TABLE();
1480 a12 := JTF_VARCHAR2_TABLE_100();
1481 a13 := JTF_VARCHAR2_TABLE_100();
1482 a14 := JTF_VARCHAR2_TABLE_100();
1483 a15 := JTF_NUMBER_TABLE();
1484 a16 := JTF_VARCHAR2_TABLE_100();
1485 a17 := JTF_NUMBER_TABLE();
1486 a18 := JTF_NUMBER_TABLE();
1487 a19 := JTF_VARCHAR2_TABLE_100();
1488 a20 := JTF_VARCHAR2_TABLE_100();
1489 a21 := JTF_NUMBER_TABLE();
1490 a22 := JTF_VARCHAR2_TABLE_100();
1491 a23 := JTF_VARCHAR2_TABLE_100();
1492 if t.count > 0 then
1493 a0.extend(t.count);
1494 a1.extend(t.count);
1495 a2.extend(t.count);
1496 a3.extend(t.count);
1497 a4.extend(t.count);
1498 a5.extend(t.count);
1499 a6.extend(t.count);
1500 a7.extend(t.count);
1501 a8.extend(t.count);
1502 a9.extend(t.count);
1503 a10.extend(t.count);
1504 a11.extend(t.count);
1505 a12.extend(t.count);
1506 a13.extend(t.count);
1507 a14.extend(t.count);
1508 a15.extend(t.count);
1509 a16.extend(t.count);
1510 a17.extend(t.count);
1511 a18.extend(t.count);
1512 a19.extend(t.count);
1513 a20.extend(t.count);
1514 a21.extend(t.count);
1515 a22.extend(t.count);
1516 a23.extend(t.count);
1517 ddindx := t.first;
1518 indx := 1;
1519 while true loop
1520 a0(indx) := rosetta_g_miss_num_map(t(ddindx).rcv_transaction_id);
1521 a1(indx) := rosetta_g_miss_num_map(t(ddindx).temp_txn_id);
1522 a2(indx) := rosetta_g_miss_num_map(t(ddindx).organization_id);
1523 a3(indx) := rosetta_g_miss_num_map(t(ddindx).txn_organization_id);
1527 a7(indx) := rosetta_g_miss_num_map(t(ddindx).project_id);
1524 a4(indx) := rosetta_g_miss_num_map(t(ddindx).po_header_id);
1525 a5(indx) := rosetta_g_miss_num_map(t(ddindx).po_line_id);
1526 a6(indx) := rosetta_g_miss_num_map(t(ddindx).po_distribution_id);
1528 a8(indx) := rosetta_g_miss_num_map(t(ddindx).task_id);
1529 a9(indx) := rosetta_g_miss_num_map(t(ddindx).transacted_by);
1530 a10(indx) := t(ddindx).transaction_date;
1531 a11(indx) := rosetta_g_miss_num_map(t(ddindx).inventory_item_id);
1532 a12(indx) := t(ddindx).revision_id;
1533 a13(indx) := t(ddindx).lot_number;
1534 a14(indx) := t(ddindx).serial_number;
1535 a15(indx) := rosetta_g_miss_num_map(t(ddindx).quantity);
1536 a16(indx) := t(ddindx).uom;
1537 a17(indx) := rosetta_g_miss_num_map(t(ddindx).amount);
1538 a18(indx) := rosetta_g_miss_num_map(t(ddindx).csi_transaction_id);
1539 a19(indx) := t(ddindx).po_number;
1540 a20(indx) := t(ddindx).po_line_number;
1541 a21(indx) := rosetta_g_miss_num_map(t(ddindx).po_vendor_id);
1542 a22(indx) := t(ddindx).transaction_type;
1543 a23(indx) := t(ddindx).destination_type_code;
1544 indx := indx+1;
1545 if t.last =ddindx
1546 then exit;
1547 end if;
1548 ddindx := t.next(ddindx);
1549 end loop;
1550 end if;
1551 end if;
1552 end rosetta_table_copy_out_p43;
1553
1554 procedure rosetta_table_copy_in_p45(t out nocopy cse_datastructures_pub.ipv_txn_tbl_type, a0 JTF_NUMBER_TABLE
1555 , a1 JTF_NUMBER_TABLE
1556 , a2 JTF_NUMBER_TABLE
1557 , a3 JTF_VARCHAR2_TABLE_100
1558 , a4 JTF_VARCHAR2_TABLE_100
1559 , a5 JTF_NUMBER_TABLE
1560 , a6 JTF_DATE_TABLE
1561 , a7 JTF_NUMBER_TABLE
1562 , a8 JTF_NUMBER_TABLE
1563 , a9 JTF_NUMBER_TABLE
1564 , a10 JTF_DATE_TABLE
1565 , a11 JTF_NUMBER_TABLE
1566 , a12 JTF_NUMBER_TABLE
1567 , a13 JTF_NUMBER_TABLE
1568 , a14 JTF_NUMBER_TABLE
1569 , a15 JTF_NUMBER_TABLE
1570 , a16 JTF_NUMBER_TABLE
1571 , a17 JTF_NUMBER_TABLE
1572 , a18 JTF_VARCHAR2_TABLE_100
1573 , a19 JTF_VARCHAR2_TABLE_100
1574 , a20 JTF_NUMBER_TABLE
1575 , a21 JTF_VARCHAR2_TABLE_100
1576 ) as
1577 ddindx binary_integer; indx binary_integer;
1578 begin
1579 if a0 is not null and a0.count > 0 then
1580 if a0.count > 0 then
1581 indx := a0.first;
1582 ddindx := 1;
1583 while true loop
1584 t(ddindx).project_id := rosetta_g_miss_num_map(a0(indx));
1585 t(ddindx).task_id := rosetta_g_miss_num_map(a1(indx));
1586 t(ddindx).inventory_item_id := rosetta_g_miss_num_map(a2(indx));
1587 t(ddindx).item_name := a3(indx);
1588 t(ddindx).serial_number := a4(indx);
1589 t(ddindx).invoice_distribution_id := rosetta_g_miss_num_map(a5(indx));
1590 t(ddindx).accounting_date := rosetta_g_miss_date_in_map(a6(indx));
1591 t(ddindx).invoice_id := rosetta_g_miss_num_map(a7(indx));
1592 t(ddindx).ipv := rosetta_g_miss_num_map(a8(indx));
1593 t(ddindx).transacted_by := rosetta_g_miss_num_map(a9(indx));
1594 t(ddindx).transaction_date := rosetta_g_miss_date_in_map(a10(indx));
1595 t(ddindx).organization_id := rosetta_g_miss_num_map(a11(indx));
1596 t(ddindx).invoice_quantity := rosetta_g_miss_num_map(a12(indx));
1597 t(ddindx).price_var_cc_id := rosetta_g_miss_num_map(a13(indx));
1598 t(ddindx).po_header_id := rosetta_g_miss_num_map(a14(indx));
1599 t(ddindx).po_line_id := rosetta_g_miss_num_map(a15(indx));
1600 t(ddindx).po_distribution_id := rosetta_g_miss_num_map(a16(indx));
1601 t(ddindx).cr_cc_id := rosetta_g_miss_num_map(a17(indx));
1602 t(ddindx).vendor_number := a18(indx);
1603 t(ddindx).uom := a19(indx);
1604 t(ddindx).csi_transaction_id := rosetta_g_miss_num_map(a20(indx));
1605 t(ddindx).invoice_number := a21(indx);
1606 ddindx := ddindx+1;
1607 if a0.last =indx
1608 then exit;
1609 end if;
1610 indx := a0.next(indx);
1611 end loop;
1612 end if;
1613 end if;
1614 end rosetta_table_copy_in_p45;
1615 procedure rosetta_table_copy_out_p45(t cse_datastructures_pub.ipv_txn_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
1616 , a1 out nocopy JTF_NUMBER_TABLE
1617 , a2 out nocopy JTF_NUMBER_TABLE
1618 , a3 out nocopy JTF_VARCHAR2_TABLE_100
1619 , a4 out nocopy JTF_VARCHAR2_TABLE_100
1620 , a5 out nocopy JTF_NUMBER_TABLE
1621 , a6 out nocopy JTF_DATE_TABLE
1622 , a7 out nocopy JTF_NUMBER_TABLE
1623 , a8 out nocopy JTF_NUMBER_TABLE
1624 , a9 out nocopy JTF_NUMBER_TABLE
1625 , a10 out nocopy JTF_DATE_TABLE
1626 , a11 out nocopy JTF_NUMBER_TABLE
1627 , a12 out nocopy JTF_NUMBER_TABLE
1628 , a13 out nocopy JTF_NUMBER_TABLE
1629 , a14 out nocopy JTF_NUMBER_TABLE
1630 , a15 out nocopy JTF_NUMBER_TABLE
1631 , a16 out nocopy JTF_NUMBER_TABLE
1632 , a17 out nocopy JTF_NUMBER_TABLE
1633 , a18 out nocopy JTF_VARCHAR2_TABLE_100
1634 , a19 out nocopy JTF_VARCHAR2_TABLE_100
1635 , a20 out nocopy JTF_NUMBER_TABLE
1636 , a21 out nocopy JTF_VARCHAR2_TABLE_100
1637 ) as
1638 ddindx binary_integer; indx binary_integer;
1639 begin
1643 a2 := JTF_NUMBER_TABLE();
1640 if t is null or t.count = 0 then
1641 a0 := JTF_NUMBER_TABLE();
1642 a1 := JTF_NUMBER_TABLE();
1644 a3 := JTF_VARCHAR2_TABLE_100();
1645 a4 := JTF_VARCHAR2_TABLE_100();
1646 a5 := JTF_NUMBER_TABLE();
1647 a6 := JTF_DATE_TABLE();
1648 a7 := JTF_NUMBER_TABLE();
1649 a8 := JTF_NUMBER_TABLE();
1650 a9 := JTF_NUMBER_TABLE();
1651 a10 := JTF_DATE_TABLE();
1652 a11 := JTF_NUMBER_TABLE();
1653 a12 := JTF_NUMBER_TABLE();
1654 a13 := JTF_NUMBER_TABLE();
1655 a14 := JTF_NUMBER_TABLE();
1656 a15 := JTF_NUMBER_TABLE();
1657 a16 := JTF_NUMBER_TABLE();
1658 a17 := JTF_NUMBER_TABLE();
1659 a18 := JTF_VARCHAR2_TABLE_100();
1660 a19 := JTF_VARCHAR2_TABLE_100();
1661 a20 := JTF_NUMBER_TABLE();
1662 a21 := JTF_VARCHAR2_TABLE_100();
1663 else
1664 a0 := JTF_NUMBER_TABLE();
1665 a1 := JTF_NUMBER_TABLE();
1666 a2 := JTF_NUMBER_TABLE();
1667 a3 := JTF_VARCHAR2_TABLE_100();
1668 a4 := JTF_VARCHAR2_TABLE_100();
1669 a5 := JTF_NUMBER_TABLE();
1670 a6 := JTF_DATE_TABLE();
1671 a7 := JTF_NUMBER_TABLE();
1672 a8 := JTF_NUMBER_TABLE();
1673 a9 := JTF_NUMBER_TABLE();
1674 a10 := JTF_DATE_TABLE();
1675 a11 := JTF_NUMBER_TABLE();
1676 a12 := JTF_NUMBER_TABLE();
1677 a13 := JTF_NUMBER_TABLE();
1678 a14 := JTF_NUMBER_TABLE();
1679 a15 := JTF_NUMBER_TABLE();
1680 a16 := JTF_NUMBER_TABLE();
1681 a17 := JTF_NUMBER_TABLE();
1682 a18 := JTF_VARCHAR2_TABLE_100();
1683 a19 := JTF_VARCHAR2_TABLE_100();
1684 a20 := JTF_NUMBER_TABLE();
1685 a21 := JTF_VARCHAR2_TABLE_100();
1686 if t.count > 0 then
1687 a0.extend(t.count);
1688 a1.extend(t.count);
1689 a2.extend(t.count);
1690 a3.extend(t.count);
1691 a4.extend(t.count);
1692 a5.extend(t.count);
1693 a6.extend(t.count);
1694 a7.extend(t.count);
1695 a8.extend(t.count);
1696 a9.extend(t.count);
1697 a10.extend(t.count);
1698 a11.extend(t.count);
1699 a12.extend(t.count);
1700 a13.extend(t.count);
1701 a14.extend(t.count);
1702 a15.extend(t.count);
1703 a16.extend(t.count);
1704 a17.extend(t.count);
1705 a18.extend(t.count);
1706 a19.extend(t.count);
1707 a20.extend(t.count);
1708 a21.extend(t.count);
1709 ddindx := t.first;
1710 indx := 1;
1711 while true loop
1712 a0(indx) := rosetta_g_miss_num_map(t(ddindx).project_id);
1713 a1(indx) := rosetta_g_miss_num_map(t(ddindx).task_id);
1714 a2(indx) := rosetta_g_miss_num_map(t(ddindx).inventory_item_id);
1715 a3(indx) := t(ddindx).item_name;
1716 a4(indx) := t(ddindx).serial_number;
1717 a5(indx) := rosetta_g_miss_num_map(t(ddindx).invoice_distribution_id);
1718 a6(indx) := t(ddindx).accounting_date;
1719 a7(indx) := rosetta_g_miss_num_map(t(ddindx).invoice_id);
1720 a8(indx) := rosetta_g_miss_num_map(t(ddindx).ipv);
1721 a9(indx) := rosetta_g_miss_num_map(t(ddindx).transacted_by);
1722 a10(indx) := t(ddindx).transaction_date;
1723 a11(indx) := rosetta_g_miss_num_map(t(ddindx).organization_id);
1724 a12(indx) := rosetta_g_miss_num_map(t(ddindx).invoice_quantity);
1725 a13(indx) := rosetta_g_miss_num_map(t(ddindx).price_var_cc_id);
1726 a14(indx) := rosetta_g_miss_num_map(t(ddindx).po_header_id);
1727 a15(indx) := rosetta_g_miss_num_map(t(ddindx).po_line_id);
1728 a16(indx) := rosetta_g_miss_num_map(t(ddindx).po_distribution_id);
1729 a17(indx) := rosetta_g_miss_num_map(t(ddindx).cr_cc_id);
1730 a18(indx) := t(ddindx).vendor_number;
1731 a19(indx) := t(ddindx).uom;
1732 a20(indx) := rosetta_g_miss_num_map(t(ddindx).csi_transaction_id);
1733 a21(indx) := t(ddindx).invoice_number;
1734 indx := indx+1;
1735 if t.last =ddindx
1736 then exit;
1737 end if;
1738 ddindx := t.next(ddindx);
1739 end loop;
1740 end if;
1741 end if;
1742 end rosetta_table_copy_out_p45;
1743
1744 procedure rosetta_table_copy_in_p47(t out nocopy cse_datastructures_pub.asset_query_tbl, a0 JTF_NUMBER_TABLE
1745 , a1 JTF_NUMBER_TABLE
1746 , a2 JTF_NUMBER_TABLE
1747 , a3 JTF_VARCHAR2_TABLE_100
1748 , a4 JTF_VARCHAR2_TABLE_100
1749 , a5 JTF_NUMBER_TABLE
1750 , a6 JTF_VARCHAR2_TABLE_100
1751 , a7 JTF_DATE_TABLE
1752 , a8 JTF_NUMBER_TABLE
1753 , a9 JTF_VARCHAR2_TABLE_100
1754 , a10 JTF_VARCHAR2_TABLE_100
1755 , a11 JTF_VARCHAR2_TABLE_100
1756 , a12 JTF_VARCHAR2_TABLE_100
1757 , a13 JTF_VARCHAR2_TABLE_100
1758 , a14 JTF_NUMBER_TABLE
1759 , a15 JTF_NUMBER_TABLE
1760 , a16 JTF_NUMBER_TABLE
1761 , a17 JTF_NUMBER_TABLE
1762 , a18 JTF_NUMBER_TABLE
1763 , a19 JTF_NUMBER_TABLE
1764 , a20 JTF_NUMBER_TABLE
1765 , a21 JTF_NUMBER_TABLE
1766 , a22 JTF_NUMBER_TABLE
1767 , a23 JTF_NUMBER_TABLE
1768 , a24 JTF_NUMBER_TABLE
1769 , a25 JTF_NUMBER_TABLE
1770 , a26 JTF_NUMBER_TABLE
1771 , a27 JTF_NUMBER_TABLE
1772 ) as
1776 if a0.count > 0 then
1773 ddindx binary_integer; indx binary_integer;
1774 begin
1775 if a0 is not null and a0.count > 0 then
1777 indx := a0.first;
1778 ddindx := 1;
1779 while true loop
1780 t(ddindx).parent_mass_addition_id := rosetta_g_miss_num_map(a0(indx));
1781 t(ddindx).mass_addition_id := rosetta_g_miss_num_map(a1(indx));
1782 t(ddindx).asset_id := rosetta_g_miss_num_map(a2(indx));
1783 t(ddindx).search_method := a3(indx);
1784 t(ddindx).asset_number := a4(indx);
1785 t(ddindx).category_id := rosetta_g_miss_num_map(a5(indx));
1786 t(ddindx).book_type_code := a6(indx);
1787 t(ddindx).date_placed_in_service := rosetta_g_miss_date_in_map(a7(indx));
1788 t(ddindx).asset_key_ccid := rosetta_g_miss_num_map(a8(indx));
1789 t(ddindx).tag_number := a9(indx);
1790 t(ddindx).description := a10(indx);
1791 t(ddindx).manufacturer_name := a11(indx);
1792 t(ddindx).serial_number := a12(indx);
1793 t(ddindx).model_number := a13(indx);
1794 t(ddindx).location_id := rosetta_g_miss_num_map(a14(indx));
1795 t(ddindx).employee_id := rosetta_g_miss_num_map(a15(indx));
1796 t(ddindx).deprn_employee_id := rosetta_g_miss_num_map(a16(indx));
1797 t(ddindx).deprn_expense_ccid := rosetta_g_miss_num_map(a17(indx));
1798 t(ddindx).inventory_item_id := rosetta_g_miss_num_map(a18(indx));
1799 t(ddindx).distribution_id := rosetta_g_miss_num_map(a19(indx));
1800 t(ddindx).current_mtl_cost := rosetta_g_miss_num_map(a20(indx));
1801 t(ddindx).current_non_mtl_cost := rosetta_g_miss_num_map(a21(indx));
1802 t(ddindx).current_units := rosetta_g_miss_num_map(a22(indx));
1803 t(ddindx).pending_adj_mtl_cost := rosetta_g_miss_num_map(a23(indx));
1804 t(ddindx).pending_adj_non_mtl_cost := rosetta_g_miss_num_map(a24(indx));
1805 t(ddindx).pending_ret_mtl_cost := rosetta_g_miss_num_map(a25(indx));
1806 t(ddindx).pending_ret_non_mtl_cost := rosetta_g_miss_num_map(a26(indx));
1807 t(ddindx).pending_ret_units := rosetta_g_miss_num_map(a27(indx));
1808 ddindx := ddindx+1;
1809 if a0.last =indx
1810 then exit;
1811 end if;
1812 indx := a0.next(indx);
1813 end loop;
1814 end if;
1815 end if;
1816 end rosetta_table_copy_in_p47;
1817 procedure rosetta_table_copy_out_p47(t cse_datastructures_pub.asset_query_tbl, a0 out nocopy JTF_NUMBER_TABLE
1818 , a1 out nocopy JTF_NUMBER_TABLE
1819 , a2 out nocopy JTF_NUMBER_TABLE
1820 , a3 out nocopy JTF_VARCHAR2_TABLE_100
1821 , a4 out nocopy JTF_VARCHAR2_TABLE_100
1822 , a5 out nocopy JTF_NUMBER_TABLE
1823 , a6 out nocopy JTF_VARCHAR2_TABLE_100
1824 , a7 out nocopy JTF_DATE_TABLE
1825 , a8 out nocopy JTF_NUMBER_TABLE
1826 , a9 out nocopy JTF_VARCHAR2_TABLE_100
1827 , a10 out nocopy JTF_VARCHAR2_TABLE_100
1828 , a11 out nocopy JTF_VARCHAR2_TABLE_100
1829 , a12 out nocopy JTF_VARCHAR2_TABLE_100
1830 , a13 out nocopy JTF_VARCHAR2_TABLE_100
1831 , a14 out nocopy JTF_NUMBER_TABLE
1832 , a15 out nocopy JTF_NUMBER_TABLE
1833 , a16 out nocopy JTF_NUMBER_TABLE
1834 , a17 out nocopy JTF_NUMBER_TABLE
1835 , a18 out nocopy JTF_NUMBER_TABLE
1836 , a19 out nocopy JTF_NUMBER_TABLE
1837 , a20 out nocopy JTF_NUMBER_TABLE
1838 , a21 out nocopy JTF_NUMBER_TABLE
1839 , a22 out nocopy JTF_NUMBER_TABLE
1840 , a23 out nocopy JTF_NUMBER_TABLE
1841 , a24 out nocopy JTF_NUMBER_TABLE
1842 , a25 out nocopy JTF_NUMBER_TABLE
1843 , a26 out nocopy JTF_NUMBER_TABLE
1844 , a27 out nocopy JTF_NUMBER_TABLE
1845 ) as
1846 ddindx binary_integer; indx binary_integer;
1847 begin
1848 if t is null or t.count = 0 then
1849 a0 := JTF_NUMBER_TABLE();
1850 a1 := JTF_NUMBER_TABLE();
1851 a2 := JTF_NUMBER_TABLE();
1852 a3 := JTF_VARCHAR2_TABLE_100();
1853 a4 := JTF_VARCHAR2_TABLE_100();
1854 a5 := JTF_NUMBER_TABLE();
1855 a6 := JTF_VARCHAR2_TABLE_100();
1856 a7 := JTF_DATE_TABLE();
1857 a8 := JTF_NUMBER_TABLE();
1858 a9 := JTF_VARCHAR2_TABLE_100();
1859 a10 := JTF_VARCHAR2_TABLE_100();
1860 a11 := JTF_VARCHAR2_TABLE_100();
1861 a12 := JTF_VARCHAR2_TABLE_100();
1862 a13 := JTF_VARCHAR2_TABLE_100();
1863 a14 := JTF_NUMBER_TABLE();
1864 a15 := JTF_NUMBER_TABLE();
1865 a16 := JTF_NUMBER_TABLE();
1866 a17 := JTF_NUMBER_TABLE();
1867 a18 := JTF_NUMBER_TABLE();
1868 a19 := JTF_NUMBER_TABLE();
1869 a20 := JTF_NUMBER_TABLE();
1870 a21 := JTF_NUMBER_TABLE();
1871 a22 := JTF_NUMBER_TABLE();
1872 a23 := JTF_NUMBER_TABLE();
1873 a24 := JTF_NUMBER_TABLE();
1874 a25 := JTF_NUMBER_TABLE();
1875 a26 := JTF_NUMBER_TABLE();
1876 a27 := JTF_NUMBER_TABLE();
1877 else
1878 a0 := JTF_NUMBER_TABLE();
1879 a1 := JTF_NUMBER_TABLE();
1880 a2 := JTF_NUMBER_TABLE();
1881 a3 := JTF_VARCHAR2_TABLE_100();
1882 a4 := JTF_VARCHAR2_TABLE_100();
1883 a5 := JTF_NUMBER_TABLE();
1884 a6 := JTF_VARCHAR2_TABLE_100();
1885 a7 := JTF_DATE_TABLE();
1886 a8 := JTF_NUMBER_TABLE();
1887 a9 := JTF_VARCHAR2_TABLE_100();
1888 a10 := JTF_VARCHAR2_TABLE_100();
1889 a11 := JTF_VARCHAR2_TABLE_100();
1890 a12 := JTF_VARCHAR2_TABLE_100();
1891 a13 := JTF_VARCHAR2_TABLE_100();
1892 a14 := JTF_NUMBER_TABLE();
1896 a18 := JTF_NUMBER_TABLE();
1893 a15 := JTF_NUMBER_TABLE();
1894 a16 := JTF_NUMBER_TABLE();
1895 a17 := JTF_NUMBER_TABLE();
1897 a19 := JTF_NUMBER_TABLE();
1898 a20 := JTF_NUMBER_TABLE();
1899 a21 := JTF_NUMBER_TABLE();
1900 a22 := JTF_NUMBER_TABLE();
1901 a23 := JTF_NUMBER_TABLE();
1902 a24 := JTF_NUMBER_TABLE();
1903 a25 := JTF_NUMBER_TABLE();
1904 a26 := JTF_NUMBER_TABLE();
1905 a27 := JTF_NUMBER_TABLE();
1906 if t.count > 0 then
1907 a0.extend(t.count);
1908 a1.extend(t.count);
1909 a2.extend(t.count);
1910 a3.extend(t.count);
1911 a4.extend(t.count);
1912 a5.extend(t.count);
1913 a6.extend(t.count);
1914 a7.extend(t.count);
1915 a8.extend(t.count);
1916 a9.extend(t.count);
1917 a10.extend(t.count);
1918 a11.extend(t.count);
1919 a12.extend(t.count);
1920 a13.extend(t.count);
1921 a14.extend(t.count);
1922 a15.extend(t.count);
1923 a16.extend(t.count);
1924 a17.extend(t.count);
1925 a18.extend(t.count);
1926 a19.extend(t.count);
1927 a20.extend(t.count);
1928 a21.extend(t.count);
1929 a22.extend(t.count);
1930 a23.extend(t.count);
1931 a24.extend(t.count);
1932 a25.extend(t.count);
1933 a26.extend(t.count);
1934 a27.extend(t.count);
1935 ddindx := t.first;
1936 indx := 1;
1937 while true loop
1938 a0(indx) := rosetta_g_miss_num_map(t(ddindx).parent_mass_addition_id);
1939 a1(indx) := rosetta_g_miss_num_map(t(ddindx).mass_addition_id);
1940 a2(indx) := rosetta_g_miss_num_map(t(ddindx).asset_id);
1941 a3(indx) := t(ddindx).search_method;
1942 a4(indx) := t(ddindx).asset_number;
1943 a5(indx) := rosetta_g_miss_num_map(t(ddindx).category_id);
1944 a6(indx) := t(ddindx).book_type_code;
1945 a7(indx) := t(ddindx).date_placed_in_service;
1946 a8(indx) := rosetta_g_miss_num_map(t(ddindx).asset_key_ccid);
1947 a9(indx) := t(ddindx).tag_number;
1948 a10(indx) := t(ddindx).description;
1949 a11(indx) := t(ddindx).manufacturer_name;
1950 a12(indx) := t(ddindx).serial_number;
1951 a13(indx) := t(ddindx).model_number;
1952 a14(indx) := rosetta_g_miss_num_map(t(ddindx).location_id);
1953 a15(indx) := rosetta_g_miss_num_map(t(ddindx).employee_id);
1954 a16(indx) := rosetta_g_miss_num_map(t(ddindx).deprn_employee_id);
1955 a17(indx) := rosetta_g_miss_num_map(t(ddindx).deprn_expense_ccid);
1956 a18(indx) := rosetta_g_miss_num_map(t(ddindx).inventory_item_id);
1957 a19(indx) := rosetta_g_miss_num_map(t(ddindx).distribution_id);
1958 a20(indx) := rosetta_g_miss_num_map(t(ddindx).current_mtl_cost);
1959 a21(indx) := rosetta_g_miss_num_map(t(ddindx).current_non_mtl_cost);
1960 a22(indx) := rosetta_g_miss_num_map(t(ddindx).current_units);
1961 a23(indx) := rosetta_g_miss_num_map(t(ddindx).pending_adj_mtl_cost);
1962 a24(indx) := rosetta_g_miss_num_map(t(ddindx).pending_adj_non_mtl_cost);
1963 a25(indx) := rosetta_g_miss_num_map(t(ddindx).pending_ret_mtl_cost);
1964 a26(indx) := rosetta_g_miss_num_map(t(ddindx).pending_ret_non_mtl_cost);
1965 a27(indx) := rosetta_g_miss_num_map(t(ddindx).pending_ret_units);
1966 indx := indx+1;
1967 if t.last =ddindx
1968 then exit;
1969 end if;
1970 ddindx := t.next(ddindx);
1971 end loop;
1972 end if;
1973 end if;
1974 end rosetta_table_copy_out_p47;
1975
1976 procedure rosetta_table_copy_in_p49(t out nocopy cse_datastructures_pub.asset_attrib_tbl, a0 JTF_NUMBER_TABLE
1977 , a1 JTF_NUMBER_TABLE
1978 , a2 JTF_VARCHAR2_TABLE_100
1979 , a3 JTF_NUMBER_TABLE
1980 , a4 JTF_NUMBER_TABLE
1981 , a5 JTF_VARCHAR2_TABLE_100
1982 , a6 JTF_NUMBER_TABLE
1983 , a7 JTF_NUMBER_TABLE
1984 , a8 JTF_DATE_TABLE
1985 , a9 JTF_VARCHAR2_TABLE_100
1986 , a10 JTF_VARCHAR2_TABLE_100
1987 , a11 JTF_VARCHAR2_TABLE_100
1988 , a12 JTF_NUMBER_TABLE
1989 , a13 JTF_NUMBER_TABLE
1990 , a14 JTF_NUMBER_TABLE
1991 , a15 JTF_NUMBER_TABLE
1992 , a16 JTF_NUMBER_TABLE
1993 , a17 JTF_NUMBER_TABLE
1994 , a18 JTF_NUMBER_TABLE
1995 , a19 JTF_VARCHAR2_TABLE_100
1996 ) as
1997 ddindx binary_integer; indx binary_integer;
1998 begin
1999 if a0 is not null and a0.count > 0 then
2000 if a0.count > 0 then
2001 indx := a0.first;
2002 ddindx := 1;
2003 while true loop
2004 t(ddindx).instance_id := rosetta_g_miss_num_map(a0(indx));
2005 t(ddindx).inventory_item_id := rosetta_g_miss_num_map(a1(indx));
2006 t(ddindx).serial_number := a2(indx);
2007 t(ddindx).organization_id := rosetta_g_miss_num_map(a3(indx));
2008 t(ddindx).inv_master_organization_id := rosetta_g_miss_num_map(a4(indx));
2009 t(ddindx).subinventory_name := a5(indx);
2010 t(ddindx).transaction_quantity := rosetta_g_miss_num_map(a6(indx));
2011 t(ddindx).transaction_id := rosetta_g_miss_num_map(a7(indx));
2012 t(ddindx).transaction_date := rosetta_g_miss_date_in_map(a8(indx));
2016 t(ddindx).transaction_type_id := rosetta_g_miss_num_map(a12(indx));
2013 t(ddindx).source_transaction_type := a9(indx);
2014 t(ddindx).depreciable_flag := a10(indx);
2015 t(ddindx).location_type_code := a11(indx);
2017 t(ddindx).source_header_ref_id := rosetta_g_miss_num_map(a13(indx));
2018 t(ddindx).rcv_transaction_id := rosetta_g_miss_num_map(a14(indx));
2019 t(ddindx).po_distribution_id := rosetta_g_miss_num_map(a15(indx));
2020 t(ddindx).inv_material_transaction_id := rosetta_g_miss_num_map(a16(indx));
2021 t(ddindx).location_id := rosetta_g_miss_num_map(a17(indx));
2022 t(ddindx).asset_category_id := rosetta_g_miss_num_map(a18(indx));
2023 t(ddindx).book_type_code := a19(indx);
2024 ddindx := ddindx+1;
2025 if a0.last =indx
2026 then exit;
2027 end if;
2028 indx := a0.next(indx);
2029 end loop;
2030 end if;
2031 end if;
2032 end rosetta_table_copy_in_p49;
2033 procedure rosetta_table_copy_out_p49(t cse_datastructures_pub.asset_attrib_tbl, a0 out nocopy JTF_NUMBER_TABLE
2034 , a1 out nocopy JTF_NUMBER_TABLE
2035 , a2 out nocopy JTF_VARCHAR2_TABLE_100
2036 , a3 out nocopy JTF_NUMBER_TABLE
2037 , a4 out nocopy JTF_NUMBER_TABLE
2038 , a5 out nocopy JTF_VARCHAR2_TABLE_100
2039 , a6 out nocopy JTF_NUMBER_TABLE
2040 , a7 out nocopy JTF_NUMBER_TABLE
2041 , a8 out nocopy JTF_DATE_TABLE
2042 , a9 out nocopy JTF_VARCHAR2_TABLE_100
2043 , a10 out nocopy JTF_VARCHAR2_TABLE_100
2044 , a11 out nocopy JTF_VARCHAR2_TABLE_100
2045 , a12 out nocopy JTF_NUMBER_TABLE
2046 , a13 out nocopy JTF_NUMBER_TABLE
2047 , a14 out nocopy JTF_NUMBER_TABLE
2048 , a15 out nocopy JTF_NUMBER_TABLE
2049 , a16 out nocopy JTF_NUMBER_TABLE
2050 , a17 out nocopy JTF_NUMBER_TABLE
2051 , a18 out nocopy JTF_NUMBER_TABLE
2052 , a19 out nocopy JTF_VARCHAR2_TABLE_100
2053 ) as
2054 ddindx binary_integer; indx binary_integer;
2055 begin
2056 if t is null or t.count = 0 then
2057 a0 := JTF_NUMBER_TABLE();
2058 a1 := JTF_NUMBER_TABLE();
2059 a2 := JTF_VARCHAR2_TABLE_100();
2060 a3 := JTF_NUMBER_TABLE();
2061 a4 := JTF_NUMBER_TABLE();
2062 a5 := JTF_VARCHAR2_TABLE_100();
2063 a6 := JTF_NUMBER_TABLE();
2064 a7 := JTF_NUMBER_TABLE();
2065 a8 := JTF_DATE_TABLE();
2066 a9 := JTF_VARCHAR2_TABLE_100();
2067 a10 := JTF_VARCHAR2_TABLE_100();
2068 a11 := JTF_VARCHAR2_TABLE_100();
2069 a12 := JTF_NUMBER_TABLE();
2070 a13 := JTF_NUMBER_TABLE();
2071 a14 := JTF_NUMBER_TABLE();
2072 a15 := JTF_NUMBER_TABLE();
2073 a16 := JTF_NUMBER_TABLE();
2074 a17 := JTF_NUMBER_TABLE();
2075 a18 := JTF_NUMBER_TABLE();
2076 a19 := JTF_VARCHAR2_TABLE_100();
2077 else
2078 a0 := JTF_NUMBER_TABLE();
2079 a1 := JTF_NUMBER_TABLE();
2080 a2 := JTF_VARCHAR2_TABLE_100();
2081 a3 := JTF_NUMBER_TABLE();
2082 a4 := JTF_NUMBER_TABLE();
2083 a5 := JTF_VARCHAR2_TABLE_100();
2084 a6 := JTF_NUMBER_TABLE();
2085 a7 := JTF_NUMBER_TABLE();
2086 a8 := JTF_DATE_TABLE();
2087 a9 := JTF_VARCHAR2_TABLE_100();
2088 a10 := JTF_VARCHAR2_TABLE_100();
2089 a11 := JTF_VARCHAR2_TABLE_100();
2090 a12 := JTF_NUMBER_TABLE();
2091 a13 := JTF_NUMBER_TABLE();
2092 a14 := JTF_NUMBER_TABLE();
2093 a15 := JTF_NUMBER_TABLE();
2094 a16 := JTF_NUMBER_TABLE();
2095 a17 := JTF_NUMBER_TABLE();
2096 a18 := JTF_NUMBER_TABLE();
2097 a19 := JTF_VARCHAR2_TABLE_100();
2098 if t.count > 0 then
2099 a0.extend(t.count);
2100 a1.extend(t.count);
2101 a2.extend(t.count);
2102 a3.extend(t.count);
2103 a4.extend(t.count);
2104 a5.extend(t.count);
2105 a6.extend(t.count);
2106 a7.extend(t.count);
2107 a8.extend(t.count);
2108 a9.extend(t.count);
2109 a10.extend(t.count);
2110 a11.extend(t.count);
2111 a12.extend(t.count);
2112 a13.extend(t.count);
2113 a14.extend(t.count);
2114 a15.extend(t.count);
2115 a16.extend(t.count);
2116 a17.extend(t.count);
2117 a18.extend(t.count);
2118 a19.extend(t.count);
2119 ddindx := t.first;
2120 indx := 1;
2121 while true loop
2122 a0(indx) := rosetta_g_miss_num_map(t(ddindx).instance_id);
2123 a1(indx) := rosetta_g_miss_num_map(t(ddindx).inventory_item_id);
2124 a2(indx) := t(ddindx).serial_number;
2125 a3(indx) := rosetta_g_miss_num_map(t(ddindx).organization_id);
2126 a4(indx) := rosetta_g_miss_num_map(t(ddindx).inv_master_organization_id);
2127 a5(indx) := t(ddindx).subinventory_name;
2128 a6(indx) := rosetta_g_miss_num_map(t(ddindx).transaction_quantity);
2129 a7(indx) := rosetta_g_miss_num_map(t(ddindx).transaction_id);
2130 a8(indx) := t(ddindx).transaction_date;
2131 a9(indx) := t(ddindx).source_transaction_type;
2132 a10(indx) := t(ddindx).depreciable_flag;
2133 a11(indx) := t(ddindx).location_type_code;
2134 a12(indx) := rosetta_g_miss_num_map(t(ddindx).transaction_type_id);
2135 a13(indx) := rosetta_g_miss_num_map(t(ddindx).source_header_ref_id);
2136 a14(indx) := rosetta_g_miss_num_map(t(ddindx).rcv_transaction_id);
2137 a15(indx) := rosetta_g_miss_num_map(t(ddindx).po_distribution_id);
2138 a16(indx) := rosetta_g_miss_num_map(t(ddindx).inv_material_transaction_id);
2139 a17(indx) := rosetta_g_miss_num_map(t(ddindx).location_id);
2140 a18(indx) := rosetta_g_miss_num_map(t(ddindx).asset_category_id);
2141 a19(indx) := t(ddindx).book_type_code;
2142 indx := indx+1;
2143 if t.last =ddindx
2144 then exit;
2145 end if;
2146 ddindx := t.next(ddindx);
2147 end loop;
2148 end if;
2149 end if;
2150 end rosetta_table_copy_out_p49;
2151
2155 , a3 JTF_NUMBER_TABLE
2152 procedure rosetta_table_copy_in_p51(t out nocopy cse_datastructures_pub.distribution_tbl, a0 JTF_NUMBER_TABLE
2153 , a1 JTF_VARCHAR2_TABLE_100
2154 , a2 JTF_NUMBER_TABLE
2156 , a4 JTF_NUMBER_TABLE
2157 , a5 JTF_NUMBER_TABLE
2158 , a6 JTF_NUMBER_TABLE
2159 , a7 JTF_NUMBER_TABLE
2160 ) as
2161 ddindx binary_integer; indx binary_integer;
2162 begin
2163 if a0 is not null and a0.count > 0 then
2164 if a0.count > 0 then
2165 indx := a0.first;
2166 ddindx := 1;
2167 while true loop
2168 t(ddindx).asset_id := rosetta_g_miss_num_map(a0(indx));
2169 t(ddindx).book_type_code := a1(indx);
2170 t(ddindx).distribution_id := rosetta_g_miss_num_map(a2(indx));
2171 t(ddindx).location_id := rosetta_g_miss_num_map(a3(indx));
2172 t(ddindx).employee_id := rosetta_g_miss_num_map(a4(indx));
2173 t(ddindx).deprn_expense_ccid := rosetta_g_miss_num_map(a5(indx));
2174 t(ddindx).current_units := rosetta_g_miss_num_map(a6(indx));
2175 t(ddindx).pending_ret_units := rosetta_g_miss_num_map(a7(indx));
2176 ddindx := ddindx+1;
2177 if a0.last =indx
2178 then exit;
2179 end if;
2180 indx := a0.next(indx);
2181 end loop;
2182 end if;
2183 end if;
2184 end rosetta_table_copy_in_p51;
2185 procedure rosetta_table_copy_out_p51(t cse_datastructures_pub.distribution_tbl, a0 out nocopy JTF_NUMBER_TABLE
2186 , a1 out nocopy JTF_VARCHAR2_TABLE_100
2187 , a2 out nocopy JTF_NUMBER_TABLE
2188 , a3 out nocopy JTF_NUMBER_TABLE
2189 , a4 out nocopy JTF_NUMBER_TABLE
2190 , a5 out nocopy JTF_NUMBER_TABLE
2191 , a6 out nocopy JTF_NUMBER_TABLE
2192 , a7 out nocopy JTF_NUMBER_TABLE
2193 ) as
2194 ddindx binary_integer; indx binary_integer;
2195 begin
2196 if t is null or t.count = 0 then
2197 a0 := JTF_NUMBER_TABLE();
2198 a1 := JTF_VARCHAR2_TABLE_100();
2199 a2 := JTF_NUMBER_TABLE();
2200 a3 := JTF_NUMBER_TABLE();
2201 a4 := JTF_NUMBER_TABLE();
2202 a5 := JTF_NUMBER_TABLE();
2203 a6 := JTF_NUMBER_TABLE();
2204 a7 := JTF_NUMBER_TABLE();
2205 else
2206 a0 := JTF_NUMBER_TABLE();
2207 a1 := JTF_VARCHAR2_TABLE_100();
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 if t.count > 0 then
2215 a0.extend(t.count);
2216 a1.extend(t.count);
2217 a2.extend(t.count);
2218 a3.extend(t.count);
2219 a4.extend(t.count);
2220 a5.extend(t.count);
2221 a6.extend(t.count);
2222 a7.extend(t.count);
2223 ddindx := t.first;
2224 indx := 1;
2225 while true loop
2226 a0(indx) := rosetta_g_miss_num_map(t(ddindx).asset_id);
2227 a1(indx) := t(ddindx).book_type_code;
2228 a2(indx) := rosetta_g_miss_num_map(t(ddindx).distribution_id);
2229 a3(indx) := rosetta_g_miss_num_map(t(ddindx).location_id);
2230 a4(indx) := rosetta_g_miss_num_map(t(ddindx).employee_id);
2231 a5(indx) := rosetta_g_miss_num_map(t(ddindx).deprn_expense_ccid);
2232 a6(indx) := rosetta_g_miss_num_map(t(ddindx).current_units);
2233 a7(indx) := rosetta_g_miss_num_map(t(ddindx).pending_ret_units);
2234 indx := indx+1;
2235 if t.last =ddindx
2236 then exit;
2237 end if;
2238 ddindx := t.next(ddindx);
2239 end loop;
2240 end if;
2241 end if;
2242 end rosetta_table_copy_out_p51;
2243
2244 procedure rosetta_table_copy_in_p56(t out nocopy cse_datastructures_pub.wfm_trx_values_tbl, a0 JTF_NUMBER_TABLE
2245 , a1 JTF_VARCHAR2_TABLE_100
2246 , a2 JTF_VARCHAR2_TABLE_100
2247 , a3 JTF_VARCHAR2_TABLE_100
2248 , a4 JTF_NUMBER_TABLE
2249 , a5 JTF_NUMBER_TABLE
2250 , a6 JTF_NUMBER_TABLE
2251 , a7 JTF_NUMBER_TABLE
2252 , a8 JTF_NUMBER_TABLE
2253 , a9 JTF_NUMBER_TABLE
2254 , a10 JTF_NUMBER_TABLE
2255 , a11 JTF_VARCHAR2_TABLE_100
2256 , a12 JTF_DATE_TABLE
2257 , a13 JTF_NUMBER_TABLE
2258 , a14 JTF_DATE_TABLE
2259 , a15 JTF_NUMBER_TABLE
2260 , a16 JTF_DATE_TABLE
2261 , a17 JTF_NUMBER_TABLE
2262 , a18 JTF_NUMBER_TABLE
2263 , a19 JTF_VARCHAR2_TABLE_100
2264 , a20 JTF_VARCHAR2_TABLE_2000
2265 ) as
2266 ddindx binary_integer; indx binary_integer;
2267 begin
2268 if a0 is not null and a0.count > 0 then
2269 if a0.count > 0 then
2270 indx := a0.first;
2271 ddindx := 1;
2272 while true loop
2273 t(ddindx).inventory_item_id := rosetta_g_miss_num_map(a0(indx));
2274 t(ddindx).inventory_revision := a1(indx);
2275 t(ddindx).lot_number := a2(indx);
2276 t(ddindx).serial_number := a3(indx);
2277 t(ddindx).quantity := rosetta_g_miss_num_map(a4(indx));
2278 t(ddindx).network_location_id := rosetta_g_miss_num_map(a5(indx));
2279 t(ddindx).party_site_id := rosetta_g_miss_num_map(a6(indx));
2280 t(ddindx).from_network_location_id := rosetta_g_miss_num_map(a7(indx));
2281 t(ddindx).to_network_location_id := rosetta_g_miss_num_map(a8(indx));
2282 t(ddindx).from_party_site_id := rosetta_g_miss_num_map(a9(indx));
2283 t(ddindx).to_party_site_id := rosetta_g_miss_num_map(a10(indx));
2284 t(ddindx).work_order_number := a11(indx);
2285 t(ddindx).source_transaction_date := rosetta_g_miss_date_in_map(a12(indx));
2286 t(ddindx).source_transaction_by := rosetta_g_miss_num_map(a13(indx));
2287 t(ddindx).transaction_date := rosetta_g_miss_date_in_map(a14(indx));
2291 t(ddindx).task_id := rosetta_g_miss_num_map(a18(indx));
2288 t(ddindx).transacted_by := rosetta_g_miss_num_map(a15(indx));
2289 t(ddindx).effective_date := rosetta_g_miss_date_in_map(a16(indx));
2290 t(ddindx).project_id := rosetta_g_miss_num_map(a17(indx));
2292 t(ddindx).return_status := a19(indx);
2293 t(ddindx).error_message := a20(indx);
2294 ddindx := ddindx+1;
2295 if a0.last =indx
2296 then exit;
2297 end if;
2298 indx := a0.next(indx);
2299 end loop;
2300 end if;
2301 end if;
2302 end rosetta_table_copy_in_p56;
2303 procedure rosetta_table_copy_out_p56(t cse_datastructures_pub.wfm_trx_values_tbl, a0 out nocopy JTF_NUMBER_TABLE
2304 , a1 out nocopy JTF_VARCHAR2_TABLE_100
2305 , a2 out nocopy JTF_VARCHAR2_TABLE_100
2306 , a3 out nocopy JTF_VARCHAR2_TABLE_100
2307 , a4 out nocopy JTF_NUMBER_TABLE
2308 , a5 out nocopy JTF_NUMBER_TABLE
2309 , a6 out nocopy JTF_NUMBER_TABLE
2310 , a7 out nocopy JTF_NUMBER_TABLE
2311 , a8 out nocopy JTF_NUMBER_TABLE
2312 , a9 out nocopy JTF_NUMBER_TABLE
2313 , a10 out nocopy JTF_NUMBER_TABLE
2314 , a11 out nocopy JTF_VARCHAR2_TABLE_100
2315 , a12 out nocopy JTF_DATE_TABLE
2316 , a13 out nocopy JTF_NUMBER_TABLE
2317 , a14 out nocopy JTF_DATE_TABLE
2318 , a15 out nocopy JTF_NUMBER_TABLE
2319 , a16 out nocopy JTF_DATE_TABLE
2320 , a17 out nocopy JTF_NUMBER_TABLE
2321 , a18 out nocopy JTF_NUMBER_TABLE
2322 , a19 out nocopy JTF_VARCHAR2_TABLE_100
2323 , a20 out nocopy JTF_VARCHAR2_TABLE_2000
2324 ) as
2325 ddindx binary_integer; indx binary_integer;
2326 begin
2327 if t is null or t.count = 0 then
2328 a0 := JTF_NUMBER_TABLE();
2329 a1 := JTF_VARCHAR2_TABLE_100();
2330 a2 := JTF_VARCHAR2_TABLE_100();
2331 a3 := JTF_VARCHAR2_TABLE_100();
2332 a4 := JTF_NUMBER_TABLE();
2333 a5 := JTF_NUMBER_TABLE();
2334 a6 := JTF_NUMBER_TABLE();
2335 a7 := JTF_NUMBER_TABLE();
2336 a8 := JTF_NUMBER_TABLE();
2337 a9 := JTF_NUMBER_TABLE();
2338 a10 := JTF_NUMBER_TABLE();
2339 a11 := JTF_VARCHAR2_TABLE_100();
2340 a12 := JTF_DATE_TABLE();
2341 a13 := JTF_NUMBER_TABLE();
2342 a14 := JTF_DATE_TABLE();
2343 a15 := JTF_NUMBER_TABLE();
2344 a16 := JTF_DATE_TABLE();
2345 a17 := JTF_NUMBER_TABLE();
2346 a18 := JTF_NUMBER_TABLE();
2347 a19 := JTF_VARCHAR2_TABLE_100();
2348 a20 := JTF_VARCHAR2_TABLE_2000();
2349 else
2350 a0 := JTF_NUMBER_TABLE();
2351 a1 := JTF_VARCHAR2_TABLE_100();
2352 a2 := JTF_VARCHAR2_TABLE_100();
2353 a3 := JTF_VARCHAR2_TABLE_100();
2354 a4 := JTF_NUMBER_TABLE();
2355 a5 := JTF_NUMBER_TABLE();
2356 a6 := JTF_NUMBER_TABLE();
2357 a7 := JTF_NUMBER_TABLE();
2358 a8 := JTF_NUMBER_TABLE();
2359 a9 := JTF_NUMBER_TABLE();
2360 a10 := JTF_NUMBER_TABLE();
2361 a11 := JTF_VARCHAR2_TABLE_100();
2362 a12 := JTF_DATE_TABLE();
2363 a13 := JTF_NUMBER_TABLE();
2364 a14 := JTF_DATE_TABLE();
2365 a15 := JTF_NUMBER_TABLE();
2366 a16 := JTF_DATE_TABLE();
2367 a17 := JTF_NUMBER_TABLE();
2368 a18 := JTF_NUMBER_TABLE();
2369 a19 := JTF_VARCHAR2_TABLE_100();
2370 a20 := JTF_VARCHAR2_TABLE_2000();
2371 if t.count > 0 then
2372 a0.extend(t.count);
2373 a1.extend(t.count);
2374 a2.extend(t.count);
2375 a3.extend(t.count);
2376 a4.extend(t.count);
2377 a5.extend(t.count);
2378 a6.extend(t.count);
2379 a7.extend(t.count);
2380 a8.extend(t.count);
2381 a9.extend(t.count);
2382 a10.extend(t.count);
2383 a11.extend(t.count);
2384 a12.extend(t.count);
2385 a13.extend(t.count);
2386 a14.extend(t.count);
2387 a15.extend(t.count);
2388 a16.extend(t.count);
2389 a17.extend(t.count);
2390 a18.extend(t.count);
2391 a19.extend(t.count);
2392 a20.extend(t.count);
2393 ddindx := t.first;
2394 indx := 1;
2395 while true loop
2396 a0(indx) := rosetta_g_miss_num_map(t(ddindx).inventory_item_id);
2397 a1(indx) := t(ddindx).inventory_revision;
2398 a2(indx) := t(ddindx).lot_number;
2399 a3(indx) := t(ddindx).serial_number;
2400 a4(indx) := rosetta_g_miss_num_map(t(ddindx).quantity);
2401 a5(indx) := rosetta_g_miss_num_map(t(ddindx).network_location_id);
2402 a6(indx) := rosetta_g_miss_num_map(t(ddindx).party_site_id);
2403 a7(indx) := rosetta_g_miss_num_map(t(ddindx).from_network_location_id);
2404 a8(indx) := rosetta_g_miss_num_map(t(ddindx).to_network_location_id);
2405 a9(indx) := rosetta_g_miss_num_map(t(ddindx).from_party_site_id);
2406 a10(indx) := rosetta_g_miss_num_map(t(ddindx).to_party_site_id);
2407 a11(indx) := t(ddindx).work_order_number;
2408 a12(indx) := t(ddindx).source_transaction_date;
2409 a13(indx) := rosetta_g_miss_num_map(t(ddindx).source_transaction_by);
2410 a14(indx) := t(ddindx).transaction_date;
2411 a15(indx) := rosetta_g_miss_num_map(t(ddindx).transacted_by);
2412 a16(indx) := t(ddindx).effective_date;
2413 a17(indx) := rosetta_g_miss_num_map(t(ddindx).project_id);
2414 a18(indx) := rosetta_g_miss_num_map(t(ddindx).task_id);
2415 a19(indx) := t(ddindx).return_status;
2416 a20(indx) := t(ddindx).error_message;
2417 indx := indx+1;
2418 if t.last =ddindx
2419 then exit;
2420 end if;
2421 ddindx := t.next(ddindx);
2422 end loop;
2423 end if;
2424 end if;
2425 end rosetta_table_copy_out_p56;
2426
2427 end cse_datastructures_pub_w;