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