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