[Home] [Help]
PACKAGE BODY: APPS.AHL_PRD_BLK_PARTS_CHANGE_PVT_W
Source
1 package body ahl_prd_blk_parts_change_pvt_w as
2 /* $Header: AHLWBPCB.pls 120.0.12020000.2 2012/12/11 05:51:38 prakkum noship $ */
3 procedure rosetta_table_copy_in_p5(t out nocopy ahl_prd_blk_parts_change_pvt.uc_details_hgrid_tbl_type, a0 JTF_NUMBER_TABLE
4 , a1 JTF_NUMBER_TABLE
5 , a2 JTF_NUMBER_TABLE
6 , a3 JTF_NUMBER_TABLE
7 , a4 JTF_NUMBER_TABLE
8 , a5 JTF_NUMBER_TABLE
9 , a6 JTF_VARCHAR2_TABLE_300
10 , a7 JTF_NUMBER_TABLE
11 , a8 JTF_NUMBER_TABLE
12 , a9 JTF_NUMBER_TABLE
13 , a10 JTF_NUMBER_TABLE
14 , a11 JTF_NUMBER_TABLE
15 , a12 JTF_VARCHAR2_TABLE_300
16 , a13 JTF_NUMBER_TABLE
17 , a14 JTF_VARCHAR2_TABLE_100
18 , a15 JTF_VARCHAR2_TABLE_100
19 , a16 JTF_VARCHAR2_TABLE_100
20 , a17 JTF_NUMBER_TABLE
21 , a18 JTF_VARCHAR2_TABLE_100
22 , a19 JTF_VARCHAR2_TABLE_100
23 , a20 JTF_VARCHAR2_TABLE_300
24 , a21 JTF_VARCHAR2_TABLE_100
25 , a22 JTF_VARCHAR2_TABLE_100
26 , a23 JTF_VARCHAR2_TABLE_100
27 , a24 JTF_VARCHAR2_TABLE_100
28 , a25 JTF_NUMBER_TABLE
29 , a26 JTF_NUMBER_TABLE
30 , a27 JTF_NUMBER_TABLE
31 , a28 JTF_VARCHAR2_TABLE_300
32 , a29 JTF_VARCHAR2_TABLE_100
33 , a30 JTF_VARCHAR2_TABLE_100
34 , a31 JTF_NUMBER_TABLE
35 , a32 JTF_NUMBER_TABLE
36 , a33 JTF_NUMBER_TABLE
37 , a34 JTF_DATE_TABLE
38 , a35 JTF_DATE_TABLE
39 , a36 JTF_NUMBER_TABLE
40 , a37 JTF_VARCHAR2_TABLE_100
41 , a38 JTF_VARCHAR2_TABLE_100
42 , a39 JTF_VARCHAR2_TABLE_100
43 , a40 JTF_VARCHAR2_TABLE_100
44 , a41 JTF_NUMBER_TABLE
45 , a42 JTF_VARCHAR2_TABLE_300
46 , a43 JTF_VARCHAR2_TABLE_100
47 , a44 JTF_VARCHAR2_TABLE_100
48 , a45 JTF_NUMBER_TABLE
49 , a46 JTF_NUMBER_TABLE
50 , a47 JTF_VARCHAR2_TABLE_100
51 , a48 JTF_NUMBER_TABLE
52 , a49 JTF_VARCHAR2_TABLE_2000
53 , a50 JTF_VARCHAR2_TABLE_100
54 , a51 JTF_VARCHAR2_TABLE_200
55 , a52 JTF_VARCHAR2_TABLE_100
56 , a53 JTF_VARCHAR2_TABLE_200
57 , a54 JTF_NUMBER_TABLE
58 , a55 JTF_NUMBER_TABLE
59 , a56 JTF_NUMBER_TABLE
60 , a57 JTF_VARCHAR2_TABLE_200
61 , a58 JTF_VARCHAR2_TABLE_100
62 , a59 JTF_VARCHAR2_TABLE_100
63 , a60 JTF_NUMBER_TABLE
64 , a61 JTF_VARCHAR2_TABLE_100
65 , a62 JTF_VARCHAR2_TABLE_100
66 , a63 JTF_VARCHAR2_TABLE_100
67 , a64 JTF_NUMBER_TABLE
68 , a65 JTF_VARCHAR2_TABLE_100
69 , a66 JTF_VARCHAR2_TABLE_100
70 , a67 JTF_VARCHAR2_TABLE_300
71 , a68 JTF_NUMBER_TABLE
72 , a69 JTF_VARCHAR2_TABLE_100
73 , a70 JTF_VARCHAR2_TABLE_100
74 , a71 JTF_VARCHAR2_TABLE_100
75 ) as
76 ddindx binary_integer; indx binary_integer;
77 begin
78 if a0 is not null and a0.count > 0 then
79 if a0.count > 0 then
80 indx := a0.first;
81 ddindx := 1;
82 while true loop
83 t(ddindx).unit_node_id := a0(indx);
84 t(ddindx).root_instance_id := a1(indx);
85 t(ddindx).path_position_id := a2(indx);
86 t(ddindx).relationship_id := a3(indx);
87 t(ddindx).parent_rel_id := a4(indx);
88 t(ddindx).parent_instance_id := a5(indx);
89 t(ddindx).parent_instance_number := a6(indx);
90 t(ddindx).csi_ii_relationship_id := a7(indx);
91 t(ddindx).csi_ii_object_version_num := a8(indx);
92 t(ddindx).part_change_id := a9(indx);
93 t(ddindx).curr_item_id := a10(indx);
94 t(ddindx).curr_instance_id := a11(indx);
95 t(ddindx).curr_item_number := a12(indx);
96 t(ddindx).curr_instance_obj_ver_num := a13(indx);
97 t(ddindx).curr_instance_number := a14(indx);
98 t(ddindx).curr_serial_number := a15(indx);
99 t(ddindx).curr_lot_number := a16(indx);
100 t(ddindx).curr_quantity := a17(indx);
101 t(ddindx).unit_of_measure := a18(indx);
102 t(ddindx).ata := a19(indx);
103 t(ddindx).position := a20(indx);
104 t(ddindx).position_image := a21(indx);
105 t(ddindx).is_position_srl_controlled := a22(indx);
106 t(ddindx).is_controlled_position := a23(indx);
107 t(ddindx).node_type := a24(indx);
108 t(ddindx).qty_per_position := a25(indx);
109 t(ddindx).operation_sequence_num := a26(indx);
110 t(ddindx).inst_instance_id := a27(indx);
111 t(ddindx).inst_item_number := a28(indx);
112 t(ddindx).inst_instance_number := a29(indx);
113 t(ddindx).inst_serial_number := a30(indx);
114 t(ddindx).inst_instance_obj_ver_num := a31(indx);
115 t(ddindx).instance_quantity := a32(indx);
116 t(ddindx).install_quantity := a33(indx);
117 t(ddindx).install_date := a34(indx);
118 t(ddindx).removal_date := a35(indx);
119 t(ddindx).reason_id := a36(indx);
120 t(ddindx).reason_name := a37(indx);
121 t(ddindx).removal_code_id := a38(indx);
122 t(ddindx).removal_meaning := a39(indx);
123 t(ddindx).not_leaf_node_flag := a40(indx);
124 t(ddindx).node_level := a41(indx);
125 t(ddindx).hgrid_node_path := a42(indx);
126 t(ddindx).select_disable_flag := a43(indx);
127 t(ddindx).search_flag := a44(indx);
128 t(ddindx).disposition_id := a45(indx);
129 t(ddindx).disposition_obj_ver_num := a46(indx);
130 t(ddindx).disposition_status := a47(indx);
131 t(ddindx).disposition_qty := a48(indx);
132 t(ddindx).comments := a49(indx);
133 t(ddindx).immediate_disposition_code := a50(indx);
134 t(ddindx).immediate_disposition := a51(indx);
135 t(ddindx).secondary_disposition_code := a52(indx);
136 t(ddindx).secondary_disposition := a53(indx);
137 t(ddindx).sr_incident_id := a54(indx);
138 t(ddindx).collection_id := a55(indx);
139 t(ddindx).condition_id := a56(indx);
140 t(ddindx).condition_meaning := a57(indx);
141 t(ddindx).problem_code := a58(indx);
142 t(ddindx).problem_meaning := a59(indx);
143 t(ddindx).severity_id := a60(indx);
144 t(ddindx).severity_name := a61(indx);
145 t(ddindx).resolution_code := a62(indx);
146 t(ddindx).resolution_code_id := a63(indx);
147 t(ddindx).estimated_duration := a64(indx);
148 t(ddindx).service_type := a65(indx);
149 t(ddindx).service_type_id := a66(indx);
150 t(ddindx).summary := a67(indx);
151 t(ddindx).disposition_count := a68(indx);
152 t(ddindx).qty_ui_element_typ := a69(indx);
153 t(ddindx).mrb_quality_typ := a70(indx);
154 t(ddindx).bulk_process_flag := a71(indx);
155 ddindx := ddindx+1;
156 if a0.last =indx
157 then exit;
158 end if;
159 indx := a0.next(indx);
160 end loop;
161 end if;
162 end if;
163 end rosetta_table_copy_in_p5;
164 procedure rosetta_table_copy_out_p5(t ahl_prd_blk_parts_change_pvt.uc_details_hgrid_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
165 , a1 out nocopy JTF_NUMBER_TABLE
166 , a2 out nocopy JTF_NUMBER_TABLE
167 , a3 out nocopy JTF_NUMBER_TABLE
168 , a4 out nocopy JTF_NUMBER_TABLE
169 , a5 out nocopy JTF_NUMBER_TABLE
170 , a6 out nocopy JTF_VARCHAR2_TABLE_300
171 , a7 out nocopy JTF_NUMBER_TABLE
172 , a8 out nocopy JTF_NUMBER_TABLE
173 , a9 out nocopy JTF_NUMBER_TABLE
174 , a10 out nocopy JTF_NUMBER_TABLE
175 , a11 out nocopy JTF_NUMBER_TABLE
176 , a12 out nocopy JTF_VARCHAR2_TABLE_300
177 , a13 out nocopy JTF_NUMBER_TABLE
178 , a14 out nocopy JTF_VARCHAR2_TABLE_100
179 , a15 out nocopy JTF_VARCHAR2_TABLE_100
180 , a16 out nocopy JTF_VARCHAR2_TABLE_100
181 , a17 out nocopy JTF_NUMBER_TABLE
182 , a18 out nocopy JTF_VARCHAR2_TABLE_100
183 , a19 out nocopy JTF_VARCHAR2_TABLE_100
184 , a20 out nocopy JTF_VARCHAR2_TABLE_300
185 , a21 out nocopy JTF_VARCHAR2_TABLE_100
186 , a22 out nocopy JTF_VARCHAR2_TABLE_100
187 , a23 out nocopy JTF_VARCHAR2_TABLE_100
188 , a24 out nocopy JTF_VARCHAR2_TABLE_100
189 , a25 out nocopy JTF_NUMBER_TABLE
190 , a26 out nocopy JTF_NUMBER_TABLE
191 , a27 out nocopy JTF_NUMBER_TABLE
192 , a28 out nocopy JTF_VARCHAR2_TABLE_300
193 , a29 out nocopy JTF_VARCHAR2_TABLE_100
194 , a30 out nocopy JTF_VARCHAR2_TABLE_100
195 , a31 out nocopy JTF_NUMBER_TABLE
196 , a32 out nocopy JTF_NUMBER_TABLE
197 , a33 out nocopy JTF_NUMBER_TABLE
198 , a34 out nocopy JTF_DATE_TABLE
199 , a35 out nocopy JTF_DATE_TABLE
200 , a36 out nocopy JTF_NUMBER_TABLE
201 , a37 out nocopy JTF_VARCHAR2_TABLE_100
202 , a38 out nocopy JTF_VARCHAR2_TABLE_100
203 , a39 out nocopy JTF_VARCHAR2_TABLE_100
204 , a40 out nocopy JTF_VARCHAR2_TABLE_100
205 , a41 out nocopy JTF_NUMBER_TABLE
206 , a42 out nocopy JTF_VARCHAR2_TABLE_300
207 , a43 out nocopy JTF_VARCHAR2_TABLE_100
208 , a44 out nocopy JTF_VARCHAR2_TABLE_100
209 , a45 out nocopy JTF_NUMBER_TABLE
210 , a46 out nocopy JTF_NUMBER_TABLE
211 , a47 out nocopy JTF_VARCHAR2_TABLE_100
212 , a48 out nocopy JTF_NUMBER_TABLE
213 , a49 out nocopy JTF_VARCHAR2_TABLE_2000
214 , a50 out nocopy JTF_VARCHAR2_TABLE_100
215 , a51 out nocopy JTF_VARCHAR2_TABLE_200
216 , a52 out nocopy JTF_VARCHAR2_TABLE_100
217 , a53 out nocopy JTF_VARCHAR2_TABLE_200
218 , a54 out nocopy JTF_NUMBER_TABLE
219 , a55 out nocopy JTF_NUMBER_TABLE
220 , a56 out nocopy JTF_NUMBER_TABLE
221 , a57 out nocopy JTF_VARCHAR2_TABLE_200
222 , a58 out nocopy JTF_VARCHAR2_TABLE_100
223 , a59 out nocopy JTF_VARCHAR2_TABLE_100
224 , a60 out nocopy JTF_NUMBER_TABLE
225 , a61 out nocopy JTF_VARCHAR2_TABLE_100
226 , a62 out nocopy JTF_VARCHAR2_TABLE_100
227 , a63 out nocopy JTF_VARCHAR2_TABLE_100
228 , a64 out nocopy JTF_NUMBER_TABLE
229 , a65 out nocopy JTF_VARCHAR2_TABLE_100
230 , a66 out nocopy JTF_VARCHAR2_TABLE_100
231 , a67 out nocopy JTF_VARCHAR2_TABLE_300
232 , a68 out nocopy JTF_NUMBER_TABLE
233 , a69 out nocopy JTF_VARCHAR2_TABLE_100
234 , a70 out nocopy JTF_VARCHAR2_TABLE_100
235 , a71 out nocopy JTF_VARCHAR2_TABLE_100
236 ) as
237 ddindx binary_integer; indx binary_integer;
238 begin
239 if t is null or t.count = 0 then
240 a0 := JTF_NUMBER_TABLE();
241 a1 := JTF_NUMBER_TABLE();
242 a2 := JTF_NUMBER_TABLE();
243 a3 := JTF_NUMBER_TABLE();
244 a4 := JTF_NUMBER_TABLE();
245 a5 := JTF_NUMBER_TABLE();
246 a6 := JTF_VARCHAR2_TABLE_300();
247 a7 := JTF_NUMBER_TABLE();
248 a8 := JTF_NUMBER_TABLE();
249 a9 := JTF_NUMBER_TABLE();
250 a10 := JTF_NUMBER_TABLE();
251 a11 := JTF_NUMBER_TABLE();
252 a12 := JTF_VARCHAR2_TABLE_300();
253 a13 := JTF_NUMBER_TABLE();
254 a14 := JTF_VARCHAR2_TABLE_100();
255 a15 := JTF_VARCHAR2_TABLE_100();
256 a16 := JTF_VARCHAR2_TABLE_100();
257 a17 := JTF_NUMBER_TABLE();
258 a18 := JTF_VARCHAR2_TABLE_100();
259 a19 := JTF_VARCHAR2_TABLE_100();
260 a20 := JTF_VARCHAR2_TABLE_300();
261 a21 := JTF_VARCHAR2_TABLE_100();
262 a22 := JTF_VARCHAR2_TABLE_100();
263 a23 := JTF_VARCHAR2_TABLE_100();
264 a24 := JTF_VARCHAR2_TABLE_100();
265 a25 := JTF_NUMBER_TABLE();
266 a26 := JTF_NUMBER_TABLE();
267 a27 := JTF_NUMBER_TABLE();
268 a28 := JTF_VARCHAR2_TABLE_300();
269 a29 := JTF_VARCHAR2_TABLE_100();
270 a30 := JTF_VARCHAR2_TABLE_100();
271 a31 := JTF_NUMBER_TABLE();
272 a32 := JTF_NUMBER_TABLE();
273 a33 := JTF_NUMBER_TABLE();
274 a34 := JTF_DATE_TABLE();
275 a35 := JTF_DATE_TABLE();
279 a39 := JTF_VARCHAR2_TABLE_100();
276 a36 := JTF_NUMBER_TABLE();
277 a37 := JTF_VARCHAR2_TABLE_100();
278 a38 := JTF_VARCHAR2_TABLE_100();
280 a40 := JTF_VARCHAR2_TABLE_100();
281 a41 := JTF_NUMBER_TABLE();
282 a42 := JTF_VARCHAR2_TABLE_300();
283 a43 := JTF_VARCHAR2_TABLE_100();
284 a44 := JTF_VARCHAR2_TABLE_100();
285 a45 := JTF_NUMBER_TABLE();
286 a46 := JTF_NUMBER_TABLE();
287 a47 := JTF_VARCHAR2_TABLE_100();
288 a48 := JTF_NUMBER_TABLE();
289 a49 := JTF_VARCHAR2_TABLE_2000();
290 a50 := JTF_VARCHAR2_TABLE_100();
291 a51 := JTF_VARCHAR2_TABLE_200();
292 a52 := JTF_VARCHAR2_TABLE_100();
293 a53 := JTF_VARCHAR2_TABLE_200();
294 a54 := JTF_NUMBER_TABLE();
295 a55 := JTF_NUMBER_TABLE();
296 a56 := JTF_NUMBER_TABLE();
297 a57 := JTF_VARCHAR2_TABLE_200();
298 a58 := JTF_VARCHAR2_TABLE_100();
299 a59 := JTF_VARCHAR2_TABLE_100();
300 a60 := JTF_NUMBER_TABLE();
301 a61 := JTF_VARCHAR2_TABLE_100();
302 a62 := JTF_VARCHAR2_TABLE_100();
303 a63 := JTF_VARCHAR2_TABLE_100();
304 a64 := JTF_NUMBER_TABLE();
305 a65 := JTF_VARCHAR2_TABLE_100();
306 a66 := JTF_VARCHAR2_TABLE_100();
307 a67 := JTF_VARCHAR2_TABLE_300();
308 a68 := JTF_NUMBER_TABLE();
309 a69 := JTF_VARCHAR2_TABLE_100();
310 a70 := JTF_VARCHAR2_TABLE_100();
311 a71 := JTF_VARCHAR2_TABLE_100();
312 else
313 a0 := JTF_NUMBER_TABLE();
314 a1 := JTF_NUMBER_TABLE();
315 a2 := JTF_NUMBER_TABLE();
316 a3 := JTF_NUMBER_TABLE();
317 a4 := JTF_NUMBER_TABLE();
318 a5 := JTF_NUMBER_TABLE();
319 a6 := JTF_VARCHAR2_TABLE_300();
320 a7 := JTF_NUMBER_TABLE();
321 a8 := JTF_NUMBER_TABLE();
322 a9 := JTF_NUMBER_TABLE();
323 a10 := JTF_NUMBER_TABLE();
324 a11 := JTF_NUMBER_TABLE();
325 a12 := JTF_VARCHAR2_TABLE_300();
326 a13 := JTF_NUMBER_TABLE();
327 a14 := JTF_VARCHAR2_TABLE_100();
328 a15 := JTF_VARCHAR2_TABLE_100();
329 a16 := JTF_VARCHAR2_TABLE_100();
330 a17 := JTF_NUMBER_TABLE();
331 a18 := JTF_VARCHAR2_TABLE_100();
332 a19 := JTF_VARCHAR2_TABLE_100();
333 a20 := JTF_VARCHAR2_TABLE_300();
334 a21 := JTF_VARCHAR2_TABLE_100();
335 a22 := JTF_VARCHAR2_TABLE_100();
336 a23 := JTF_VARCHAR2_TABLE_100();
337 a24 := JTF_VARCHAR2_TABLE_100();
338 a25 := JTF_NUMBER_TABLE();
339 a26 := JTF_NUMBER_TABLE();
340 a27 := JTF_NUMBER_TABLE();
341 a28 := JTF_VARCHAR2_TABLE_300();
342 a29 := JTF_VARCHAR2_TABLE_100();
343 a30 := JTF_VARCHAR2_TABLE_100();
344 a31 := JTF_NUMBER_TABLE();
345 a32 := JTF_NUMBER_TABLE();
346 a33 := JTF_NUMBER_TABLE();
347 a34 := JTF_DATE_TABLE();
348 a35 := JTF_DATE_TABLE();
349 a36 := JTF_NUMBER_TABLE();
350 a37 := JTF_VARCHAR2_TABLE_100();
351 a38 := JTF_VARCHAR2_TABLE_100();
352 a39 := JTF_VARCHAR2_TABLE_100();
353 a40 := JTF_VARCHAR2_TABLE_100();
354 a41 := JTF_NUMBER_TABLE();
355 a42 := JTF_VARCHAR2_TABLE_300();
356 a43 := JTF_VARCHAR2_TABLE_100();
357 a44 := JTF_VARCHAR2_TABLE_100();
358 a45 := JTF_NUMBER_TABLE();
359 a46 := JTF_NUMBER_TABLE();
360 a47 := JTF_VARCHAR2_TABLE_100();
361 a48 := JTF_NUMBER_TABLE();
362 a49 := JTF_VARCHAR2_TABLE_2000();
363 a50 := JTF_VARCHAR2_TABLE_100();
364 a51 := JTF_VARCHAR2_TABLE_200();
365 a52 := JTF_VARCHAR2_TABLE_100();
366 a53 := JTF_VARCHAR2_TABLE_200();
367 a54 := JTF_NUMBER_TABLE();
368 a55 := JTF_NUMBER_TABLE();
369 a56 := JTF_NUMBER_TABLE();
370 a57 := JTF_VARCHAR2_TABLE_200();
371 a58 := JTF_VARCHAR2_TABLE_100();
372 a59 := JTF_VARCHAR2_TABLE_100();
373 a60 := JTF_NUMBER_TABLE();
374 a61 := JTF_VARCHAR2_TABLE_100();
375 a62 := JTF_VARCHAR2_TABLE_100();
376 a63 := JTF_VARCHAR2_TABLE_100();
377 a64 := JTF_NUMBER_TABLE();
378 a65 := JTF_VARCHAR2_TABLE_100();
379 a66 := JTF_VARCHAR2_TABLE_100();
380 a67 := JTF_VARCHAR2_TABLE_300();
381 a68 := JTF_NUMBER_TABLE();
382 a69 := JTF_VARCHAR2_TABLE_100();
383 a70 := JTF_VARCHAR2_TABLE_100();
384 a71 := JTF_VARCHAR2_TABLE_100();
385 if t.count > 0 then
386 a0.extend(t.count);
387 a1.extend(t.count);
388 a2.extend(t.count);
389 a3.extend(t.count);
390 a4.extend(t.count);
391 a5.extend(t.count);
392 a6.extend(t.count);
393 a7.extend(t.count);
394 a8.extend(t.count);
395 a9.extend(t.count);
396 a10.extend(t.count);
397 a11.extend(t.count);
398 a12.extend(t.count);
399 a13.extend(t.count);
400 a14.extend(t.count);
401 a15.extend(t.count);
402 a16.extend(t.count);
403 a17.extend(t.count);
404 a18.extend(t.count);
405 a19.extend(t.count);
406 a20.extend(t.count);
407 a21.extend(t.count);
408 a22.extend(t.count);
409 a23.extend(t.count);
410 a24.extend(t.count);
411 a25.extend(t.count);
412 a26.extend(t.count);
413 a27.extend(t.count);
414 a28.extend(t.count);
415 a29.extend(t.count);
416 a30.extend(t.count);
417 a31.extend(t.count);
418 a32.extend(t.count);
419 a33.extend(t.count);
420 a34.extend(t.count);
421 a35.extend(t.count);
422 a36.extend(t.count);
423 a37.extend(t.count);
424 a38.extend(t.count);
428 a42.extend(t.count);
425 a39.extend(t.count);
426 a40.extend(t.count);
427 a41.extend(t.count);
429 a43.extend(t.count);
430 a44.extend(t.count);
431 a45.extend(t.count);
432 a46.extend(t.count);
433 a47.extend(t.count);
434 a48.extend(t.count);
435 a49.extend(t.count);
436 a50.extend(t.count);
437 a51.extend(t.count);
438 a52.extend(t.count);
439 a53.extend(t.count);
440 a54.extend(t.count);
441 a55.extend(t.count);
442 a56.extend(t.count);
443 a57.extend(t.count);
444 a58.extend(t.count);
445 a59.extend(t.count);
446 a60.extend(t.count);
447 a61.extend(t.count);
448 a62.extend(t.count);
449 a63.extend(t.count);
450 a64.extend(t.count);
451 a65.extend(t.count);
452 a66.extend(t.count);
453 a67.extend(t.count);
454 a68.extend(t.count);
455 a69.extend(t.count);
456 a70.extend(t.count);
457 a71.extend(t.count);
458 ddindx := t.first;
459 indx := 1;
460 while true loop
461 a0(indx) := t(ddindx).unit_node_id;
462 a1(indx) := t(ddindx).root_instance_id;
463 a2(indx) := t(ddindx).path_position_id;
464 a3(indx) := t(ddindx).relationship_id;
465 a4(indx) := t(ddindx).parent_rel_id;
466 a5(indx) := t(ddindx).parent_instance_id;
467 a6(indx) := t(ddindx).parent_instance_number;
468 a7(indx) := t(ddindx).csi_ii_relationship_id;
469 a8(indx) := t(ddindx).csi_ii_object_version_num;
470 a9(indx) := t(ddindx).part_change_id;
471 a10(indx) := t(ddindx).curr_item_id;
472 a11(indx) := t(ddindx).curr_instance_id;
473 a12(indx) := t(ddindx).curr_item_number;
474 a13(indx) := t(ddindx).curr_instance_obj_ver_num;
475 a14(indx) := t(ddindx).curr_instance_number;
476 a15(indx) := t(ddindx).curr_serial_number;
477 a16(indx) := t(ddindx).curr_lot_number;
478 a17(indx) := t(ddindx).curr_quantity;
479 a18(indx) := t(ddindx).unit_of_measure;
480 a19(indx) := t(ddindx).ata;
481 a20(indx) := t(ddindx).position;
482 a21(indx) := t(ddindx).position_image;
483 a22(indx) := t(ddindx).is_position_srl_controlled;
484 a23(indx) := t(ddindx).is_controlled_position;
485 a24(indx) := t(ddindx).node_type;
486 a25(indx) := t(ddindx).qty_per_position;
487 a26(indx) := t(ddindx).operation_sequence_num;
488 a27(indx) := t(ddindx).inst_instance_id;
489 a28(indx) := t(ddindx).inst_item_number;
490 a29(indx) := t(ddindx).inst_instance_number;
491 a30(indx) := t(ddindx).inst_serial_number;
492 a31(indx) := t(ddindx).inst_instance_obj_ver_num;
493 a32(indx) := t(ddindx).instance_quantity;
494 a33(indx) := t(ddindx).install_quantity;
495 a34(indx) := t(ddindx).install_date;
496 a35(indx) := t(ddindx).removal_date;
497 a36(indx) := t(ddindx).reason_id;
498 a37(indx) := t(ddindx).reason_name;
499 a38(indx) := t(ddindx).removal_code_id;
500 a39(indx) := t(ddindx).removal_meaning;
501 a40(indx) := t(ddindx).not_leaf_node_flag;
502 a41(indx) := t(ddindx).node_level;
503 a42(indx) := t(ddindx).hgrid_node_path;
504 a43(indx) := t(ddindx).select_disable_flag;
505 a44(indx) := t(ddindx).search_flag;
506 a45(indx) := t(ddindx).disposition_id;
507 a46(indx) := t(ddindx).disposition_obj_ver_num;
508 a47(indx) := t(ddindx).disposition_status;
509 a48(indx) := t(ddindx).disposition_qty;
510 a49(indx) := t(ddindx).comments;
511 a50(indx) := t(ddindx).immediate_disposition_code;
512 a51(indx) := t(ddindx).immediate_disposition;
513 a52(indx) := t(ddindx).secondary_disposition_code;
514 a53(indx) := t(ddindx).secondary_disposition;
515 a54(indx) := t(ddindx).sr_incident_id;
516 a55(indx) := t(ddindx).collection_id;
517 a56(indx) := t(ddindx).condition_id;
518 a57(indx) := t(ddindx).condition_meaning;
519 a58(indx) := t(ddindx).problem_code;
520 a59(indx) := t(ddindx).problem_meaning;
521 a60(indx) := t(ddindx).severity_id;
522 a61(indx) := t(ddindx).severity_name;
523 a62(indx) := t(ddindx).resolution_code;
524 a63(indx) := t(ddindx).resolution_code_id;
525 a64(indx) := t(ddindx).estimated_duration;
526 a65(indx) := t(ddindx).service_type;
527 a66(indx) := t(ddindx).service_type_id;
528 a67(indx) := t(ddindx).summary;
529 a68(indx) := t(ddindx).disposition_count;
530 a69(indx) := t(ddindx).qty_ui_element_typ;
531 a70(indx) := t(ddindx).mrb_quality_typ;
532 a71(indx) := t(ddindx).bulk_process_flag;
533 indx := indx+1;
534 if t.last =ddindx
535 then exit;
536 end if;
537 ddindx := t.next(ddindx);
538 end loop;
539 end if;
540 end if;
541 end rosetta_table_copy_out_p5;
542
543 procedure rosetta_table_copy_in_p8(t out nocopy ahl_prd_blk_parts_change_pvt.filter_records_tbl_type, a0 JTF_VARCHAR2_TABLE_100
544 , a1 JTF_VARCHAR2_TABLE_300
545 ) as
546 ddindx binary_integer; indx binary_integer;
547 begin
548 if a0 is not null and a0.count > 0 then
549 if a0.count > 0 then
550 indx := a0.first;
551 ddindx := 1;
552 while true loop
553 t(ddindx).param := a0(indx);
557 then exit;
554 t(ddindx).param_value := a1(indx);
555 ddindx := ddindx+1;
556 if a0.last =indx
558 end if;
559 indx := a0.next(indx);
560 end loop;
561 end if;
562 end if;
563 end rosetta_table_copy_in_p8;
564 procedure rosetta_table_copy_out_p8(t ahl_prd_blk_parts_change_pvt.filter_records_tbl_type, a0 out nocopy JTF_VARCHAR2_TABLE_100
565 , a1 out nocopy JTF_VARCHAR2_TABLE_300
566 ) as
567 ddindx binary_integer; indx binary_integer;
568 begin
569 if t is null or t.count = 0 then
570 a0 := JTF_VARCHAR2_TABLE_100();
571 a1 := JTF_VARCHAR2_TABLE_300();
572 else
573 a0 := JTF_VARCHAR2_TABLE_100();
574 a1 := JTF_VARCHAR2_TABLE_300();
575 if t.count > 0 then
576 a0.extend(t.count);
577 a1.extend(t.count);
578 ddindx := t.first;
579 indx := 1;
580 while true loop
581 a0(indx) := t(ddindx).param;
582 a1(indx) := t(ddindx).param_value;
583 indx := indx+1;
584 if t.last =ddindx
585 then exit;
586 end if;
587 ddindx := t.next(ddindx);
588 end loop;
589 end if;
590 end if;
591 end rosetta_table_copy_out_p8;
592
593 procedure rosetta_table_copy_in_p12(t out nocopy ahl_prd_blk_parts_change_pvt.part_change_tbl_type, a0 JTF_NUMBER_TABLE
594 , a1 JTF_NUMBER_TABLE
595 , a2 JTF_NUMBER_TABLE
596 , a3 JTF_VARCHAR2_TABLE_100
597 , a4 JTF_NUMBER_TABLE
598 , a5 JTF_NUMBER_TABLE
599 , a6 JTF_NUMBER_TABLE
600 , a7 JTF_NUMBER_TABLE
601 , a8 JTF_NUMBER_TABLE
602 , a9 JTF_VARCHAR2_TABLE_100
603 , a10 JTF_NUMBER_TABLE
604 , a11 JTF_VARCHAR2_TABLE_100
605 , a12 JTF_NUMBER_TABLE
606 , a13 JTF_NUMBER_TABLE
607 , a14 JTF_DATE_TABLE
608 , a15 JTF_NUMBER_TABLE
609 , a16 JTF_VARCHAR2_TABLE_100
610 , a17 JTF_NUMBER_TABLE
611 , a18 JTF_NUMBER_TABLE
612 , a19 JTF_VARCHAR2_TABLE_100
613 , a20 JTF_VARCHAR2_TABLE_100
614 , a21 JTF_NUMBER_TABLE
615 , a22 JTF_VARCHAR2_TABLE_100
616 , a23 JTF_DATE_TABLE
617 , a24 JTF_NUMBER_TABLE
618 , a25 JTF_VARCHAR2_TABLE_100
619 , a26 JTF_NUMBER_TABLE
620 , a27 JTF_VARCHAR2_TABLE_100
621 , a28 JTF_VARCHAR2_TABLE_100
622 , a29 JTF_VARCHAR2_TABLE_100
623 , a30 JTF_VARCHAR2_TABLE_100
624 , a31 JTF_VARCHAR2_TABLE_100
625 , a32 JTF_VARCHAR2_TABLE_300
626 , a33 JTF_NUMBER_TABLE
627 , a34 JTF_VARCHAR2_TABLE_100
628 , a35 JTF_VARCHAR2_TABLE_100
629 , a36 JTF_VARCHAR2_TABLE_100
630 , a37 JTF_VARCHAR2_TABLE_100
631 , a38 JTF_NUMBER_TABLE
632 , a39 JTF_NUMBER_TABLE
633 , a40 JTF_VARCHAR2_TABLE_100
634 , a41 JTF_VARCHAR2_TABLE_100
635 , a42 JTF_VARCHAR2_TABLE_100
636 , a43 JTF_VARCHAR2_TABLE_100
637 , a44 JTF_VARCHAR2_TABLE_100
638 , a45 JTF_VARCHAR2_TABLE_2000
639 , a46 JTF_NUMBER_TABLE
640 , a47 JTF_NUMBER_TABLE
641 , a48 JTF_NUMBER_TABLE
642 ) as
643 ddindx binary_integer; indx binary_integer;
644 begin
645 if a0 is not null and a0.count > 0 then
646 if a0.count > 0 then
647 indx := a0.first;
648 ddindx := 1;
649 while true loop
650 t(ddindx).workorder_id := a0(indx);
651 t(ddindx).operation_sequence_num := a1(indx);
652 t(ddindx).workorder_operation_id := a2(indx);
653 t(ddindx).operation_type := a3(indx);
654 t(ddindx).unit_config_header_id := a4(indx);
655 t(ddindx).mc_relationship_id := a5(indx);
656 t(ddindx).csi_ii_relationship_id := a6(indx);
657 t(ddindx).csi_ii_object_version_num := a7(indx);
658 t(ddindx).parent_installed_instance_id := a8(indx);
659 t(ddindx).parent_installed_instance_num := a9(indx);
660 t(ddindx).installed_instance_id := a10(indx);
661 t(ddindx).installed_instance_num := a11(indx);
662 t(ddindx).installed_instance_obj_ver_num := a12(indx);
663 t(ddindx).installed_quantity := a13(indx);
664 t(ddindx).installation_date := a14(indx);
665 t(ddindx).removed_instance_id := a15(indx);
666 t(ddindx).removed_instance_num := a16(indx);
667 t(ddindx).removed_instance_obj_ver_num := a17(indx);
668 t(ddindx).removed_quantity := a18(indx);
669 t(ddindx).removal_code := a19(indx);
670 t(ddindx).removal_meaning := a20(indx);
671 t(ddindx).removal_reason_id := a21(indx);
672 t(ddindx).removal_reason_name := a22(indx);
673 t(ddindx).removal_date := a23(indx);
674 t(ddindx).condition_id := a24(indx);
675 t(ddindx).condition := a25(indx);
676 t(ddindx).severity_id := a26(indx);
677 t(ddindx).severity_name := a27(indx);
678 t(ddindx).problem_code := a28(indx);
679 t(ddindx).problem_meaning := a29(indx);
680 t(ddindx).resolution_code := a30(indx);
681 t(ddindx).resolution_meaning := a31(indx);
682 t(ddindx).summary := a32(indx);
683 t(ddindx).estimated_duration := a33(indx);
684 t(ddindx).create_work_order_option := a34(indx);
685 t(ddindx).create_nr_for_parent := a35(indx);
686 t(ddindx).service_type_code := a36(indx);
687 t(ddindx).service_type := a37(indx);
688 t(ddindx).disposition_id := a38(indx);
689 t(ddindx).disp_object_version_number := a39(indx);
690 t(ddindx).disp_operation_flag := a40(indx);
691 t(ddindx).immediate_disposition_code := a41(indx);
692 t(ddindx).immediate_disposition := a42(indx);
696 t(ddindx).collection_id := a46(indx);
693 t(ddindx).secondary_disposition_code := a43(indx);
694 t(ddindx).secondary_disposition := a44(indx);
695 t(ddindx).disp_comments := a45(indx);
697 t(ddindx).part_change_txn_id := a47(indx);
698 t(ddindx).path_position_id := a48(indx);
699 ddindx := ddindx+1;
700 if a0.last =indx
701 then exit;
702 end if;
703 indx := a0.next(indx);
704 end loop;
705 end if;
706 end if;
707 end rosetta_table_copy_in_p12;
708 procedure rosetta_table_copy_out_p12(t ahl_prd_blk_parts_change_pvt.part_change_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
709 , a1 out nocopy JTF_NUMBER_TABLE
710 , a2 out nocopy JTF_NUMBER_TABLE
711 , a3 out nocopy JTF_VARCHAR2_TABLE_100
712 , a4 out nocopy JTF_NUMBER_TABLE
713 , a5 out nocopy JTF_NUMBER_TABLE
714 , a6 out nocopy JTF_NUMBER_TABLE
715 , a7 out nocopy JTF_NUMBER_TABLE
716 , a8 out nocopy JTF_NUMBER_TABLE
717 , a9 out nocopy JTF_VARCHAR2_TABLE_100
718 , a10 out nocopy JTF_NUMBER_TABLE
719 , a11 out nocopy JTF_VARCHAR2_TABLE_100
720 , a12 out nocopy JTF_NUMBER_TABLE
721 , a13 out nocopy JTF_NUMBER_TABLE
722 , a14 out nocopy JTF_DATE_TABLE
723 , a15 out nocopy JTF_NUMBER_TABLE
724 , a16 out nocopy JTF_VARCHAR2_TABLE_100
725 , a17 out nocopy JTF_NUMBER_TABLE
726 , a18 out nocopy JTF_NUMBER_TABLE
727 , a19 out nocopy JTF_VARCHAR2_TABLE_100
728 , a20 out nocopy JTF_VARCHAR2_TABLE_100
729 , a21 out nocopy JTF_NUMBER_TABLE
730 , a22 out nocopy JTF_VARCHAR2_TABLE_100
731 , a23 out nocopy JTF_DATE_TABLE
732 , a24 out nocopy JTF_NUMBER_TABLE
733 , a25 out nocopy JTF_VARCHAR2_TABLE_100
734 , a26 out nocopy JTF_NUMBER_TABLE
735 , a27 out nocopy JTF_VARCHAR2_TABLE_100
736 , a28 out nocopy JTF_VARCHAR2_TABLE_100
737 , a29 out nocopy JTF_VARCHAR2_TABLE_100
738 , a30 out nocopy JTF_VARCHAR2_TABLE_100
739 , a31 out nocopy JTF_VARCHAR2_TABLE_100
740 , a32 out nocopy JTF_VARCHAR2_TABLE_300
741 , a33 out nocopy JTF_NUMBER_TABLE
742 , a34 out nocopy JTF_VARCHAR2_TABLE_100
743 , a35 out nocopy JTF_VARCHAR2_TABLE_100
744 , a36 out nocopy JTF_VARCHAR2_TABLE_100
745 , a37 out nocopy JTF_VARCHAR2_TABLE_100
746 , a38 out nocopy JTF_NUMBER_TABLE
747 , a39 out nocopy JTF_NUMBER_TABLE
748 , a40 out nocopy JTF_VARCHAR2_TABLE_100
749 , a41 out nocopy JTF_VARCHAR2_TABLE_100
750 , a42 out nocopy JTF_VARCHAR2_TABLE_100
751 , a43 out nocopy JTF_VARCHAR2_TABLE_100
752 , a44 out nocopy JTF_VARCHAR2_TABLE_100
753 , a45 out nocopy JTF_VARCHAR2_TABLE_2000
754 , a46 out nocopy JTF_NUMBER_TABLE
755 , a47 out nocopy JTF_NUMBER_TABLE
756 , a48 out nocopy JTF_NUMBER_TABLE
757 ) as
758 ddindx binary_integer; indx binary_integer;
759 begin
760 if t is null or t.count = 0 then
761 a0 := JTF_NUMBER_TABLE();
762 a1 := JTF_NUMBER_TABLE();
763 a2 := JTF_NUMBER_TABLE();
764 a3 := JTF_VARCHAR2_TABLE_100();
765 a4 := JTF_NUMBER_TABLE();
766 a5 := JTF_NUMBER_TABLE();
767 a6 := JTF_NUMBER_TABLE();
768 a7 := JTF_NUMBER_TABLE();
769 a8 := JTF_NUMBER_TABLE();
770 a9 := JTF_VARCHAR2_TABLE_100();
771 a10 := JTF_NUMBER_TABLE();
772 a11 := JTF_VARCHAR2_TABLE_100();
773 a12 := JTF_NUMBER_TABLE();
774 a13 := JTF_NUMBER_TABLE();
775 a14 := JTF_DATE_TABLE();
776 a15 := JTF_NUMBER_TABLE();
777 a16 := JTF_VARCHAR2_TABLE_100();
778 a17 := JTF_NUMBER_TABLE();
779 a18 := JTF_NUMBER_TABLE();
780 a19 := JTF_VARCHAR2_TABLE_100();
781 a20 := JTF_VARCHAR2_TABLE_100();
782 a21 := JTF_NUMBER_TABLE();
783 a22 := JTF_VARCHAR2_TABLE_100();
784 a23 := JTF_DATE_TABLE();
785 a24 := JTF_NUMBER_TABLE();
786 a25 := JTF_VARCHAR2_TABLE_100();
787 a26 := JTF_NUMBER_TABLE();
788 a27 := JTF_VARCHAR2_TABLE_100();
789 a28 := JTF_VARCHAR2_TABLE_100();
790 a29 := JTF_VARCHAR2_TABLE_100();
791 a30 := JTF_VARCHAR2_TABLE_100();
792 a31 := JTF_VARCHAR2_TABLE_100();
793 a32 := JTF_VARCHAR2_TABLE_300();
794 a33 := JTF_NUMBER_TABLE();
795 a34 := JTF_VARCHAR2_TABLE_100();
796 a35 := JTF_VARCHAR2_TABLE_100();
797 a36 := JTF_VARCHAR2_TABLE_100();
798 a37 := JTF_VARCHAR2_TABLE_100();
799 a38 := JTF_NUMBER_TABLE();
800 a39 := JTF_NUMBER_TABLE();
801 a40 := JTF_VARCHAR2_TABLE_100();
802 a41 := JTF_VARCHAR2_TABLE_100();
803 a42 := JTF_VARCHAR2_TABLE_100();
804 a43 := JTF_VARCHAR2_TABLE_100();
805 a44 := JTF_VARCHAR2_TABLE_100();
806 a45 := JTF_VARCHAR2_TABLE_2000();
807 a46 := JTF_NUMBER_TABLE();
808 a47 := JTF_NUMBER_TABLE();
809 a48 := JTF_NUMBER_TABLE();
810 else
811 a0 := JTF_NUMBER_TABLE();
812 a1 := JTF_NUMBER_TABLE();
813 a2 := JTF_NUMBER_TABLE();
814 a3 := JTF_VARCHAR2_TABLE_100();
815 a4 := JTF_NUMBER_TABLE();
816 a5 := JTF_NUMBER_TABLE();
817 a6 := JTF_NUMBER_TABLE();
818 a7 := JTF_NUMBER_TABLE();
819 a8 := JTF_NUMBER_TABLE();
820 a9 := JTF_VARCHAR2_TABLE_100();
821 a10 := JTF_NUMBER_TABLE();
822 a11 := JTF_VARCHAR2_TABLE_100();
823 a12 := JTF_NUMBER_TABLE();
824 a13 := JTF_NUMBER_TABLE();
825 a14 := JTF_DATE_TABLE();
826 a15 := JTF_NUMBER_TABLE();
827 a16 := JTF_VARCHAR2_TABLE_100();
828 a17 := JTF_NUMBER_TABLE();
829 a18 := JTF_NUMBER_TABLE();
830 a19 := JTF_VARCHAR2_TABLE_100();
831 a20 := JTF_VARCHAR2_TABLE_100();
832 a21 := JTF_NUMBER_TABLE();
833 a22 := JTF_VARCHAR2_TABLE_100();
837 a26 := JTF_NUMBER_TABLE();
834 a23 := JTF_DATE_TABLE();
835 a24 := JTF_NUMBER_TABLE();
836 a25 := JTF_VARCHAR2_TABLE_100();
838 a27 := JTF_VARCHAR2_TABLE_100();
839 a28 := JTF_VARCHAR2_TABLE_100();
840 a29 := JTF_VARCHAR2_TABLE_100();
841 a30 := JTF_VARCHAR2_TABLE_100();
842 a31 := JTF_VARCHAR2_TABLE_100();
843 a32 := JTF_VARCHAR2_TABLE_300();
844 a33 := JTF_NUMBER_TABLE();
845 a34 := JTF_VARCHAR2_TABLE_100();
846 a35 := JTF_VARCHAR2_TABLE_100();
847 a36 := JTF_VARCHAR2_TABLE_100();
848 a37 := JTF_VARCHAR2_TABLE_100();
849 a38 := JTF_NUMBER_TABLE();
850 a39 := JTF_NUMBER_TABLE();
851 a40 := JTF_VARCHAR2_TABLE_100();
852 a41 := JTF_VARCHAR2_TABLE_100();
853 a42 := JTF_VARCHAR2_TABLE_100();
854 a43 := JTF_VARCHAR2_TABLE_100();
855 a44 := JTF_VARCHAR2_TABLE_100();
856 a45 := JTF_VARCHAR2_TABLE_2000();
857 a46 := JTF_NUMBER_TABLE();
858 a47 := JTF_NUMBER_TABLE();
859 a48 := JTF_NUMBER_TABLE();
860 if t.count > 0 then
861 a0.extend(t.count);
862 a1.extend(t.count);
863 a2.extend(t.count);
864 a3.extend(t.count);
865 a4.extend(t.count);
866 a5.extend(t.count);
867 a6.extend(t.count);
868 a7.extend(t.count);
869 a8.extend(t.count);
870 a9.extend(t.count);
871 a10.extend(t.count);
872 a11.extend(t.count);
873 a12.extend(t.count);
874 a13.extend(t.count);
875 a14.extend(t.count);
876 a15.extend(t.count);
877 a16.extend(t.count);
878 a17.extend(t.count);
879 a18.extend(t.count);
880 a19.extend(t.count);
881 a20.extend(t.count);
882 a21.extend(t.count);
883 a22.extend(t.count);
884 a23.extend(t.count);
885 a24.extend(t.count);
886 a25.extend(t.count);
887 a26.extend(t.count);
888 a27.extend(t.count);
889 a28.extend(t.count);
890 a29.extend(t.count);
891 a30.extend(t.count);
892 a31.extend(t.count);
893 a32.extend(t.count);
894 a33.extend(t.count);
895 a34.extend(t.count);
896 a35.extend(t.count);
897 a36.extend(t.count);
898 a37.extend(t.count);
899 a38.extend(t.count);
900 a39.extend(t.count);
901 a40.extend(t.count);
902 a41.extend(t.count);
903 a42.extend(t.count);
904 a43.extend(t.count);
905 a44.extend(t.count);
906 a45.extend(t.count);
907 a46.extend(t.count);
908 a47.extend(t.count);
909 a48.extend(t.count);
910 ddindx := t.first;
911 indx := 1;
912 while true loop
913 a0(indx) := t(ddindx).workorder_id;
914 a1(indx) := t(ddindx).operation_sequence_num;
915 a2(indx) := t(ddindx).workorder_operation_id;
916 a3(indx) := t(ddindx).operation_type;
917 a4(indx) := t(ddindx).unit_config_header_id;
918 a5(indx) := t(ddindx).mc_relationship_id;
919 a6(indx) := t(ddindx).csi_ii_relationship_id;
920 a7(indx) := t(ddindx).csi_ii_object_version_num;
921 a8(indx) := t(ddindx).parent_installed_instance_id;
922 a9(indx) := t(ddindx).parent_installed_instance_num;
923 a10(indx) := t(ddindx).installed_instance_id;
924 a11(indx) := t(ddindx).installed_instance_num;
925 a12(indx) := t(ddindx).installed_instance_obj_ver_num;
926 a13(indx) := t(ddindx).installed_quantity;
927 a14(indx) := t(ddindx).installation_date;
928 a15(indx) := t(ddindx).removed_instance_id;
929 a16(indx) := t(ddindx).removed_instance_num;
930 a17(indx) := t(ddindx).removed_instance_obj_ver_num;
931 a18(indx) := t(ddindx).removed_quantity;
932 a19(indx) := t(ddindx).removal_code;
933 a20(indx) := t(ddindx).removal_meaning;
934 a21(indx) := t(ddindx).removal_reason_id;
935 a22(indx) := t(ddindx).removal_reason_name;
936 a23(indx) := t(ddindx).removal_date;
937 a24(indx) := t(ddindx).condition_id;
938 a25(indx) := t(ddindx).condition;
939 a26(indx) := t(ddindx).severity_id;
940 a27(indx) := t(ddindx).severity_name;
941 a28(indx) := t(ddindx).problem_code;
942 a29(indx) := t(ddindx).problem_meaning;
943 a30(indx) := t(ddindx).resolution_code;
944 a31(indx) := t(ddindx).resolution_meaning;
945 a32(indx) := t(ddindx).summary;
946 a33(indx) := t(ddindx).estimated_duration;
947 a34(indx) := t(ddindx).create_work_order_option;
948 a35(indx) := t(ddindx).create_nr_for_parent;
949 a36(indx) := t(ddindx).service_type_code;
950 a37(indx) := t(ddindx).service_type;
951 a38(indx) := t(ddindx).disposition_id;
952 a39(indx) := t(ddindx).disp_object_version_number;
953 a40(indx) := t(ddindx).disp_operation_flag;
954 a41(indx) := t(ddindx).immediate_disposition_code;
955 a42(indx) := t(ddindx).immediate_disposition;
956 a43(indx) := t(ddindx).secondary_disposition_code;
957 a44(indx) := t(ddindx).secondary_disposition;
958 a45(indx) := t(ddindx).disp_comments;
959 a46(indx) := t(ddindx).collection_id;
960 a47(indx) := t(ddindx).part_change_txn_id;
961 a48(indx) := t(ddindx).path_position_id;
962 indx := indx+1;
963 if t.last =ddindx
964 then exit;
965 end if;
966 ddindx := t.next(ddindx);
967 end loop;
968 end if;
969 end if;
973 , a1 JTF_VARCHAR2_TABLE_4000
970 end rosetta_table_copy_out_p12;
971
972 procedure rosetta_table_copy_in_p14(t out nocopy ahl_prd_blk_parts_change_pvt.error_msg_tbl_type, a0 JTF_VARCHAR2_TABLE_100
974 ) as
975 ddindx binary_integer; indx binary_integer;
976 begin
977 if a0 is not null and a0.count > 0 then
978 if a0.count > 0 then
979 indx := a0.first;
980 ddindx := 1;
981 while true loop
982 t(ddindx).message_level := a0(indx);
983 t(ddindx).message := a1(indx);
984 ddindx := ddindx+1;
985 if a0.last =indx
986 then exit;
987 end if;
988 indx := a0.next(indx);
989 end loop;
990 end if;
991 end if;
992 end rosetta_table_copy_in_p14;
993 procedure rosetta_table_copy_out_p14(t ahl_prd_blk_parts_change_pvt.error_msg_tbl_type, a0 out nocopy JTF_VARCHAR2_TABLE_100
994 , a1 out nocopy JTF_VARCHAR2_TABLE_4000
995 ) as
996 ddindx binary_integer; indx binary_integer;
997 begin
998 if t is null or t.count = 0 then
999 a0 := JTF_VARCHAR2_TABLE_100();
1000 a1 := JTF_VARCHAR2_TABLE_4000();
1001 else
1002 a0 := JTF_VARCHAR2_TABLE_100();
1003 a1 := JTF_VARCHAR2_TABLE_4000();
1004 if t.count > 0 then
1005 a0.extend(t.count);
1006 a1.extend(t.count);
1007 ddindx := t.first;
1008 indx := 1;
1009 while true loop
1010 a0(indx) := t(ddindx).message_level;
1011 a1(indx) := t(ddindx).message;
1012 indx := indx+1;
1013 if t.last =ddindx
1014 then exit;
1015 end if;
1016 ddindx := t.next(ddindx);
1017 end loop;
1018 end if;
1019 end if;
1020 end rosetta_table_copy_out_p14;
1021
1022 procedure get_bulk_part_chg_details(p_api_version NUMBER
1023 , p_init_msg_list VARCHAR2
1024 , p_commit VARCHAR2
1025 , p_validation_level NUMBER
1026 , p_default VARCHAR2
1027 , p_module_type VARCHAR2
1028 , p_workorder_id NUMBER
1029 , p_bulk_process_flag VARCHAR2
1030 , p8_a0 out nocopy JTF_NUMBER_TABLE
1031 , p8_a1 out nocopy JTF_NUMBER_TABLE
1032 , p8_a2 out nocopy JTF_NUMBER_TABLE
1033 , p8_a3 out nocopy JTF_NUMBER_TABLE
1034 , p8_a4 out nocopy JTF_NUMBER_TABLE
1035 , p8_a5 out nocopy JTF_NUMBER_TABLE
1036 , p8_a6 out nocopy JTF_VARCHAR2_TABLE_300
1037 , p8_a7 out nocopy JTF_NUMBER_TABLE
1038 , p8_a8 out nocopy JTF_NUMBER_TABLE
1039 , p8_a9 out nocopy JTF_NUMBER_TABLE
1040 , p8_a10 out nocopy JTF_NUMBER_TABLE
1041 , p8_a11 out nocopy JTF_NUMBER_TABLE
1042 , p8_a12 out nocopy JTF_VARCHAR2_TABLE_300
1043 , p8_a13 out nocopy JTF_NUMBER_TABLE
1044 , p8_a14 out nocopy JTF_VARCHAR2_TABLE_100
1045 , p8_a15 out nocopy JTF_VARCHAR2_TABLE_100
1046 , p8_a16 out nocopy JTF_VARCHAR2_TABLE_100
1047 , p8_a17 out nocopy JTF_NUMBER_TABLE
1048 , p8_a18 out nocopy JTF_VARCHAR2_TABLE_100
1049 , p8_a19 out nocopy JTF_VARCHAR2_TABLE_100
1050 , p8_a20 out nocopy JTF_VARCHAR2_TABLE_300
1051 , p8_a21 out nocopy JTF_VARCHAR2_TABLE_100
1052 , p8_a22 out nocopy JTF_VARCHAR2_TABLE_100
1053 , p8_a23 out nocopy JTF_VARCHAR2_TABLE_100
1054 , p8_a24 out nocopy JTF_VARCHAR2_TABLE_100
1055 , p8_a25 out nocopy JTF_NUMBER_TABLE
1056 , p8_a26 out nocopy JTF_NUMBER_TABLE
1057 , p8_a27 out nocopy JTF_NUMBER_TABLE
1058 , p8_a28 out nocopy JTF_VARCHAR2_TABLE_300
1059 , p8_a29 out nocopy JTF_VARCHAR2_TABLE_100
1060 , p8_a30 out nocopy JTF_VARCHAR2_TABLE_100
1061 , p8_a31 out nocopy JTF_NUMBER_TABLE
1062 , p8_a32 out nocopy JTF_NUMBER_TABLE
1063 , p8_a33 out nocopy JTF_NUMBER_TABLE
1064 , p8_a34 out nocopy JTF_DATE_TABLE
1065 , p8_a35 out nocopy JTF_DATE_TABLE
1066 , p8_a36 out nocopy JTF_NUMBER_TABLE
1067 , p8_a37 out nocopy JTF_VARCHAR2_TABLE_100
1068 , p8_a38 out nocopy JTF_VARCHAR2_TABLE_100
1069 , p8_a39 out nocopy JTF_VARCHAR2_TABLE_100
1070 , p8_a40 out nocopy JTF_VARCHAR2_TABLE_100
1071 , p8_a41 out nocopy JTF_NUMBER_TABLE
1072 , p8_a42 out nocopy JTF_VARCHAR2_TABLE_300
1073 , p8_a43 out nocopy JTF_VARCHAR2_TABLE_100
1074 , p8_a44 out nocopy JTF_VARCHAR2_TABLE_100
1075 , p8_a45 out nocopy JTF_NUMBER_TABLE
1076 , p8_a46 out nocopy JTF_NUMBER_TABLE
1077 , p8_a47 out nocopy JTF_VARCHAR2_TABLE_100
1078 , p8_a48 out nocopy JTF_NUMBER_TABLE
1079 , p8_a49 out nocopy JTF_VARCHAR2_TABLE_2000
1080 , p8_a50 out nocopy JTF_VARCHAR2_TABLE_100
1081 , p8_a51 out nocopy JTF_VARCHAR2_TABLE_200
1082 , p8_a52 out nocopy JTF_VARCHAR2_TABLE_100
1083 , p8_a53 out nocopy JTF_VARCHAR2_TABLE_200
1084 , p8_a54 out nocopy JTF_NUMBER_TABLE
1085 , p8_a55 out nocopy JTF_NUMBER_TABLE
1086 , p8_a56 out nocopy JTF_NUMBER_TABLE
1087 , p8_a57 out nocopy JTF_VARCHAR2_TABLE_200
1088 , p8_a58 out nocopy JTF_VARCHAR2_TABLE_100
1089 , p8_a59 out nocopy JTF_VARCHAR2_TABLE_100
1090 , p8_a60 out nocopy JTF_NUMBER_TABLE
1091 , p8_a61 out nocopy JTF_VARCHAR2_TABLE_100
1092 , p8_a62 out nocopy JTF_VARCHAR2_TABLE_100
1093 , p8_a63 out nocopy JTF_VARCHAR2_TABLE_100
1094 , p8_a64 out nocopy JTF_NUMBER_TABLE
1095 , p8_a65 out nocopy JTF_VARCHAR2_TABLE_100
1096 , p8_a66 out nocopy JTF_VARCHAR2_TABLE_100
1097 , p8_a67 out nocopy JTF_VARCHAR2_TABLE_300
1098 , p8_a68 out nocopy JTF_NUMBER_TABLE
1099 , p8_a69 out nocopy JTF_VARCHAR2_TABLE_100
1100 , p8_a70 out nocopy JTF_VARCHAR2_TABLE_100
1101 , p8_a71 out nocopy JTF_VARCHAR2_TABLE_100
1102 , x_return_status out nocopy VARCHAR2
1103 , x_msg_count out nocopy NUMBER
1104 , x_msg_data out nocopy VARCHAR2
1105 )
1106
1107 as
1111
1108 ddx_uc_details_tbl ahl_prd_blk_parts_change_pvt.uc_details_hgrid_tbl_type;
1109 ddindx binary_integer; indx binary_integer;
1110 begin
1112 -- copy data to the local IN or IN-OUT args, if any
1113
1114
1115
1116
1117
1118
1119
1120
1121
1122
1123
1124
1125 -- here's the delegated call to the old PL/SQL routine
1126 ahl_prd_blk_parts_change_pvt.get_bulk_part_chg_details(p_api_version,
1127 p_init_msg_list,
1128 p_commit,
1129 p_validation_level,
1130 p_default,
1131 p_module_type,
1132 p_workorder_id,
1133 p_bulk_process_flag,
1134 ddx_uc_details_tbl,
1135 x_return_status,
1136 x_msg_count,
1137 x_msg_data);
1138
1139 -- copy data back from the local variables to OUT or IN-OUT args, if any
1140
1141
1142
1143
1144
1145
1146
1147
1148 ahl_prd_blk_parts_change_pvt_w.rosetta_table_copy_out_p5(ddx_uc_details_tbl, p8_a0
1149 , p8_a1
1150 , p8_a2
1151 , p8_a3
1152 , p8_a4
1153 , p8_a5
1154 , p8_a6
1155 , p8_a7
1156 , p8_a8
1157 , p8_a9
1158 , p8_a10
1159 , p8_a11
1160 , p8_a12
1161 , p8_a13
1162 , p8_a14
1163 , p8_a15
1164 , p8_a16
1165 , p8_a17
1166 , p8_a18
1167 , p8_a19
1168 , p8_a20
1169 , p8_a21
1170 , p8_a22
1171 , p8_a23
1172 , p8_a24
1173 , p8_a25
1174 , p8_a26
1175 , p8_a27
1176 , p8_a28
1177 , p8_a29
1178 , p8_a30
1179 , p8_a31
1180 , p8_a32
1181 , p8_a33
1182 , p8_a34
1183 , p8_a35
1184 , p8_a36
1185 , p8_a37
1186 , p8_a38
1187 , p8_a39
1188 , p8_a40
1189 , p8_a41
1190 , p8_a42
1191 , p8_a43
1192 , p8_a44
1193 , p8_a45
1194 , p8_a46
1195 , p8_a47
1196 , p8_a48
1197 , p8_a49
1198 , p8_a50
1199 , p8_a51
1200 , p8_a52
1201 , p8_a53
1202 , p8_a54
1203 , p8_a55
1204 , p8_a56
1205 , p8_a57
1206 , p8_a58
1207 , p8_a59
1208 , p8_a60
1209 , p8_a61
1210 , p8_a62
1211 , p8_a63
1212 , p8_a64
1213 , p8_a65
1214 , p8_a66
1215 , p8_a67
1216 , p8_a68
1217 , p8_a69
1218 , p8_a70
1219 , p8_a71
1220 );
1221
1222
1223
1224 end;
1225
1226 procedure filter_records_uc_details(p_api_version NUMBER
1227 , p_init_msg_list VARCHAR2
1228 , p_commit VARCHAR2
1229 , p_validation_level NUMBER
1230 , p_default VARCHAR2
1231 , p_module_type VARCHAR2
1232 , p6_a0 JTF_VARCHAR2_TABLE_100
1233 , p6_a1 JTF_VARCHAR2_TABLE_300
1234 , x_hgrid_node_path out nocopy VARCHAR2
1235 , x_return_status out nocopy VARCHAR2
1236 , x_msg_count out nocopy NUMBER
1237 , x_msg_data out nocopy VARCHAR2
1238 )
1239
1240 as
1241 ddp_filter_records_tbl ahl_prd_blk_parts_change_pvt.filter_records_tbl_type;
1242 ddindx binary_integer; indx binary_integer;
1243 begin
1244
1245 -- copy data to the local IN or IN-OUT args, if any
1246
1247
1248
1249
1250
1251
1252 ahl_prd_blk_parts_change_pvt_w.rosetta_table_copy_in_p8(ddp_filter_records_tbl, p6_a0
1253 , p6_a1
1254 );
1255
1256
1257
1258
1259
1260 -- here's the delegated call to the old PL/SQL routine
1261 ahl_prd_blk_parts_change_pvt.filter_records_uc_details(p_api_version,
1262 p_init_msg_list,
1263 p_commit,
1264 p_validation_level,
1265 p_default,
1266 p_module_type,
1267 ddp_filter_records_tbl,
1268 x_hgrid_node_path,
1269 x_return_status,
1270 x_msg_count,
1271 x_msg_data);
1272
1273 -- copy data back from the local variables to OUT or IN-OUT args, if any
1274
1275
1276
1277
1278
1279
1280
1281
1282
1283
1284 end;
1285
1286 procedure calc_qty_on_inst_selection(p0_a0 in out nocopy NUMBER
1287 , p0_a1 in out nocopy NUMBER
1288 , p0_a2 in out nocopy NUMBER
1289 , p0_a3 in out nocopy NUMBER
1290 , p0_a4 in out nocopy NUMBER
1291 , p0_a5 in out nocopy NUMBER
1292 , p0_a6 in out nocopy VARCHAR2
1293 , p0_a7 in out nocopy NUMBER
1294 , p0_a8 in out nocopy NUMBER
1295 , p0_a9 in out nocopy NUMBER
1296 , p0_a10 in out nocopy NUMBER
1297 , p0_a11 in out nocopy NUMBER
1298 , p0_a12 in out nocopy VARCHAR2
1299 , p0_a13 in out nocopy NUMBER
1300 , p0_a14 in out nocopy VARCHAR2
1301 , p0_a15 in out nocopy VARCHAR2
1302 , p0_a16 in out nocopy VARCHAR2
1303 , p0_a17 in out nocopy NUMBER
1304 , p0_a18 in out nocopy VARCHAR2
1305 , p0_a19 in out nocopy VARCHAR2
1306 , p0_a20 in out nocopy VARCHAR2
1307 , p0_a21 in out nocopy VARCHAR2
1308 , p0_a22 in out nocopy VARCHAR2
1309 , p0_a23 in out nocopy VARCHAR2
1310 , p0_a24 in out nocopy VARCHAR2
1311 , p0_a25 in out nocopy NUMBER
1312 , p0_a26 in out nocopy NUMBER
1313 , p0_a27 in out nocopy NUMBER
1314 , p0_a28 in out nocopy VARCHAR2
1315 , p0_a29 in out nocopy VARCHAR2
1319 , p0_a33 in out nocopy NUMBER
1316 , p0_a30 in out nocopy VARCHAR2
1317 , p0_a31 in out nocopy NUMBER
1318 , p0_a32 in out nocopy NUMBER
1320 , p0_a34 in out nocopy DATE
1321 , p0_a35 in out nocopy DATE
1322 , p0_a36 in out nocopy NUMBER
1323 , p0_a37 in out nocopy VARCHAR2
1324 , p0_a38 in out nocopy VARCHAR2
1325 , p0_a39 in out nocopy VARCHAR2
1326 , p0_a40 in out nocopy VARCHAR2
1327 , p0_a41 in out nocopy NUMBER
1328 , p0_a42 in out nocopy VARCHAR2
1329 , p0_a43 in out nocopy VARCHAR2
1330 , p0_a44 in out nocopy VARCHAR2
1331 , p0_a45 in out nocopy NUMBER
1332 , p0_a46 in out nocopy NUMBER
1333 , p0_a47 in out nocopy VARCHAR2
1334 , p0_a48 in out nocopy NUMBER
1335 , p0_a49 in out nocopy VARCHAR2
1336 , p0_a50 in out nocopy VARCHAR2
1337 , p0_a51 in out nocopy VARCHAR2
1338 , p0_a52 in out nocopy VARCHAR2
1339 , p0_a53 in out nocopy VARCHAR2
1340 , p0_a54 in out nocopy NUMBER
1341 , p0_a55 in out nocopy NUMBER
1342 , p0_a56 in out nocopy NUMBER
1343 , p0_a57 in out nocopy VARCHAR2
1344 , p0_a58 in out nocopy VARCHAR2
1345 , p0_a59 in out nocopy VARCHAR2
1346 , p0_a60 in out nocopy NUMBER
1347 , p0_a61 in out nocopy VARCHAR2
1348 , p0_a62 in out nocopy VARCHAR2
1349 , p0_a63 in out nocopy VARCHAR2
1350 , p0_a64 in out nocopy NUMBER
1351 , p0_a65 in out nocopy VARCHAR2
1352 , p0_a66 in out nocopy VARCHAR2
1353 , p0_a67 in out nocopy VARCHAR2
1354 , p0_a68 in out nocopy NUMBER
1355 , p0_a69 in out nocopy VARCHAR2
1356 , p0_a70 in out nocopy VARCHAR2
1357 , p0_a71 in out nocopy VARCHAR2
1358 )
1359
1360 as
1361 ddp_x_uc_details_rec ahl_prd_blk_parts_change_pvt.uc_details_hgrid_rec_type;
1362 ddindx binary_integer; indx binary_integer;
1363 begin
1364
1365 -- copy data to the local IN or IN-OUT args, if any
1366 ddp_x_uc_details_rec.unit_node_id := p0_a0;
1367 ddp_x_uc_details_rec.root_instance_id := p0_a1;
1368 ddp_x_uc_details_rec.path_position_id := p0_a2;
1369 ddp_x_uc_details_rec.relationship_id := p0_a3;
1370 ddp_x_uc_details_rec.parent_rel_id := p0_a4;
1371 ddp_x_uc_details_rec.parent_instance_id := p0_a5;
1372 ddp_x_uc_details_rec.parent_instance_number := p0_a6;
1373 ddp_x_uc_details_rec.csi_ii_relationship_id := p0_a7;
1374 ddp_x_uc_details_rec.csi_ii_object_version_num := p0_a8;
1375 ddp_x_uc_details_rec.part_change_id := p0_a9;
1376 ddp_x_uc_details_rec.curr_item_id := p0_a10;
1377 ddp_x_uc_details_rec.curr_instance_id := p0_a11;
1378 ddp_x_uc_details_rec.curr_item_number := p0_a12;
1379 ddp_x_uc_details_rec.curr_instance_obj_ver_num := p0_a13;
1380 ddp_x_uc_details_rec.curr_instance_number := p0_a14;
1381 ddp_x_uc_details_rec.curr_serial_number := p0_a15;
1382 ddp_x_uc_details_rec.curr_lot_number := p0_a16;
1383 ddp_x_uc_details_rec.curr_quantity := p0_a17;
1384 ddp_x_uc_details_rec.unit_of_measure := p0_a18;
1385 ddp_x_uc_details_rec.ata := p0_a19;
1386 ddp_x_uc_details_rec.position := p0_a20;
1387 ddp_x_uc_details_rec.position_image := p0_a21;
1388 ddp_x_uc_details_rec.is_position_srl_controlled := p0_a22;
1389 ddp_x_uc_details_rec.is_controlled_position := p0_a23;
1390 ddp_x_uc_details_rec.node_type := p0_a24;
1391 ddp_x_uc_details_rec.qty_per_position := p0_a25;
1392 ddp_x_uc_details_rec.operation_sequence_num := p0_a26;
1393 ddp_x_uc_details_rec.inst_instance_id := p0_a27;
1394 ddp_x_uc_details_rec.inst_item_number := p0_a28;
1395 ddp_x_uc_details_rec.inst_instance_number := p0_a29;
1396 ddp_x_uc_details_rec.inst_serial_number := p0_a30;
1397 ddp_x_uc_details_rec.inst_instance_obj_ver_num := p0_a31;
1398 ddp_x_uc_details_rec.instance_quantity := p0_a32;
1399 ddp_x_uc_details_rec.install_quantity := p0_a33;
1400 ddp_x_uc_details_rec.install_date := p0_a34;
1401 ddp_x_uc_details_rec.removal_date := p0_a35;
1402 ddp_x_uc_details_rec.reason_id := p0_a36;
1403 ddp_x_uc_details_rec.reason_name := p0_a37;
1404 ddp_x_uc_details_rec.removal_code_id := p0_a38;
1405 ddp_x_uc_details_rec.removal_meaning := p0_a39;
1406 ddp_x_uc_details_rec.not_leaf_node_flag := p0_a40;
1407 ddp_x_uc_details_rec.node_level := p0_a41;
1408 ddp_x_uc_details_rec.hgrid_node_path := p0_a42;
1409 ddp_x_uc_details_rec.select_disable_flag := p0_a43;
1410 ddp_x_uc_details_rec.search_flag := p0_a44;
1411 ddp_x_uc_details_rec.disposition_id := p0_a45;
1412 ddp_x_uc_details_rec.disposition_obj_ver_num := p0_a46;
1413 ddp_x_uc_details_rec.disposition_status := p0_a47;
1414 ddp_x_uc_details_rec.disposition_qty := p0_a48;
1415 ddp_x_uc_details_rec.comments := p0_a49;
1416 ddp_x_uc_details_rec.immediate_disposition_code := p0_a50;
1417 ddp_x_uc_details_rec.immediate_disposition := p0_a51;
1418 ddp_x_uc_details_rec.secondary_disposition_code := p0_a52;
1419 ddp_x_uc_details_rec.secondary_disposition := p0_a53;
1420 ddp_x_uc_details_rec.sr_incident_id := p0_a54;
1421 ddp_x_uc_details_rec.collection_id := p0_a55;
1422 ddp_x_uc_details_rec.condition_id := p0_a56;
1423 ddp_x_uc_details_rec.condition_meaning := p0_a57;
1424 ddp_x_uc_details_rec.problem_code := p0_a58;
1425 ddp_x_uc_details_rec.problem_meaning := p0_a59;
1426 ddp_x_uc_details_rec.severity_id := p0_a60;
1427 ddp_x_uc_details_rec.severity_name := p0_a61;
1428 ddp_x_uc_details_rec.resolution_code := p0_a62;
1429 ddp_x_uc_details_rec.resolution_code_id := p0_a63;
1430 ddp_x_uc_details_rec.estimated_duration := p0_a64;
1431 ddp_x_uc_details_rec.service_type := p0_a65;
1432 ddp_x_uc_details_rec.service_type_id := p0_a66;
1433 ddp_x_uc_details_rec.summary := p0_a67;
1434 ddp_x_uc_details_rec.disposition_count := p0_a68;
1435 ddp_x_uc_details_rec.qty_ui_element_typ := p0_a69;
1436 ddp_x_uc_details_rec.mrb_quality_typ := p0_a70;
1440 ahl_prd_blk_parts_change_pvt.calc_qty_on_inst_selection(ddp_x_uc_details_rec);
1437 ddp_x_uc_details_rec.bulk_process_flag := p0_a71;
1438
1439 -- here's the delegated call to the old PL/SQL routine
1441
1442 -- copy data back from the local variables to OUT or IN-OUT args, if any
1443 p0_a0 := ddp_x_uc_details_rec.unit_node_id;
1444 p0_a1 := ddp_x_uc_details_rec.root_instance_id;
1445 p0_a2 := ddp_x_uc_details_rec.path_position_id;
1446 p0_a3 := ddp_x_uc_details_rec.relationship_id;
1447 p0_a4 := ddp_x_uc_details_rec.parent_rel_id;
1448 p0_a5 := ddp_x_uc_details_rec.parent_instance_id;
1449 p0_a6 := ddp_x_uc_details_rec.parent_instance_number;
1450 p0_a7 := ddp_x_uc_details_rec.csi_ii_relationship_id;
1451 p0_a8 := ddp_x_uc_details_rec.csi_ii_object_version_num;
1452 p0_a9 := ddp_x_uc_details_rec.part_change_id;
1453 p0_a10 := ddp_x_uc_details_rec.curr_item_id;
1454 p0_a11 := ddp_x_uc_details_rec.curr_instance_id;
1455 p0_a12 := ddp_x_uc_details_rec.curr_item_number;
1456 p0_a13 := ddp_x_uc_details_rec.curr_instance_obj_ver_num;
1457 p0_a14 := ddp_x_uc_details_rec.curr_instance_number;
1458 p0_a15 := ddp_x_uc_details_rec.curr_serial_number;
1459 p0_a16 := ddp_x_uc_details_rec.curr_lot_number;
1460 p0_a17 := ddp_x_uc_details_rec.curr_quantity;
1461 p0_a18 := ddp_x_uc_details_rec.unit_of_measure;
1462 p0_a19 := ddp_x_uc_details_rec.ata;
1463 p0_a20 := ddp_x_uc_details_rec.position;
1464 p0_a21 := ddp_x_uc_details_rec.position_image;
1465 p0_a22 := ddp_x_uc_details_rec.is_position_srl_controlled;
1466 p0_a23 := ddp_x_uc_details_rec.is_controlled_position;
1467 p0_a24 := ddp_x_uc_details_rec.node_type;
1468 p0_a25 := ddp_x_uc_details_rec.qty_per_position;
1469 p0_a26 := ddp_x_uc_details_rec.operation_sequence_num;
1470 p0_a27 := ddp_x_uc_details_rec.inst_instance_id;
1471 p0_a28 := ddp_x_uc_details_rec.inst_item_number;
1472 p0_a29 := ddp_x_uc_details_rec.inst_instance_number;
1473 p0_a30 := ddp_x_uc_details_rec.inst_serial_number;
1474 p0_a31 := ddp_x_uc_details_rec.inst_instance_obj_ver_num;
1475 p0_a32 := ddp_x_uc_details_rec.instance_quantity;
1476 p0_a33 := ddp_x_uc_details_rec.install_quantity;
1477 p0_a34 := ddp_x_uc_details_rec.install_date;
1478 p0_a35 := ddp_x_uc_details_rec.removal_date;
1479 p0_a36 := ddp_x_uc_details_rec.reason_id;
1480 p0_a37 := ddp_x_uc_details_rec.reason_name;
1481 p0_a38 := ddp_x_uc_details_rec.removal_code_id;
1482 p0_a39 := ddp_x_uc_details_rec.removal_meaning;
1483 p0_a40 := ddp_x_uc_details_rec.not_leaf_node_flag;
1484 p0_a41 := ddp_x_uc_details_rec.node_level;
1485 p0_a42 := ddp_x_uc_details_rec.hgrid_node_path;
1486 p0_a43 := ddp_x_uc_details_rec.select_disable_flag;
1487 p0_a44 := ddp_x_uc_details_rec.search_flag;
1488 p0_a45 := ddp_x_uc_details_rec.disposition_id;
1489 p0_a46 := ddp_x_uc_details_rec.disposition_obj_ver_num;
1490 p0_a47 := ddp_x_uc_details_rec.disposition_status;
1491 p0_a48 := ddp_x_uc_details_rec.disposition_qty;
1492 p0_a49 := ddp_x_uc_details_rec.comments;
1493 p0_a50 := ddp_x_uc_details_rec.immediate_disposition_code;
1494 p0_a51 := ddp_x_uc_details_rec.immediate_disposition;
1495 p0_a52 := ddp_x_uc_details_rec.secondary_disposition_code;
1496 p0_a53 := ddp_x_uc_details_rec.secondary_disposition;
1497 p0_a54 := ddp_x_uc_details_rec.sr_incident_id;
1498 p0_a55 := ddp_x_uc_details_rec.collection_id;
1499 p0_a56 := ddp_x_uc_details_rec.condition_id;
1500 p0_a57 := ddp_x_uc_details_rec.condition_meaning;
1501 p0_a58 := ddp_x_uc_details_rec.problem_code;
1502 p0_a59 := ddp_x_uc_details_rec.problem_meaning;
1503 p0_a60 := ddp_x_uc_details_rec.severity_id;
1504 p0_a61 := ddp_x_uc_details_rec.severity_name;
1505 p0_a62 := ddp_x_uc_details_rec.resolution_code;
1506 p0_a63 := ddp_x_uc_details_rec.resolution_code_id;
1507 p0_a64 := ddp_x_uc_details_rec.estimated_duration;
1508 p0_a65 := ddp_x_uc_details_rec.service_type;
1509 p0_a66 := ddp_x_uc_details_rec.service_type_id;
1510 p0_a67 := ddp_x_uc_details_rec.summary;
1511 p0_a68 := ddp_x_uc_details_rec.disposition_count;
1512 p0_a69 := ddp_x_uc_details_rec.qty_ui_element_typ;
1513 p0_a70 := ddp_x_uc_details_rec.mrb_quality_typ;
1514 p0_a71 := ddp_x_uc_details_rec.bulk_process_flag;
1515 end;
1516
1517 procedure process_part_changes(p_api_version NUMBER
1518 , p_init_msg_list VARCHAR2
1519 , p_commit VARCHAR2
1520 , p_validation_level NUMBER
1521 , p_module_type VARCHAR2
1522 , p_default VARCHAR2
1523 , p6_a0 in out nocopy JTF_NUMBER_TABLE
1524 , p6_a1 in out nocopy JTF_NUMBER_TABLE
1525 , p6_a2 in out nocopy JTF_NUMBER_TABLE
1526 , p6_a3 in out nocopy JTF_VARCHAR2_TABLE_100
1527 , p6_a4 in out nocopy JTF_NUMBER_TABLE
1528 , p6_a5 in out nocopy JTF_NUMBER_TABLE
1529 , p6_a6 in out nocopy JTF_NUMBER_TABLE
1530 , p6_a7 in out nocopy JTF_NUMBER_TABLE
1531 , p6_a8 in out nocopy JTF_NUMBER_TABLE
1532 , p6_a9 in out nocopy JTF_VARCHAR2_TABLE_100
1533 , p6_a10 in out nocopy JTF_NUMBER_TABLE
1534 , p6_a11 in out nocopy JTF_VARCHAR2_TABLE_100
1535 , p6_a12 in out nocopy JTF_NUMBER_TABLE
1536 , p6_a13 in out nocopy JTF_NUMBER_TABLE
1537 , p6_a14 in out nocopy JTF_DATE_TABLE
1538 , p6_a15 in out nocopy JTF_NUMBER_TABLE
1539 , p6_a16 in out nocopy JTF_VARCHAR2_TABLE_100
1540 , p6_a17 in out nocopy JTF_NUMBER_TABLE
1541 , p6_a18 in out nocopy JTF_NUMBER_TABLE
1542 , p6_a19 in out nocopy JTF_VARCHAR2_TABLE_100
1543 , p6_a20 in out nocopy JTF_VARCHAR2_TABLE_100
1544 , p6_a21 in out nocopy JTF_NUMBER_TABLE
1545 , p6_a22 in out nocopy JTF_VARCHAR2_TABLE_100
1546 , p6_a23 in out nocopy JTF_DATE_TABLE
1547 , p6_a24 in out nocopy JTF_NUMBER_TABLE
1548 , p6_a25 in out nocopy JTF_VARCHAR2_TABLE_100
1549 , p6_a26 in out nocopy JTF_NUMBER_TABLE
1550 , p6_a27 in out nocopy JTF_VARCHAR2_TABLE_100
1554 , p6_a31 in out nocopy JTF_VARCHAR2_TABLE_100
1551 , p6_a28 in out nocopy JTF_VARCHAR2_TABLE_100
1552 , p6_a29 in out nocopy JTF_VARCHAR2_TABLE_100
1553 , p6_a30 in out nocopy JTF_VARCHAR2_TABLE_100
1555 , p6_a32 in out nocopy JTF_VARCHAR2_TABLE_300
1556 , p6_a33 in out nocopy JTF_NUMBER_TABLE
1557 , p6_a34 in out nocopy JTF_VARCHAR2_TABLE_100
1558 , p6_a35 in out nocopy JTF_VARCHAR2_TABLE_100
1559 , p6_a36 in out nocopy JTF_VARCHAR2_TABLE_100
1560 , p6_a37 in out nocopy JTF_VARCHAR2_TABLE_100
1561 , p6_a38 in out nocopy JTF_NUMBER_TABLE
1562 , p6_a39 in out nocopy JTF_NUMBER_TABLE
1563 , p6_a40 in out nocopy JTF_VARCHAR2_TABLE_100
1564 , p6_a41 in out nocopy JTF_VARCHAR2_TABLE_100
1565 , p6_a42 in out nocopy JTF_VARCHAR2_TABLE_100
1566 , p6_a43 in out nocopy JTF_VARCHAR2_TABLE_100
1567 , p6_a44 in out nocopy JTF_VARCHAR2_TABLE_100
1568 , p6_a45 in out nocopy JTF_VARCHAR2_TABLE_2000
1569 , p6_a46 in out nocopy JTF_NUMBER_TABLE
1570 , p6_a47 in out nocopy JTF_NUMBER_TABLE
1571 , p6_a48 in out nocopy JTF_NUMBER_TABLE
1572 , p7_a0 JTF_NUMBER_TABLE
1573 , p7_a1 JTF_VARCHAR2_TABLE_100
1574 , p7_a2 JTF_NUMBER_TABLE
1575 , p7_a3 JTF_NUMBER_TABLE
1576 , p7_a4 JTF_NUMBER_TABLE
1577 , p7_a5 JTF_NUMBER_TABLE
1578 , p7_a6 JTF_VARCHAR2_TABLE_100
1579 , p7_a7 JTF_NUMBER_TABLE
1580 , p7_a8 JTF_VARCHAR2_TABLE_100
1581 , p7_a9 JTF_NUMBER_TABLE
1582 , x_return_status out nocopy VARCHAR2
1583 , x_msg_count out nocopy NUMBER
1584 , x_msg_data out nocopy VARCHAR2
1585 , p11_a0 out nocopy JTF_VARCHAR2_TABLE_100
1586 , p11_a1 out nocopy JTF_VARCHAR2_TABLE_4000
1587 )
1588
1589 as
1590 ddp_x_parts_rec_tbl ahl_prd_blk_parts_change_pvt.part_change_tbl_type;
1591 ddp_mr_asso_tbl ahl_prd_nonroutine_pvt.mr_association_tbl_type;
1592 ddx_error_msg_tbl ahl_prd_blk_parts_change_pvt.error_msg_tbl_type;
1593 ddindx binary_integer; indx binary_integer;
1594 begin
1595
1596 -- copy data to the local IN or IN-OUT args, if any
1597
1598
1599
1600
1601
1602
1603 ahl_prd_blk_parts_change_pvt_w.rosetta_table_copy_in_p12(ddp_x_parts_rec_tbl, p6_a0
1604 , p6_a1
1605 , p6_a2
1606 , p6_a3
1607 , p6_a4
1608 , p6_a5
1609 , p6_a6
1610 , p6_a7
1611 , p6_a8
1612 , p6_a9
1613 , p6_a10
1614 , p6_a11
1615 , p6_a12
1616 , p6_a13
1617 , p6_a14
1618 , p6_a15
1619 , p6_a16
1620 , p6_a17
1621 , p6_a18
1622 , p6_a19
1623 , p6_a20
1624 , p6_a21
1625 , p6_a22
1626 , p6_a23
1627 , p6_a24
1628 , p6_a25
1629 , p6_a26
1630 , p6_a27
1631 , p6_a28
1632 , p6_a29
1633 , p6_a30
1634 , p6_a31
1635 , p6_a32
1636 , p6_a33
1637 , p6_a34
1638 , p6_a35
1639 , p6_a36
1640 , p6_a37
1641 , p6_a38
1642 , p6_a39
1643 , p6_a40
1644 , p6_a41
1645 , p6_a42
1646 , p6_a43
1647 , p6_a44
1648 , p6_a45
1649 , p6_a46
1650 , p6_a47
1651 , p6_a48
1652 );
1653
1654 ahl_prd_nonroutine_pvt_w.rosetta_table_copy_in_p4(ddp_mr_asso_tbl, p7_a0
1655 , p7_a1
1656 , p7_a2
1657 , p7_a3
1658 , p7_a4
1659 , p7_a5
1660 , p7_a6
1661 , p7_a7
1662 , p7_a8
1663 , p7_a9
1664 );
1665
1666
1667
1668
1669
1670 -- here's the delegated call to the old PL/SQL routine
1671 ahl_prd_blk_parts_change_pvt.process_part_changes(p_api_version,
1672 p_init_msg_list,
1673 p_commit,
1674 p_validation_level,
1675 p_module_type,
1676 p_default,
1677 ddp_x_parts_rec_tbl,
1678 ddp_mr_asso_tbl,
1679 x_return_status,
1680 x_msg_count,
1681 x_msg_data,
1682 ddx_error_msg_tbl);
1683
1684 -- copy data back from the local variables to OUT or IN-OUT args, if any
1685
1686
1687
1688
1689
1690
1691 ahl_prd_blk_parts_change_pvt_w.rosetta_table_copy_out_p12(ddp_x_parts_rec_tbl, p6_a0
1692 , p6_a1
1693 , p6_a2
1694 , p6_a3
1695 , p6_a4
1696 , p6_a5
1697 , p6_a6
1698 , p6_a7
1699 , p6_a8
1700 , p6_a9
1701 , p6_a10
1702 , p6_a11
1703 , p6_a12
1704 , p6_a13
1705 , p6_a14
1706 , p6_a15
1707 , p6_a16
1708 , p6_a17
1709 , p6_a18
1710 , p6_a19
1711 , p6_a20
1712 , p6_a21
1713 , p6_a22
1714 , p6_a23
1715 , p6_a24
1716 , p6_a25
1717 , p6_a26
1718 , p6_a27
1719 , p6_a28
1720 , p6_a29
1721 , p6_a30
1722 , p6_a31
1723 , p6_a32
1724 , p6_a33
1725 , p6_a34
1726 , p6_a35
1727 , p6_a36
1728 , p6_a37
1729 , p6_a38
1730 , p6_a39
1731 , p6_a40
1732 , p6_a41
1733 , p6_a42
1734 , p6_a43
1735 , p6_a44
1736 , p6_a45
1737 , p6_a46
1738 , p6_a47
1739 , p6_a48
1740 );
1741
1742
1743
1744
1745
1746 ahl_prd_blk_parts_change_pvt_w.rosetta_table_copy_out_p14(ddx_error_msg_tbl, p11_a0
1747 , p11_a1
1748 );
1749 end;
1750
1751 end ahl_prd_blk_parts_change_pvt_w;