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