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