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