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