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