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