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