[Home] [Help]
PACKAGE BODY: APPS.CSI_T_DATASTRUCTURES_GRP_W
Source
1 package body csi_t_datastructures_grp_w as
2 /* $Header: csigtdwb.pls 120.3 2006/07/11 08:38:54 brajendr noship $ */
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_p1(t out nocopy csi_t_datastructures_grp.txn_systems_tbl, a0 JTF_NUMBER_TABLE
26 , a1 JTF_NUMBER_TABLE
27 , a2 JTF_VARCHAR2_TABLE_100
28 , a3 JTF_VARCHAR2_TABLE_300
29 , a4 JTF_VARCHAR2_TABLE_100
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_NUMBER_TABLE
38 , a13 JTF_NUMBER_TABLE
39 , a14 JTF_VARCHAR2_TABLE_100
40 , a15 JTF_VARCHAR2_TABLE_100
41 , a16 JTF_DATE_TABLE
42 , a17 JTF_DATE_TABLE
43 , a18 JTF_VARCHAR2_TABLE_100
44 , a19 JTF_VARCHAR2_TABLE_200
45 , a20 JTF_VARCHAR2_TABLE_200
46 , a21 JTF_VARCHAR2_TABLE_200
47 , a22 JTF_VARCHAR2_TABLE_200
48 , a23 JTF_VARCHAR2_TABLE_200
49 , a24 JTF_VARCHAR2_TABLE_200
50 , a25 JTF_VARCHAR2_TABLE_200
51 , a26 JTF_VARCHAR2_TABLE_200
52 , a27 JTF_VARCHAR2_TABLE_200
53 , a28 JTF_VARCHAR2_TABLE_200
54 , a29 JTF_VARCHAR2_TABLE_200
55 , a30 JTF_VARCHAR2_TABLE_200
56 , a31 JTF_VARCHAR2_TABLE_200
57 , a32 JTF_VARCHAR2_TABLE_200
58 , a33 JTF_VARCHAR2_TABLE_200
59 , a34 JTF_NUMBER_TABLE
60 ) as
61 ddindx binary_integer; indx binary_integer;
62 begin
63 if a0 is not null and a0.count > 0 then
64 if a0.count > 0 then
65 indx := a0.first;
66 ddindx := 1;
67 while true loop
68 t(ddindx).transaction_system_id := rosetta_g_miss_num_map(a0(indx));
69 t(ddindx).transaction_line_id := rosetta_g_miss_num_map(a1(indx));
70 t(ddindx).system_name := a2(indx);
71 t(ddindx).description := a3(indx);
72 t(ddindx).system_type_code := a4(indx);
73 t(ddindx).system_number := a5(indx);
74 t(ddindx).customer_id := rosetta_g_miss_num_map(a6(indx));
75 t(ddindx).bill_to_contact_id := rosetta_g_miss_num_map(a7(indx));
76 t(ddindx).ship_to_contact_id := rosetta_g_miss_num_map(a8(indx));
77 t(ddindx).technical_contact_id := rosetta_g_miss_num_map(a9(indx));
78 t(ddindx).service_admin_contact_id := rosetta_g_miss_num_map(a10(indx));
79 t(ddindx).ship_to_site_use_id := rosetta_g_miss_num_map(a11(indx));
80 t(ddindx).bill_to_site_use_id := rosetta_g_miss_num_map(a12(indx));
81 t(ddindx).install_site_use_id := rosetta_g_miss_num_map(a13(indx));
82 t(ddindx).coterminate_day_month := a14(indx);
83 t(ddindx).config_system_type := a15(indx);
84 t(ddindx).start_date_active := rosetta_g_miss_date_in_map(a16(indx));
85 t(ddindx).end_date_active := rosetta_g_miss_date_in_map(a17(indx));
86 t(ddindx).context := a18(indx);
87 t(ddindx).attribute1 := a19(indx);
88 t(ddindx).attribute2 := a20(indx);
89 t(ddindx).attribute3 := a21(indx);
90 t(ddindx).attribute4 := a22(indx);
91 t(ddindx).attribute5 := a23(indx);
92 t(ddindx).attribute6 := a24(indx);
93 t(ddindx).attribute7 := a25(indx);
94 t(ddindx).attribute8 := a26(indx);
95 t(ddindx).attribute9 := a27(indx);
96 t(ddindx).attribute10 := a28(indx);
97 t(ddindx).attribute11 := a29(indx);
98 t(ddindx).attribute12 := a30(indx);
99 t(ddindx).attribute13 := a31(indx);
100 t(ddindx).attribute14 := a32(indx);
101 t(ddindx).attribute15 := a33(indx);
102 t(ddindx).object_version_number := rosetta_g_miss_num_map(a34(indx));
103 ddindx := ddindx+1;
104 if a0.last =indx
105 then exit;
106 end if;
107 indx := a0.next(indx);
108 end loop;
109 end if;
110 end if;
111 end rosetta_table_copy_in_p1;
112 procedure rosetta_table_copy_out_p1(t csi_t_datastructures_grp.txn_systems_tbl, a0 out nocopy JTF_NUMBER_TABLE
113 , a1 out nocopy JTF_NUMBER_TABLE
114 , a2 out nocopy JTF_VARCHAR2_TABLE_100
115 , a3 out nocopy JTF_VARCHAR2_TABLE_300
116 , a4 out nocopy JTF_VARCHAR2_TABLE_100
117 , a5 out nocopy JTF_VARCHAR2_TABLE_100
118 , a6 out nocopy JTF_NUMBER_TABLE
119 , a7 out nocopy JTF_NUMBER_TABLE
120 , a8 out nocopy JTF_NUMBER_TABLE
121 , a9 out nocopy JTF_NUMBER_TABLE
122 , a10 out nocopy JTF_NUMBER_TABLE
123 , a11 out nocopy JTF_NUMBER_TABLE
124 , a12 out nocopy JTF_NUMBER_TABLE
125 , a13 out nocopy JTF_NUMBER_TABLE
126 , a14 out nocopy JTF_VARCHAR2_TABLE_100
127 , a15 out nocopy JTF_VARCHAR2_TABLE_100
128 , a16 out nocopy JTF_DATE_TABLE
129 , a17 out nocopy JTF_DATE_TABLE
130 , a18 out nocopy JTF_VARCHAR2_TABLE_100
131 , a19 out nocopy JTF_VARCHAR2_TABLE_200
132 , a20 out nocopy JTF_VARCHAR2_TABLE_200
133 , a21 out nocopy JTF_VARCHAR2_TABLE_200
134 , a22 out nocopy JTF_VARCHAR2_TABLE_200
135 , a23 out nocopy JTF_VARCHAR2_TABLE_200
136 , a24 out nocopy JTF_VARCHAR2_TABLE_200
137 , a25 out nocopy JTF_VARCHAR2_TABLE_200
138 , a26 out nocopy JTF_VARCHAR2_TABLE_200
139 , a27 out nocopy JTF_VARCHAR2_TABLE_200
140 , a28 out nocopy JTF_VARCHAR2_TABLE_200
141 , a29 out nocopy JTF_VARCHAR2_TABLE_200
142 , a30 out nocopy JTF_VARCHAR2_TABLE_200
143 , a31 out nocopy JTF_VARCHAR2_TABLE_200
144 , a32 out nocopy JTF_VARCHAR2_TABLE_200
145 , a33 out nocopy JTF_VARCHAR2_TABLE_200
146 , a34 out nocopy JTF_NUMBER_TABLE
147 ) as
148 ddindx binary_integer; indx binary_integer;
149 begin
150 if t is null or t.count = 0 then
151 a0 := JTF_NUMBER_TABLE();
152 a1 := JTF_NUMBER_TABLE();
153 a2 := JTF_VARCHAR2_TABLE_100();
154 a3 := JTF_VARCHAR2_TABLE_300();
155 a4 := JTF_VARCHAR2_TABLE_100();
156 a5 := JTF_VARCHAR2_TABLE_100();
157 a6 := JTF_NUMBER_TABLE();
158 a7 := JTF_NUMBER_TABLE();
159 a8 := JTF_NUMBER_TABLE();
160 a9 := JTF_NUMBER_TABLE();
161 a10 := JTF_NUMBER_TABLE();
162 a11 := JTF_NUMBER_TABLE();
163 a12 := JTF_NUMBER_TABLE();
164 a13 := JTF_NUMBER_TABLE();
165 a14 := JTF_VARCHAR2_TABLE_100();
166 a15 := JTF_VARCHAR2_TABLE_100();
167 a16 := JTF_DATE_TABLE();
168 a17 := JTF_DATE_TABLE();
169 a18 := JTF_VARCHAR2_TABLE_100();
170 a19 := JTF_VARCHAR2_TABLE_200();
171 a20 := JTF_VARCHAR2_TABLE_200();
172 a21 := JTF_VARCHAR2_TABLE_200();
173 a22 := JTF_VARCHAR2_TABLE_200();
174 a23 := JTF_VARCHAR2_TABLE_200();
175 a24 := JTF_VARCHAR2_TABLE_200();
176 a25 := JTF_VARCHAR2_TABLE_200();
177 a26 := JTF_VARCHAR2_TABLE_200();
178 a27 := JTF_VARCHAR2_TABLE_200();
179 a28 := JTF_VARCHAR2_TABLE_200();
180 a29 := JTF_VARCHAR2_TABLE_200();
181 a30 := JTF_VARCHAR2_TABLE_200();
182 a31 := JTF_VARCHAR2_TABLE_200();
183 a32 := JTF_VARCHAR2_TABLE_200();
184 a33 := JTF_VARCHAR2_TABLE_200();
185 a34 := JTF_NUMBER_TABLE();
186 else
187 a0 := JTF_NUMBER_TABLE();
188 a1 := JTF_NUMBER_TABLE();
189 a2 := JTF_VARCHAR2_TABLE_100();
190 a3 := JTF_VARCHAR2_TABLE_300();
191 a4 := JTF_VARCHAR2_TABLE_100();
192 a5 := JTF_VARCHAR2_TABLE_100();
193 a6 := JTF_NUMBER_TABLE();
194 a7 := JTF_NUMBER_TABLE();
195 a8 := JTF_NUMBER_TABLE();
196 a9 := JTF_NUMBER_TABLE();
197 a10 := JTF_NUMBER_TABLE();
198 a11 := JTF_NUMBER_TABLE();
199 a12 := JTF_NUMBER_TABLE();
200 a13 := JTF_NUMBER_TABLE();
201 a14 := JTF_VARCHAR2_TABLE_100();
202 a15 := JTF_VARCHAR2_TABLE_100();
203 a16 := JTF_DATE_TABLE();
204 a17 := JTF_DATE_TABLE();
205 a18 := JTF_VARCHAR2_TABLE_100();
206 a19 := JTF_VARCHAR2_TABLE_200();
207 a20 := JTF_VARCHAR2_TABLE_200();
208 a21 := JTF_VARCHAR2_TABLE_200();
209 a22 := JTF_VARCHAR2_TABLE_200();
210 a23 := JTF_VARCHAR2_TABLE_200();
211 a24 := JTF_VARCHAR2_TABLE_200();
212 a25 := JTF_VARCHAR2_TABLE_200();
213 a26 := JTF_VARCHAR2_TABLE_200();
214 a27 := JTF_VARCHAR2_TABLE_200();
215 a28 := JTF_VARCHAR2_TABLE_200();
216 a29 := JTF_VARCHAR2_TABLE_200();
217 a30 := JTF_VARCHAR2_TABLE_200();
218 a31 := JTF_VARCHAR2_TABLE_200();
219 a32 := JTF_VARCHAR2_TABLE_200();
220 a33 := JTF_VARCHAR2_TABLE_200();
221 a34 := JTF_NUMBER_TABLE();
222 if t.count > 0 then
223 a0.extend(t.count);
224 a1.extend(t.count);
225 a2.extend(t.count);
226 a3.extend(t.count);
227 a4.extend(t.count);
228 a5.extend(t.count);
229 a6.extend(t.count);
230 a7.extend(t.count);
231 a8.extend(t.count);
232 a9.extend(t.count);
233 a10.extend(t.count);
234 a11.extend(t.count);
235 a12.extend(t.count);
236 a13.extend(t.count);
237 a14.extend(t.count);
238 a15.extend(t.count);
239 a16.extend(t.count);
240 a17.extend(t.count);
241 a18.extend(t.count);
242 a19.extend(t.count);
243 a20.extend(t.count);
244 a21.extend(t.count);
245 a22.extend(t.count);
246 a23.extend(t.count);
247 a24.extend(t.count);
248 a25.extend(t.count);
249 a26.extend(t.count);
250 a27.extend(t.count);
251 a28.extend(t.count);
252 a29.extend(t.count);
253 a30.extend(t.count);
254 a31.extend(t.count);
255 a32.extend(t.count);
256 a33.extend(t.count);
257 a34.extend(t.count);
258 ddindx := t.first;
259 indx := 1;
260 while true loop
261 a0(indx) := rosetta_g_miss_num_map(t(ddindx).transaction_system_id);
262 a1(indx) := rosetta_g_miss_num_map(t(ddindx).transaction_line_id);
263 a2(indx) := t(ddindx).system_name;
264 a3(indx) := t(ddindx).description;
265 a4(indx) := t(ddindx).system_type_code;
266 a5(indx) := t(ddindx).system_number;
267 a6(indx) := rosetta_g_miss_num_map(t(ddindx).customer_id);
268 a7(indx) := rosetta_g_miss_num_map(t(ddindx).bill_to_contact_id);
269 a8(indx) := rosetta_g_miss_num_map(t(ddindx).ship_to_contact_id);
270 a9(indx) := rosetta_g_miss_num_map(t(ddindx).technical_contact_id);
271 a10(indx) := rosetta_g_miss_num_map(t(ddindx).service_admin_contact_id);
272 a11(indx) := rosetta_g_miss_num_map(t(ddindx).ship_to_site_use_id);
273 a12(indx) := rosetta_g_miss_num_map(t(ddindx).bill_to_site_use_id);
274 a13(indx) := rosetta_g_miss_num_map(t(ddindx).install_site_use_id);
275 a14(indx) := t(ddindx).coterminate_day_month;
276 a15(indx) := t(ddindx).config_system_type;
277 a16(indx) := t(ddindx).start_date_active;
278 a17(indx) := t(ddindx).end_date_active;
279 a18(indx) := t(ddindx).context;
280 a19(indx) := t(ddindx).attribute1;
281 a20(indx) := t(ddindx).attribute2;
282 a21(indx) := t(ddindx).attribute3;
283 a22(indx) := t(ddindx).attribute4;
284 a23(indx) := t(ddindx).attribute5;
285 a24(indx) := t(ddindx).attribute6;
286 a25(indx) := t(ddindx).attribute7;
287 a26(indx) := t(ddindx).attribute8;
288 a27(indx) := t(ddindx).attribute9;
289 a28(indx) := t(ddindx).attribute10;
290 a29(indx) := t(ddindx).attribute11;
291 a30(indx) := t(ddindx).attribute12;
292 a31(indx) := t(ddindx).attribute13;
293 a32(indx) := t(ddindx).attribute14;
294 a33(indx) := t(ddindx).attribute15;
295 a34(indx) := rosetta_g_miss_num_map(t(ddindx).object_version_number);
296 indx := indx+1;
297 if t.last =ddindx
298 then exit;
299 end if;
300 ddindx := t.next(ddindx);
301 end loop;
302 end if;
303 end if;
304 end rosetta_table_copy_out_p1;
305
306 procedure rosetta_table_copy_in_p4(t out nocopy csi_t_datastructures_grp.txn_line_detail_tbl, a0 JTF_NUMBER_TABLE
307 , a1 JTF_NUMBER_TABLE
308 , a2 JTF_NUMBER_TABLE
309 , a3 JTF_VARCHAR2_TABLE_100
310 , a4 JTF_VARCHAR2_TABLE_100
311 , a5 JTF_NUMBER_TABLE
312 , a6 JTF_NUMBER_TABLE
313 , a7 JTF_NUMBER_TABLE
314 , a8 JTF_NUMBER_TABLE
315 , a9 JTF_VARCHAR2_TABLE_100
316 , a10 JTF_NUMBER_TABLE
317 , a11 JTF_NUMBER_TABLE
318 , a12 JTF_VARCHAR2_TABLE_100
319 , a13 JTF_NUMBER_TABLE
320 , a14 JTF_VARCHAR2_TABLE_100
321 , a15 JTF_NUMBER_TABLE
322 , a16 JTF_VARCHAR2_TABLE_100
323 , a17 JTF_VARCHAR2_TABLE_100
324 , a18 JTF_VARCHAR2_TABLE_100
325 , a19 JTF_VARCHAR2_TABLE_100
326 , a20 JTF_NUMBER_TABLE
327 , a21 JTF_DATE_TABLE
328 , a22 JTF_DATE_TABLE
329 , a23 JTF_VARCHAR2_TABLE_100
330 , a24 JTF_NUMBER_TABLE
331 , a25 JTF_VARCHAR2_TABLE_100
332 , a26 JTF_VARCHAR2_TABLE_300
333 , a27 JTF_DATE_TABLE
334 , a28 JTF_DATE_TABLE
335 , a29 JTF_DATE_TABLE
336 , a30 JTF_VARCHAR2_TABLE_100
337 , a31 JTF_NUMBER_TABLE
338 , a32 JTF_NUMBER_TABLE
339 , a33 JTF_DATE_TABLE
340 , a34 JTF_NUMBER_TABLE
341 , a35 JTF_NUMBER_TABLE
342 , a36 JTF_NUMBER_TABLE
343 , a37 JTF_VARCHAR2_TABLE_100
344 , a38 JTF_VARCHAR2_TABLE_300
345 , a39 JTF_VARCHAR2_TABLE_300
346 , a40 JTF_NUMBER_TABLE
347 , a41 JTF_NUMBER_TABLE
348 , a42 JTF_NUMBER_TABLE
349 , a43 JTF_NUMBER_TABLE
350 , a44 JTF_NUMBER_TABLE
351 , a45 JTF_DATE_TABLE
352 , a46 JTF_VARCHAR2_TABLE_300
353 , a47 JTF_VARCHAR2_TABLE_100
354 , a48 JTF_VARCHAR2_TABLE_100
355 , a49 JTF_NUMBER_TABLE
356 , a50 JTF_VARCHAR2_TABLE_100
357 , a51 JTF_VARCHAR2_TABLE_100
358 , a52 JTF_VARCHAR2_TABLE_200
359 , a53 JTF_VARCHAR2_TABLE_200
360 , a54 JTF_VARCHAR2_TABLE_200
361 , a55 JTF_VARCHAR2_TABLE_200
362 , a56 JTF_VARCHAR2_TABLE_200
363 , a57 JTF_VARCHAR2_TABLE_200
364 , a58 JTF_VARCHAR2_TABLE_200
365 , a59 JTF_VARCHAR2_TABLE_200
366 , a60 JTF_VARCHAR2_TABLE_200
367 , a61 JTF_VARCHAR2_TABLE_200
368 , a62 JTF_VARCHAR2_TABLE_200
369 , a63 JTF_VARCHAR2_TABLE_200
370 , a64 JTF_VARCHAR2_TABLE_200
371 , a65 JTF_VARCHAR2_TABLE_200
372 , a66 JTF_VARCHAR2_TABLE_200
373 , a67 JTF_NUMBER_TABLE
374 , a68 JTF_NUMBER_TABLE
375 , a69 JTF_NUMBER_TABLE
376 , a70 JTF_NUMBER_TABLE
377 , a71 JTF_NUMBER_TABLE
378 ) as
379 ddindx binary_integer; indx binary_integer;
380 begin
381 if a0 is not null and a0.count > 0 then
382 if a0.count > 0 then
383 indx := a0.first;
384 ddindx := 1;
385 while true loop
386 t(ddindx).txn_line_detail_id := rosetta_g_miss_num_map(a0(indx));
387 t(ddindx).transaction_line_id := rosetta_g_miss_num_map(a1(indx));
388 t(ddindx).sub_type_id := rosetta_g_miss_num_map(a2(indx));
389 t(ddindx).instance_exists_flag := a3(indx);
390 t(ddindx).source_transaction_flag := a4(indx);
391 t(ddindx).instance_id := rosetta_g_miss_num_map(a5(indx));
392 t(ddindx).changed_instance_id := rosetta_g_miss_num_map(a6(indx));
393 t(ddindx).csi_system_id := rosetta_g_miss_num_map(a7(indx));
394 t(ddindx).inventory_item_id := rosetta_g_miss_num_map(a8(indx));
395 t(ddindx).inventory_revision := a9(indx);
396 t(ddindx).inv_organization_id := rosetta_g_miss_num_map(a10(indx));
397 t(ddindx).item_condition_id := rosetta_g_miss_num_map(a11(indx));
398 t(ddindx).instance_type_code := a12(indx);
399 t(ddindx).quantity := rosetta_g_miss_num_map(a13(indx));
400 t(ddindx).unit_of_measure := a14(indx);
401 t(ddindx).qty_remaining := rosetta_g_miss_num_map(a15(indx));
402 t(ddindx).serial_number := a16(indx);
403 t(ddindx).mfg_serial_number_flag := a17(indx);
404 t(ddindx).lot_number := a18(indx);
405 t(ddindx).location_type_code := a19(indx);
406 t(ddindx).location_id := rosetta_g_miss_num_map(a20(indx));
407 t(ddindx).installation_date := rosetta_g_miss_date_in_map(a21(indx));
408 t(ddindx).in_service_date := rosetta_g_miss_date_in_map(a22(indx));
409 t(ddindx).external_reference := a23(indx);
410 t(ddindx).transaction_system_id := rosetta_g_miss_num_map(a24(indx));
411 t(ddindx).sellable_flag := a25(indx);
412 t(ddindx).version_label := a26(indx);
413 t(ddindx).return_by_date := rosetta_g_miss_date_in_map(a27(indx));
414 t(ddindx).active_start_date := rosetta_g_miss_date_in_map(a28(indx));
415 t(ddindx).active_end_date := rosetta_g_miss_date_in_map(a29(indx));
416 t(ddindx).preserve_detail_flag := a30(indx);
417 t(ddindx).reference_source_id := rosetta_g_miss_num_map(a31(indx));
418 t(ddindx).reference_source_line_id := rosetta_g_miss_num_map(a32(indx));
419 t(ddindx).reference_source_date := rosetta_g_miss_date_in_map(a33(indx));
420 t(ddindx).csi_transaction_id := rosetta_g_miss_num_map(a34(indx));
421 t(ddindx).source_txn_line_detail_id := rosetta_g_miss_num_map(a35(indx));
422 t(ddindx).inv_mtl_transaction_id := rosetta_g_miss_num_map(a36(indx));
423 t(ddindx).processing_status := a37(indx);
424 t(ddindx).error_code := a38(indx);
425 t(ddindx).error_explanation := a39(indx);
426 t(ddindx).txn_systems_index := rosetta_g_miss_num_map(a40(indx));
427 t(ddindx).config_inst_hdr_id := rosetta_g_miss_num_map(a41(indx));
428 t(ddindx).config_inst_rev_num := rosetta_g_miss_num_map(a42(indx));
429 t(ddindx).config_inst_item_id := rosetta_g_miss_num_map(a43(indx));
430 t(ddindx).config_inst_baseline_rev_num := rosetta_g_miss_num_map(a44(indx));
431 t(ddindx).target_commitment_date := rosetta_g_miss_date_in_map(a45(indx));
432 t(ddindx).instance_description := a46(indx);
433 t(ddindx).api_caller_identity := a47(indx);
434 t(ddindx).install_location_type_code := a48(indx);
435 t(ddindx).install_location_id := rosetta_g_miss_num_map(a49(indx));
436 t(ddindx).cascade_owner_flag := a50(indx);
437 t(ddindx).context := a51(indx);
438 t(ddindx).attribute1 := a52(indx);
439 t(ddindx).attribute2 := a53(indx);
440 t(ddindx).attribute3 := a54(indx);
441 t(ddindx).attribute4 := a55(indx);
442 t(ddindx).attribute5 := a56(indx);
443 t(ddindx).attribute6 := a57(indx);
444 t(ddindx).attribute7 := a58(indx);
445 t(ddindx).attribute8 := a59(indx);
446 t(ddindx).attribute9 := a60(indx);
447 t(ddindx).attribute10 := a61(indx);
448 t(ddindx).attribute11 := a62(indx);
449 t(ddindx).attribute12 := a63(indx);
450 t(ddindx).attribute13 := a64(indx);
451 t(ddindx).attribute14 := a65(indx);
452 t(ddindx).attribute15 := a66(indx);
453 t(ddindx).object_version_number := rosetta_g_miss_num_map(a67(indx));
454 t(ddindx).parent_instance_id := rosetta_g_miss_num_map(a68(indx));
455 t(ddindx).assc_txn_line_detail_id := rosetta_g_miss_num_map(a69(indx));
456 t(ddindx).overriding_csi_txn_id := rosetta_g_miss_num_map(a70(indx));
457 t(ddindx).instance_status_id := rosetta_g_miss_num_map(a71(indx));
458 ddindx := ddindx+1;
459 if a0.last =indx
460 then exit;
461 end if;
462 indx := a0.next(indx);
463 end loop;
464 end if;
465 end if;
466 end rosetta_table_copy_in_p4;
467 procedure rosetta_table_copy_out_p4(t csi_t_datastructures_grp.txn_line_detail_tbl, a0 out nocopy JTF_NUMBER_TABLE
468 , a1 out nocopy JTF_NUMBER_TABLE
469 , a2 out nocopy JTF_NUMBER_TABLE
470 , a3 out nocopy JTF_VARCHAR2_TABLE_100
471 , a4 out nocopy JTF_VARCHAR2_TABLE_100
472 , a5 out nocopy JTF_NUMBER_TABLE
473 , a6 out nocopy JTF_NUMBER_TABLE
474 , a7 out nocopy JTF_NUMBER_TABLE
475 , a8 out nocopy JTF_NUMBER_TABLE
476 , a9 out nocopy JTF_VARCHAR2_TABLE_100
477 , a10 out nocopy JTF_NUMBER_TABLE
478 , a11 out nocopy JTF_NUMBER_TABLE
479 , a12 out nocopy JTF_VARCHAR2_TABLE_100
480 , a13 out nocopy JTF_NUMBER_TABLE
481 , a14 out nocopy JTF_VARCHAR2_TABLE_100
482 , a15 out nocopy JTF_NUMBER_TABLE
483 , a16 out nocopy JTF_VARCHAR2_TABLE_100
484 , a17 out nocopy JTF_VARCHAR2_TABLE_100
485 , a18 out nocopy JTF_VARCHAR2_TABLE_100
486 , a19 out nocopy JTF_VARCHAR2_TABLE_100
487 , a20 out nocopy JTF_NUMBER_TABLE
488 , a21 out nocopy JTF_DATE_TABLE
489 , a22 out nocopy JTF_DATE_TABLE
490 , a23 out nocopy JTF_VARCHAR2_TABLE_100
491 , a24 out nocopy JTF_NUMBER_TABLE
492 , a25 out nocopy JTF_VARCHAR2_TABLE_100
493 , a26 out nocopy JTF_VARCHAR2_TABLE_300
494 , a27 out nocopy JTF_DATE_TABLE
495 , a28 out nocopy JTF_DATE_TABLE
496 , a29 out nocopy JTF_DATE_TABLE
497 , a30 out nocopy JTF_VARCHAR2_TABLE_100
498 , a31 out nocopy JTF_NUMBER_TABLE
499 , a32 out nocopy JTF_NUMBER_TABLE
500 , a33 out nocopy JTF_DATE_TABLE
501 , a34 out nocopy JTF_NUMBER_TABLE
502 , a35 out nocopy JTF_NUMBER_TABLE
503 , a36 out nocopy JTF_NUMBER_TABLE
504 , a37 out nocopy JTF_VARCHAR2_TABLE_100
505 , a38 out nocopy JTF_VARCHAR2_TABLE_300
506 , a39 out nocopy JTF_VARCHAR2_TABLE_300
507 , a40 out nocopy JTF_NUMBER_TABLE
508 , a41 out nocopy JTF_NUMBER_TABLE
509 , a42 out nocopy JTF_NUMBER_TABLE
510 , a43 out nocopy JTF_NUMBER_TABLE
511 , a44 out nocopy JTF_NUMBER_TABLE
512 , a45 out nocopy JTF_DATE_TABLE
513 , a46 out nocopy JTF_VARCHAR2_TABLE_300
514 , a47 out nocopy JTF_VARCHAR2_TABLE_100
515 , a48 out nocopy JTF_VARCHAR2_TABLE_100
516 , a49 out nocopy JTF_NUMBER_TABLE
517 , a50 out nocopy JTF_VARCHAR2_TABLE_100
518 , a51 out nocopy JTF_VARCHAR2_TABLE_100
519 , a52 out nocopy JTF_VARCHAR2_TABLE_200
520 , a53 out nocopy JTF_VARCHAR2_TABLE_200
521 , a54 out nocopy JTF_VARCHAR2_TABLE_200
522 , a55 out nocopy JTF_VARCHAR2_TABLE_200
523 , a56 out nocopy JTF_VARCHAR2_TABLE_200
524 , a57 out nocopy JTF_VARCHAR2_TABLE_200
525 , a58 out nocopy JTF_VARCHAR2_TABLE_200
526 , a59 out nocopy JTF_VARCHAR2_TABLE_200
527 , a60 out nocopy JTF_VARCHAR2_TABLE_200
528 , a61 out nocopy JTF_VARCHAR2_TABLE_200
529 , a62 out nocopy JTF_VARCHAR2_TABLE_200
530 , a63 out nocopy JTF_VARCHAR2_TABLE_200
531 , a64 out nocopy JTF_VARCHAR2_TABLE_200
532 , a65 out nocopy JTF_VARCHAR2_TABLE_200
533 , a66 out nocopy JTF_VARCHAR2_TABLE_200
534 , a67 out nocopy JTF_NUMBER_TABLE
535 , a68 out nocopy JTF_NUMBER_TABLE
536 , a69 out nocopy JTF_NUMBER_TABLE
537 , a70 out nocopy JTF_NUMBER_TABLE
538 , a71 out nocopy JTF_NUMBER_TABLE
539 ) as
540 ddindx binary_integer; indx binary_integer;
541 begin
542 if t is null or t.count = 0 then
543 a0 := JTF_NUMBER_TABLE();
544 a1 := JTF_NUMBER_TABLE();
545 a2 := JTF_NUMBER_TABLE();
546 a3 := JTF_VARCHAR2_TABLE_100();
547 a4 := JTF_VARCHAR2_TABLE_100();
548 a5 := JTF_NUMBER_TABLE();
549 a6 := JTF_NUMBER_TABLE();
550 a7 := JTF_NUMBER_TABLE();
551 a8 := JTF_NUMBER_TABLE();
552 a9 := JTF_VARCHAR2_TABLE_100();
553 a10 := JTF_NUMBER_TABLE();
554 a11 := JTF_NUMBER_TABLE();
555 a12 := JTF_VARCHAR2_TABLE_100();
556 a13 := JTF_NUMBER_TABLE();
557 a14 := JTF_VARCHAR2_TABLE_100();
558 a15 := JTF_NUMBER_TABLE();
559 a16 := JTF_VARCHAR2_TABLE_100();
560 a17 := JTF_VARCHAR2_TABLE_100();
561 a18 := JTF_VARCHAR2_TABLE_100();
562 a19 := JTF_VARCHAR2_TABLE_100();
563 a20 := JTF_NUMBER_TABLE();
564 a21 := JTF_DATE_TABLE();
565 a22 := JTF_DATE_TABLE();
566 a23 := JTF_VARCHAR2_TABLE_100();
567 a24 := JTF_NUMBER_TABLE();
568 a25 := JTF_VARCHAR2_TABLE_100();
569 a26 := JTF_VARCHAR2_TABLE_300();
570 a27 := JTF_DATE_TABLE();
571 a28 := JTF_DATE_TABLE();
572 a29 := JTF_DATE_TABLE();
573 a30 := JTF_VARCHAR2_TABLE_100();
574 a31 := JTF_NUMBER_TABLE();
575 a32 := JTF_NUMBER_TABLE();
576 a33 := JTF_DATE_TABLE();
577 a34 := JTF_NUMBER_TABLE();
578 a35 := JTF_NUMBER_TABLE();
579 a36 := JTF_NUMBER_TABLE();
580 a37 := JTF_VARCHAR2_TABLE_100();
581 a38 := JTF_VARCHAR2_TABLE_300();
582 a39 := JTF_VARCHAR2_TABLE_300();
583 a40 := JTF_NUMBER_TABLE();
584 a41 := JTF_NUMBER_TABLE();
585 a42 := JTF_NUMBER_TABLE();
586 a43 := JTF_NUMBER_TABLE();
587 a44 := JTF_NUMBER_TABLE();
588 a45 := JTF_DATE_TABLE();
589 a46 := JTF_VARCHAR2_TABLE_300();
590 a47 := JTF_VARCHAR2_TABLE_100();
591 a48 := JTF_VARCHAR2_TABLE_100();
592 a49 := JTF_NUMBER_TABLE();
593 a50 := JTF_VARCHAR2_TABLE_100();
594 a51 := JTF_VARCHAR2_TABLE_100();
595 a52 := JTF_VARCHAR2_TABLE_200();
596 a53 := JTF_VARCHAR2_TABLE_200();
597 a54 := JTF_VARCHAR2_TABLE_200();
598 a55 := JTF_VARCHAR2_TABLE_200();
599 a56 := JTF_VARCHAR2_TABLE_200();
600 a57 := JTF_VARCHAR2_TABLE_200();
601 a58 := JTF_VARCHAR2_TABLE_200();
602 a59 := JTF_VARCHAR2_TABLE_200();
603 a60 := JTF_VARCHAR2_TABLE_200();
604 a61 := JTF_VARCHAR2_TABLE_200();
605 a62 := JTF_VARCHAR2_TABLE_200();
606 a63 := JTF_VARCHAR2_TABLE_200();
607 a64 := JTF_VARCHAR2_TABLE_200();
608 a65 := JTF_VARCHAR2_TABLE_200();
609 a66 := JTF_VARCHAR2_TABLE_200();
610 a67 := JTF_NUMBER_TABLE();
611 a68 := JTF_NUMBER_TABLE();
612 a69 := JTF_NUMBER_TABLE();
613 a70 := JTF_NUMBER_TABLE();
614 a71 := JTF_NUMBER_TABLE();
615 else
616 a0 := JTF_NUMBER_TABLE();
617 a1 := JTF_NUMBER_TABLE();
618 a2 := JTF_NUMBER_TABLE();
619 a3 := JTF_VARCHAR2_TABLE_100();
620 a4 := JTF_VARCHAR2_TABLE_100();
621 a5 := JTF_NUMBER_TABLE();
622 a6 := JTF_NUMBER_TABLE();
623 a7 := JTF_NUMBER_TABLE();
624 a8 := JTF_NUMBER_TABLE();
625 a9 := JTF_VARCHAR2_TABLE_100();
626 a10 := JTF_NUMBER_TABLE();
627 a11 := JTF_NUMBER_TABLE();
628 a12 := JTF_VARCHAR2_TABLE_100();
629 a13 := JTF_NUMBER_TABLE();
630 a14 := JTF_VARCHAR2_TABLE_100();
631 a15 := JTF_NUMBER_TABLE();
632 a16 := JTF_VARCHAR2_TABLE_100();
633 a17 := JTF_VARCHAR2_TABLE_100();
634 a18 := JTF_VARCHAR2_TABLE_100();
635 a19 := JTF_VARCHAR2_TABLE_100();
636 a20 := JTF_NUMBER_TABLE();
637 a21 := JTF_DATE_TABLE();
638 a22 := JTF_DATE_TABLE();
639 a23 := JTF_VARCHAR2_TABLE_100();
640 a24 := JTF_NUMBER_TABLE();
641 a25 := JTF_VARCHAR2_TABLE_100();
642 a26 := JTF_VARCHAR2_TABLE_300();
643 a27 := JTF_DATE_TABLE();
644 a28 := JTF_DATE_TABLE();
645 a29 := JTF_DATE_TABLE();
646 a30 := JTF_VARCHAR2_TABLE_100();
647 a31 := JTF_NUMBER_TABLE();
648 a32 := JTF_NUMBER_TABLE();
649 a33 := JTF_DATE_TABLE();
650 a34 := JTF_NUMBER_TABLE();
651 a35 := JTF_NUMBER_TABLE();
652 a36 := JTF_NUMBER_TABLE();
653 a37 := JTF_VARCHAR2_TABLE_100();
654 a38 := JTF_VARCHAR2_TABLE_300();
655 a39 := JTF_VARCHAR2_TABLE_300();
656 a40 := JTF_NUMBER_TABLE();
657 a41 := JTF_NUMBER_TABLE();
658 a42 := JTF_NUMBER_TABLE();
659 a43 := JTF_NUMBER_TABLE();
660 a44 := JTF_NUMBER_TABLE();
661 a45 := JTF_DATE_TABLE();
662 a46 := JTF_VARCHAR2_TABLE_300();
663 a47 := JTF_VARCHAR2_TABLE_100();
664 a48 := JTF_VARCHAR2_TABLE_100();
665 a49 := JTF_NUMBER_TABLE();
666 a50 := JTF_VARCHAR2_TABLE_100();
667 a51 := JTF_VARCHAR2_TABLE_100();
668 a52 := JTF_VARCHAR2_TABLE_200();
669 a53 := JTF_VARCHAR2_TABLE_200();
670 a54 := JTF_VARCHAR2_TABLE_200();
671 a55 := JTF_VARCHAR2_TABLE_200();
672 a56 := JTF_VARCHAR2_TABLE_200();
673 a57 := JTF_VARCHAR2_TABLE_200();
674 a58 := JTF_VARCHAR2_TABLE_200();
675 a59 := JTF_VARCHAR2_TABLE_200();
676 a60 := JTF_VARCHAR2_TABLE_200();
677 a61 := JTF_VARCHAR2_TABLE_200();
678 a62 := JTF_VARCHAR2_TABLE_200();
679 a63 := JTF_VARCHAR2_TABLE_200();
680 a64 := JTF_VARCHAR2_TABLE_200();
681 a65 := JTF_VARCHAR2_TABLE_200();
682 a66 := JTF_VARCHAR2_TABLE_200();
683 a67 := JTF_NUMBER_TABLE();
684 a68 := JTF_NUMBER_TABLE();
685 a69 := JTF_NUMBER_TABLE();
686 a70 := JTF_NUMBER_TABLE();
687 a71 := JTF_NUMBER_TABLE();
688 if t.count > 0 then
689 a0.extend(t.count);
690 a1.extend(t.count);
691 a2.extend(t.count);
692 a3.extend(t.count);
693 a4.extend(t.count);
694 a5.extend(t.count);
695 a6.extend(t.count);
696 a7.extend(t.count);
697 a8.extend(t.count);
698 a9.extend(t.count);
699 a10.extend(t.count);
700 a11.extend(t.count);
701 a12.extend(t.count);
702 a13.extend(t.count);
703 a14.extend(t.count);
704 a15.extend(t.count);
705 a16.extend(t.count);
706 a17.extend(t.count);
707 a18.extend(t.count);
708 a19.extend(t.count);
709 a20.extend(t.count);
710 a21.extend(t.count);
711 a22.extend(t.count);
712 a23.extend(t.count);
713 a24.extend(t.count);
714 a25.extend(t.count);
715 a26.extend(t.count);
716 a27.extend(t.count);
717 a28.extend(t.count);
718 a29.extend(t.count);
719 a30.extend(t.count);
720 a31.extend(t.count);
721 a32.extend(t.count);
722 a33.extend(t.count);
723 a34.extend(t.count);
724 a35.extend(t.count);
725 a36.extend(t.count);
726 a37.extend(t.count);
727 a38.extend(t.count);
728 a39.extend(t.count);
729 a40.extend(t.count);
730 a41.extend(t.count);
731 a42.extend(t.count);
732 a43.extend(t.count);
733 a44.extend(t.count);
734 a45.extend(t.count);
735 a46.extend(t.count);
736 a47.extend(t.count);
737 a48.extend(t.count);
738 a49.extend(t.count);
739 a50.extend(t.count);
740 a51.extend(t.count);
741 a52.extend(t.count);
742 a53.extend(t.count);
743 a54.extend(t.count);
744 a55.extend(t.count);
745 a56.extend(t.count);
746 a57.extend(t.count);
747 a58.extend(t.count);
748 a59.extend(t.count);
749 a60.extend(t.count);
750 a61.extend(t.count);
751 a62.extend(t.count);
752 a63.extend(t.count);
753 a64.extend(t.count);
754 a65.extend(t.count);
755 a66.extend(t.count);
756 a67.extend(t.count);
757 a68.extend(t.count);
758 a69.extend(t.count);
759 a70.extend(t.count);
760 a71.extend(t.count);
761 ddindx := t.first;
762 indx := 1;
763 while true loop
764 a0(indx) := rosetta_g_miss_num_map(t(ddindx).txn_line_detail_id);
765 a1(indx) := rosetta_g_miss_num_map(t(ddindx).transaction_line_id);
766 a2(indx) := rosetta_g_miss_num_map(t(ddindx).sub_type_id);
767 a3(indx) := t(ddindx).instance_exists_flag;
768 a4(indx) := t(ddindx).source_transaction_flag;
769 a5(indx) := rosetta_g_miss_num_map(t(ddindx).instance_id);
770 a6(indx) := rosetta_g_miss_num_map(t(ddindx).changed_instance_id);
771 a7(indx) := rosetta_g_miss_num_map(t(ddindx).csi_system_id);
772 a8(indx) := rosetta_g_miss_num_map(t(ddindx).inventory_item_id);
773 a9(indx) := t(ddindx).inventory_revision;
774 a10(indx) := rosetta_g_miss_num_map(t(ddindx).inv_organization_id);
775 a11(indx) := rosetta_g_miss_num_map(t(ddindx).item_condition_id);
776 a12(indx) := t(ddindx).instance_type_code;
777 a13(indx) := rosetta_g_miss_num_map(t(ddindx).quantity);
778 a14(indx) := t(ddindx).unit_of_measure;
779 a15(indx) := rosetta_g_miss_num_map(t(ddindx).qty_remaining);
780 a16(indx) := t(ddindx).serial_number;
781 a17(indx) := t(ddindx).mfg_serial_number_flag;
782 a18(indx) := t(ddindx).lot_number;
783 a19(indx) := t(ddindx).location_type_code;
784 a20(indx) := rosetta_g_miss_num_map(t(ddindx).location_id);
785 a21(indx) := t(ddindx).installation_date;
786 a22(indx) := t(ddindx).in_service_date;
787 a23(indx) := t(ddindx).external_reference;
788 a24(indx) := rosetta_g_miss_num_map(t(ddindx).transaction_system_id);
789 a25(indx) := t(ddindx).sellable_flag;
790 a26(indx) := t(ddindx).version_label;
791 a27(indx) := t(ddindx).return_by_date;
792 a28(indx) := t(ddindx).active_start_date;
793 a29(indx) := t(ddindx).active_end_date;
794 a30(indx) := t(ddindx).preserve_detail_flag;
795 a31(indx) := rosetta_g_miss_num_map(t(ddindx).reference_source_id);
796 a32(indx) := rosetta_g_miss_num_map(t(ddindx).reference_source_line_id);
797 a33(indx) := t(ddindx).reference_source_date;
798 a34(indx) := rosetta_g_miss_num_map(t(ddindx).csi_transaction_id);
799 a35(indx) := rosetta_g_miss_num_map(t(ddindx).source_txn_line_detail_id);
800 a36(indx) := rosetta_g_miss_num_map(t(ddindx).inv_mtl_transaction_id);
801 a37(indx) := t(ddindx).processing_status;
802 a38(indx) := t(ddindx).error_code;
803 a39(indx) := t(ddindx).error_explanation;
804 a40(indx) := rosetta_g_miss_num_map(t(ddindx).txn_systems_index);
805 a41(indx) := rosetta_g_miss_num_map(t(ddindx).config_inst_hdr_id);
806 a42(indx) := rosetta_g_miss_num_map(t(ddindx).config_inst_rev_num);
807 a43(indx) := rosetta_g_miss_num_map(t(ddindx).config_inst_item_id);
808 a44(indx) := rosetta_g_miss_num_map(t(ddindx).config_inst_baseline_rev_num);
809 a45(indx) := t(ddindx).target_commitment_date;
810 a46(indx) := t(ddindx).instance_description;
811 a47(indx) := t(ddindx).api_caller_identity;
812 a48(indx) := t(ddindx).install_location_type_code;
813 a49(indx) := rosetta_g_miss_num_map(t(ddindx).install_location_id);
814 a50(indx) := t(ddindx).cascade_owner_flag;
815 a51(indx) := t(ddindx).context;
816 a52(indx) := t(ddindx).attribute1;
817 a53(indx) := t(ddindx).attribute2;
818 a54(indx) := t(ddindx).attribute3;
819 a55(indx) := t(ddindx).attribute4;
820 a56(indx) := t(ddindx).attribute5;
821 a57(indx) := t(ddindx).attribute6;
822 a58(indx) := t(ddindx).attribute7;
823 a59(indx) := t(ddindx).attribute8;
824 a60(indx) := t(ddindx).attribute9;
825 a61(indx) := t(ddindx).attribute10;
826 a62(indx) := t(ddindx).attribute11;
827 a63(indx) := t(ddindx).attribute12;
828 a64(indx) := t(ddindx).attribute13;
829 a65(indx) := t(ddindx).attribute14;
830 a66(indx) := t(ddindx).attribute15;
831 a67(indx) := rosetta_g_miss_num_map(t(ddindx).object_version_number);
832 a68(indx) := rosetta_g_miss_num_map(t(ddindx).parent_instance_id);
833 a69(indx) := rosetta_g_miss_num_map(t(ddindx).assc_txn_line_detail_id);
834 a70(indx) := rosetta_g_miss_num_map(t(ddindx).overriding_csi_txn_id);
835 a71(indx) := rosetta_g_miss_num_map(t(ddindx).instance_status_id);
836 indx := indx+1;
837 if t.last =ddindx
838 then exit;
839 end if;
840 ddindx := t.next(ddindx);
841 end loop;
842 end if;
843 end if;
844 end rosetta_table_copy_out_p4;
845
846 procedure rosetta_table_copy_in_p6(t out nocopy csi_t_datastructures_grp.txn_party_detail_tbl, a0 JTF_NUMBER_TABLE
847 , a1 JTF_NUMBER_TABLE
848 , a2 JTF_NUMBER_TABLE
849 , a3 JTF_VARCHAR2_TABLE_100
850 , a4 JTF_NUMBER_TABLE
851 , a5 JTF_VARCHAR2_TABLE_100
852 , a6 JTF_VARCHAR2_TABLE_100
853 , a7 JTF_NUMBER_TABLE
854 , a8 JTF_DATE_TABLE
855 , a9 JTF_DATE_TABLE
856 , a10 JTF_VARCHAR2_TABLE_100
857 , a11 JTF_VARCHAR2_TABLE_100
861 , a15 JTF_VARCHAR2_TABLE_200
858 , a12 JTF_VARCHAR2_TABLE_200
859 , a13 JTF_VARCHAR2_TABLE_200
860 , a14 JTF_VARCHAR2_TABLE_200
862 , a16 JTF_VARCHAR2_TABLE_200
863 , a17 JTF_VARCHAR2_TABLE_200
864 , a18 JTF_VARCHAR2_TABLE_200
865 , a19 JTF_VARCHAR2_TABLE_200
866 , a20 JTF_VARCHAR2_TABLE_200
867 , a21 JTF_VARCHAR2_TABLE_200
868 , a22 JTF_VARCHAR2_TABLE_200
869 , a23 JTF_VARCHAR2_TABLE_200
870 , a24 JTF_VARCHAR2_TABLE_200
871 , a25 JTF_VARCHAR2_TABLE_200
872 , a26 JTF_VARCHAR2_TABLE_200
873 , a27 JTF_NUMBER_TABLE
874 , a28 JTF_NUMBER_TABLE
875 , a29 JTF_VARCHAR2_TABLE_100
876 , a30 JTF_VARCHAR2_TABLE_100
877 , a31 JTF_NUMBER_TABLE
878 ) as
879 ddindx binary_integer; indx binary_integer;
880 begin
881 if a0 is not null and a0.count > 0 then
882 if a0.count > 0 then
883 indx := a0.first;
884 ddindx := 1;
885 while true loop
886 t(ddindx).txn_party_detail_id := rosetta_g_miss_num_map(a0(indx));
887 t(ddindx).txn_line_detail_id := rosetta_g_miss_num_map(a1(indx));
888 t(ddindx).instance_party_id := rosetta_g_miss_num_map(a2(indx));
889 t(ddindx).party_source_table := a3(indx);
890 t(ddindx).party_source_id := rosetta_g_miss_num_map(a4(indx));
891 t(ddindx).relationship_type_code := a5(indx);
892 t(ddindx).contact_flag := a6(indx);
893 t(ddindx).contact_party_id := rosetta_g_miss_num_map(a7(indx));
894 t(ddindx).active_start_date := rosetta_g_miss_date_in_map(a8(indx));
895 t(ddindx).active_end_date := rosetta_g_miss_date_in_map(a9(indx));
896 t(ddindx).preserve_detail_flag := a10(indx);
897 t(ddindx).context := a11(indx);
898 t(ddindx).attribute1 := a12(indx);
899 t(ddindx).attribute2 := a13(indx);
900 t(ddindx).attribute3 := a14(indx);
901 t(ddindx).attribute4 := a15(indx);
902 t(ddindx).attribute5 := a16(indx);
903 t(ddindx).attribute6 := a17(indx);
904 t(ddindx).attribute7 := a18(indx);
905 t(ddindx).attribute8 := a19(indx);
906 t(ddindx).attribute9 := a20(indx);
907 t(ddindx).attribute10 := a21(indx);
908 t(ddindx).attribute11 := a22(indx);
909 t(ddindx).attribute12 := a23(indx);
910 t(ddindx).attribute13 := a24(indx);
911 t(ddindx).attribute14 := a25(indx);
912 t(ddindx).attribute15 := a26(indx);
913 t(ddindx).txn_line_details_index := rosetta_g_miss_num_map(a27(indx));
914 t(ddindx).object_version_number := rosetta_g_miss_num_map(a28(indx));
915 t(ddindx).primary_flag := a29(indx);
916 t(ddindx).preferred_flag := a30(indx);
917 t(ddindx).txn_contact_party_index := rosetta_g_miss_num_map(a31(indx));
918 ddindx := ddindx+1;
919 if a0.last =indx
920 then exit;
921 end if;
922 indx := a0.next(indx);
923 end loop;
924 end if;
925 end if;
926 end rosetta_table_copy_in_p6;
927 procedure rosetta_table_copy_out_p6(t csi_t_datastructures_grp.txn_party_detail_tbl, a0 out nocopy JTF_NUMBER_TABLE
928 , a1 out nocopy JTF_NUMBER_TABLE
929 , a2 out nocopy JTF_NUMBER_TABLE
930 , a3 out nocopy JTF_VARCHAR2_TABLE_100
931 , a4 out nocopy JTF_NUMBER_TABLE
932 , a5 out nocopy JTF_VARCHAR2_TABLE_100
933 , a6 out nocopy JTF_VARCHAR2_TABLE_100
934 , a7 out nocopy JTF_NUMBER_TABLE
935 , a8 out nocopy JTF_DATE_TABLE
936 , a9 out nocopy JTF_DATE_TABLE
937 , a10 out nocopy JTF_VARCHAR2_TABLE_100
938 , a11 out nocopy JTF_VARCHAR2_TABLE_100
939 , a12 out nocopy JTF_VARCHAR2_TABLE_200
940 , a13 out nocopy JTF_VARCHAR2_TABLE_200
941 , a14 out nocopy JTF_VARCHAR2_TABLE_200
942 , a15 out nocopy JTF_VARCHAR2_TABLE_200
943 , a16 out nocopy JTF_VARCHAR2_TABLE_200
944 , a17 out nocopy JTF_VARCHAR2_TABLE_200
945 , a18 out nocopy JTF_VARCHAR2_TABLE_200
946 , a19 out nocopy JTF_VARCHAR2_TABLE_200
947 , a20 out nocopy JTF_VARCHAR2_TABLE_200
948 , a21 out nocopy JTF_VARCHAR2_TABLE_200
949 , a22 out nocopy JTF_VARCHAR2_TABLE_200
950 , a23 out nocopy JTF_VARCHAR2_TABLE_200
951 , a24 out nocopy JTF_VARCHAR2_TABLE_200
952 , a25 out nocopy JTF_VARCHAR2_TABLE_200
953 , a26 out nocopy JTF_VARCHAR2_TABLE_200
954 , a27 out nocopy JTF_NUMBER_TABLE
955 , a28 out nocopy JTF_NUMBER_TABLE
956 , a29 out nocopy JTF_VARCHAR2_TABLE_100
957 , a30 out nocopy JTF_VARCHAR2_TABLE_100
958 , a31 out nocopy JTF_NUMBER_TABLE
959 ) as
960 ddindx binary_integer; indx binary_integer;
961 begin
962 if t is null or t.count = 0 then
963 a0 := JTF_NUMBER_TABLE();
964 a1 := JTF_NUMBER_TABLE();
965 a2 := JTF_NUMBER_TABLE();
966 a3 := JTF_VARCHAR2_TABLE_100();
967 a4 := JTF_NUMBER_TABLE();
968 a5 := JTF_VARCHAR2_TABLE_100();
969 a6 := JTF_VARCHAR2_TABLE_100();
970 a7 := JTF_NUMBER_TABLE();
971 a8 := JTF_DATE_TABLE();
972 a9 := JTF_DATE_TABLE();
973 a10 := JTF_VARCHAR2_TABLE_100();
974 a11 := JTF_VARCHAR2_TABLE_100();
975 a12 := JTF_VARCHAR2_TABLE_200();
976 a13 := JTF_VARCHAR2_TABLE_200();
977 a14 := JTF_VARCHAR2_TABLE_200();
978 a15 := JTF_VARCHAR2_TABLE_200();
979 a16 := JTF_VARCHAR2_TABLE_200();
980 a17 := JTF_VARCHAR2_TABLE_200();
981 a18 := JTF_VARCHAR2_TABLE_200();
982 a19 := JTF_VARCHAR2_TABLE_200();
983 a20 := JTF_VARCHAR2_TABLE_200();
984 a21 := JTF_VARCHAR2_TABLE_200();
985 a22 := JTF_VARCHAR2_TABLE_200();
986 a23 := JTF_VARCHAR2_TABLE_200();
987 a24 := JTF_VARCHAR2_TABLE_200();
988 a25 := JTF_VARCHAR2_TABLE_200();
989 a26 := JTF_VARCHAR2_TABLE_200();
990 a27 := JTF_NUMBER_TABLE();
991 a28 := JTF_NUMBER_TABLE();
992 a29 := JTF_VARCHAR2_TABLE_100();
993 a30 := JTF_VARCHAR2_TABLE_100();
994 a31 := JTF_NUMBER_TABLE();
995 else
996 a0 := JTF_NUMBER_TABLE();
997 a1 := JTF_NUMBER_TABLE();
998 a2 := JTF_NUMBER_TABLE();
999 a3 := JTF_VARCHAR2_TABLE_100();
1000 a4 := JTF_NUMBER_TABLE();
1001 a5 := JTF_VARCHAR2_TABLE_100();
1002 a6 := JTF_VARCHAR2_TABLE_100();
1003 a7 := JTF_NUMBER_TABLE();
1004 a8 := JTF_DATE_TABLE();
1005 a9 := JTF_DATE_TABLE();
1006 a10 := JTF_VARCHAR2_TABLE_100();
1007 a11 := JTF_VARCHAR2_TABLE_100();
1008 a12 := JTF_VARCHAR2_TABLE_200();
1009 a13 := JTF_VARCHAR2_TABLE_200();
1010 a14 := JTF_VARCHAR2_TABLE_200();
1011 a15 := JTF_VARCHAR2_TABLE_200();
1012 a16 := JTF_VARCHAR2_TABLE_200();
1013 a17 := JTF_VARCHAR2_TABLE_200();
1014 a18 := JTF_VARCHAR2_TABLE_200();
1015 a19 := JTF_VARCHAR2_TABLE_200();
1016 a20 := JTF_VARCHAR2_TABLE_200();
1017 a21 := JTF_VARCHAR2_TABLE_200();
1018 a22 := JTF_VARCHAR2_TABLE_200();
1019 a23 := JTF_VARCHAR2_TABLE_200();
1020 a24 := JTF_VARCHAR2_TABLE_200();
1021 a25 := JTF_VARCHAR2_TABLE_200();
1022 a26 := JTF_VARCHAR2_TABLE_200();
1023 a27 := JTF_NUMBER_TABLE();
1024 a28 := JTF_NUMBER_TABLE();
1025 a29 := JTF_VARCHAR2_TABLE_100();
1026 a30 := JTF_VARCHAR2_TABLE_100();
1027 a31 := JTF_NUMBER_TABLE();
1028 if t.count > 0 then
1029 a0.extend(t.count);
1030 a1.extend(t.count);
1031 a2.extend(t.count);
1032 a3.extend(t.count);
1033 a4.extend(t.count);
1034 a5.extend(t.count);
1035 a6.extend(t.count);
1036 a7.extend(t.count);
1037 a8.extend(t.count);
1038 a9.extend(t.count);
1039 a10.extend(t.count);
1040 a11.extend(t.count);
1041 a12.extend(t.count);
1042 a13.extend(t.count);
1043 a14.extend(t.count);
1044 a15.extend(t.count);
1045 a16.extend(t.count);
1046 a17.extend(t.count);
1047 a18.extend(t.count);
1048 a19.extend(t.count);
1049 a20.extend(t.count);
1050 a21.extend(t.count);
1051 a22.extend(t.count);
1052 a23.extend(t.count);
1053 a24.extend(t.count);
1054 a25.extend(t.count);
1055 a26.extend(t.count);
1056 a27.extend(t.count);
1057 a28.extend(t.count);
1058 a29.extend(t.count);
1059 a30.extend(t.count);
1060 a31.extend(t.count);
1061 ddindx := t.first;
1062 indx := 1;
1063 while true loop
1064 a0(indx) := rosetta_g_miss_num_map(t(ddindx).txn_party_detail_id);
1065 a1(indx) := rosetta_g_miss_num_map(t(ddindx).txn_line_detail_id);
1066 a2(indx) := rosetta_g_miss_num_map(t(ddindx).instance_party_id);
1067 a3(indx) := t(ddindx).party_source_table;
1068 a4(indx) := rosetta_g_miss_num_map(t(ddindx).party_source_id);
1069 a5(indx) := t(ddindx).relationship_type_code;
1070 a6(indx) := t(ddindx).contact_flag;
1071 a7(indx) := rosetta_g_miss_num_map(t(ddindx).contact_party_id);
1072 a8(indx) := t(ddindx).active_start_date;
1073 a9(indx) := t(ddindx).active_end_date;
1074 a10(indx) := t(ddindx).preserve_detail_flag;
1075 a11(indx) := t(ddindx).context;
1076 a12(indx) := t(ddindx).attribute1;
1077 a13(indx) := t(ddindx).attribute2;
1078 a14(indx) := t(ddindx).attribute3;
1079 a15(indx) := t(ddindx).attribute4;
1080 a16(indx) := t(ddindx).attribute5;
1081 a17(indx) := t(ddindx).attribute6;
1082 a18(indx) := t(ddindx).attribute7;
1083 a19(indx) := t(ddindx).attribute8;
1084 a20(indx) := t(ddindx).attribute9;
1085 a21(indx) := t(ddindx).attribute10;
1086 a22(indx) := t(ddindx).attribute11;
1087 a23(indx) := t(ddindx).attribute12;
1088 a24(indx) := t(ddindx).attribute13;
1089 a25(indx) := t(ddindx).attribute14;
1090 a26(indx) := t(ddindx).attribute15;
1091 a27(indx) := rosetta_g_miss_num_map(t(ddindx).txn_line_details_index);
1092 a28(indx) := rosetta_g_miss_num_map(t(ddindx).object_version_number);
1093 a29(indx) := t(ddindx).primary_flag;
1094 a30(indx) := t(ddindx).preferred_flag;
1095 a31(indx) := rosetta_g_miss_num_map(t(ddindx).txn_contact_party_index);
1096 indx := indx+1;
1097 if t.last =ddindx
1098 then exit;
1099 end if;
1100 ddindx := t.next(ddindx);
1101 end loop;
1102 end if;
1103 end if;
1104 end rosetta_table_copy_out_p6;
1105
1109 , a3 JTF_NUMBER_TABLE
1106 procedure rosetta_table_copy_in_p8(t out nocopy csi_t_datastructures_grp.txn_pty_acct_detail_tbl, a0 JTF_NUMBER_TABLE
1107 , a1 JTF_NUMBER_TABLE
1108 , a2 JTF_NUMBER_TABLE
1110 , a4 JTF_VARCHAR2_TABLE_100
1111 , a5 JTF_NUMBER_TABLE
1112 , a6 JTF_NUMBER_TABLE
1113 , a7 JTF_DATE_TABLE
1114 , a8 JTF_DATE_TABLE
1115 , a9 JTF_VARCHAR2_TABLE_100
1116 , a10 JTF_VARCHAR2_TABLE_100
1117 , a11 JTF_VARCHAR2_TABLE_200
1118 , a12 JTF_VARCHAR2_TABLE_200
1119 , a13 JTF_VARCHAR2_TABLE_200
1120 , a14 JTF_VARCHAR2_TABLE_200
1121 , a15 JTF_VARCHAR2_TABLE_200
1122 , a16 JTF_VARCHAR2_TABLE_200
1123 , a17 JTF_VARCHAR2_TABLE_200
1124 , a18 JTF_VARCHAR2_TABLE_200
1125 , a19 JTF_VARCHAR2_TABLE_200
1126 , a20 JTF_VARCHAR2_TABLE_200
1127 , a21 JTF_VARCHAR2_TABLE_200
1128 , a22 JTF_VARCHAR2_TABLE_200
1129 , a23 JTF_VARCHAR2_TABLE_200
1130 , a24 JTF_VARCHAR2_TABLE_200
1131 , a25 JTF_VARCHAR2_TABLE_200
1132 , a26 JTF_NUMBER_TABLE
1133 , a27 JTF_NUMBER_TABLE
1134 ) as
1135 ddindx binary_integer; indx binary_integer;
1136 begin
1137 if a0 is not null and a0.count > 0 then
1138 if a0.count > 0 then
1139 indx := a0.first;
1140 ddindx := 1;
1141 while true loop
1142 t(ddindx).txn_account_detail_id := rosetta_g_miss_num_map(a0(indx));
1143 t(ddindx).txn_party_detail_id := rosetta_g_miss_num_map(a1(indx));
1144 t(ddindx).ip_account_id := rosetta_g_miss_num_map(a2(indx));
1145 t(ddindx).account_id := rosetta_g_miss_num_map(a3(indx));
1146 t(ddindx).relationship_type_code := a4(indx);
1147 t(ddindx).bill_to_address_id := rosetta_g_miss_num_map(a5(indx));
1148 t(ddindx).ship_to_address_id := rosetta_g_miss_num_map(a6(indx));
1149 t(ddindx).active_start_date := rosetta_g_miss_date_in_map(a7(indx));
1150 t(ddindx).active_end_date := rosetta_g_miss_date_in_map(a8(indx));
1151 t(ddindx).preserve_detail_flag := a9(indx);
1152 t(ddindx).context := a10(indx);
1153 t(ddindx).attribute1 := a11(indx);
1154 t(ddindx).attribute2 := a12(indx);
1155 t(ddindx).attribute3 := a13(indx);
1156 t(ddindx).attribute4 := a14(indx);
1157 t(ddindx).attribute5 := a15(indx);
1158 t(ddindx).attribute6 := a16(indx);
1159 t(ddindx).attribute7 := a17(indx);
1160 t(ddindx).attribute8 := a18(indx);
1161 t(ddindx).attribute9 := a19(indx);
1162 t(ddindx).attribute10 := a20(indx);
1163 t(ddindx).attribute11 := a21(indx);
1164 t(ddindx).attribute12 := a22(indx);
1165 t(ddindx).attribute13 := a23(indx);
1166 t(ddindx).attribute14 := a24(indx);
1167 t(ddindx).attribute15 := a25(indx);
1168 t(ddindx).txn_party_details_index := rosetta_g_miss_num_map(a26(indx));
1169 t(ddindx).object_version_number := rosetta_g_miss_num_map(a27(indx));
1170 ddindx := ddindx+1;
1171 if a0.last =indx
1172 then exit;
1173 end if;
1174 indx := a0.next(indx);
1175 end loop;
1176 end if;
1177 end if;
1178 end rosetta_table_copy_in_p8;
1179 procedure rosetta_table_copy_out_p8(t csi_t_datastructures_grp.txn_pty_acct_detail_tbl, a0 out nocopy JTF_NUMBER_TABLE
1180 , a1 out nocopy JTF_NUMBER_TABLE
1181 , a2 out nocopy JTF_NUMBER_TABLE
1182 , a3 out nocopy JTF_NUMBER_TABLE
1183 , a4 out nocopy JTF_VARCHAR2_TABLE_100
1184 , a5 out nocopy JTF_NUMBER_TABLE
1185 , a6 out nocopy JTF_NUMBER_TABLE
1186 , a7 out nocopy JTF_DATE_TABLE
1187 , a8 out nocopy JTF_DATE_TABLE
1188 , a9 out nocopy JTF_VARCHAR2_TABLE_100
1189 , a10 out nocopy JTF_VARCHAR2_TABLE_100
1190 , a11 out nocopy JTF_VARCHAR2_TABLE_200
1191 , a12 out nocopy JTF_VARCHAR2_TABLE_200
1192 , a13 out nocopy JTF_VARCHAR2_TABLE_200
1193 , a14 out nocopy JTF_VARCHAR2_TABLE_200
1194 , a15 out nocopy JTF_VARCHAR2_TABLE_200
1195 , a16 out nocopy JTF_VARCHAR2_TABLE_200
1196 , a17 out nocopy JTF_VARCHAR2_TABLE_200
1197 , a18 out nocopy JTF_VARCHAR2_TABLE_200
1198 , a19 out nocopy JTF_VARCHAR2_TABLE_200
1199 , a20 out nocopy JTF_VARCHAR2_TABLE_200
1200 , a21 out nocopy JTF_VARCHAR2_TABLE_200
1201 , a22 out nocopy JTF_VARCHAR2_TABLE_200
1202 , a23 out nocopy JTF_VARCHAR2_TABLE_200
1203 , a24 out nocopy JTF_VARCHAR2_TABLE_200
1204 , a25 out nocopy JTF_VARCHAR2_TABLE_200
1205 , a26 out nocopy JTF_NUMBER_TABLE
1206 , a27 out nocopy JTF_NUMBER_TABLE
1207 ) as
1208 ddindx binary_integer; indx binary_integer;
1209 begin
1210 if t is null or t.count = 0 then
1211 a0 := JTF_NUMBER_TABLE();
1212 a1 := JTF_NUMBER_TABLE();
1213 a2 := JTF_NUMBER_TABLE();
1214 a3 := JTF_NUMBER_TABLE();
1215 a4 := JTF_VARCHAR2_TABLE_100();
1216 a5 := JTF_NUMBER_TABLE();
1217 a6 := JTF_NUMBER_TABLE();
1218 a7 := JTF_DATE_TABLE();
1219 a8 := JTF_DATE_TABLE();
1220 a9 := JTF_VARCHAR2_TABLE_100();
1221 a10 := JTF_VARCHAR2_TABLE_100();
1222 a11 := JTF_VARCHAR2_TABLE_200();
1223 a12 := JTF_VARCHAR2_TABLE_200();
1224 a13 := JTF_VARCHAR2_TABLE_200();
1225 a14 := JTF_VARCHAR2_TABLE_200();
1226 a15 := JTF_VARCHAR2_TABLE_200();
1227 a16 := JTF_VARCHAR2_TABLE_200();
1228 a17 := JTF_VARCHAR2_TABLE_200();
1229 a18 := JTF_VARCHAR2_TABLE_200();
1230 a19 := JTF_VARCHAR2_TABLE_200();
1231 a20 := JTF_VARCHAR2_TABLE_200();
1232 a21 := JTF_VARCHAR2_TABLE_200();
1233 a22 := JTF_VARCHAR2_TABLE_200();
1234 a23 := JTF_VARCHAR2_TABLE_200();
1235 a24 := JTF_VARCHAR2_TABLE_200();
1236 a25 := JTF_VARCHAR2_TABLE_200();
1237 a26 := JTF_NUMBER_TABLE();
1238 a27 := JTF_NUMBER_TABLE();
1239 else
1243 a3 := JTF_NUMBER_TABLE();
1240 a0 := JTF_NUMBER_TABLE();
1241 a1 := JTF_NUMBER_TABLE();
1242 a2 := JTF_NUMBER_TABLE();
1244 a4 := JTF_VARCHAR2_TABLE_100();
1245 a5 := JTF_NUMBER_TABLE();
1246 a6 := JTF_NUMBER_TABLE();
1247 a7 := JTF_DATE_TABLE();
1248 a8 := JTF_DATE_TABLE();
1249 a9 := JTF_VARCHAR2_TABLE_100();
1250 a10 := JTF_VARCHAR2_TABLE_100();
1251 a11 := JTF_VARCHAR2_TABLE_200();
1252 a12 := JTF_VARCHAR2_TABLE_200();
1253 a13 := JTF_VARCHAR2_TABLE_200();
1254 a14 := JTF_VARCHAR2_TABLE_200();
1255 a15 := JTF_VARCHAR2_TABLE_200();
1256 a16 := JTF_VARCHAR2_TABLE_200();
1257 a17 := JTF_VARCHAR2_TABLE_200();
1258 a18 := JTF_VARCHAR2_TABLE_200();
1259 a19 := JTF_VARCHAR2_TABLE_200();
1260 a20 := JTF_VARCHAR2_TABLE_200();
1261 a21 := JTF_VARCHAR2_TABLE_200();
1262 a22 := JTF_VARCHAR2_TABLE_200();
1263 a23 := JTF_VARCHAR2_TABLE_200();
1264 a24 := JTF_VARCHAR2_TABLE_200();
1265 a25 := JTF_VARCHAR2_TABLE_200();
1266 a26 := JTF_NUMBER_TABLE();
1267 a27 := JTF_NUMBER_TABLE();
1268 if t.count > 0 then
1269 a0.extend(t.count);
1270 a1.extend(t.count);
1271 a2.extend(t.count);
1272 a3.extend(t.count);
1273 a4.extend(t.count);
1274 a5.extend(t.count);
1275 a6.extend(t.count);
1276 a7.extend(t.count);
1277 a8.extend(t.count);
1278 a9.extend(t.count);
1279 a10.extend(t.count);
1280 a11.extend(t.count);
1281 a12.extend(t.count);
1282 a13.extend(t.count);
1283 a14.extend(t.count);
1284 a15.extend(t.count);
1285 a16.extend(t.count);
1286 a17.extend(t.count);
1287 a18.extend(t.count);
1288 a19.extend(t.count);
1289 a20.extend(t.count);
1290 a21.extend(t.count);
1291 a22.extend(t.count);
1292 a23.extend(t.count);
1293 a24.extend(t.count);
1294 a25.extend(t.count);
1295 a26.extend(t.count);
1296 a27.extend(t.count);
1297 ddindx := t.first;
1298 indx := 1;
1299 while true loop
1300 a0(indx) := rosetta_g_miss_num_map(t(ddindx).txn_account_detail_id);
1301 a1(indx) := rosetta_g_miss_num_map(t(ddindx).txn_party_detail_id);
1302 a2(indx) := rosetta_g_miss_num_map(t(ddindx).ip_account_id);
1303 a3(indx) := rosetta_g_miss_num_map(t(ddindx).account_id);
1304 a4(indx) := t(ddindx).relationship_type_code;
1305 a5(indx) := rosetta_g_miss_num_map(t(ddindx).bill_to_address_id);
1306 a6(indx) := rosetta_g_miss_num_map(t(ddindx).ship_to_address_id);
1307 a7(indx) := t(ddindx).active_start_date;
1308 a8(indx) := t(ddindx).active_end_date;
1309 a9(indx) := t(ddindx).preserve_detail_flag;
1310 a10(indx) := t(ddindx).context;
1311 a11(indx) := t(ddindx).attribute1;
1312 a12(indx) := t(ddindx).attribute2;
1313 a13(indx) := t(ddindx).attribute3;
1314 a14(indx) := t(ddindx).attribute4;
1315 a15(indx) := t(ddindx).attribute5;
1316 a16(indx) := t(ddindx).attribute6;
1317 a17(indx) := t(ddindx).attribute7;
1318 a18(indx) := t(ddindx).attribute8;
1319 a19(indx) := t(ddindx).attribute9;
1320 a20(indx) := t(ddindx).attribute10;
1321 a21(indx) := t(ddindx).attribute11;
1322 a22(indx) := t(ddindx).attribute12;
1323 a23(indx) := t(ddindx).attribute13;
1324 a24(indx) := t(ddindx).attribute14;
1325 a25(indx) := t(ddindx).attribute15;
1326 a26(indx) := rosetta_g_miss_num_map(t(ddindx).txn_party_details_index);
1327 a27(indx) := rosetta_g_miss_num_map(t(ddindx).object_version_number);
1328 indx := indx+1;
1329 if t.last =ddindx
1330 then exit;
1331 end if;
1332 ddindx := t.next(ddindx);
1333 end loop;
1334 end if;
1335 end if;
1336 end rosetta_table_copy_out_p8;
1337
1338 procedure rosetta_table_copy_in_p10(t out nocopy csi_t_datastructures_grp.txn_ii_rltns_tbl, a0 JTF_NUMBER_TABLE
1339 , a1 JTF_NUMBER_TABLE
1340 , a2 JTF_NUMBER_TABLE
1341 , a3 JTF_NUMBER_TABLE
1342 , a4 JTF_VARCHAR2_TABLE_100
1343 , a5 JTF_VARCHAR2_TABLE_100
1344 , a6 JTF_NUMBER_TABLE
1345 , a7 JTF_VARCHAR2_TABLE_100
1346 , a8 JTF_VARCHAR2_TABLE_100
1347 , a9 JTF_NUMBER_TABLE
1348 , a10 JTF_NUMBER_TABLE
1349 , a11 JTF_NUMBER_TABLE
1350 , a12 JTF_NUMBER_TABLE
1351 , a13 JTF_NUMBER_TABLE
1352 , a14 JTF_NUMBER_TABLE
1353 , a15 JTF_DATE_TABLE
1354 , a16 JTF_VARCHAR2_TABLE_100
1355 , a17 JTF_VARCHAR2_TABLE_100
1356 , a18 JTF_NUMBER_TABLE
1357 , a19 JTF_VARCHAR2_TABLE_100
1358 , a20 JTF_VARCHAR2_TABLE_100
1359 , a21 JTF_DATE_TABLE
1360 , a22 JTF_DATE_TABLE
1361 , a23 JTF_VARCHAR2_TABLE_100
1362 , a24 JTF_VARCHAR2_TABLE_200
1363 , a25 JTF_VARCHAR2_TABLE_200
1364 , a26 JTF_VARCHAR2_TABLE_200
1365 , a27 JTF_VARCHAR2_TABLE_200
1366 , a28 JTF_VARCHAR2_TABLE_200
1367 , a29 JTF_VARCHAR2_TABLE_200
1368 , a30 JTF_VARCHAR2_TABLE_200
1369 , a31 JTF_VARCHAR2_TABLE_200
1370 , a32 JTF_VARCHAR2_TABLE_200
1371 , a33 JTF_VARCHAR2_TABLE_200
1372 , a34 JTF_VARCHAR2_TABLE_200
1373 , a35 JTF_VARCHAR2_TABLE_200
1374 , a36 JTF_VARCHAR2_TABLE_200
1375 , a37 JTF_VARCHAR2_TABLE_200
1376 , a38 JTF_VARCHAR2_TABLE_200
1377 , a39 JTF_NUMBER_TABLE
1378 , a40 JTF_VARCHAR2_TABLE_100
1379 ) as
1380 ddindx binary_integer; indx binary_integer;
1381 begin
1382 if a0 is not null and a0.count > 0 then
1383 if a0.count > 0 then
1387 t(ddindx).txn_relationship_id := rosetta_g_miss_num_map(a0(indx));
1384 indx := a0.first;
1385 ddindx := 1;
1386 while true loop
1388 t(ddindx).transaction_line_id := rosetta_g_miss_num_map(a1(indx));
1389 t(ddindx).csi_inst_relationship_id := rosetta_g_miss_num_map(a2(indx));
1390 t(ddindx).subject_id := rosetta_g_miss_num_map(a3(indx));
1391 t(ddindx).subject_index_flag := a4(indx);
1392 t(ddindx).subject_type := a5(indx);
1393 t(ddindx).object_id := rosetta_g_miss_num_map(a6(indx));
1394 t(ddindx).object_index_flag := a7(indx);
1395 t(ddindx).object_type := a8(indx);
1396 t(ddindx).sub_config_inst_hdr_id := rosetta_g_miss_num_map(a9(indx));
1397 t(ddindx).sub_config_inst_rev_num := rosetta_g_miss_num_map(a10(indx));
1398 t(ddindx).sub_config_inst_item_id := rosetta_g_miss_num_map(a11(indx));
1399 t(ddindx).obj_config_inst_hdr_id := rosetta_g_miss_num_map(a12(indx));
1400 t(ddindx).obj_config_inst_rev_num := rosetta_g_miss_num_map(a13(indx));
1401 t(ddindx).obj_config_inst_item_id := rosetta_g_miss_num_map(a14(indx));
1402 t(ddindx).target_commitment_date := rosetta_g_miss_date_in_map(a15(indx));
1403 t(ddindx).api_caller_identity := a16(indx);
1404 t(ddindx).relationship_type_code := a17(indx);
1405 t(ddindx).display_order := rosetta_g_miss_num_map(a18(indx));
1406 t(ddindx).position_reference := a19(indx);
1407 t(ddindx).mandatory_flag := a20(indx);
1408 t(ddindx).active_start_date := rosetta_g_miss_date_in_map(a21(indx));
1409 t(ddindx).active_end_date := rosetta_g_miss_date_in_map(a22(indx));
1410 t(ddindx).context := a23(indx);
1411 t(ddindx).attribute1 := a24(indx);
1412 t(ddindx).attribute2 := a25(indx);
1413 t(ddindx).attribute3 := a26(indx);
1414 t(ddindx).attribute4 := a27(indx);
1415 t(ddindx).attribute5 := a28(indx);
1416 t(ddindx).attribute6 := a29(indx);
1417 t(ddindx).attribute7 := a30(indx);
1418 t(ddindx).attribute8 := a31(indx);
1419 t(ddindx).attribute9 := a32(indx);
1420 t(ddindx).attribute10 := a33(indx);
1421 t(ddindx).attribute11 := a34(indx);
1422 t(ddindx).attribute12 := a35(indx);
1423 t(ddindx).attribute13 := a36(indx);
1424 t(ddindx).attribute14 := a37(indx);
1425 t(ddindx).attribute15 := a38(indx);
1426 t(ddindx).object_version_number := rosetta_g_miss_num_map(a39(indx));
1427 t(ddindx).transfer_components_flag := a40(indx);
1428 ddindx := ddindx+1;
1429 if a0.last =indx
1430 then exit;
1431 end if;
1432 indx := a0.next(indx);
1433 end loop;
1434 end if;
1435 end if;
1436 end rosetta_table_copy_in_p10;
1437 procedure rosetta_table_copy_out_p10(t csi_t_datastructures_grp.txn_ii_rltns_tbl, a0 out nocopy JTF_NUMBER_TABLE
1438 , a1 out nocopy JTF_NUMBER_TABLE
1439 , a2 out nocopy JTF_NUMBER_TABLE
1440 , a3 out nocopy JTF_NUMBER_TABLE
1441 , a4 out nocopy JTF_VARCHAR2_TABLE_100
1442 , a5 out nocopy JTF_VARCHAR2_TABLE_100
1443 , a6 out nocopy JTF_NUMBER_TABLE
1444 , a7 out nocopy JTF_VARCHAR2_TABLE_100
1445 , a8 out nocopy JTF_VARCHAR2_TABLE_100
1446 , a9 out nocopy JTF_NUMBER_TABLE
1447 , a10 out nocopy JTF_NUMBER_TABLE
1448 , a11 out nocopy JTF_NUMBER_TABLE
1449 , a12 out nocopy JTF_NUMBER_TABLE
1450 , a13 out nocopy JTF_NUMBER_TABLE
1451 , a14 out nocopy JTF_NUMBER_TABLE
1452 , a15 out nocopy JTF_DATE_TABLE
1453 , a16 out nocopy JTF_VARCHAR2_TABLE_100
1454 , a17 out nocopy JTF_VARCHAR2_TABLE_100
1455 , a18 out nocopy JTF_NUMBER_TABLE
1456 , a19 out nocopy JTF_VARCHAR2_TABLE_100
1457 , a20 out nocopy JTF_VARCHAR2_TABLE_100
1458 , a21 out nocopy JTF_DATE_TABLE
1459 , a22 out nocopy JTF_DATE_TABLE
1460 , a23 out nocopy JTF_VARCHAR2_TABLE_100
1461 , a24 out nocopy JTF_VARCHAR2_TABLE_200
1462 , a25 out nocopy JTF_VARCHAR2_TABLE_200
1463 , a26 out nocopy JTF_VARCHAR2_TABLE_200
1464 , a27 out nocopy JTF_VARCHAR2_TABLE_200
1465 , a28 out nocopy JTF_VARCHAR2_TABLE_200
1466 , a29 out nocopy JTF_VARCHAR2_TABLE_200
1467 , a30 out nocopy JTF_VARCHAR2_TABLE_200
1468 , a31 out nocopy JTF_VARCHAR2_TABLE_200
1469 , a32 out nocopy JTF_VARCHAR2_TABLE_200
1470 , a33 out nocopy JTF_VARCHAR2_TABLE_200
1471 , a34 out nocopy JTF_VARCHAR2_TABLE_200
1472 , a35 out nocopy JTF_VARCHAR2_TABLE_200
1473 , a36 out nocopy JTF_VARCHAR2_TABLE_200
1474 , a37 out nocopy JTF_VARCHAR2_TABLE_200
1475 , a38 out nocopy JTF_VARCHAR2_TABLE_200
1476 , a39 out nocopy JTF_NUMBER_TABLE
1477 , a40 out nocopy JTF_VARCHAR2_TABLE_100
1478 ) as
1479 ddindx binary_integer; indx binary_integer;
1480 begin
1481 if t is null or t.count = 0 then
1482 a0 := JTF_NUMBER_TABLE();
1483 a1 := JTF_NUMBER_TABLE();
1484 a2 := JTF_NUMBER_TABLE();
1485 a3 := JTF_NUMBER_TABLE();
1486 a4 := JTF_VARCHAR2_TABLE_100();
1487 a5 := JTF_VARCHAR2_TABLE_100();
1488 a6 := JTF_NUMBER_TABLE();
1489 a7 := JTF_VARCHAR2_TABLE_100();
1490 a8 := JTF_VARCHAR2_TABLE_100();
1491 a9 := JTF_NUMBER_TABLE();
1492 a10 := JTF_NUMBER_TABLE();
1493 a11 := JTF_NUMBER_TABLE();
1494 a12 := JTF_NUMBER_TABLE();
1495 a13 := JTF_NUMBER_TABLE();
1496 a14 := JTF_NUMBER_TABLE();
1497 a15 := JTF_DATE_TABLE();
1498 a16 := JTF_VARCHAR2_TABLE_100();
1499 a17 := JTF_VARCHAR2_TABLE_100();
1500 a18 := JTF_NUMBER_TABLE();
1501 a19 := JTF_VARCHAR2_TABLE_100();
1502 a20 := JTF_VARCHAR2_TABLE_100();
1503 a21 := JTF_DATE_TABLE();
1504 a22 := JTF_DATE_TABLE();
1505 a23 := JTF_VARCHAR2_TABLE_100();
1506 a24 := JTF_VARCHAR2_TABLE_200();
1510 a28 := JTF_VARCHAR2_TABLE_200();
1507 a25 := JTF_VARCHAR2_TABLE_200();
1508 a26 := JTF_VARCHAR2_TABLE_200();
1509 a27 := JTF_VARCHAR2_TABLE_200();
1511 a29 := JTF_VARCHAR2_TABLE_200();
1512 a30 := JTF_VARCHAR2_TABLE_200();
1513 a31 := JTF_VARCHAR2_TABLE_200();
1514 a32 := JTF_VARCHAR2_TABLE_200();
1515 a33 := JTF_VARCHAR2_TABLE_200();
1516 a34 := JTF_VARCHAR2_TABLE_200();
1517 a35 := JTF_VARCHAR2_TABLE_200();
1518 a36 := JTF_VARCHAR2_TABLE_200();
1519 a37 := JTF_VARCHAR2_TABLE_200();
1520 a38 := JTF_VARCHAR2_TABLE_200();
1521 a39 := JTF_NUMBER_TABLE();
1522 a40 := JTF_VARCHAR2_TABLE_100();
1523 else
1524 a0 := JTF_NUMBER_TABLE();
1525 a1 := JTF_NUMBER_TABLE();
1526 a2 := JTF_NUMBER_TABLE();
1527 a3 := JTF_NUMBER_TABLE();
1528 a4 := JTF_VARCHAR2_TABLE_100();
1529 a5 := JTF_VARCHAR2_TABLE_100();
1530 a6 := JTF_NUMBER_TABLE();
1531 a7 := JTF_VARCHAR2_TABLE_100();
1532 a8 := JTF_VARCHAR2_TABLE_100();
1533 a9 := JTF_NUMBER_TABLE();
1534 a10 := JTF_NUMBER_TABLE();
1535 a11 := JTF_NUMBER_TABLE();
1536 a12 := JTF_NUMBER_TABLE();
1537 a13 := JTF_NUMBER_TABLE();
1538 a14 := JTF_NUMBER_TABLE();
1539 a15 := JTF_DATE_TABLE();
1540 a16 := JTF_VARCHAR2_TABLE_100();
1541 a17 := JTF_VARCHAR2_TABLE_100();
1542 a18 := JTF_NUMBER_TABLE();
1543 a19 := JTF_VARCHAR2_TABLE_100();
1544 a20 := JTF_VARCHAR2_TABLE_100();
1545 a21 := JTF_DATE_TABLE();
1546 a22 := JTF_DATE_TABLE();
1547 a23 := JTF_VARCHAR2_TABLE_100();
1548 a24 := JTF_VARCHAR2_TABLE_200();
1549 a25 := JTF_VARCHAR2_TABLE_200();
1550 a26 := JTF_VARCHAR2_TABLE_200();
1551 a27 := JTF_VARCHAR2_TABLE_200();
1552 a28 := JTF_VARCHAR2_TABLE_200();
1553 a29 := JTF_VARCHAR2_TABLE_200();
1554 a30 := JTF_VARCHAR2_TABLE_200();
1555 a31 := JTF_VARCHAR2_TABLE_200();
1556 a32 := JTF_VARCHAR2_TABLE_200();
1557 a33 := JTF_VARCHAR2_TABLE_200();
1558 a34 := JTF_VARCHAR2_TABLE_200();
1559 a35 := JTF_VARCHAR2_TABLE_200();
1560 a36 := JTF_VARCHAR2_TABLE_200();
1561 a37 := JTF_VARCHAR2_TABLE_200();
1562 a38 := JTF_VARCHAR2_TABLE_200();
1563 a39 := JTF_NUMBER_TABLE();
1564 a40 := JTF_VARCHAR2_TABLE_100();
1565 if t.count > 0 then
1566 a0.extend(t.count);
1567 a1.extend(t.count);
1568 a2.extend(t.count);
1569 a3.extend(t.count);
1570 a4.extend(t.count);
1571 a5.extend(t.count);
1572 a6.extend(t.count);
1573 a7.extend(t.count);
1574 a8.extend(t.count);
1575 a9.extend(t.count);
1576 a10.extend(t.count);
1577 a11.extend(t.count);
1578 a12.extend(t.count);
1579 a13.extend(t.count);
1580 a14.extend(t.count);
1581 a15.extend(t.count);
1582 a16.extend(t.count);
1583 a17.extend(t.count);
1584 a18.extend(t.count);
1585 a19.extend(t.count);
1586 a20.extend(t.count);
1587 a21.extend(t.count);
1588 a22.extend(t.count);
1589 a23.extend(t.count);
1590 a24.extend(t.count);
1591 a25.extend(t.count);
1592 a26.extend(t.count);
1593 a27.extend(t.count);
1594 a28.extend(t.count);
1595 a29.extend(t.count);
1596 a30.extend(t.count);
1597 a31.extend(t.count);
1598 a32.extend(t.count);
1599 a33.extend(t.count);
1600 a34.extend(t.count);
1601 a35.extend(t.count);
1602 a36.extend(t.count);
1603 a37.extend(t.count);
1604 a38.extend(t.count);
1605 a39.extend(t.count);
1606 a40.extend(t.count);
1607 ddindx := t.first;
1608 indx := 1;
1609 while true loop
1610 a0(indx) := rosetta_g_miss_num_map(t(ddindx).txn_relationship_id);
1611 a1(indx) := rosetta_g_miss_num_map(t(ddindx).transaction_line_id);
1612 a2(indx) := rosetta_g_miss_num_map(t(ddindx).csi_inst_relationship_id);
1613 a3(indx) := rosetta_g_miss_num_map(t(ddindx).subject_id);
1614 a4(indx) := t(ddindx).subject_index_flag;
1615 a5(indx) := t(ddindx).subject_type;
1616 a6(indx) := rosetta_g_miss_num_map(t(ddindx).object_id);
1617 a7(indx) := t(ddindx).object_index_flag;
1618 a8(indx) := t(ddindx).object_type;
1619 a9(indx) := rosetta_g_miss_num_map(t(ddindx).sub_config_inst_hdr_id);
1620 a10(indx) := rosetta_g_miss_num_map(t(ddindx).sub_config_inst_rev_num);
1621 a11(indx) := rosetta_g_miss_num_map(t(ddindx).sub_config_inst_item_id);
1622 a12(indx) := rosetta_g_miss_num_map(t(ddindx).obj_config_inst_hdr_id);
1623 a13(indx) := rosetta_g_miss_num_map(t(ddindx).obj_config_inst_rev_num);
1624 a14(indx) := rosetta_g_miss_num_map(t(ddindx).obj_config_inst_item_id);
1625 a15(indx) := t(ddindx).target_commitment_date;
1626 a16(indx) := t(ddindx).api_caller_identity;
1627 a17(indx) := t(ddindx).relationship_type_code;
1628 a18(indx) := rosetta_g_miss_num_map(t(ddindx).display_order);
1629 a19(indx) := t(ddindx).position_reference;
1630 a20(indx) := t(ddindx).mandatory_flag;
1631 a21(indx) := t(ddindx).active_start_date;
1632 a22(indx) := t(ddindx).active_end_date;
1633 a23(indx) := t(ddindx).context;
1634 a24(indx) := t(ddindx).attribute1;
1635 a25(indx) := t(ddindx).attribute2;
1636 a26(indx) := t(ddindx).attribute3;
1637 a27(indx) := t(ddindx).attribute4;
1638 a28(indx) := t(ddindx).attribute5;
1639 a29(indx) := t(ddindx).attribute6;
1640 a30(indx) := t(ddindx).attribute7;
1641 a31(indx) := t(ddindx).attribute8;
1645 a35(indx) := t(ddindx).attribute12;
1642 a32(indx) := t(ddindx).attribute9;
1643 a33(indx) := t(ddindx).attribute10;
1644 a34(indx) := t(ddindx).attribute11;
1646 a36(indx) := t(ddindx).attribute13;
1647 a37(indx) := t(ddindx).attribute14;
1648 a38(indx) := t(ddindx).attribute15;
1649 a39(indx) := rosetta_g_miss_num_map(t(ddindx).object_version_number);
1650 a40(indx) := t(ddindx).transfer_components_flag;
1651 indx := indx+1;
1652 if t.last =ddindx
1653 then exit;
1654 end if;
1655 ddindx := t.next(ddindx);
1656 end loop;
1657 end if;
1658 end if;
1659 end rosetta_table_copy_out_p10;
1660
1661 procedure rosetta_table_copy_in_p12(t out nocopy csi_t_datastructures_grp.txn_org_assgn_tbl, a0 JTF_NUMBER_TABLE
1662 , a1 JTF_NUMBER_TABLE
1663 , a2 JTF_NUMBER_TABLE
1664 , a3 JTF_NUMBER_TABLE
1665 , a4 JTF_VARCHAR2_TABLE_100
1666 , a5 JTF_DATE_TABLE
1667 , a6 JTF_DATE_TABLE
1668 , a7 JTF_VARCHAR2_TABLE_100
1669 , a8 JTF_VARCHAR2_TABLE_100
1670 , a9 JTF_VARCHAR2_TABLE_200
1671 , a10 JTF_VARCHAR2_TABLE_200
1672 , a11 JTF_VARCHAR2_TABLE_200
1673 , a12 JTF_VARCHAR2_TABLE_200
1674 , a13 JTF_VARCHAR2_TABLE_200
1675 , a14 JTF_VARCHAR2_TABLE_200
1676 , a15 JTF_VARCHAR2_TABLE_200
1677 , a16 JTF_VARCHAR2_TABLE_200
1678 , a17 JTF_VARCHAR2_TABLE_200
1679 , a18 JTF_VARCHAR2_TABLE_200
1680 , a19 JTF_VARCHAR2_TABLE_200
1681 , a20 JTF_VARCHAR2_TABLE_200
1682 , a21 JTF_VARCHAR2_TABLE_200
1683 , a22 JTF_VARCHAR2_TABLE_200
1684 , a23 JTF_VARCHAR2_TABLE_200
1685 , a24 JTF_NUMBER_TABLE
1686 , a25 JTF_NUMBER_TABLE
1687 ) as
1688 ddindx binary_integer; indx binary_integer;
1689 begin
1690 if a0 is not null and a0.count > 0 then
1691 if a0.count > 0 then
1692 indx := a0.first;
1693 ddindx := 1;
1694 while true loop
1695 t(ddindx).txn_operating_unit_id := rosetta_g_miss_num_map(a0(indx));
1696 t(ddindx).txn_line_detail_id := rosetta_g_miss_num_map(a1(indx));
1697 t(ddindx).instance_ou_id := rosetta_g_miss_num_map(a2(indx));
1698 t(ddindx).operating_unit_id := rosetta_g_miss_num_map(a3(indx));
1699 t(ddindx).relationship_type_code := a4(indx);
1700 t(ddindx).active_start_date := rosetta_g_miss_date_in_map(a5(indx));
1701 t(ddindx).active_end_date := rosetta_g_miss_date_in_map(a6(indx));
1702 t(ddindx).preserve_detail_flag := a7(indx);
1703 t(ddindx).context := a8(indx);
1704 t(ddindx).attribute1 := a9(indx);
1705 t(ddindx).attribute2 := a10(indx);
1706 t(ddindx).attribute3 := a11(indx);
1707 t(ddindx).attribute4 := a12(indx);
1708 t(ddindx).attribute5 := a13(indx);
1709 t(ddindx).attribute6 := a14(indx);
1710 t(ddindx).attribute7 := a15(indx);
1711 t(ddindx).attribute8 := a16(indx);
1712 t(ddindx).attribute9 := a17(indx);
1713 t(ddindx).attribute10 := a18(indx);
1714 t(ddindx).attribute11 := a19(indx);
1715 t(ddindx).attribute12 := a20(indx);
1716 t(ddindx).attribute13 := a21(indx);
1717 t(ddindx).attribute14 := a22(indx);
1718 t(ddindx).attribute15 := a23(indx);
1719 t(ddindx).txn_line_details_index := rosetta_g_miss_num_map(a24(indx));
1720 t(ddindx).object_version_number := rosetta_g_miss_num_map(a25(indx));
1721 ddindx := ddindx+1;
1722 if a0.last =indx
1723 then exit;
1724 end if;
1725 indx := a0.next(indx);
1726 end loop;
1727 end if;
1728 end if;
1729 end rosetta_table_copy_in_p12;
1730 procedure rosetta_table_copy_out_p12(t csi_t_datastructures_grp.txn_org_assgn_tbl, a0 out nocopy JTF_NUMBER_TABLE
1731 , a1 out nocopy JTF_NUMBER_TABLE
1732 , a2 out nocopy JTF_NUMBER_TABLE
1733 , a3 out nocopy JTF_NUMBER_TABLE
1734 , a4 out nocopy JTF_VARCHAR2_TABLE_100
1735 , a5 out nocopy JTF_DATE_TABLE
1736 , a6 out nocopy JTF_DATE_TABLE
1737 , a7 out nocopy JTF_VARCHAR2_TABLE_100
1738 , a8 out nocopy JTF_VARCHAR2_TABLE_100
1739 , a9 out nocopy JTF_VARCHAR2_TABLE_200
1740 , a10 out nocopy JTF_VARCHAR2_TABLE_200
1741 , a11 out nocopy JTF_VARCHAR2_TABLE_200
1742 , a12 out nocopy JTF_VARCHAR2_TABLE_200
1743 , a13 out nocopy JTF_VARCHAR2_TABLE_200
1744 , a14 out nocopy JTF_VARCHAR2_TABLE_200
1745 , a15 out nocopy JTF_VARCHAR2_TABLE_200
1746 , a16 out nocopy JTF_VARCHAR2_TABLE_200
1747 , a17 out nocopy JTF_VARCHAR2_TABLE_200
1748 , a18 out nocopy JTF_VARCHAR2_TABLE_200
1749 , a19 out nocopy JTF_VARCHAR2_TABLE_200
1750 , a20 out nocopy JTF_VARCHAR2_TABLE_200
1751 , a21 out nocopy JTF_VARCHAR2_TABLE_200
1752 , a22 out nocopy JTF_VARCHAR2_TABLE_200
1753 , a23 out nocopy JTF_VARCHAR2_TABLE_200
1754 , a24 out nocopy JTF_NUMBER_TABLE
1755 , a25 out nocopy JTF_NUMBER_TABLE
1756 ) as
1757 ddindx binary_integer; indx binary_integer;
1758 begin
1759 if t is null or t.count = 0 then
1760 a0 := JTF_NUMBER_TABLE();
1761 a1 := JTF_NUMBER_TABLE();
1762 a2 := JTF_NUMBER_TABLE();
1763 a3 := JTF_NUMBER_TABLE();
1764 a4 := JTF_VARCHAR2_TABLE_100();
1765 a5 := JTF_DATE_TABLE();
1766 a6 := JTF_DATE_TABLE();
1767 a7 := JTF_VARCHAR2_TABLE_100();
1768 a8 := JTF_VARCHAR2_TABLE_100();
1769 a9 := JTF_VARCHAR2_TABLE_200();
1770 a10 := JTF_VARCHAR2_TABLE_200();
1771 a11 := JTF_VARCHAR2_TABLE_200();
1772 a12 := JTF_VARCHAR2_TABLE_200();
1773 a13 := JTF_VARCHAR2_TABLE_200();
1774 a14 := JTF_VARCHAR2_TABLE_200();
1775 a15 := JTF_VARCHAR2_TABLE_200();
1776 a16 := JTF_VARCHAR2_TABLE_200();
1780 a20 := JTF_VARCHAR2_TABLE_200();
1777 a17 := JTF_VARCHAR2_TABLE_200();
1778 a18 := JTF_VARCHAR2_TABLE_200();
1779 a19 := JTF_VARCHAR2_TABLE_200();
1781 a21 := JTF_VARCHAR2_TABLE_200();
1782 a22 := JTF_VARCHAR2_TABLE_200();
1783 a23 := JTF_VARCHAR2_TABLE_200();
1784 a24 := JTF_NUMBER_TABLE();
1785 a25 := JTF_NUMBER_TABLE();
1786 else
1787 a0 := JTF_NUMBER_TABLE();
1788 a1 := JTF_NUMBER_TABLE();
1789 a2 := JTF_NUMBER_TABLE();
1790 a3 := JTF_NUMBER_TABLE();
1791 a4 := JTF_VARCHAR2_TABLE_100();
1792 a5 := JTF_DATE_TABLE();
1793 a6 := JTF_DATE_TABLE();
1794 a7 := JTF_VARCHAR2_TABLE_100();
1795 a8 := JTF_VARCHAR2_TABLE_100();
1796 a9 := JTF_VARCHAR2_TABLE_200();
1797 a10 := JTF_VARCHAR2_TABLE_200();
1798 a11 := JTF_VARCHAR2_TABLE_200();
1799 a12 := JTF_VARCHAR2_TABLE_200();
1800 a13 := JTF_VARCHAR2_TABLE_200();
1801 a14 := JTF_VARCHAR2_TABLE_200();
1802 a15 := JTF_VARCHAR2_TABLE_200();
1803 a16 := JTF_VARCHAR2_TABLE_200();
1804 a17 := JTF_VARCHAR2_TABLE_200();
1805 a18 := JTF_VARCHAR2_TABLE_200();
1806 a19 := JTF_VARCHAR2_TABLE_200();
1807 a20 := JTF_VARCHAR2_TABLE_200();
1808 a21 := JTF_VARCHAR2_TABLE_200();
1809 a22 := JTF_VARCHAR2_TABLE_200();
1810 a23 := JTF_VARCHAR2_TABLE_200();
1811 a24 := JTF_NUMBER_TABLE();
1812 a25 := JTF_NUMBER_TABLE();
1813 if t.count > 0 then
1814 a0.extend(t.count);
1815 a1.extend(t.count);
1816 a2.extend(t.count);
1817 a3.extend(t.count);
1818 a4.extend(t.count);
1819 a5.extend(t.count);
1820 a6.extend(t.count);
1821 a7.extend(t.count);
1822 a8.extend(t.count);
1823 a9.extend(t.count);
1824 a10.extend(t.count);
1825 a11.extend(t.count);
1826 a12.extend(t.count);
1827 a13.extend(t.count);
1828 a14.extend(t.count);
1829 a15.extend(t.count);
1830 a16.extend(t.count);
1831 a17.extend(t.count);
1832 a18.extend(t.count);
1833 a19.extend(t.count);
1834 a20.extend(t.count);
1835 a21.extend(t.count);
1836 a22.extend(t.count);
1837 a23.extend(t.count);
1838 a24.extend(t.count);
1839 a25.extend(t.count);
1840 ddindx := t.first;
1841 indx := 1;
1842 while true loop
1843 a0(indx) := rosetta_g_miss_num_map(t(ddindx).txn_operating_unit_id);
1844 a1(indx) := rosetta_g_miss_num_map(t(ddindx).txn_line_detail_id);
1845 a2(indx) := rosetta_g_miss_num_map(t(ddindx).instance_ou_id);
1846 a3(indx) := rosetta_g_miss_num_map(t(ddindx).operating_unit_id);
1847 a4(indx) := t(ddindx).relationship_type_code;
1848 a5(indx) := t(ddindx).active_start_date;
1849 a6(indx) := t(ddindx).active_end_date;
1850 a7(indx) := t(ddindx).preserve_detail_flag;
1851 a8(indx) := t(ddindx).context;
1852 a9(indx) := t(ddindx).attribute1;
1853 a10(indx) := t(ddindx).attribute2;
1854 a11(indx) := t(ddindx).attribute3;
1855 a12(indx) := t(ddindx).attribute4;
1856 a13(indx) := t(ddindx).attribute5;
1857 a14(indx) := t(ddindx).attribute6;
1858 a15(indx) := t(ddindx).attribute7;
1859 a16(indx) := t(ddindx).attribute8;
1860 a17(indx) := t(ddindx).attribute9;
1861 a18(indx) := t(ddindx).attribute10;
1862 a19(indx) := t(ddindx).attribute11;
1863 a20(indx) := t(ddindx).attribute12;
1864 a21(indx) := t(ddindx).attribute13;
1865 a22(indx) := t(ddindx).attribute14;
1866 a23(indx) := t(ddindx).attribute15;
1867 a24(indx) := rosetta_g_miss_num_map(t(ddindx).txn_line_details_index);
1868 a25(indx) := rosetta_g_miss_num_map(t(ddindx).object_version_number);
1869 indx := indx+1;
1870 if t.last =ddindx
1871 then exit;
1872 end if;
1873 ddindx := t.next(ddindx);
1874 end loop;
1875 end if;
1876 end if;
1877 end rosetta_table_copy_out_p12;
1878
1879 procedure rosetta_table_copy_in_p14(t out nocopy csi_t_datastructures_grp.txn_ext_attrib_vals_tbl, a0 JTF_NUMBER_TABLE
1880 , a1 JTF_NUMBER_TABLE
1881 , a2 JTF_VARCHAR2_TABLE_100
1882 , a3 JTF_NUMBER_TABLE
1883 , a4 JTF_VARCHAR2_TABLE_300
1884 , a5 JTF_VARCHAR2_TABLE_100
1885 , a6 JTF_VARCHAR2_TABLE_100
1886 , a7 JTF_VARCHAR2_TABLE_100
1887 , a8 JTF_VARCHAR2_TABLE_100
1888 , a9 JTF_DATE_TABLE
1889 , a10 JTF_DATE_TABLE
1890 , a11 JTF_VARCHAR2_TABLE_100
1891 , a12 JTF_VARCHAR2_TABLE_100
1892 , a13 JTF_VARCHAR2_TABLE_200
1893 , a14 JTF_VARCHAR2_TABLE_200
1894 , a15 JTF_VARCHAR2_TABLE_200
1895 , a16 JTF_VARCHAR2_TABLE_200
1896 , a17 JTF_VARCHAR2_TABLE_200
1897 , a18 JTF_VARCHAR2_TABLE_200
1898 , a19 JTF_VARCHAR2_TABLE_200
1899 , a20 JTF_VARCHAR2_TABLE_200
1900 , a21 JTF_VARCHAR2_TABLE_200
1901 , a22 JTF_VARCHAR2_TABLE_200
1902 , a23 JTF_VARCHAR2_TABLE_200
1903 , a24 JTF_VARCHAR2_TABLE_200
1904 , a25 JTF_VARCHAR2_TABLE_200
1905 , a26 JTF_VARCHAR2_TABLE_200
1906 , a27 JTF_VARCHAR2_TABLE_200
1907 , a28 JTF_NUMBER_TABLE
1908 , a29 JTF_NUMBER_TABLE
1909 ) as
1910 ddindx binary_integer; indx binary_integer;
1911 begin
1912 if a0 is not null and a0.count > 0 then
1913 if a0.count > 0 then
1914 indx := a0.first;
1915 ddindx := 1;
1916 while true loop
1917 t(ddindx).txn_attrib_detail_id := rosetta_g_miss_num_map(a0(indx));
1918 t(ddindx).txn_line_detail_id := rosetta_g_miss_num_map(a1(indx));
1922 t(ddindx).attribute_code := a5(indx);
1919 t(ddindx).attrib_source_table := a2(indx);
1920 t(ddindx).attribute_source_id := rosetta_g_miss_num_map(a3(indx));
1921 t(ddindx).attribute_value := a4(indx);
1923 t(ddindx).attribute_level := a6(indx);
1924 t(ddindx).api_caller_identity := a7(indx);
1925 t(ddindx).process_flag := a8(indx);
1926 t(ddindx).active_start_date := rosetta_g_miss_date_in_map(a9(indx));
1927 t(ddindx).active_end_date := rosetta_g_miss_date_in_map(a10(indx));
1928 t(ddindx).preserve_detail_flag := a11(indx);
1929 t(ddindx).context := a12(indx);
1930 t(ddindx).attribute1 := a13(indx);
1931 t(ddindx).attribute2 := a14(indx);
1932 t(ddindx).attribute3 := a15(indx);
1933 t(ddindx).attribute4 := a16(indx);
1934 t(ddindx).attribute5 := a17(indx);
1935 t(ddindx).attribute6 := a18(indx);
1936 t(ddindx).attribute7 := a19(indx);
1937 t(ddindx).attribute8 := a20(indx);
1938 t(ddindx).attribute9 := a21(indx);
1939 t(ddindx).attribute10 := a22(indx);
1940 t(ddindx).attribute11 := a23(indx);
1941 t(ddindx).attribute12 := a24(indx);
1942 t(ddindx).attribute13 := a25(indx);
1943 t(ddindx).attribute14 := a26(indx);
1944 t(ddindx).attribute15 := a27(indx);
1945 t(ddindx).txn_line_details_index := rosetta_g_miss_num_map(a28(indx));
1946 t(ddindx).object_version_number := rosetta_g_miss_num_map(a29(indx));
1947 ddindx := ddindx+1;
1948 if a0.last =indx
1949 then exit;
1950 end if;
1951 indx := a0.next(indx);
1952 end loop;
1953 end if;
1954 end if;
1955 end rosetta_table_copy_in_p14;
1956 procedure rosetta_table_copy_out_p14(t csi_t_datastructures_grp.txn_ext_attrib_vals_tbl, a0 out nocopy JTF_NUMBER_TABLE
1957 , a1 out nocopy JTF_NUMBER_TABLE
1958 , a2 out nocopy JTF_VARCHAR2_TABLE_100
1959 , a3 out nocopy JTF_NUMBER_TABLE
1960 , a4 out nocopy JTF_VARCHAR2_TABLE_300
1961 , a5 out nocopy JTF_VARCHAR2_TABLE_100
1962 , a6 out nocopy JTF_VARCHAR2_TABLE_100
1963 , a7 out nocopy JTF_VARCHAR2_TABLE_100
1964 , a8 out nocopy JTF_VARCHAR2_TABLE_100
1965 , a9 out nocopy JTF_DATE_TABLE
1966 , a10 out nocopy JTF_DATE_TABLE
1967 , a11 out nocopy JTF_VARCHAR2_TABLE_100
1968 , a12 out nocopy JTF_VARCHAR2_TABLE_100
1969 , a13 out nocopy JTF_VARCHAR2_TABLE_200
1970 , a14 out nocopy JTF_VARCHAR2_TABLE_200
1971 , a15 out nocopy JTF_VARCHAR2_TABLE_200
1972 , a16 out nocopy JTF_VARCHAR2_TABLE_200
1973 , a17 out nocopy JTF_VARCHAR2_TABLE_200
1974 , a18 out nocopy JTF_VARCHAR2_TABLE_200
1975 , a19 out nocopy JTF_VARCHAR2_TABLE_200
1976 , a20 out nocopy JTF_VARCHAR2_TABLE_200
1977 , a21 out nocopy JTF_VARCHAR2_TABLE_200
1978 , a22 out nocopy JTF_VARCHAR2_TABLE_200
1979 , a23 out nocopy JTF_VARCHAR2_TABLE_200
1980 , a24 out nocopy JTF_VARCHAR2_TABLE_200
1981 , a25 out nocopy JTF_VARCHAR2_TABLE_200
1982 , a26 out nocopy JTF_VARCHAR2_TABLE_200
1983 , a27 out nocopy JTF_VARCHAR2_TABLE_200
1984 , a28 out nocopy JTF_NUMBER_TABLE
1985 , a29 out nocopy JTF_NUMBER_TABLE
1986 ) as
1987 ddindx binary_integer; indx binary_integer;
1988 begin
1989 if t is null or t.count = 0 then
1990 a0 := JTF_NUMBER_TABLE();
1991 a1 := JTF_NUMBER_TABLE();
1992 a2 := JTF_VARCHAR2_TABLE_100();
1993 a3 := JTF_NUMBER_TABLE();
1994 a4 := JTF_VARCHAR2_TABLE_300();
1995 a5 := JTF_VARCHAR2_TABLE_100();
1996 a6 := JTF_VARCHAR2_TABLE_100();
1997 a7 := JTF_VARCHAR2_TABLE_100();
1998 a8 := JTF_VARCHAR2_TABLE_100();
1999 a9 := JTF_DATE_TABLE();
2000 a10 := JTF_DATE_TABLE();
2001 a11 := JTF_VARCHAR2_TABLE_100();
2002 a12 := JTF_VARCHAR2_TABLE_100();
2003 a13 := JTF_VARCHAR2_TABLE_200();
2004 a14 := JTF_VARCHAR2_TABLE_200();
2005 a15 := JTF_VARCHAR2_TABLE_200();
2006 a16 := JTF_VARCHAR2_TABLE_200();
2007 a17 := JTF_VARCHAR2_TABLE_200();
2008 a18 := JTF_VARCHAR2_TABLE_200();
2009 a19 := JTF_VARCHAR2_TABLE_200();
2010 a20 := JTF_VARCHAR2_TABLE_200();
2011 a21 := JTF_VARCHAR2_TABLE_200();
2012 a22 := JTF_VARCHAR2_TABLE_200();
2013 a23 := JTF_VARCHAR2_TABLE_200();
2014 a24 := JTF_VARCHAR2_TABLE_200();
2015 a25 := JTF_VARCHAR2_TABLE_200();
2016 a26 := JTF_VARCHAR2_TABLE_200();
2017 a27 := JTF_VARCHAR2_TABLE_200();
2018 a28 := JTF_NUMBER_TABLE();
2019 a29 := JTF_NUMBER_TABLE();
2020 else
2021 a0 := JTF_NUMBER_TABLE();
2022 a1 := JTF_NUMBER_TABLE();
2023 a2 := JTF_VARCHAR2_TABLE_100();
2024 a3 := JTF_NUMBER_TABLE();
2025 a4 := JTF_VARCHAR2_TABLE_300();
2026 a5 := JTF_VARCHAR2_TABLE_100();
2027 a6 := JTF_VARCHAR2_TABLE_100();
2028 a7 := JTF_VARCHAR2_TABLE_100();
2029 a8 := JTF_VARCHAR2_TABLE_100();
2030 a9 := JTF_DATE_TABLE();
2031 a10 := JTF_DATE_TABLE();
2032 a11 := JTF_VARCHAR2_TABLE_100();
2033 a12 := JTF_VARCHAR2_TABLE_100();
2034 a13 := JTF_VARCHAR2_TABLE_200();
2035 a14 := JTF_VARCHAR2_TABLE_200();
2036 a15 := JTF_VARCHAR2_TABLE_200();
2037 a16 := JTF_VARCHAR2_TABLE_200();
2038 a17 := JTF_VARCHAR2_TABLE_200();
2039 a18 := JTF_VARCHAR2_TABLE_200();
2040 a19 := JTF_VARCHAR2_TABLE_200();
2041 a20 := JTF_VARCHAR2_TABLE_200();
2042 a21 := JTF_VARCHAR2_TABLE_200();
2043 a22 := JTF_VARCHAR2_TABLE_200();
2044 a23 := JTF_VARCHAR2_TABLE_200();
2045 a24 := JTF_VARCHAR2_TABLE_200();
2046 a25 := JTF_VARCHAR2_TABLE_200();
2047 a26 := JTF_VARCHAR2_TABLE_200();
2048 a27 := JTF_VARCHAR2_TABLE_200();
2049 a28 := JTF_NUMBER_TABLE();
2050 a29 := JTF_NUMBER_TABLE();
2054 a2.extend(t.count);
2051 if t.count > 0 then
2052 a0.extend(t.count);
2053 a1.extend(t.count);
2055 a3.extend(t.count);
2056 a4.extend(t.count);
2057 a5.extend(t.count);
2058 a6.extend(t.count);
2059 a7.extend(t.count);
2060 a8.extend(t.count);
2061 a9.extend(t.count);
2062 a10.extend(t.count);
2063 a11.extend(t.count);
2064 a12.extend(t.count);
2065 a13.extend(t.count);
2066 a14.extend(t.count);
2067 a15.extend(t.count);
2068 a16.extend(t.count);
2069 a17.extend(t.count);
2070 a18.extend(t.count);
2071 a19.extend(t.count);
2072 a20.extend(t.count);
2073 a21.extend(t.count);
2074 a22.extend(t.count);
2075 a23.extend(t.count);
2076 a24.extend(t.count);
2077 a25.extend(t.count);
2078 a26.extend(t.count);
2079 a27.extend(t.count);
2080 a28.extend(t.count);
2081 a29.extend(t.count);
2082 ddindx := t.first;
2083 indx := 1;
2084 while true loop
2085 a0(indx) := rosetta_g_miss_num_map(t(ddindx).txn_attrib_detail_id);
2086 a1(indx) := rosetta_g_miss_num_map(t(ddindx).txn_line_detail_id);
2087 a2(indx) := t(ddindx).attrib_source_table;
2088 a3(indx) := rosetta_g_miss_num_map(t(ddindx).attribute_source_id);
2089 a4(indx) := t(ddindx).attribute_value;
2090 a5(indx) := t(ddindx).attribute_code;
2091 a6(indx) := t(ddindx).attribute_level;
2092 a7(indx) := t(ddindx).api_caller_identity;
2093 a8(indx) := t(ddindx).process_flag;
2094 a9(indx) := t(ddindx).active_start_date;
2095 a10(indx) := t(ddindx).active_end_date;
2096 a11(indx) := t(ddindx).preserve_detail_flag;
2097 a12(indx) := t(ddindx).context;
2098 a13(indx) := t(ddindx).attribute1;
2099 a14(indx) := t(ddindx).attribute2;
2100 a15(indx) := t(ddindx).attribute3;
2101 a16(indx) := t(ddindx).attribute4;
2102 a17(indx) := t(ddindx).attribute5;
2103 a18(indx) := t(ddindx).attribute6;
2104 a19(indx) := t(ddindx).attribute7;
2105 a20(indx) := t(ddindx).attribute8;
2106 a21(indx) := t(ddindx).attribute9;
2107 a22(indx) := t(ddindx).attribute10;
2108 a23(indx) := t(ddindx).attribute11;
2109 a24(indx) := t(ddindx).attribute12;
2110 a25(indx) := t(ddindx).attribute13;
2111 a26(indx) := t(ddindx).attribute14;
2112 a27(indx) := t(ddindx).attribute15;
2113 a28(indx) := rosetta_g_miss_num_map(t(ddindx).txn_line_details_index);
2114 a29(indx) := rosetta_g_miss_num_map(t(ddindx).object_version_number);
2115 indx := indx+1;
2116 if t.last =ddindx
2117 then exit;
2118 end if;
2119 ddindx := t.next(ddindx);
2120 end loop;
2121 end if;
2122 end if;
2123 end rosetta_table_copy_out_p14;
2124
2125 procedure rosetta_table_copy_in_p16(t out nocopy csi_t_datastructures_grp.csi_ext_attribs_tbl, a0 JTF_NUMBER_TABLE
2126 , a1 JTF_VARCHAR2_TABLE_100
2127 , a2 JTF_NUMBER_TABLE
2128 , a3 JTF_NUMBER_TABLE
2129 , a4 JTF_NUMBER_TABLE
2130 , a5 JTF_NUMBER_TABLE
2131 , a6 JTF_VARCHAR2_TABLE_100
2132 , a7 JTF_VARCHAR2_TABLE_100
2133 , a8 JTF_VARCHAR2_TABLE_100
2134 , a9 JTF_VARCHAR2_TABLE_300
2135 , a10 JTF_DATE_TABLE
2136 , a11 JTF_DATE_TABLE
2137 , a12 JTF_VARCHAR2_TABLE_100
2138 , a13 JTF_VARCHAR2_TABLE_200
2139 , a14 JTF_VARCHAR2_TABLE_200
2140 , a15 JTF_VARCHAR2_TABLE_200
2141 , a16 JTF_VARCHAR2_TABLE_200
2142 , a17 JTF_VARCHAR2_TABLE_200
2143 , a18 JTF_VARCHAR2_TABLE_200
2144 , a19 JTF_VARCHAR2_TABLE_200
2145 , a20 JTF_VARCHAR2_TABLE_200
2146 , a21 JTF_VARCHAR2_TABLE_200
2147 , a22 JTF_VARCHAR2_TABLE_200
2148 , a23 JTF_VARCHAR2_TABLE_200
2149 , a24 JTF_VARCHAR2_TABLE_200
2150 , a25 JTF_VARCHAR2_TABLE_200
2151 , a26 JTF_VARCHAR2_TABLE_200
2152 , a27 JTF_VARCHAR2_TABLE_200
2153 , a28 JTF_NUMBER_TABLE
2154 ) as
2155 ddindx binary_integer; indx binary_integer;
2156 begin
2157 if a0 is not null and a0.count > 0 then
2158 if a0.count > 0 then
2159 indx := a0.first;
2160 ddindx := 1;
2161 while true loop
2162 t(ddindx).attribute_id := rosetta_g_miss_num_map(a0(indx));
2163 t(ddindx).attribute_level := a1(indx);
2164 t(ddindx).master_organization_id := rosetta_g_miss_num_map(a2(indx));
2165 t(ddindx).inventory_item_id := rosetta_g_miss_num_map(a3(indx));
2166 t(ddindx).item_category_id := rosetta_g_miss_num_map(a4(indx));
2167 t(ddindx).instance_id := rosetta_g_miss_num_map(a5(indx));
2168 t(ddindx).attribute_code := a6(indx);
2169 t(ddindx).attribute_name := a7(indx);
2170 t(ddindx).attribute_category := a8(indx);
2171 t(ddindx).description := a9(indx);
2172 t(ddindx).active_start_date := rosetta_g_miss_date_in_map(a10(indx));
2173 t(ddindx).active_end_date := rosetta_g_miss_date_in_map(a11(indx));
2174 t(ddindx).context := a12(indx);
2175 t(ddindx).attribute1 := a13(indx);
2176 t(ddindx).attribute2 := a14(indx);
2177 t(ddindx).attribute3 := a15(indx);
2178 t(ddindx).attribute4 := a16(indx);
2179 t(ddindx).attribute5 := a17(indx);
2180 t(ddindx).attribute6 := a18(indx);
2181 t(ddindx).attribute7 := a19(indx);
2182 t(ddindx).attribute8 := a20(indx);
2183 t(ddindx).attribute9 := a21(indx);
2184 t(ddindx).attribute10 := a22(indx);
2185 t(ddindx).attribute11 := a23(indx);
2189 t(ddindx).attribute15 := a27(indx);
2186 t(ddindx).attribute12 := a24(indx);
2187 t(ddindx).attribute13 := a25(indx);
2188 t(ddindx).attribute14 := a26(indx);
2190 t(ddindx).object_version_number := rosetta_g_miss_num_map(a28(indx));
2191 ddindx := ddindx+1;
2192 if a0.last =indx
2193 then exit;
2194 end if;
2195 indx := a0.next(indx);
2196 end loop;
2197 end if;
2198 end if;
2199 end rosetta_table_copy_in_p16;
2200 procedure rosetta_table_copy_out_p16(t csi_t_datastructures_grp.csi_ext_attribs_tbl, a0 out nocopy JTF_NUMBER_TABLE
2201 , a1 out nocopy JTF_VARCHAR2_TABLE_100
2202 , a2 out nocopy JTF_NUMBER_TABLE
2203 , a3 out nocopy JTF_NUMBER_TABLE
2204 , a4 out nocopy JTF_NUMBER_TABLE
2205 , a5 out nocopy JTF_NUMBER_TABLE
2206 , a6 out nocopy JTF_VARCHAR2_TABLE_100
2207 , a7 out nocopy JTF_VARCHAR2_TABLE_100
2208 , a8 out nocopy JTF_VARCHAR2_TABLE_100
2209 , a9 out nocopy JTF_VARCHAR2_TABLE_300
2210 , a10 out nocopy JTF_DATE_TABLE
2211 , a11 out nocopy JTF_DATE_TABLE
2212 , a12 out nocopy JTF_VARCHAR2_TABLE_100
2213 , a13 out nocopy JTF_VARCHAR2_TABLE_200
2214 , a14 out nocopy JTF_VARCHAR2_TABLE_200
2215 , a15 out nocopy JTF_VARCHAR2_TABLE_200
2216 , a16 out nocopy JTF_VARCHAR2_TABLE_200
2217 , a17 out nocopy JTF_VARCHAR2_TABLE_200
2218 , a18 out nocopy JTF_VARCHAR2_TABLE_200
2219 , a19 out nocopy JTF_VARCHAR2_TABLE_200
2220 , a20 out nocopy JTF_VARCHAR2_TABLE_200
2221 , a21 out nocopy JTF_VARCHAR2_TABLE_200
2222 , a22 out nocopy JTF_VARCHAR2_TABLE_200
2223 , a23 out nocopy JTF_VARCHAR2_TABLE_200
2224 , a24 out nocopy JTF_VARCHAR2_TABLE_200
2225 , a25 out nocopy JTF_VARCHAR2_TABLE_200
2226 , a26 out nocopy JTF_VARCHAR2_TABLE_200
2227 , a27 out nocopy JTF_VARCHAR2_TABLE_200
2228 , a28 out nocopy JTF_NUMBER_TABLE
2229 ) as
2230 ddindx binary_integer; indx binary_integer;
2231 begin
2232 if t is null or t.count = 0 then
2233 a0 := JTF_NUMBER_TABLE();
2234 a1 := JTF_VARCHAR2_TABLE_100();
2235 a2 := JTF_NUMBER_TABLE();
2236 a3 := JTF_NUMBER_TABLE();
2237 a4 := JTF_NUMBER_TABLE();
2238 a5 := JTF_NUMBER_TABLE();
2239 a6 := JTF_VARCHAR2_TABLE_100();
2240 a7 := JTF_VARCHAR2_TABLE_100();
2241 a8 := JTF_VARCHAR2_TABLE_100();
2242 a9 := JTF_VARCHAR2_TABLE_300();
2243 a10 := JTF_DATE_TABLE();
2244 a11 := JTF_DATE_TABLE();
2245 a12 := JTF_VARCHAR2_TABLE_100();
2246 a13 := JTF_VARCHAR2_TABLE_200();
2247 a14 := JTF_VARCHAR2_TABLE_200();
2248 a15 := JTF_VARCHAR2_TABLE_200();
2249 a16 := JTF_VARCHAR2_TABLE_200();
2250 a17 := JTF_VARCHAR2_TABLE_200();
2251 a18 := JTF_VARCHAR2_TABLE_200();
2252 a19 := JTF_VARCHAR2_TABLE_200();
2253 a20 := JTF_VARCHAR2_TABLE_200();
2254 a21 := JTF_VARCHAR2_TABLE_200();
2255 a22 := JTF_VARCHAR2_TABLE_200();
2256 a23 := JTF_VARCHAR2_TABLE_200();
2257 a24 := JTF_VARCHAR2_TABLE_200();
2258 a25 := JTF_VARCHAR2_TABLE_200();
2259 a26 := JTF_VARCHAR2_TABLE_200();
2260 a27 := JTF_VARCHAR2_TABLE_200();
2261 a28 := JTF_NUMBER_TABLE();
2262 else
2263 a0 := JTF_NUMBER_TABLE();
2264 a1 := JTF_VARCHAR2_TABLE_100();
2265 a2 := JTF_NUMBER_TABLE();
2266 a3 := JTF_NUMBER_TABLE();
2267 a4 := JTF_NUMBER_TABLE();
2268 a5 := JTF_NUMBER_TABLE();
2269 a6 := JTF_VARCHAR2_TABLE_100();
2270 a7 := JTF_VARCHAR2_TABLE_100();
2271 a8 := JTF_VARCHAR2_TABLE_100();
2272 a9 := JTF_VARCHAR2_TABLE_300();
2273 a10 := JTF_DATE_TABLE();
2274 a11 := JTF_DATE_TABLE();
2275 a12 := JTF_VARCHAR2_TABLE_100();
2276 a13 := JTF_VARCHAR2_TABLE_200();
2277 a14 := JTF_VARCHAR2_TABLE_200();
2278 a15 := JTF_VARCHAR2_TABLE_200();
2279 a16 := JTF_VARCHAR2_TABLE_200();
2280 a17 := JTF_VARCHAR2_TABLE_200();
2281 a18 := JTF_VARCHAR2_TABLE_200();
2282 a19 := JTF_VARCHAR2_TABLE_200();
2283 a20 := JTF_VARCHAR2_TABLE_200();
2284 a21 := JTF_VARCHAR2_TABLE_200();
2285 a22 := JTF_VARCHAR2_TABLE_200();
2286 a23 := JTF_VARCHAR2_TABLE_200();
2287 a24 := JTF_VARCHAR2_TABLE_200();
2288 a25 := JTF_VARCHAR2_TABLE_200();
2289 a26 := JTF_VARCHAR2_TABLE_200();
2290 a27 := JTF_VARCHAR2_TABLE_200();
2291 a28 := JTF_NUMBER_TABLE();
2292 if t.count > 0 then
2293 a0.extend(t.count);
2294 a1.extend(t.count);
2295 a2.extend(t.count);
2296 a3.extend(t.count);
2297 a4.extend(t.count);
2298 a5.extend(t.count);
2299 a6.extend(t.count);
2300 a7.extend(t.count);
2301 a8.extend(t.count);
2302 a9.extend(t.count);
2303 a10.extend(t.count);
2304 a11.extend(t.count);
2305 a12.extend(t.count);
2306 a13.extend(t.count);
2307 a14.extend(t.count);
2308 a15.extend(t.count);
2309 a16.extend(t.count);
2310 a17.extend(t.count);
2311 a18.extend(t.count);
2312 a19.extend(t.count);
2313 a20.extend(t.count);
2314 a21.extend(t.count);
2315 a22.extend(t.count);
2316 a23.extend(t.count);
2317 a24.extend(t.count);
2318 a25.extend(t.count);
2319 a26.extend(t.count);
2320 a27.extend(t.count);
2321 a28.extend(t.count);
2322 ddindx := t.first;
2323 indx := 1;
2324 while true loop
2325 a0(indx) := rosetta_g_miss_num_map(t(ddindx).attribute_id);
2326 a1(indx) := t(ddindx).attribute_level;
2327 a2(indx) := rosetta_g_miss_num_map(t(ddindx).master_organization_id);
2331 a6(indx) := t(ddindx).attribute_code;
2328 a3(indx) := rosetta_g_miss_num_map(t(ddindx).inventory_item_id);
2329 a4(indx) := rosetta_g_miss_num_map(t(ddindx).item_category_id);
2330 a5(indx) := rosetta_g_miss_num_map(t(ddindx).instance_id);
2332 a7(indx) := t(ddindx).attribute_name;
2333 a8(indx) := t(ddindx).attribute_category;
2334 a9(indx) := t(ddindx).description;
2335 a10(indx) := t(ddindx).active_start_date;
2336 a11(indx) := t(ddindx).active_end_date;
2337 a12(indx) := t(ddindx).context;
2338 a13(indx) := t(ddindx).attribute1;
2339 a14(indx) := t(ddindx).attribute2;
2340 a15(indx) := t(ddindx).attribute3;
2341 a16(indx) := t(ddindx).attribute4;
2342 a17(indx) := t(ddindx).attribute5;
2343 a18(indx) := t(ddindx).attribute6;
2344 a19(indx) := t(ddindx).attribute7;
2345 a20(indx) := t(ddindx).attribute8;
2346 a21(indx) := t(ddindx).attribute9;
2347 a22(indx) := t(ddindx).attribute10;
2348 a23(indx) := t(ddindx).attribute11;
2349 a24(indx) := t(ddindx).attribute12;
2350 a25(indx) := t(ddindx).attribute13;
2351 a26(indx) := t(ddindx).attribute14;
2352 a27(indx) := t(ddindx).attribute15;
2353 a28(indx) := rosetta_g_miss_num_map(t(ddindx).object_version_number);
2354 indx := indx+1;
2355 if t.last =ddindx
2356 then exit;
2357 end if;
2358 ddindx := t.next(ddindx);
2359 end loop;
2360 end if;
2361 end if;
2362 end rosetta_table_copy_out_p16;
2363
2364 procedure rosetta_table_copy_in_p18(t out nocopy csi_t_datastructures_grp.csi_ext_attrib_vals_tbl, a0 JTF_NUMBER_TABLE
2365 , a1 JTF_NUMBER_TABLE
2366 , a2 JTF_NUMBER_TABLE
2367 , a3 JTF_VARCHAR2_TABLE_300
2368 , a4 JTF_DATE_TABLE
2369 , a5 JTF_DATE_TABLE
2370 , a6 JTF_VARCHAR2_TABLE_100
2371 , a7 JTF_VARCHAR2_TABLE_200
2372 , a8 JTF_VARCHAR2_TABLE_200
2373 , a9 JTF_VARCHAR2_TABLE_200
2374 , a10 JTF_VARCHAR2_TABLE_200
2375 , a11 JTF_VARCHAR2_TABLE_200
2376 , a12 JTF_VARCHAR2_TABLE_200
2377 , a13 JTF_VARCHAR2_TABLE_200
2378 , a14 JTF_VARCHAR2_TABLE_200
2379 , a15 JTF_VARCHAR2_TABLE_200
2380 , a16 JTF_VARCHAR2_TABLE_200
2381 , a17 JTF_VARCHAR2_TABLE_200
2382 , a18 JTF_VARCHAR2_TABLE_200
2383 , a19 JTF_VARCHAR2_TABLE_200
2384 , a20 JTF_VARCHAR2_TABLE_200
2385 , a21 JTF_VARCHAR2_TABLE_200
2386 , a22 JTF_NUMBER_TABLE
2387 ) as
2388 ddindx binary_integer; indx binary_integer;
2389 begin
2390 if a0 is not null and a0.count > 0 then
2391 if a0.count > 0 then
2392 indx := a0.first;
2393 ddindx := 1;
2394 while true loop
2395 t(ddindx).attribute_value_id := rosetta_g_miss_num_map(a0(indx));
2396 t(ddindx).instance_id := rosetta_g_miss_num_map(a1(indx));
2397 t(ddindx).attribute_id := rosetta_g_miss_num_map(a2(indx));
2398 t(ddindx).attribute_value := a3(indx);
2399 t(ddindx).active_start_date := rosetta_g_miss_date_in_map(a4(indx));
2400 t(ddindx).active_end_date := rosetta_g_miss_date_in_map(a5(indx));
2401 t(ddindx).context := a6(indx);
2402 t(ddindx).attribute1 := a7(indx);
2403 t(ddindx).attribute2 := a8(indx);
2404 t(ddindx).attribute3 := a9(indx);
2405 t(ddindx).attribute4 := a10(indx);
2406 t(ddindx).attribute5 := a11(indx);
2407 t(ddindx).attribute6 := a12(indx);
2408 t(ddindx).attribute7 := a13(indx);
2409 t(ddindx).attribute8 := a14(indx);
2410 t(ddindx).attribute9 := a15(indx);
2411 t(ddindx).attribute10 := a16(indx);
2412 t(ddindx).attribute11 := a17(indx);
2413 t(ddindx).attribute12 := a18(indx);
2414 t(ddindx).attribute13 := a19(indx);
2415 t(ddindx).attribute14 := a20(indx);
2416 t(ddindx).attribute15 := a21(indx);
2417 t(ddindx).object_version_number := rosetta_g_miss_num_map(a22(indx));
2418 ddindx := ddindx+1;
2419 if a0.last =indx
2420 then exit;
2421 end if;
2422 indx := a0.next(indx);
2423 end loop;
2424 end if;
2425 end if;
2426 end rosetta_table_copy_in_p18;
2427 procedure rosetta_table_copy_out_p18(t csi_t_datastructures_grp.csi_ext_attrib_vals_tbl, a0 out nocopy JTF_NUMBER_TABLE
2428 , a1 out nocopy JTF_NUMBER_TABLE
2429 , a2 out nocopy JTF_NUMBER_TABLE
2430 , a3 out nocopy JTF_VARCHAR2_TABLE_300
2431 , a4 out nocopy JTF_DATE_TABLE
2432 , a5 out nocopy JTF_DATE_TABLE
2433 , a6 out nocopy JTF_VARCHAR2_TABLE_100
2434 , a7 out nocopy JTF_VARCHAR2_TABLE_200
2435 , a8 out nocopy JTF_VARCHAR2_TABLE_200
2436 , a9 out nocopy JTF_VARCHAR2_TABLE_200
2437 , a10 out nocopy JTF_VARCHAR2_TABLE_200
2438 , a11 out nocopy JTF_VARCHAR2_TABLE_200
2439 , a12 out nocopy JTF_VARCHAR2_TABLE_200
2440 , a13 out nocopy JTF_VARCHAR2_TABLE_200
2441 , a14 out nocopy JTF_VARCHAR2_TABLE_200
2442 , a15 out nocopy JTF_VARCHAR2_TABLE_200
2443 , a16 out nocopy JTF_VARCHAR2_TABLE_200
2444 , a17 out nocopy JTF_VARCHAR2_TABLE_200
2445 , a18 out nocopy JTF_VARCHAR2_TABLE_200
2446 , a19 out nocopy JTF_VARCHAR2_TABLE_200
2447 , a20 out nocopy JTF_VARCHAR2_TABLE_200
2448 , a21 out nocopy JTF_VARCHAR2_TABLE_200
2449 , a22 out nocopy JTF_NUMBER_TABLE
2450 ) as
2451 ddindx binary_integer; indx binary_integer;
2452 begin
2453 if t is null or t.count = 0 then
2454 a0 := JTF_NUMBER_TABLE();
2455 a1 := JTF_NUMBER_TABLE();
2456 a2 := JTF_NUMBER_TABLE();
2457 a3 := JTF_VARCHAR2_TABLE_300();
2458 a4 := JTF_DATE_TABLE();
2459 a5 := JTF_DATE_TABLE();
2460 a6 := JTF_VARCHAR2_TABLE_100();
2461 a7 := JTF_VARCHAR2_TABLE_200();
2462 a8 := JTF_VARCHAR2_TABLE_200();
2463 a9 := JTF_VARCHAR2_TABLE_200();
2464 a10 := JTF_VARCHAR2_TABLE_200();
2465 a11 := JTF_VARCHAR2_TABLE_200();
2466 a12 := JTF_VARCHAR2_TABLE_200();
2467 a13 := JTF_VARCHAR2_TABLE_200();
2468 a14 := JTF_VARCHAR2_TABLE_200();
2469 a15 := JTF_VARCHAR2_TABLE_200();
2470 a16 := JTF_VARCHAR2_TABLE_200();
2471 a17 := JTF_VARCHAR2_TABLE_200();
2472 a18 := JTF_VARCHAR2_TABLE_200();
2473 a19 := JTF_VARCHAR2_TABLE_200();
2474 a20 := JTF_VARCHAR2_TABLE_200();
2475 a21 := JTF_VARCHAR2_TABLE_200();
2476 a22 := JTF_NUMBER_TABLE();
2477 else
2478 a0 := JTF_NUMBER_TABLE();
2479 a1 := JTF_NUMBER_TABLE();
2480 a2 := JTF_NUMBER_TABLE();
2481 a3 := JTF_VARCHAR2_TABLE_300();
2482 a4 := JTF_DATE_TABLE();
2483 a5 := JTF_DATE_TABLE();
2484 a6 := JTF_VARCHAR2_TABLE_100();
2485 a7 := JTF_VARCHAR2_TABLE_200();
2486 a8 := JTF_VARCHAR2_TABLE_200();
2487 a9 := JTF_VARCHAR2_TABLE_200();
2488 a10 := JTF_VARCHAR2_TABLE_200();
2489 a11 := JTF_VARCHAR2_TABLE_200();
2490 a12 := JTF_VARCHAR2_TABLE_200();
2491 a13 := JTF_VARCHAR2_TABLE_200();
2492 a14 := JTF_VARCHAR2_TABLE_200();
2493 a15 := JTF_VARCHAR2_TABLE_200();
2494 a16 := JTF_VARCHAR2_TABLE_200();
2495 a17 := JTF_VARCHAR2_TABLE_200();
2496 a18 := JTF_VARCHAR2_TABLE_200();
2497 a19 := JTF_VARCHAR2_TABLE_200();
2498 a20 := JTF_VARCHAR2_TABLE_200();
2499 a21 := JTF_VARCHAR2_TABLE_200();
2500 a22 := JTF_NUMBER_TABLE();
2501 if t.count > 0 then
2502 a0.extend(t.count);
2503 a1.extend(t.count);
2504 a2.extend(t.count);
2505 a3.extend(t.count);
2506 a4.extend(t.count);
2507 a5.extend(t.count);
2508 a6.extend(t.count);
2509 a7.extend(t.count);
2510 a8.extend(t.count);
2511 a9.extend(t.count);
2512 a10.extend(t.count);
2513 a11.extend(t.count);
2514 a12.extend(t.count);
2515 a13.extend(t.count);
2516 a14.extend(t.count);
2517 a15.extend(t.count);
2518 a16.extend(t.count);
2519 a17.extend(t.count);
2520 a18.extend(t.count);
2521 a19.extend(t.count);
2522 a20.extend(t.count);
2523 a21.extend(t.count);
2524 a22.extend(t.count);
2525 ddindx := t.first;
2526 indx := 1;
2527 while true loop
2528 a0(indx) := rosetta_g_miss_num_map(t(ddindx).attribute_value_id);
2529 a1(indx) := rosetta_g_miss_num_map(t(ddindx).instance_id);
2530 a2(indx) := rosetta_g_miss_num_map(t(ddindx).attribute_id);
2531 a3(indx) := t(ddindx).attribute_value;
2532 a4(indx) := t(ddindx).active_start_date;
2533 a5(indx) := t(ddindx).active_end_date;
2534 a6(indx) := t(ddindx).context;
2535 a7(indx) := t(ddindx).attribute1;
2536 a8(indx) := t(ddindx).attribute2;
2537 a9(indx) := t(ddindx).attribute3;
2538 a10(indx) := t(ddindx).attribute4;
2539 a11(indx) := t(ddindx).attribute5;
2540 a12(indx) := t(ddindx).attribute6;
2541 a13(indx) := t(ddindx).attribute7;
2542 a14(indx) := t(ddindx).attribute8;
2543 a15(indx) := t(ddindx).attribute9;
2544 a16(indx) := t(ddindx).attribute10;
2545 a17(indx) := t(ddindx).attribute11;
2546 a18(indx) := t(ddindx).attribute12;
2547 a19(indx) := t(ddindx).attribute13;
2548 a20(indx) := t(ddindx).attribute14;
2549 a21(indx) := t(ddindx).attribute15;
2550 a22(indx) := rosetta_g_miss_num_map(t(ddindx).object_version_number);
2551 indx := indx+1;
2552 if t.last =ddindx
2553 then exit;
2554 end if;
2555 ddindx := t.next(ddindx);
2556 end loop;
2557 end if;
2558 end if;
2559 end rosetta_table_copy_out_p18;
2560
2561 procedure rosetta_table_copy_in_p20(t out nocopy csi_t_datastructures_grp.txn_line_detail_ids_tbl, a0 JTF_NUMBER_TABLE
2562 , a1 JTF_NUMBER_TABLE
2563 ) as
2564 ddindx binary_integer; indx binary_integer;
2565 begin
2566 if a0 is not null and a0.count > 0 then
2567 if a0.count > 0 then
2568 indx := a0.first;
2569 ddindx := 1;
2570 while true loop
2571 t(ddindx).transaction_line_id := rosetta_g_miss_num_map(a0(indx));
2572 t(ddindx).txn_line_detail_id := rosetta_g_miss_num_map(a1(indx));
2573 ddindx := ddindx+1;
2574 if a0.last =indx
2575 then exit;
2576 end if;
2577 indx := a0.next(indx);
2578 end loop;
2579 end if;
2580 end if;
2581 end rosetta_table_copy_in_p20;
2582 procedure rosetta_table_copy_out_p20(t csi_t_datastructures_grp.txn_line_detail_ids_tbl, a0 out nocopy JTF_NUMBER_TABLE
2583 , a1 out nocopy JTF_NUMBER_TABLE
2584 ) as
2585 ddindx binary_integer; indx binary_integer;
2586 begin
2587 if t is null or t.count = 0 then
2588 a0 := JTF_NUMBER_TABLE();
2589 a1 := JTF_NUMBER_TABLE();
2590 else
2591 a0 := JTF_NUMBER_TABLE();
2592 a1 := JTF_NUMBER_TABLE();
2593 if t.count > 0 then
2594 a0.extend(t.count);
2595 a1.extend(t.count);
2596 ddindx := t.first;
2597 indx := 1;
2598 while true loop
2599 a0(indx) := rosetta_g_miss_num_map(t(ddindx).transaction_line_id);
2600 a1(indx) := rosetta_g_miss_num_map(t(ddindx).txn_line_detail_id);
2601 indx := indx+1;
2602 if t.last =ddindx
2603 then exit;
2604 end if;
2605 ddindx := t.next(ddindx);
2606 end loop;
2607 end if;
2608 end if;
2609 end rosetta_table_copy_out_p20;
2610
2611 procedure rosetta_table_copy_in_p22(t out nocopy csi_t_datastructures_grp.txn_party_ids_tbl, a0 JTF_NUMBER_TABLE
2612 , a1 JTF_NUMBER_TABLE
2613 ) as
2614 ddindx binary_integer; indx binary_integer;
2615 begin
2616 if a0 is not null and a0.count > 0 then
2617 if a0.count > 0 then
2618 indx := a0.first;
2619 ddindx := 1;
2620 while true loop
2621 t(ddindx).txn_party_detail_id := rosetta_g_miss_num_map(a0(indx));
2622 t(ddindx).txn_line_detail_id := rosetta_g_miss_num_map(a1(indx));
2623 ddindx := ddindx+1;
2624 if a0.last =indx
2625 then exit;
2626 end if;
2627 indx := a0.next(indx);
2628 end loop;
2629 end if;
2630 end if;
2631 end rosetta_table_copy_in_p22;
2632 procedure rosetta_table_copy_out_p22(t csi_t_datastructures_grp.txn_party_ids_tbl, a0 out nocopy JTF_NUMBER_TABLE
2633 , a1 out nocopy JTF_NUMBER_TABLE
2634 ) as
2635 ddindx binary_integer; indx binary_integer;
2636 begin
2637 if t is null or t.count = 0 then
2638 a0 := JTF_NUMBER_TABLE();
2639 a1 := JTF_NUMBER_TABLE();
2640 else
2641 a0 := JTF_NUMBER_TABLE();
2642 a1 := JTF_NUMBER_TABLE();
2643 if t.count > 0 then
2644 a0.extend(t.count);
2645 a1.extend(t.count);
2646 ddindx := t.first;
2647 indx := 1;
2648 while true loop
2649 a0(indx) := rosetta_g_miss_num_map(t(ddindx).txn_party_detail_id);
2650 a1(indx) := rosetta_g_miss_num_map(t(ddindx).txn_line_detail_id);
2651 indx := indx+1;
2652 if t.last =ddindx
2653 then exit;
2654 end if;
2655 ddindx := t.next(ddindx);
2656 end loop;
2657 end if;
2658 end if;
2659 end rosetta_table_copy_out_p22;
2660
2661 procedure rosetta_table_copy_in_p24(t out nocopy csi_t_datastructures_grp.txn_pty_acct_ids_tbl, a0 JTF_NUMBER_TABLE
2662 , a1 JTF_NUMBER_TABLE
2663 , a2 JTF_NUMBER_TABLE
2664 ) as
2665 ddindx binary_integer; indx binary_integer;
2666 begin
2667 if a0 is not null and a0.count > 0 then
2668 if a0.count > 0 then
2669 indx := a0.first;
2670 ddindx := 1;
2671 while true loop
2672 t(ddindx).txn_account_detail_id := rosetta_g_miss_num_map(a0(indx));
2673 t(ddindx).txn_party_detail_id := rosetta_g_miss_num_map(a1(indx));
2674 t(ddindx).txn_line_detail_id := rosetta_g_miss_num_map(a2(indx));
2675 ddindx := ddindx+1;
2676 if a0.last =indx
2677 then exit;
2678 end if;
2679 indx := a0.next(indx);
2680 end loop;
2681 end if;
2682 end if;
2683 end rosetta_table_copy_in_p24;
2684 procedure rosetta_table_copy_out_p24(t csi_t_datastructures_grp.txn_pty_acct_ids_tbl, a0 out nocopy JTF_NUMBER_TABLE
2685 , a1 out nocopy JTF_NUMBER_TABLE
2686 , a2 out nocopy JTF_NUMBER_TABLE
2687 ) as
2688 ddindx binary_integer; indx binary_integer;
2689 begin
2690 if t is null or t.count = 0 then
2691 a0 := JTF_NUMBER_TABLE();
2692 a1 := JTF_NUMBER_TABLE();
2693 a2 := JTF_NUMBER_TABLE();
2694 else
2695 a0 := JTF_NUMBER_TABLE();
2696 a1 := JTF_NUMBER_TABLE();
2697 a2 := JTF_NUMBER_TABLE();
2698 if t.count > 0 then
2699 a0.extend(t.count);
2700 a1.extend(t.count);
2701 a2.extend(t.count);
2702 ddindx := t.first;
2703 indx := 1;
2704 while true loop
2705 a0(indx) := rosetta_g_miss_num_map(t(ddindx).txn_account_detail_id);
2706 a1(indx) := rosetta_g_miss_num_map(t(ddindx).txn_party_detail_id);
2707 a2(indx) := rosetta_g_miss_num_map(t(ddindx).txn_line_detail_id);
2708 indx := indx+1;
2709 if t.last =ddindx
2710 then exit;
2711 end if;
2712 ddindx := t.next(ddindx);
2713 end loop;
2714 end if;
2715 end if;
2716 end rosetta_table_copy_out_p24;
2717
2718 procedure rosetta_table_copy_in_p26(t out nocopy csi_t_datastructures_grp.txn_ii_rltns_ids_tbl, a0 JTF_NUMBER_TABLE
2719 , a1 JTF_NUMBER_TABLE
2720 ) as
2721 ddindx binary_integer; indx binary_integer;
2722 begin
2726 ddindx := 1;
2723 if a0 is not null and a0.count > 0 then
2724 if a0.count > 0 then
2725 indx := a0.first;
2727 while true loop
2728 t(ddindx).txn_relationship_id := rosetta_g_miss_num_map(a0(indx));
2729 t(ddindx).transaction_line_id := rosetta_g_miss_num_map(a1(indx));
2730 ddindx := ddindx+1;
2731 if a0.last =indx
2732 then exit;
2733 end if;
2734 indx := a0.next(indx);
2735 end loop;
2736 end if;
2737 end if;
2738 end rosetta_table_copy_in_p26;
2739 procedure rosetta_table_copy_out_p26(t csi_t_datastructures_grp.txn_ii_rltns_ids_tbl, a0 out nocopy JTF_NUMBER_TABLE
2740 , a1 out nocopy JTF_NUMBER_TABLE
2741 ) as
2742 ddindx binary_integer; indx binary_integer;
2743 begin
2744 if t is null or t.count = 0 then
2745 a0 := JTF_NUMBER_TABLE();
2746 a1 := JTF_NUMBER_TABLE();
2747 else
2748 a0 := JTF_NUMBER_TABLE();
2749 a1 := JTF_NUMBER_TABLE();
2750 if t.count > 0 then
2751 a0.extend(t.count);
2752 a1.extend(t.count);
2753 ddindx := t.first;
2754 indx := 1;
2755 while true loop
2756 a0(indx) := rosetta_g_miss_num_map(t(ddindx).txn_relationship_id);
2757 a1(indx) := rosetta_g_miss_num_map(t(ddindx).transaction_line_id);
2758 indx := indx+1;
2759 if t.last =ddindx
2760 then exit;
2761 end if;
2762 ddindx := t.next(ddindx);
2763 end loop;
2764 end if;
2765 end if;
2766 end rosetta_table_copy_out_p26;
2767
2768 procedure rosetta_table_copy_in_p28(t out nocopy csi_t_datastructures_grp.txn_org_assgn_ids_tbl, a0 JTF_NUMBER_TABLE
2769 , a1 JTF_NUMBER_TABLE
2770 ) as
2771 ddindx binary_integer; indx binary_integer;
2772 begin
2773 if a0 is not null and a0.count > 0 then
2774 if a0.count > 0 then
2775 indx := a0.first;
2776 ddindx := 1;
2777 while true loop
2778 t(ddindx).txn_operating_unit_id := rosetta_g_miss_num_map(a0(indx));
2779 t(ddindx).txn_line_detail_id := rosetta_g_miss_num_map(a1(indx));
2780 ddindx := ddindx+1;
2781 if a0.last =indx
2782 then exit;
2783 end if;
2784 indx := a0.next(indx);
2785 end loop;
2786 end if;
2787 end if;
2788 end rosetta_table_copy_in_p28;
2789 procedure rosetta_table_copy_out_p28(t csi_t_datastructures_grp.txn_org_assgn_ids_tbl, a0 out nocopy JTF_NUMBER_TABLE
2790 , a1 out nocopy JTF_NUMBER_TABLE
2791 ) as
2792 ddindx binary_integer; indx binary_integer;
2793 begin
2794 if t is null or t.count = 0 then
2795 a0 := JTF_NUMBER_TABLE();
2796 a1 := JTF_NUMBER_TABLE();
2797 else
2798 a0 := JTF_NUMBER_TABLE();
2799 a1 := JTF_NUMBER_TABLE();
2800 if t.count > 0 then
2801 a0.extend(t.count);
2802 a1.extend(t.count);
2803 ddindx := t.first;
2804 indx := 1;
2805 while true loop
2806 a0(indx) := rosetta_g_miss_num_map(t(ddindx).txn_operating_unit_id);
2807 a1(indx) := rosetta_g_miss_num_map(t(ddindx).txn_line_detail_id);
2808 indx := indx+1;
2809 if t.last =ddindx
2810 then exit;
2811 end if;
2812 ddindx := t.next(ddindx);
2813 end loop;
2814 end if;
2815 end if;
2816 end rosetta_table_copy_out_p28;
2817
2818 procedure rosetta_table_copy_in_p30(t out nocopy csi_t_datastructures_grp.txn_ext_attrib_ids_tbl, a0 JTF_NUMBER_TABLE
2819 , a1 JTF_NUMBER_TABLE
2820 ) as
2821 ddindx binary_integer; indx binary_integer;
2822 begin
2823 if a0 is not null and a0.count > 0 then
2824 if a0.count > 0 then
2825 indx := a0.first;
2826 ddindx := 1;
2827 while true loop
2828 t(ddindx).txn_attrib_detail_id := rosetta_g_miss_num_map(a0(indx));
2829 t(ddindx).txn_line_detail_id := rosetta_g_miss_num_map(a1(indx));
2830 ddindx := ddindx+1;
2831 if a0.last =indx
2832 then exit;
2833 end if;
2834 indx := a0.next(indx);
2835 end loop;
2836 end if;
2837 end if;
2838 end rosetta_table_copy_in_p30;
2839 procedure rosetta_table_copy_out_p30(t csi_t_datastructures_grp.txn_ext_attrib_ids_tbl, a0 out nocopy JTF_NUMBER_TABLE
2840 , a1 out nocopy JTF_NUMBER_TABLE
2841 ) as
2842 ddindx binary_integer; indx binary_integer;
2843 begin
2844 if t is null or t.count = 0 then
2845 a0 := JTF_NUMBER_TABLE();
2846 a1 := JTF_NUMBER_TABLE();
2847 else
2848 a0 := JTF_NUMBER_TABLE();
2849 a1 := JTF_NUMBER_TABLE();
2850 if t.count > 0 then
2851 a0.extend(t.count);
2852 a1.extend(t.count);
2853 ddindx := t.first;
2854 indx := 1;
2855 while true loop
2856 a0(indx) := rosetta_g_miss_num_map(t(ddindx).txn_attrib_detail_id);
2857 a1(indx) := rosetta_g_miss_num_map(t(ddindx).txn_line_detail_id);
2858 indx := indx+1;
2859 if t.last =ddindx
2860 then exit;
2861 end if;
2862 ddindx := t.next(ddindx);
2863 end loop;
2864 end if;
2865 end if;
2866 end rosetta_table_copy_out_p30;
2867
2868 end csi_t_datastructures_grp_w;