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