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