[Home] [Help]
PACKAGE BODY: APPS.OKL_INDEX_INTERFACES_PUB_W
Source
1 package body okl_index_interfaces_pub_w as
2 /* $Header: OKLUIDIB.pls 120.1 2005/07/14 12:01:32 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 insert_index_interfaces(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 out nocopy NUMBER
28 , p6_a1 out nocopy NUMBER
29 , p6_a2 out nocopy VARCHAR2
30 , p6_a3 out nocopy NUMBER
31 , p6_a4 out nocopy NUMBER
32 , p6_a5 out nocopy VARCHAR2
33 , p6_a6 out nocopy VARCHAR2
34 , p6_a7 out nocopy NUMBER
35 , p6_a8 out nocopy DATE
36 , p6_a9 out nocopy DATE
37 , p6_a10 out nocopy VARCHAR2
38 , p6_a11 out nocopy VARCHAR2
39 , p6_a12 out nocopy VARCHAR2
40 , p6_a13 out nocopy VARCHAR2
41 , p6_a14 out nocopy VARCHAR2
42 , p6_a15 out nocopy VARCHAR2
43 , p6_a16 out nocopy VARCHAR2
44 , p6_a17 out nocopy VARCHAR2
45 , p6_a18 out nocopy VARCHAR2
46 , p6_a19 out nocopy VARCHAR2
47 , p6_a20 out nocopy VARCHAR2
48 , p6_a21 out nocopy VARCHAR2
49 , p6_a22 out nocopy VARCHAR2
50 , p6_a23 out nocopy VARCHAR2
51 , p6_a24 out nocopy VARCHAR2
52 , p6_a25 out nocopy VARCHAR2
53 , p6_a26 out nocopy NUMBER
54 , p6_a27 out nocopy NUMBER
55 , p6_a28 out nocopy NUMBER
56 , p6_a29 out nocopy DATE
57 , p6_a30 out nocopy NUMBER
58 , p6_a31 out nocopy DATE
59 , p6_a32 out nocopy NUMBER
60 , p6_a33 out nocopy DATE
61 , p6_a34 out nocopy NUMBER
62 , p5_a0 NUMBER := 0-1962.0724
63 , p5_a1 NUMBER := 0-1962.0724
64 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
65 , p5_a3 NUMBER := 0-1962.0724
66 , p5_a4 NUMBER := 0-1962.0724
67 , p5_a5 VARCHAR2 := fnd_api.g_miss_char
68 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
69 , p5_a7 NUMBER := 0-1962.0724
70 , p5_a8 DATE := fnd_api.g_miss_date
71 , p5_a9 DATE := fnd_api.g_miss_date
72 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
73 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
74 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
75 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
76 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
77 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
78 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
79 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
80 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
81 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
82 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
83 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
84 , p5_a22 VARCHAR2 := fnd_api.g_miss_char
85 , p5_a23 VARCHAR2 := fnd_api.g_miss_char
86 , p5_a24 VARCHAR2 := fnd_api.g_miss_char
87 , p5_a25 VARCHAR2 := fnd_api.g_miss_char
88 , p5_a26 NUMBER := 0-1962.0724
89 , p5_a27 NUMBER := 0-1962.0724
90 , p5_a28 NUMBER := 0-1962.0724
91 , p5_a29 DATE := fnd_api.g_miss_date
92 , p5_a30 NUMBER := 0-1962.0724
93 , p5_a31 DATE := fnd_api.g_miss_date
94 , p5_a32 NUMBER := 0-1962.0724
95 , p5_a33 DATE := fnd_api.g_miss_date
96 , p5_a34 NUMBER := 0-1962.0724
97 )
98
99 as
100 ddp_idiv_rec okl_index_interfaces_pub.idiv_rec_type;
101 ddx_idiv_rec okl_index_interfaces_pub.idiv_rec_type;
102 ddindx binary_integer; indx binary_integer;
103 begin
104
105 -- copy data to the local IN or IN-OUT args, if any
106
107
108
109
110
111 ddp_idiv_rec.id := rosetta_g_miss_num_map(p5_a0);
112 ddp_idiv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
113 ddp_idiv_rec.idi_type := p5_a2;
114 ddp_idiv_rec.process_flag := rosetta_g_miss_num_map(p5_a3);
115 ddp_idiv_rec.proportion_contributed := rosetta_g_miss_num_map(p5_a4);
116 ddp_idiv_rec.index_name := p5_a5;
117 ddp_idiv_rec.description := p5_a6;
118 ddp_idiv_rec.value := rosetta_g_miss_num_map(p5_a7);
119 ddp_idiv_rec.datetime_valid := rosetta_g_miss_date_in_map(p5_a8);
120 ddp_idiv_rec.datetime_invalid := rosetta_g_miss_date_in_map(p5_a9);
121 ddp_idiv_rec.attribute_category := p5_a10;
122 ddp_idiv_rec.attribute1 := p5_a11;
123 ddp_idiv_rec.attribute2 := p5_a12;
124 ddp_idiv_rec.attribute3 := p5_a13;
125 ddp_idiv_rec.attribute4 := p5_a14;
126 ddp_idiv_rec.attribute5 := p5_a15;
127 ddp_idiv_rec.attribute6 := p5_a16;
128 ddp_idiv_rec.attribute7 := p5_a17;
129 ddp_idiv_rec.attribute8 := p5_a18;
130 ddp_idiv_rec.attribute9 := p5_a19;
131 ddp_idiv_rec.attribute10 := p5_a20;
132 ddp_idiv_rec.attribute11 := p5_a21;
133 ddp_idiv_rec.attribute12 := p5_a22;
134 ddp_idiv_rec.attribute13 := p5_a23;
135 ddp_idiv_rec.attribute14 := p5_a24;
136 ddp_idiv_rec.attribute15 := p5_a25;
137 ddp_idiv_rec.program_id := rosetta_g_miss_num_map(p5_a26);
138 ddp_idiv_rec.request_id := rosetta_g_miss_num_map(p5_a27);
139 ddp_idiv_rec.program_application_id := rosetta_g_miss_num_map(p5_a28);
140 ddp_idiv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a29);
141 ddp_idiv_rec.created_by := rosetta_g_miss_num_map(p5_a30);
142 ddp_idiv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a31);
143 ddp_idiv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a32);
144 ddp_idiv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a33);
145 ddp_idiv_rec.last_update_login := rosetta_g_miss_num_map(p5_a34);
146
147
148 -- here's the delegated call to the old PL/SQL routine
149 okl_index_interfaces_pub.insert_index_interfaces(p_api_version,
150 p_init_msg_list,
151 x_return_status,
152 x_msg_count,
153 x_msg_data,
154 ddp_idiv_rec,
155 ddx_idiv_rec);
156
157 -- copy data back from the local variables to OUT or IN-OUT args, if any
158
159
160
161
162
163
164 p6_a0 := rosetta_g_miss_num_map(ddx_idiv_rec.id);
165 p6_a1 := rosetta_g_miss_num_map(ddx_idiv_rec.object_version_number);
166 p6_a2 := ddx_idiv_rec.idi_type;
167 p6_a3 := rosetta_g_miss_num_map(ddx_idiv_rec.process_flag);
168 p6_a4 := rosetta_g_miss_num_map(ddx_idiv_rec.proportion_contributed);
169 p6_a5 := ddx_idiv_rec.index_name;
170 p6_a6 := ddx_idiv_rec.description;
171 p6_a7 := rosetta_g_miss_num_map(ddx_idiv_rec.value);
172 p6_a8 := ddx_idiv_rec.datetime_valid;
173 p6_a9 := ddx_idiv_rec.datetime_invalid;
174 p6_a10 := ddx_idiv_rec.attribute_category;
175 p6_a11 := ddx_idiv_rec.attribute1;
176 p6_a12 := ddx_idiv_rec.attribute2;
177 p6_a13 := ddx_idiv_rec.attribute3;
178 p6_a14 := ddx_idiv_rec.attribute4;
179 p6_a15 := ddx_idiv_rec.attribute5;
180 p6_a16 := ddx_idiv_rec.attribute6;
181 p6_a17 := ddx_idiv_rec.attribute7;
182 p6_a18 := ddx_idiv_rec.attribute8;
183 p6_a19 := ddx_idiv_rec.attribute9;
184 p6_a20 := ddx_idiv_rec.attribute10;
185 p6_a21 := ddx_idiv_rec.attribute11;
186 p6_a22 := ddx_idiv_rec.attribute12;
187 p6_a23 := ddx_idiv_rec.attribute13;
188 p6_a24 := ddx_idiv_rec.attribute14;
189 p6_a25 := ddx_idiv_rec.attribute15;
190 p6_a26 := rosetta_g_miss_num_map(ddx_idiv_rec.program_id);
191 p6_a27 := rosetta_g_miss_num_map(ddx_idiv_rec.request_id);
192 p6_a28 := rosetta_g_miss_num_map(ddx_idiv_rec.program_application_id);
193 p6_a29 := ddx_idiv_rec.program_update_date;
194 p6_a30 := rosetta_g_miss_num_map(ddx_idiv_rec.created_by);
195 p6_a31 := ddx_idiv_rec.creation_date;
196 p6_a32 := rosetta_g_miss_num_map(ddx_idiv_rec.last_updated_by);
197 p6_a33 := ddx_idiv_rec.last_update_date;
198 p6_a34 := rosetta_g_miss_num_map(ddx_idiv_rec.last_update_login);
199 end;
200
201 procedure insert_index_interfaces(p_api_version NUMBER
202 , p_init_msg_list VARCHAR2
203 , x_return_status out nocopy VARCHAR2
204 , x_msg_count out nocopy NUMBER
205 , x_msg_data out nocopy VARCHAR2
206 , p5_a0 JTF_NUMBER_TABLE
207 , p5_a1 JTF_NUMBER_TABLE
208 , p5_a2 JTF_VARCHAR2_TABLE_200
209 , p5_a3 JTF_NUMBER_TABLE
210 , p5_a4 JTF_NUMBER_TABLE
211 , p5_a5 JTF_VARCHAR2_TABLE_200
212 , p5_a6 JTF_VARCHAR2_TABLE_2000
213 , p5_a7 JTF_NUMBER_TABLE
214 , p5_a8 JTF_DATE_TABLE
215 , p5_a9 JTF_DATE_TABLE
216 , p5_a10 JTF_VARCHAR2_TABLE_100
217 , p5_a11 JTF_VARCHAR2_TABLE_500
218 , p5_a12 JTF_VARCHAR2_TABLE_500
219 , p5_a13 JTF_VARCHAR2_TABLE_500
220 , p5_a14 JTF_VARCHAR2_TABLE_500
221 , p5_a15 JTF_VARCHAR2_TABLE_500
222 , p5_a16 JTF_VARCHAR2_TABLE_500
223 , p5_a17 JTF_VARCHAR2_TABLE_500
224 , p5_a18 JTF_VARCHAR2_TABLE_500
225 , p5_a19 JTF_VARCHAR2_TABLE_500
226 , p5_a20 JTF_VARCHAR2_TABLE_500
227 , p5_a21 JTF_VARCHAR2_TABLE_500
228 , p5_a22 JTF_VARCHAR2_TABLE_500
229 , p5_a23 JTF_VARCHAR2_TABLE_500
230 , p5_a24 JTF_VARCHAR2_TABLE_500
231 , p5_a25 JTF_VARCHAR2_TABLE_500
232 , p5_a26 JTF_NUMBER_TABLE
233 , p5_a27 JTF_NUMBER_TABLE
234 , p5_a28 JTF_NUMBER_TABLE
235 , p5_a29 JTF_DATE_TABLE
236 , p5_a30 JTF_NUMBER_TABLE
237 , p5_a31 JTF_DATE_TABLE
238 , p5_a32 JTF_NUMBER_TABLE
239 , p5_a33 JTF_DATE_TABLE
240 , p5_a34 JTF_NUMBER_TABLE
241 , p6_a0 out nocopy JTF_NUMBER_TABLE
242 , p6_a1 out nocopy JTF_NUMBER_TABLE
243 , p6_a2 out nocopy JTF_VARCHAR2_TABLE_200
244 , p6_a3 out nocopy JTF_NUMBER_TABLE
245 , p6_a4 out nocopy JTF_NUMBER_TABLE
246 , p6_a5 out nocopy JTF_VARCHAR2_TABLE_200
247 , p6_a6 out nocopy JTF_VARCHAR2_TABLE_2000
248 , p6_a7 out nocopy JTF_NUMBER_TABLE
249 , p6_a8 out nocopy JTF_DATE_TABLE
250 , p6_a9 out nocopy JTF_DATE_TABLE
251 , p6_a10 out nocopy JTF_VARCHAR2_TABLE_100
252 , p6_a11 out nocopy JTF_VARCHAR2_TABLE_500
253 , p6_a12 out nocopy JTF_VARCHAR2_TABLE_500
254 , p6_a13 out nocopy JTF_VARCHAR2_TABLE_500
255 , p6_a14 out nocopy JTF_VARCHAR2_TABLE_500
256 , p6_a15 out nocopy JTF_VARCHAR2_TABLE_500
257 , p6_a16 out nocopy JTF_VARCHAR2_TABLE_500
258 , p6_a17 out nocopy JTF_VARCHAR2_TABLE_500
259 , p6_a18 out nocopy JTF_VARCHAR2_TABLE_500
260 , p6_a19 out nocopy JTF_VARCHAR2_TABLE_500
261 , p6_a20 out nocopy JTF_VARCHAR2_TABLE_500
262 , p6_a21 out nocopy JTF_VARCHAR2_TABLE_500
263 , p6_a22 out nocopy JTF_VARCHAR2_TABLE_500
264 , p6_a23 out nocopy JTF_VARCHAR2_TABLE_500
265 , p6_a24 out nocopy JTF_VARCHAR2_TABLE_500
266 , p6_a25 out nocopy JTF_VARCHAR2_TABLE_500
267 , p6_a26 out nocopy JTF_NUMBER_TABLE
268 , p6_a27 out nocopy JTF_NUMBER_TABLE
269 , p6_a28 out nocopy JTF_NUMBER_TABLE
270 , p6_a29 out nocopy JTF_DATE_TABLE
271 , p6_a30 out nocopy JTF_NUMBER_TABLE
272 , p6_a31 out nocopy JTF_DATE_TABLE
273 , p6_a32 out nocopy JTF_NUMBER_TABLE
274 , p6_a33 out nocopy JTF_DATE_TABLE
275 , p6_a34 out nocopy JTF_NUMBER_TABLE
276 )
277
278 as
279 ddp_idiv_tbl okl_index_interfaces_pub.idiv_tbl_type;
280 ddx_idiv_tbl okl_index_interfaces_pub.idiv_tbl_type;
281 ddindx binary_integer; indx binary_integer;
282 begin
283
284 -- copy data to the local IN or IN-OUT args, if any
285
286
287
288
289
290 okl_idi_pvt_w.rosetta_table_copy_in_p5(ddp_idiv_tbl, p5_a0
291 , p5_a1
292 , p5_a2
293 , p5_a3
294 , p5_a4
295 , p5_a5
296 , p5_a6
297 , p5_a7
298 , p5_a8
299 , p5_a9
300 , p5_a10
301 , p5_a11
302 , p5_a12
303 , p5_a13
304 , p5_a14
305 , p5_a15
306 , p5_a16
307 , p5_a17
308 , p5_a18
309 , p5_a19
310 , p5_a20
311 , p5_a21
312 , p5_a22
313 , p5_a23
314 , p5_a24
315 , p5_a25
316 , p5_a26
317 , p5_a27
318 , p5_a28
319 , p5_a29
320 , p5_a30
321 , p5_a31
322 , p5_a32
323 , p5_a33
324 , p5_a34
325 );
326
327
328 -- here's the delegated call to the old PL/SQL routine
329 okl_index_interfaces_pub.insert_index_interfaces(p_api_version,
330 p_init_msg_list,
331 x_return_status,
332 x_msg_count,
333 x_msg_data,
334 ddp_idiv_tbl,
335 ddx_idiv_tbl);
336
337 -- copy data back from the local variables to OUT or IN-OUT args, if any
338
339
340
341
342
343
344 okl_idi_pvt_w.rosetta_table_copy_out_p5(ddx_idiv_tbl, p6_a0
345 , p6_a1
346 , p6_a2
347 , p6_a3
348 , p6_a4
349 , p6_a5
350 , p6_a6
351 , p6_a7
352 , p6_a8
353 , p6_a9
354 , p6_a10
355 , p6_a11
356 , p6_a12
357 , p6_a13
358 , p6_a14
359 , p6_a15
360 , p6_a16
361 , p6_a17
362 , p6_a18
363 , p6_a19
364 , p6_a20
365 , p6_a21
366 , p6_a22
367 , p6_a23
368 , p6_a24
369 , p6_a25
370 , p6_a26
371 , p6_a27
372 , p6_a28
373 , p6_a29
374 , p6_a30
375 , p6_a31
376 , p6_a32
377 , p6_a33
378 , p6_a34
379 );
380 end;
381
382 procedure lock_index_interfaces(p_api_version NUMBER
383 , p_init_msg_list VARCHAR2
384 , x_return_status out nocopy VARCHAR2
385 , x_msg_count out nocopy NUMBER
386 , x_msg_data out nocopy VARCHAR2
387 , p5_a0 NUMBER := 0-1962.0724
388 , p5_a1 NUMBER := 0-1962.0724
389 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
390 , p5_a3 NUMBER := 0-1962.0724
391 , p5_a4 NUMBER := 0-1962.0724
392 , p5_a5 VARCHAR2 := fnd_api.g_miss_char
393 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
394 , p5_a7 NUMBER := 0-1962.0724
395 , p5_a8 DATE := fnd_api.g_miss_date
396 , p5_a9 DATE := fnd_api.g_miss_date
397 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
398 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
399 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
400 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
401 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
402 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
403 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
404 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
405 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
406 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
407 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
408 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
409 , p5_a22 VARCHAR2 := fnd_api.g_miss_char
410 , p5_a23 VARCHAR2 := fnd_api.g_miss_char
411 , p5_a24 VARCHAR2 := fnd_api.g_miss_char
412 , p5_a25 VARCHAR2 := fnd_api.g_miss_char
413 , p5_a26 NUMBER := 0-1962.0724
414 , p5_a27 NUMBER := 0-1962.0724
415 , p5_a28 NUMBER := 0-1962.0724
416 , p5_a29 DATE := fnd_api.g_miss_date
417 , p5_a30 NUMBER := 0-1962.0724
418 , p5_a31 DATE := fnd_api.g_miss_date
419 , p5_a32 NUMBER := 0-1962.0724
420 , p5_a33 DATE := fnd_api.g_miss_date
421 , p5_a34 NUMBER := 0-1962.0724
422 )
423
424 as
425 ddp_idiv_rec okl_index_interfaces_pub.idiv_rec_type;
426 ddindx binary_integer; indx binary_integer;
427 begin
428
429 -- copy data to the local IN or IN-OUT args, if any
430
431
432
433
434
435 ddp_idiv_rec.id := rosetta_g_miss_num_map(p5_a0);
436 ddp_idiv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
437 ddp_idiv_rec.idi_type := p5_a2;
438 ddp_idiv_rec.process_flag := rosetta_g_miss_num_map(p5_a3);
439 ddp_idiv_rec.proportion_contributed := rosetta_g_miss_num_map(p5_a4);
440 ddp_idiv_rec.index_name := p5_a5;
441 ddp_idiv_rec.description := p5_a6;
442 ddp_idiv_rec.value := rosetta_g_miss_num_map(p5_a7);
443 ddp_idiv_rec.datetime_valid := rosetta_g_miss_date_in_map(p5_a8);
444 ddp_idiv_rec.datetime_invalid := rosetta_g_miss_date_in_map(p5_a9);
445 ddp_idiv_rec.attribute_category := p5_a10;
446 ddp_idiv_rec.attribute1 := p5_a11;
447 ddp_idiv_rec.attribute2 := p5_a12;
448 ddp_idiv_rec.attribute3 := p5_a13;
449 ddp_idiv_rec.attribute4 := p5_a14;
450 ddp_idiv_rec.attribute5 := p5_a15;
451 ddp_idiv_rec.attribute6 := p5_a16;
452 ddp_idiv_rec.attribute7 := p5_a17;
453 ddp_idiv_rec.attribute8 := p5_a18;
454 ddp_idiv_rec.attribute9 := p5_a19;
455 ddp_idiv_rec.attribute10 := p5_a20;
456 ddp_idiv_rec.attribute11 := p5_a21;
457 ddp_idiv_rec.attribute12 := p5_a22;
458 ddp_idiv_rec.attribute13 := p5_a23;
459 ddp_idiv_rec.attribute14 := p5_a24;
460 ddp_idiv_rec.attribute15 := p5_a25;
461 ddp_idiv_rec.program_id := rosetta_g_miss_num_map(p5_a26);
462 ddp_idiv_rec.request_id := rosetta_g_miss_num_map(p5_a27);
463 ddp_idiv_rec.program_application_id := rosetta_g_miss_num_map(p5_a28);
464 ddp_idiv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a29);
465 ddp_idiv_rec.created_by := rosetta_g_miss_num_map(p5_a30);
466 ddp_idiv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a31);
467 ddp_idiv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a32);
468 ddp_idiv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a33);
469 ddp_idiv_rec.last_update_login := rosetta_g_miss_num_map(p5_a34);
470
471 -- here's the delegated call to the old PL/SQL routine
472 okl_index_interfaces_pub.lock_index_interfaces(p_api_version,
473 p_init_msg_list,
474 x_return_status,
475 x_msg_count,
476 x_msg_data,
477 ddp_idiv_rec);
478
479 -- copy data back from the local variables to OUT or IN-OUT args, if any
480
481
482
483
484
485 end;
486
487 procedure lock_index_interfaces(p_api_version NUMBER
488 , p_init_msg_list VARCHAR2
489 , x_return_status out nocopy VARCHAR2
490 , x_msg_count out nocopy NUMBER
491 , x_msg_data out nocopy VARCHAR2
492 , p5_a0 JTF_NUMBER_TABLE
493 , p5_a1 JTF_NUMBER_TABLE
494 , p5_a2 JTF_VARCHAR2_TABLE_200
495 , p5_a3 JTF_NUMBER_TABLE
496 , p5_a4 JTF_NUMBER_TABLE
497 , p5_a5 JTF_VARCHAR2_TABLE_200
498 , p5_a6 JTF_VARCHAR2_TABLE_2000
499 , p5_a7 JTF_NUMBER_TABLE
500 , p5_a8 JTF_DATE_TABLE
501 , p5_a9 JTF_DATE_TABLE
502 , p5_a10 JTF_VARCHAR2_TABLE_100
503 , p5_a11 JTF_VARCHAR2_TABLE_500
504 , p5_a12 JTF_VARCHAR2_TABLE_500
505 , p5_a13 JTF_VARCHAR2_TABLE_500
506 , p5_a14 JTF_VARCHAR2_TABLE_500
507 , p5_a15 JTF_VARCHAR2_TABLE_500
508 , p5_a16 JTF_VARCHAR2_TABLE_500
509 , p5_a17 JTF_VARCHAR2_TABLE_500
510 , p5_a18 JTF_VARCHAR2_TABLE_500
511 , p5_a19 JTF_VARCHAR2_TABLE_500
512 , p5_a20 JTF_VARCHAR2_TABLE_500
513 , p5_a21 JTF_VARCHAR2_TABLE_500
514 , p5_a22 JTF_VARCHAR2_TABLE_500
515 , p5_a23 JTF_VARCHAR2_TABLE_500
516 , p5_a24 JTF_VARCHAR2_TABLE_500
517 , p5_a25 JTF_VARCHAR2_TABLE_500
518 , p5_a26 JTF_NUMBER_TABLE
519 , p5_a27 JTF_NUMBER_TABLE
520 , p5_a28 JTF_NUMBER_TABLE
521 , p5_a29 JTF_DATE_TABLE
522 , p5_a30 JTF_NUMBER_TABLE
523 , p5_a31 JTF_DATE_TABLE
524 , p5_a32 JTF_NUMBER_TABLE
525 , p5_a33 JTF_DATE_TABLE
526 , p5_a34 JTF_NUMBER_TABLE
527 )
528
529 as
530 ddp_idiv_tbl okl_index_interfaces_pub.idiv_tbl_type;
531 ddindx binary_integer; indx binary_integer;
532 begin
533
534 -- copy data to the local IN or IN-OUT args, if any
535
536
537
538
539
540 okl_idi_pvt_w.rosetta_table_copy_in_p5(ddp_idiv_tbl, p5_a0
541 , p5_a1
542 , p5_a2
543 , p5_a3
544 , p5_a4
545 , p5_a5
546 , p5_a6
547 , p5_a7
548 , p5_a8
549 , p5_a9
550 , p5_a10
551 , p5_a11
552 , p5_a12
553 , p5_a13
554 , p5_a14
555 , p5_a15
556 , p5_a16
557 , p5_a17
558 , p5_a18
559 , p5_a19
560 , p5_a20
561 , p5_a21
562 , p5_a22
563 , p5_a23
564 , p5_a24
565 , p5_a25
566 , p5_a26
567 , p5_a27
568 , p5_a28
569 , p5_a29
570 , p5_a30
571 , p5_a31
572 , p5_a32
573 , p5_a33
574 , p5_a34
575 );
576
577 -- here's the delegated call to the old PL/SQL routine
578 okl_index_interfaces_pub.lock_index_interfaces(p_api_version,
579 p_init_msg_list,
580 x_return_status,
581 x_msg_count,
582 x_msg_data,
583 ddp_idiv_tbl);
584
585 -- copy data back from the local variables to OUT or IN-OUT args, if any
586
587
588
589
590
591 end;
592
593 procedure update_index_interfaces(p_api_version NUMBER
594 , p_init_msg_list VARCHAR2
595 , x_return_status out nocopy VARCHAR2
596 , x_msg_count out nocopy NUMBER
597 , x_msg_data out nocopy VARCHAR2
598 , p6_a0 out nocopy NUMBER
599 , p6_a1 out nocopy NUMBER
600 , p6_a2 out nocopy VARCHAR2
601 , p6_a3 out nocopy NUMBER
602 , p6_a4 out nocopy NUMBER
603 , p6_a5 out nocopy VARCHAR2
604 , p6_a6 out nocopy VARCHAR2
605 , p6_a7 out nocopy NUMBER
606 , p6_a8 out nocopy DATE
607 , p6_a9 out nocopy DATE
608 , p6_a10 out nocopy VARCHAR2
609 , p6_a11 out nocopy VARCHAR2
610 , p6_a12 out nocopy VARCHAR2
611 , p6_a13 out nocopy VARCHAR2
612 , p6_a14 out nocopy VARCHAR2
613 , p6_a15 out nocopy VARCHAR2
614 , p6_a16 out nocopy VARCHAR2
615 , p6_a17 out nocopy VARCHAR2
616 , p6_a18 out nocopy VARCHAR2
617 , p6_a19 out nocopy VARCHAR2
618 , p6_a20 out nocopy VARCHAR2
619 , p6_a21 out nocopy VARCHAR2
620 , p6_a22 out nocopy VARCHAR2
621 , p6_a23 out nocopy VARCHAR2
622 , p6_a24 out nocopy VARCHAR2
623 , p6_a25 out nocopy VARCHAR2
624 , p6_a26 out nocopy NUMBER
625 , p6_a27 out nocopy NUMBER
626 , p6_a28 out nocopy NUMBER
627 , p6_a29 out nocopy DATE
628 , p6_a30 out nocopy NUMBER
629 , p6_a31 out nocopy DATE
630 , p6_a32 out nocopy NUMBER
631 , p6_a33 out nocopy DATE
632 , p6_a34 out nocopy NUMBER
633 , p5_a0 NUMBER := 0-1962.0724
634 , p5_a1 NUMBER := 0-1962.0724
635 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
636 , p5_a3 NUMBER := 0-1962.0724
637 , p5_a4 NUMBER := 0-1962.0724
638 , p5_a5 VARCHAR2 := fnd_api.g_miss_char
639 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
640 , p5_a7 NUMBER := 0-1962.0724
641 , p5_a8 DATE := fnd_api.g_miss_date
642 , p5_a9 DATE := fnd_api.g_miss_date
643 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
644 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
645 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
646 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
647 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
648 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
649 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
650 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
651 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
652 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
653 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
654 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
655 , p5_a22 VARCHAR2 := fnd_api.g_miss_char
656 , p5_a23 VARCHAR2 := fnd_api.g_miss_char
657 , p5_a24 VARCHAR2 := fnd_api.g_miss_char
658 , p5_a25 VARCHAR2 := fnd_api.g_miss_char
659 , p5_a26 NUMBER := 0-1962.0724
660 , p5_a27 NUMBER := 0-1962.0724
661 , p5_a28 NUMBER := 0-1962.0724
662 , p5_a29 DATE := fnd_api.g_miss_date
663 , p5_a30 NUMBER := 0-1962.0724
664 , p5_a31 DATE := fnd_api.g_miss_date
665 , p5_a32 NUMBER := 0-1962.0724
666 , p5_a33 DATE := fnd_api.g_miss_date
667 , p5_a34 NUMBER := 0-1962.0724
668 )
669
670 as
671 ddp_idiv_rec okl_index_interfaces_pub.idiv_rec_type;
672 ddx_idiv_rec okl_index_interfaces_pub.idiv_rec_type;
673 ddindx binary_integer; indx binary_integer;
674 begin
675
676 -- copy data to the local IN or IN-OUT args, if any
677
678
679
680
681
682 ddp_idiv_rec.id := rosetta_g_miss_num_map(p5_a0);
683 ddp_idiv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
684 ddp_idiv_rec.idi_type := p5_a2;
685 ddp_idiv_rec.process_flag := rosetta_g_miss_num_map(p5_a3);
686 ddp_idiv_rec.proportion_contributed := rosetta_g_miss_num_map(p5_a4);
687 ddp_idiv_rec.index_name := p5_a5;
688 ddp_idiv_rec.description := p5_a6;
689 ddp_idiv_rec.value := rosetta_g_miss_num_map(p5_a7);
690 ddp_idiv_rec.datetime_valid := rosetta_g_miss_date_in_map(p5_a8);
691 ddp_idiv_rec.datetime_invalid := rosetta_g_miss_date_in_map(p5_a9);
692 ddp_idiv_rec.attribute_category := p5_a10;
693 ddp_idiv_rec.attribute1 := p5_a11;
694 ddp_idiv_rec.attribute2 := p5_a12;
695 ddp_idiv_rec.attribute3 := p5_a13;
696 ddp_idiv_rec.attribute4 := p5_a14;
697 ddp_idiv_rec.attribute5 := p5_a15;
698 ddp_idiv_rec.attribute6 := p5_a16;
699 ddp_idiv_rec.attribute7 := p5_a17;
700 ddp_idiv_rec.attribute8 := p5_a18;
701 ddp_idiv_rec.attribute9 := p5_a19;
702 ddp_idiv_rec.attribute10 := p5_a20;
703 ddp_idiv_rec.attribute11 := p5_a21;
704 ddp_idiv_rec.attribute12 := p5_a22;
705 ddp_idiv_rec.attribute13 := p5_a23;
706 ddp_idiv_rec.attribute14 := p5_a24;
707 ddp_idiv_rec.attribute15 := p5_a25;
708 ddp_idiv_rec.program_id := rosetta_g_miss_num_map(p5_a26);
709 ddp_idiv_rec.request_id := rosetta_g_miss_num_map(p5_a27);
710 ddp_idiv_rec.program_application_id := rosetta_g_miss_num_map(p5_a28);
711 ddp_idiv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a29);
712 ddp_idiv_rec.created_by := rosetta_g_miss_num_map(p5_a30);
713 ddp_idiv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a31);
714 ddp_idiv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a32);
715 ddp_idiv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a33);
716 ddp_idiv_rec.last_update_login := rosetta_g_miss_num_map(p5_a34);
717
718
719 -- here's the delegated call to the old PL/SQL routine
720 okl_index_interfaces_pub.update_index_interfaces(p_api_version,
721 p_init_msg_list,
722 x_return_status,
723 x_msg_count,
724 x_msg_data,
725 ddp_idiv_rec,
726 ddx_idiv_rec);
727
728 -- copy data back from the local variables to OUT or IN-OUT args, if any
729
730
731
732
733
734
735 p6_a0 := rosetta_g_miss_num_map(ddx_idiv_rec.id);
736 p6_a1 := rosetta_g_miss_num_map(ddx_idiv_rec.object_version_number);
737 p6_a2 := ddx_idiv_rec.idi_type;
738 p6_a3 := rosetta_g_miss_num_map(ddx_idiv_rec.process_flag);
739 p6_a4 := rosetta_g_miss_num_map(ddx_idiv_rec.proportion_contributed);
740 p6_a5 := ddx_idiv_rec.index_name;
741 p6_a6 := ddx_idiv_rec.description;
742 p6_a7 := rosetta_g_miss_num_map(ddx_idiv_rec.value);
743 p6_a8 := ddx_idiv_rec.datetime_valid;
744 p6_a9 := ddx_idiv_rec.datetime_invalid;
745 p6_a10 := ddx_idiv_rec.attribute_category;
746 p6_a11 := ddx_idiv_rec.attribute1;
747 p6_a12 := ddx_idiv_rec.attribute2;
748 p6_a13 := ddx_idiv_rec.attribute3;
749 p6_a14 := ddx_idiv_rec.attribute4;
750 p6_a15 := ddx_idiv_rec.attribute5;
751 p6_a16 := ddx_idiv_rec.attribute6;
752 p6_a17 := ddx_idiv_rec.attribute7;
753 p6_a18 := ddx_idiv_rec.attribute8;
754 p6_a19 := ddx_idiv_rec.attribute9;
755 p6_a20 := ddx_idiv_rec.attribute10;
756 p6_a21 := ddx_idiv_rec.attribute11;
757 p6_a22 := ddx_idiv_rec.attribute12;
758 p6_a23 := ddx_idiv_rec.attribute13;
759 p6_a24 := ddx_idiv_rec.attribute14;
760 p6_a25 := ddx_idiv_rec.attribute15;
761 p6_a26 := rosetta_g_miss_num_map(ddx_idiv_rec.program_id);
762 p6_a27 := rosetta_g_miss_num_map(ddx_idiv_rec.request_id);
763 p6_a28 := rosetta_g_miss_num_map(ddx_idiv_rec.program_application_id);
764 p6_a29 := ddx_idiv_rec.program_update_date;
765 p6_a30 := rosetta_g_miss_num_map(ddx_idiv_rec.created_by);
766 p6_a31 := ddx_idiv_rec.creation_date;
767 p6_a32 := rosetta_g_miss_num_map(ddx_idiv_rec.last_updated_by);
768 p6_a33 := ddx_idiv_rec.last_update_date;
769 p6_a34 := rosetta_g_miss_num_map(ddx_idiv_rec.last_update_login);
770 end;
771
772 procedure update_index_interfaces(p_api_version NUMBER
773 , p_init_msg_list VARCHAR2
774 , x_return_status out nocopy VARCHAR2
775 , x_msg_count out nocopy NUMBER
776 , x_msg_data out nocopy VARCHAR2
777 , p5_a0 JTF_NUMBER_TABLE
778 , p5_a1 JTF_NUMBER_TABLE
779 , p5_a2 JTF_VARCHAR2_TABLE_200
780 , p5_a3 JTF_NUMBER_TABLE
781 , p5_a4 JTF_NUMBER_TABLE
782 , p5_a5 JTF_VARCHAR2_TABLE_200
783 , p5_a6 JTF_VARCHAR2_TABLE_2000
784 , p5_a7 JTF_NUMBER_TABLE
785 , p5_a8 JTF_DATE_TABLE
786 , p5_a9 JTF_DATE_TABLE
787 , p5_a10 JTF_VARCHAR2_TABLE_100
788 , p5_a11 JTF_VARCHAR2_TABLE_500
789 , p5_a12 JTF_VARCHAR2_TABLE_500
790 , p5_a13 JTF_VARCHAR2_TABLE_500
791 , p5_a14 JTF_VARCHAR2_TABLE_500
792 , p5_a15 JTF_VARCHAR2_TABLE_500
793 , p5_a16 JTF_VARCHAR2_TABLE_500
794 , p5_a17 JTF_VARCHAR2_TABLE_500
795 , p5_a18 JTF_VARCHAR2_TABLE_500
796 , p5_a19 JTF_VARCHAR2_TABLE_500
797 , p5_a20 JTF_VARCHAR2_TABLE_500
798 , p5_a21 JTF_VARCHAR2_TABLE_500
799 , p5_a22 JTF_VARCHAR2_TABLE_500
800 , p5_a23 JTF_VARCHAR2_TABLE_500
801 , p5_a24 JTF_VARCHAR2_TABLE_500
802 , p5_a25 JTF_VARCHAR2_TABLE_500
803 , p5_a26 JTF_NUMBER_TABLE
804 , p5_a27 JTF_NUMBER_TABLE
805 , p5_a28 JTF_NUMBER_TABLE
806 , p5_a29 JTF_DATE_TABLE
807 , p5_a30 JTF_NUMBER_TABLE
808 , p5_a31 JTF_DATE_TABLE
809 , p5_a32 JTF_NUMBER_TABLE
810 , p5_a33 JTF_DATE_TABLE
811 , p5_a34 JTF_NUMBER_TABLE
812 , p6_a0 out nocopy JTF_NUMBER_TABLE
813 , p6_a1 out nocopy JTF_NUMBER_TABLE
814 , p6_a2 out nocopy JTF_VARCHAR2_TABLE_200
815 , p6_a3 out nocopy JTF_NUMBER_TABLE
816 , p6_a4 out nocopy JTF_NUMBER_TABLE
817 , p6_a5 out nocopy JTF_VARCHAR2_TABLE_200
818 , p6_a6 out nocopy JTF_VARCHAR2_TABLE_2000
819 , p6_a7 out nocopy JTF_NUMBER_TABLE
820 , p6_a8 out nocopy JTF_DATE_TABLE
821 , p6_a9 out nocopy JTF_DATE_TABLE
822 , p6_a10 out nocopy JTF_VARCHAR2_TABLE_100
823 , p6_a11 out nocopy JTF_VARCHAR2_TABLE_500
824 , p6_a12 out nocopy JTF_VARCHAR2_TABLE_500
825 , p6_a13 out nocopy JTF_VARCHAR2_TABLE_500
826 , p6_a14 out nocopy JTF_VARCHAR2_TABLE_500
827 , p6_a15 out nocopy JTF_VARCHAR2_TABLE_500
828 , p6_a16 out nocopy JTF_VARCHAR2_TABLE_500
829 , p6_a17 out nocopy JTF_VARCHAR2_TABLE_500
830 , p6_a18 out nocopy JTF_VARCHAR2_TABLE_500
831 , p6_a19 out nocopy JTF_VARCHAR2_TABLE_500
832 , p6_a20 out nocopy JTF_VARCHAR2_TABLE_500
833 , p6_a21 out nocopy JTF_VARCHAR2_TABLE_500
834 , p6_a22 out nocopy JTF_VARCHAR2_TABLE_500
835 , p6_a23 out nocopy JTF_VARCHAR2_TABLE_500
836 , p6_a24 out nocopy JTF_VARCHAR2_TABLE_500
837 , p6_a25 out nocopy JTF_VARCHAR2_TABLE_500
838 , p6_a26 out nocopy JTF_NUMBER_TABLE
839 , p6_a27 out nocopy JTF_NUMBER_TABLE
840 , p6_a28 out nocopy JTF_NUMBER_TABLE
841 , p6_a29 out nocopy JTF_DATE_TABLE
842 , p6_a30 out nocopy JTF_NUMBER_TABLE
843 , p6_a31 out nocopy JTF_DATE_TABLE
844 , p6_a32 out nocopy JTF_NUMBER_TABLE
845 , p6_a33 out nocopy JTF_DATE_TABLE
846 , p6_a34 out nocopy JTF_NUMBER_TABLE
847 )
848
849 as
850 ddp_idiv_tbl okl_index_interfaces_pub.idiv_tbl_type;
851 ddx_idiv_tbl okl_index_interfaces_pub.idiv_tbl_type;
852 ddindx binary_integer; indx binary_integer;
853 begin
854
855 -- copy data to the local IN or IN-OUT args, if any
856
857
858
859
860
861 okl_idi_pvt_w.rosetta_table_copy_in_p5(ddp_idiv_tbl, p5_a0
862 , p5_a1
863 , p5_a2
864 , p5_a3
865 , p5_a4
866 , p5_a5
867 , p5_a6
868 , p5_a7
869 , p5_a8
870 , p5_a9
871 , p5_a10
872 , p5_a11
873 , p5_a12
874 , p5_a13
875 , p5_a14
876 , p5_a15
877 , p5_a16
878 , p5_a17
879 , p5_a18
880 , p5_a19
881 , p5_a20
882 , p5_a21
883 , p5_a22
884 , p5_a23
885 , p5_a24
886 , p5_a25
887 , p5_a26
888 , p5_a27
889 , p5_a28
890 , p5_a29
891 , p5_a30
892 , p5_a31
893 , p5_a32
894 , p5_a33
895 , p5_a34
896 );
897
898
899 -- here's the delegated call to the old PL/SQL routine
900 okl_index_interfaces_pub.update_index_interfaces(p_api_version,
901 p_init_msg_list,
902 x_return_status,
903 x_msg_count,
904 x_msg_data,
905 ddp_idiv_tbl,
906 ddx_idiv_tbl);
907
908 -- copy data back from the local variables to OUT or IN-OUT args, if any
909
910
911
912
913
914
915 okl_idi_pvt_w.rosetta_table_copy_out_p5(ddx_idiv_tbl, p6_a0
916 , p6_a1
917 , p6_a2
918 , p6_a3
919 , p6_a4
920 , p6_a5
921 , p6_a6
922 , p6_a7
923 , p6_a8
924 , p6_a9
925 , p6_a10
926 , p6_a11
927 , p6_a12
928 , p6_a13
929 , p6_a14
930 , p6_a15
931 , p6_a16
932 , p6_a17
933 , p6_a18
934 , p6_a19
935 , p6_a20
936 , p6_a21
937 , p6_a22
938 , p6_a23
939 , p6_a24
940 , p6_a25
941 , p6_a26
942 , p6_a27
943 , p6_a28
944 , p6_a29
945 , p6_a30
946 , p6_a31
947 , p6_a32
948 , p6_a33
949 , p6_a34
950 );
951 end;
952
953 procedure delete_index_interfaces(p_api_version NUMBER
954 , p_init_msg_list VARCHAR2
955 , x_return_status out nocopy VARCHAR2
956 , x_msg_count out nocopy NUMBER
957 , x_msg_data out nocopy VARCHAR2
958 , p5_a0 NUMBER := 0-1962.0724
959 , p5_a1 NUMBER := 0-1962.0724
960 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
961 , p5_a3 NUMBER := 0-1962.0724
962 , p5_a4 NUMBER := 0-1962.0724
963 , p5_a5 VARCHAR2 := fnd_api.g_miss_char
964 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
965 , p5_a7 NUMBER := 0-1962.0724
966 , p5_a8 DATE := fnd_api.g_miss_date
967 , p5_a9 DATE := fnd_api.g_miss_date
968 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
969 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
970 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
971 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
972 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
973 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
974 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
975 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
976 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
977 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
978 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
979 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
980 , p5_a22 VARCHAR2 := fnd_api.g_miss_char
981 , p5_a23 VARCHAR2 := fnd_api.g_miss_char
982 , p5_a24 VARCHAR2 := fnd_api.g_miss_char
983 , p5_a25 VARCHAR2 := fnd_api.g_miss_char
984 , p5_a26 NUMBER := 0-1962.0724
985 , p5_a27 NUMBER := 0-1962.0724
986 , p5_a28 NUMBER := 0-1962.0724
987 , p5_a29 DATE := fnd_api.g_miss_date
988 , p5_a30 NUMBER := 0-1962.0724
989 , p5_a31 DATE := fnd_api.g_miss_date
990 , p5_a32 NUMBER := 0-1962.0724
991 , p5_a33 DATE := fnd_api.g_miss_date
992 , p5_a34 NUMBER := 0-1962.0724
993 )
994
995 as
996 ddp_idiv_rec okl_index_interfaces_pub.idiv_rec_type;
997 ddindx binary_integer; indx binary_integer;
998 begin
999
1000 -- copy data to the local IN or IN-OUT args, if any
1001
1002
1003
1004
1005
1006 ddp_idiv_rec.id := rosetta_g_miss_num_map(p5_a0);
1007 ddp_idiv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
1008 ddp_idiv_rec.idi_type := p5_a2;
1009 ddp_idiv_rec.process_flag := rosetta_g_miss_num_map(p5_a3);
1010 ddp_idiv_rec.proportion_contributed := rosetta_g_miss_num_map(p5_a4);
1011 ddp_idiv_rec.index_name := p5_a5;
1012 ddp_idiv_rec.description := p5_a6;
1013 ddp_idiv_rec.value := rosetta_g_miss_num_map(p5_a7);
1014 ddp_idiv_rec.datetime_valid := rosetta_g_miss_date_in_map(p5_a8);
1015 ddp_idiv_rec.datetime_invalid := rosetta_g_miss_date_in_map(p5_a9);
1016 ddp_idiv_rec.attribute_category := p5_a10;
1017 ddp_idiv_rec.attribute1 := p5_a11;
1018 ddp_idiv_rec.attribute2 := p5_a12;
1019 ddp_idiv_rec.attribute3 := p5_a13;
1020 ddp_idiv_rec.attribute4 := p5_a14;
1021 ddp_idiv_rec.attribute5 := p5_a15;
1022 ddp_idiv_rec.attribute6 := p5_a16;
1023 ddp_idiv_rec.attribute7 := p5_a17;
1024 ddp_idiv_rec.attribute8 := p5_a18;
1025 ddp_idiv_rec.attribute9 := p5_a19;
1026 ddp_idiv_rec.attribute10 := p5_a20;
1027 ddp_idiv_rec.attribute11 := p5_a21;
1028 ddp_idiv_rec.attribute12 := p5_a22;
1029 ddp_idiv_rec.attribute13 := p5_a23;
1030 ddp_idiv_rec.attribute14 := p5_a24;
1031 ddp_idiv_rec.attribute15 := p5_a25;
1032 ddp_idiv_rec.program_id := rosetta_g_miss_num_map(p5_a26);
1033 ddp_idiv_rec.request_id := rosetta_g_miss_num_map(p5_a27);
1034 ddp_idiv_rec.program_application_id := rosetta_g_miss_num_map(p5_a28);
1035 ddp_idiv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a29);
1036 ddp_idiv_rec.created_by := rosetta_g_miss_num_map(p5_a30);
1037 ddp_idiv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a31);
1038 ddp_idiv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a32);
1039 ddp_idiv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a33);
1040 ddp_idiv_rec.last_update_login := rosetta_g_miss_num_map(p5_a34);
1041
1042 -- here's the delegated call to the old PL/SQL routine
1043 okl_index_interfaces_pub.delete_index_interfaces(p_api_version,
1044 p_init_msg_list,
1045 x_return_status,
1046 x_msg_count,
1047 x_msg_data,
1048 ddp_idiv_rec);
1049
1050 -- copy data back from the local variables to OUT or IN-OUT args, if any
1051
1052
1053
1054
1055
1056 end;
1057
1058 procedure delete_index_interfaces(p_api_version NUMBER
1059 , p_init_msg_list VARCHAR2
1060 , x_return_status out nocopy VARCHAR2
1061 , x_msg_count out nocopy NUMBER
1062 , x_msg_data out nocopy VARCHAR2
1063 , p5_a0 JTF_NUMBER_TABLE
1064 , p5_a1 JTF_NUMBER_TABLE
1065 , p5_a2 JTF_VARCHAR2_TABLE_200
1066 , p5_a3 JTF_NUMBER_TABLE
1067 , p5_a4 JTF_NUMBER_TABLE
1068 , p5_a5 JTF_VARCHAR2_TABLE_200
1069 , p5_a6 JTF_VARCHAR2_TABLE_2000
1070 , p5_a7 JTF_NUMBER_TABLE
1071 , p5_a8 JTF_DATE_TABLE
1072 , p5_a9 JTF_DATE_TABLE
1073 , p5_a10 JTF_VARCHAR2_TABLE_100
1074 , p5_a11 JTF_VARCHAR2_TABLE_500
1075 , p5_a12 JTF_VARCHAR2_TABLE_500
1076 , p5_a13 JTF_VARCHAR2_TABLE_500
1077 , p5_a14 JTF_VARCHAR2_TABLE_500
1078 , p5_a15 JTF_VARCHAR2_TABLE_500
1079 , p5_a16 JTF_VARCHAR2_TABLE_500
1080 , p5_a17 JTF_VARCHAR2_TABLE_500
1081 , p5_a18 JTF_VARCHAR2_TABLE_500
1082 , p5_a19 JTF_VARCHAR2_TABLE_500
1083 , p5_a20 JTF_VARCHAR2_TABLE_500
1084 , p5_a21 JTF_VARCHAR2_TABLE_500
1085 , p5_a22 JTF_VARCHAR2_TABLE_500
1086 , p5_a23 JTF_VARCHAR2_TABLE_500
1087 , p5_a24 JTF_VARCHAR2_TABLE_500
1088 , p5_a25 JTF_VARCHAR2_TABLE_500
1089 , p5_a26 JTF_NUMBER_TABLE
1090 , p5_a27 JTF_NUMBER_TABLE
1091 , p5_a28 JTF_NUMBER_TABLE
1092 , p5_a29 JTF_DATE_TABLE
1093 , p5_a30 JTF_NUMBER_TABLE
1094 , p5_a31 JTF_DATE_TABLE
1095 , p5_a32 JTF_NUMBER_TABLE
1096 , p5_a33 JTF_DATE_TABLE
1097 , p5_a34 JTF_NUMBER_TABLE
1098 )
1099
1100 as
1101 ddp_idiv_tbl okl_index_interfaces_pub.idiv_tbl_type;
1102 ddindx binary_integer; indx binary_integer;
1103 begin
1104
1105 -- copy data to the local IN or IN-OUT args, if any
1106
1107
1108
1109
1110
1111 okl_idi_pvt_w.rosetta_table_copy_in_p5(ddp_idiv_tbl, p5_a0
1112 , p5_a1
1113 , p5_a2
1114 , p5_a3
1115 , p5_a4
1116 , p5_a5
1117 , p5_a6
1118 , p5_a7
1119 , p5_a8
1120 , p5_a9
1121 , p5_a10
1122 , p5_a11
1123 , p5_a12
1124 , p5_a13
1125 , p5_a14
1126 , p5_a15
1127 , p5_a16
1128 , p5_a17
1129 , p5_a18
1130 , p5_a19
1131 , p5_a20
1132 , p5_a21
1133 , p5_a22
1134 , p5_a23
1135 , p5_a24
1136 , p5_a25
1137 , p5_a26
1138 , p5_a27
1139 , p5_a28
1140 , p5_a29
1141 , p5_a30
1142 , p5_a31
1143 , p5_a32
1144 , p5_a33
1145 , p5_a34
1146 );
1147
1148 -- here's the delegated call to the old PL/SQL routine
1149 okl_index_interfaces_pub.delete_index_interfaces(p_api_version,
1150 p_init_msg_list,
1151 x_return_status,
1152 x_msg_count,
1153 x_msg_data,
1154 ddp_idiv_tbl);
1155
1156 -- copy data back from the local variables to OUT or IN-OUT args, if any
1157
1158
1159
1160
1161
1162 end;
1163
1164 procedure validate_index_interfaces(p_api_version NUMBER
1165 , p_init_msg_list VARCHAR2
1166 , x_return_status out nocopy VARCHAR2
1167 , x_msg_count out nocopy NUMBER
1168 , x_msg_data out nocopy VARCHAR2
1169 , p5_a0 NUMBER := 0-1962.0724
1170 , p5_a1 NUMBER := 0-1962.0724
1171 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
1172 , p5_a3 NUMBER := 0-1962.0724
1173 , p5_a4 NUMBER := 0-1962.0724
1174 , p5_a5 VARCHAR2 := fnd_api.g_miss_char
1175 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
1176 , p5_a7 NUMBER := 0-1962.0724
1177 , p5_a8 DATE := fnd_api.g_miss_date
1178 , p5_a9 DATE := fnd_api.g_miss_date
1179 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
1180 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
1181 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
1182 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
1183 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
1184 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
1185 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
1186 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
1187 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
1188 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
1189 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
1190 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
1191 , p5_a22 VARCHAR2 := fnd_api.g_miss_char
1192 , p5_a23 VARCHAR2 := fnd_api.g_miss_char
1193 , p5_a24 VARCHAR2 := fnd_api.g_miss_char
1194 , p5_a25 VARCHAR2 := fnd_api.g_miss_char
1195 , p5_a26 NUMBER := 0-1962.0724
1196 , p5_a27 NUMBER := 0-1962.0724
1197 , p5_a28 NUMBER := 0-1962.0724
1198 , p5_a29 DATE := fnd_api.g_miss_date
1199 , p5_a30 NUMBER := 0-1962.0724
1200 , p5_a31 DATE := fnd_api.g_miss_date
1201 , p5_a32 NUMBER := 0-1962.0724
1202 , p5_a33 DATE := fnd_api.g_miss_date
1203 , p5_a34 NUMBER := 0-1962.0724
1204 )
1205
1206 as
1207 ddp_idiv_rec okl_index_interfaces_pub.idiv_rec_type;
1208 ddindx binary_integer; indx binary_integer;
1209 begin
1210
1211 -- copy data to the local IN or IN-OUT args, if any
1212
1213
1214
1215
1216
1217 ddp_idiv_rec.id := rosetta_g_miss_num_map(p5_a0);
1218 ddp_idiv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
1219 ddp_idiv_rec.idi_type := p5_a2;
1220 ddp_idiv_rec.process_flag := rosetta_g_miss_num_map(p5_a3);
1221 ddp_idiv_rec.proportion_contributed := rosetta_g_miss_num_map(p5_a4);
1222 ddp_idiv_rec.index_name := p5_a5;
1223 ddp_idiv_rec.description := p5_a6;
1224 ddp_idiv_rec.value := rosetta_g_miss_num_map(p5_a7);
1225 ddp_idiv_rec.datetime_valid := rosetta_g_miss_date_in_map(p5_a8);
1226 ddp_idiv_rec.datetime_invalid := rosetta_g_miss_date_in_map(p5_a9);
1227 ddp_idiv_rec.attribute_category := p5_a10;
1228 ddp_idiv_rec.attribute1 := p5_a11;
1229 ddp_idiv_rec.attribute2 := p5_a12;
1230 ddp_idiv_rec.attribute3 := p5_a13;
1231 ddp_idiv_rec.attribute4 := p5_a14;
1232 ddp_idiv_rec.attribute5 := p5_a15;
1233 ddp_idiv_rec.attribute6 := p5_a16;
1234 ddp_idiv_rec.attribute7 := p5_a17;
1235 ddp_idiv_rec.attribute8 := p5_a18;
1236 ddp_idiv_rec.attribute9 := p5_a19;
1237 ddp_idiv_rec.attribute10 := p5_a20;
1238 ddp_idiv_rec.attribute11 := p5_a21;
1239 ddp_idiv_rec.attribute12 := p5_a22;
1240 ddp_idiv_rec.attribute13 := p5_a23;
1241 ddp_idiv_rec.attribute14 := p5_a24;
1242 ddp_idiv_rec.attribute15 := p5_a25;
1243 ddp_idiv_rec.program_id := rosetta_g_miss_num_map(p5_a26);
1244 ddp_idiv_rec.request_id := rosetta_g_miss_num_map(p5_a27);
1245 ddp_idiv_rec.program_application_id := rosetta_g_miss_num_map(p5_a28);
1246 ddp_idiv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a29);
1247 ddp_idiv_rec.created_by := rosetta_g_miss_num_map(p5_a30);
1248 ddp_idiv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a31);
1249 ddp_idiv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a32);
1250 ddp_idiv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a33);
1251 ddp_idiv_rec.last_update_login := rosetta_g_miss_num_map(p5_a34);
1252
1253 -- here's the delegated call to the old PL/SQL routine
1254 okl_index_interfaces_pub.validate_index_interfaces(p_api_version,
1255 p_init_msg_list,
1256 x_return_status,
1257 x_msg_count,
1258 x_msg_data,
1259 ddp_idiv_rec);
1260
1261 -- copy data back from the local variables to OUT or IN-OUT args, if any
1262
1263
1264
1265
1266
1267 end;
1268
1269 procedure validate_index_interfaces(p_api_version NUMBER
1270 , p_init_msg_list VARCHAR2
1271 , x_return_status out nocopy VARCHAR2
1272 , x_msg_count out nocopy NUMBER
1273 , x_msg_data out nocopy VARCHAR2
1274 , p5_a0 JTF_NUMBER_TABLE
1275 , p5_a1 JTF_NUMBER_TABLE
1276 , p5_a2 JTF_VARCHAR2_TABLE_200
1277 , p5_a3 JTF_NUMBER_TABLE
1278 , p5_a4 JTF_NUMBER_TABLE
1279 , p5_a5 JTF_VARCHAR2_TABLE_200
1280 , p5_a6 JTF_VARCHAR2_TABLE_2000
1281 , p5_a7 JTF_NUMBER_TABLE
1282 , p5_a8 JTF_DATE_TABLE
1283 , p5_a9 JTF_DATE_TABLE
1284 , p5_a10 JTF_VARCHAR2_TABLE_100
1285 , p5_a11 JTF_VARCHAR2_TABLE_500
1286 , p5_a12 JTF_VARCHAR2_TABLE_500
1287 , p5_a13 JTF_VARCHAR2_TABLE_500
1288 , p5_a14 JTF_VARCHAR2_TABLE_500
1289 , p5_a15 JTF_VARCHAR2_TABLE_500
1290 , p5_a16 JTF_VARCHAR2_TABLE_500
1291 , p5_a17 JTF_VARCHAR2_TABLE_500
1292 , p5_a18 JTF_VARCHAR2_TABLE_500
1293 , p5_a19 JTF_VARCHAR2_TABLE_500
1294 , p5_a20 JTF_VARCHAR2_TABLE_500
1295 , p5_a21 JTF_VARCHAR2_TABLE_500
1296 , p5_a22 JTF_VARCHAR2_TABLE_500
1297 , p5_a23 JTF_VARCHAR2_TABLE_500
1298 , p5_a24 JTF_VARCHAR2_TABLE_500
1299 , p5_a25 JTF_VARCHAR2_TABLE_500
1300 , p5_a26 JTF_NUMBER_TABLE
1301 , p5_a27 JTF_NUMBER_TABLE
1302 , p5_a28 JTF_NUMBER_TABLE
1303 , p5_a29 JTF_DATE_TABLE
1304 , p5_a30 JTF_NUMBER_TABLE
1305 , p5_a31 JTF_DATE_TABLE
1306 , p5_a32 JTF_NUMBER_TABLE
1307 , p5_a33 JTF_DATE_TABLE
1308 , p5_a34 JTF_NUMBER_TABLE
1309 )
1310
1311 as
1312 ddp_idiv_tbl okl_index_interfaces_pub.idiv_tbl_type;
1313 ddindx binary_integer; indx binary_integer;
1314 begin
1315
1316 -- copy data to the local IN or IN-OUT args, if any
1317
1318
1319
1320
1321
1322 okl_idi_pvt_w.rosetta_table_copy_in_p5(ddp_idiv_tbl, p5_a0
1323 , p5_a1
1324 , p5_a2
1325 , p5_a3
1326 , p5_a4
1327 , p5_a5
1328 , p5_a6
1329 , p5_a7
1330 , p5_a8
1331 , p5_a9
1332 , p5_a10
1333 , p5_a11
1334 , p5_a12
1335 , p5_a13
1336 , p5_a14
1337 , p5_a15
1338 , p5_a16
1339 , p5_a17
1340 , p5_a18
1341 , p5_a19
1342 , p5_a20
1343 , p5_a21
1344 , p5_a22
1345 , p5_a23
1346 , p5_a24
1347 , p5_a25
1348 , p5_a26
1349 , p5_a27
1350 , p5_a28
1351 , p5_a29
1352 , p5_a30
1353 , p5_a31
1354 , p5_a32
1355 , p5_a33
1356 , p5_a34
1357 );
1358
1359 -- here's the delegated call to the old PL/SQL routine
1360 okl_index_interfaces_pub.validate_index_interfaces(p_api_version,
1361 p_init_msg_list,
1362 x_return_status,
1363 x_msg_count,
1364 x_msg_data,
1365 ddp_idiv_tbl);
1366
1367 -- copy data back from the local variables to OUT or IN-OUT args, if any
1368
1369
1370
1371
1372
1373 end;
1374
1375 end okl_index_interfaces_pub_w;