[Home] [Help]
PACKAGE BODY: APPS.OKL_SETUPOVERULES_PVT_W
Source
1 package body okl_setupoverules_pvt_w as
2 /* $Header: OKLESODB.pls 115.3 2002/12/24 04:01:54 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 get_rec(x_return_status out nocopy VARCHAR2
23 , x_no_data_found out nocopy number
24 , p3_a0 out nocopy NUMBER
25 , p3_a1 out nocopy VARCHAR2
26 , p3_a2 out nocopy NUMBER
27 , p3_a3 out nocopy NUMBER
28 , p3_a4 out nocopy NUMBER
29 , p3_a5 out nocopy VARCHAR2
30 , p3_a6 out nocopy VARCHAR2
31 , p3_a7 out nocopy NUMBER
32 , p3_a8 out nocopy NUMBER
33 , p3_a9 out nocopy VARCHAR2
34 , p3_a10 out nocopy NUMBER
35 , p3_a11 out nocopy DATE
36 , p3_a12 out nocopy NUMBER
37 , p3_a13 out nocopy DATE
38 , p3_a14 out nocopy NUMBER
39 , p0_a0 NUMBER := 0-1962.0724
40 , p0_a1 VARCHAR2 := fnd_api.g_miss_char
41 , p0_a2 NUMBER := 0-1962.0724
42 , p0_a3 NUMBER := 0-1962.0724
43 , p0_a4 NUMBER := 0-1962.0724
44 , p0_a5 VARCHAR2 := fnd_api.g_miss_char
45 , p0_a6 VARCHAR2 := fnd_api.g_miss_char
46 , p0_a7 NUMBER := 0-1962.0724
47 , p0_a8 NUMBER := 0-1962.0724
48 , p0_a9 VARCHAR2 := fnd_api.g_miss_char
49 , p0_a10 NUMBER := 0-1962.0724
50 , p0_a11 DATE := fnd_api.g_miss_date
51 , p0_a12 NUMBER := 0-1962.0724
52 , p0_a13 DATE := fnd_api.g_miss_date
53 , p0_a14 NUMBER := 0-1962.0724
54 )
55
56 as
57 ddp_ovdv_rec okl_setupoverules_pvt.ovdv_rec_type;
58 ddx_no_data_found boolean;
59 ddx_ovdv_rec okl_setupoverules_pvt.ovdv_rec_type;
60 ddindx binary_integer; indx binary_integer;
61 begin
62
63 -- copy data to the local IN or IN-OUT args, if any
64 ddp_ovdv_rec.id := rosetta_g_miss_num_map(p0_a0);
65 ddp_ovdv_rec.context_intent := p0_a1;
66 ddp_ovdv_rec.object_version_number := rosetta_g_miss_num_map(p0_a2);
67 ddp_ovdv_rec.orl_id := rosetta_g_miss_num_map(p0_a3);
68 ddp_ovdv_rec.ove_id := rosetta_g_miss_num_map(p0_a4);
69 ddp_ovdv_rec.individual_instructions := p0_a5;
70 ddp_ovdv_rec.copy_or_enter_flag := p0_a6;
71 ddp_ovdv_rec.context_org := rosetta_g_miss_num_map(p0_a7);
72 ddp_ovdv_rec.context_inv_org := rosetta_g_miss_num_map(p0_a8);
73 ddp_ovdv_rec.context_asset_book := p0_a9;
74 ddp_ovdv_rec.created_by := rosetta_g_miss_num_map(p0_a10);
75 ddp_ovdv_rec.creation_date := rosetta_g_miss_date_in_map(p0_a11);
76 ddp_ovdv_rec.last_updated_by := rosetta_g_miss_num_map(p0_a12);
77 ddp_ovdv_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a13);
78 ddp_ovdv_rec.last_update_login := rosetta_g_miss_num_map(p0_a14);
79
80
81
82
83 -- here's the delegated call to the old PL/SQL routine
84 okl_setupoverules_pvt.get_rec(ddp_ovdv_rec,
85 x_return_status,
86 ddx_no_data_found,
87 ddx_ovdv_rec);
88
89 -- copy data back from the local variables to OUT or IN-OUT args, if any
90
91
92 if ddx_no_data_found is null
93 then x_no_data_found := null;
94 elsif ddx_no_data_found
95 then x_no_data_found := 1;
96 else x_no_data_found := 0;
97 end if;
98
99 p3_a0 := rosetta_g_miss_num_map(ddx_ovdv_rec.id);
100 p3_a1 := ddx_ovdv_rec.context_intent;
101 p3_a2 := rosetta_g_miss_num_map(ddx_ovdv_rec.object_version_number);
102 p3_a3 := rosetta_g_miss_num_map(ddx_ovdv_rec.orl_id);
103 p3_a4 := rosetta_g_miss_num_map(ddx_ovdv_rec.ove_id);
104 p3_a5 := ddx_ovdv_rec.individual_instructions;
105 p3_a6 := ddx_ovdv_rec.copy_or_enter_flag;
106 p3_a7 := rosetta_g_miss_num_map(ddx_ovdv_rec.context_org);
107 p3_a8 := rosetta_g_miss_num_map(ddx_ovdv_rec.context_inv_org);
108 p3_a9 := ddx_ovdv_rec.context_asset_book;
109 p3_a10 := rosetta_g_miss_num_map(ddx_ovdv_rec.created_by);
110 p3_a11 := ddx_ovdv_rec.creation_date;
111 p3_a12 := rosetta_g_miss_num_map(ddx_ovdv_rec.last_updated_by);
112 p3_a13 := ddx_ovdv_rec.last_update_date;
113 p3_a14 := rosetta_g_miss_num_map(ddx_ovdv_rec.last_update_login);
114 end;
115
116 procedure insert_overules(p_api_version NUMBER
117 , p_init_msg_list VARCHAR2
118 , x_return_status out nocopy VARCHAR2
119 , x_msg_count out nocopy NUMBER
120 , x_msg_data out nocopy VARCHAR2
121 , p8_a0 out nocopy NUMBER
122 , p8_a1 out nocopy VARCHAR2
123 , p8_a2 out nocopy NUMBER
124 , p8_a3 out nocopy NUMBER
125 , p8_a4 out nocopy NUMBER
126 , p8_a5 out nocopy VARCHAR2
127 , p8_a6 out nocopy VARCHAR2
128 , p8_a7 out nocopy NUMBER
129 , p8_a8 out nocopy NUMBER
130 , p8_a9 out nocopy VARCHAR2
131 , p8_a10 out nocopy NUMBER
132 , p8_a11 out nocopy DATE
133 , p8_a12 out nocopy NUMBER
134 , p8_a13 out nocopy DATE
135 , p8_a14 out nocopy NUMBER
136 , p5_a0 NUMBER := 0-1962.0724
137 , p5_a1 NUMBER := 0-1962.0724
138 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
139 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
140 , p5_a4 DATE := fnd_api.g_miss_date
141 , p5_a5 DATE := fnd_api.g_miss_date
142 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
143 , p5_a7 VARCHAR2 := fnd_api.g_miss_char
144 , p5_a8 VARCHAR2 := fnd_api.g_miss_char
145 , p5_a9 VARCHAR2 := fnd_api.g_miss_char
146 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
147 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
148 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
149 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
150 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
151 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
152 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
153 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
154 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
155 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
156 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
157 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
158 , p5_a22 NUMBER := 0-1962.0724
159 , p5_a23 DATE := fnd_api.g_miss_date
160 , p5_a24 NUMBER := 0-1962.0724
161 , p5_a25 DATE := fnd_api.g_miss_date
162 , p5_a26 NUMBER := 0-1962.0724
163 , p6_a0 NUMBER := 0-1962.0724
164 , p6_a1 NUMBER := 0-1962.0724
165 , p6_a2 NUMBER := 0-1962.0724
166 , p6_a3 VARCHAR2 := fnd_api.g_miss_char
167 , p6_a4 VARCHAR2 := fnd_api.g_miss_char
168 , p6_a5 DATE := fnd_api.g_miss_date
169 , p6_a6 DATE := fnd_api.g_miss_date
170 , p6_a7 NUMBER := 0-1962.0724
171 , p6_a8 DATE := fnd_api.g_miss_date
172 , p6_a9 NUMBER := 0-1962.0724
173 , p6_a10 DATE := fnd_api.g_miss_date
174 , p6_a11 NUMBER := 0-1962.0724
175 , p7_a0 NUMBER := 0-1962.0724
176 , p7_a1 VARCHAR2 := fnd_api.g_miss_char
177 , p7_a2 NUMBER := 0-1962.0724
178 , p7_a3 NUMBER := 0-1962.0724
179 , p7_a4 NUMBER := 0-1962.0724
180 , p7_a5 VARCHAR2 := fnd_api.g_miss_char
181 , p7_a6 VARCHAR2 := fnd_api.g_miss_char
182 , p7_a7 NUMBER := 0-1962.0724
183 , p7_a8 NUMBER := 0-1962.0724
184 , p7_a9 VARCHAR2 := fnd_api.g_miss_char
185 , p7_a10 NUMBER := 0-1962.0724
186 , p7_a11 DATE := fnd_api.g_miss_date
187 , p7_a12 NUMBER := 0-1962.0724
188 , p7_a13 DATE := fnd_api.g_miss_date
189 , p7_a14 NUMBER := 0-1962.0724
190 )
191
192 as
193 ddp_optv_rec okl_setupoverules_pvt.optv_rec_type;
194 ddp_ovev_rec okl_setupoverules_pvt.ovev_rec_type;
195 ddp_ovdv_rec okl_setupoverules_pvt.ovdv_rec_type;
196 ddx_ovdv_rec okl_setupoverules_pvt.ovdv_rec_type;
197 ddindx binary_integer; indx binary_integer;
198 begin
199
200 -- copy data to the local IN or IN-OUT args, if any
201
202
203
204
205
206 ddp_optv_rec.id := rosetta_g_miss_num_map(p5_a0);
207 ddp_optv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
208 ddp_optv_rec.name := p5_a2;
209 ddp_optv_rec.description := p5_a3;
210 ddp_optv_rec.from_date := rosetta_g_miss_date_in_map(p5_a4);
211 ddp_optv_rec.to_date := rosetta_g_miss_date_in_map(p5_a5);
212 ddp_optv_rec.attribute_category := p5_a6;
213 ddp_optv_rec.attribute1 := p5_a7;
214 ddp_optv_rec.attribute2 := p5_a8;
215 ddp_optv_rec.attribute3 := p5_a9;
216 ddp_optv_rec.attribute4 := p5_a10;
217 ddp_optv_rec.attribute5 := p5_a11;
218 ddp_optv_rec.attribute6 := p5_a12;
219 ddp_optv_rec.attribute7 := p5_a13;
220 ddp_optv_rec.attribute8 := p5_a14;
221 ddp_optv_rec.attribute9 := p5_a15;
222 ddp_optv_rec.attribute10 := p5_a16;
223 ddp_optv_rec.attribute11 := p5_a17;
224 ddp_optv_rec.attribute12 := p5_a18;
225 ddp_optv_rec.attribute13 := p5_a19;
226 ddp_optv_rec.attribute14 := p5_a20;
227 ddp_optv_rec.attribute15 := p5_a21;
228 ddp_optv_rec.created_by := rosetta_g_miss_num_map(p5_a22);
229 ddp_optv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a23);
230 ddp_optv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a24);
231 ddp_optv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a25);
232 ddp_optv_rec.last_update_login := rosetta_g_miss_num_map(p5_a26);
233
234 ddp_ovev_rec.id := rosetta_g_miss_num_map(p6_a0);
235 ddp_ovev_rec.object_version_number := rosetta_g_miss_num_map(p6_a1);
236 ddp_ovev_rec.opt_id := rosetta_g_miss_num_map(p6_a2);
237 ddp_ovev_rec.value := p6_a3;
238 ddp_ovev_rec.description := p6_a4;
239 ddp_ovev_rec.from_date := rosetta_g_miss_date_in_map(p6_a5);
240 ddp_ovev_rec.to_date := rosetta_g_miss_date_in_map(p6_a6);
241 ddp_ovev_rec.created_by := rosetta_g_miss_num_map(p6_a7);
242 ddp_ovev_rec.creation_date := rosetta_g_miss_date_in_map(p6_a8);
243 ddp_ovev_rec.last_updated_by := rosetta_g_miss_num_map(p6_a9);
244 ddp_ovev_rec.last_update_date := rosetta_g_miss_date_in_map(p6_a10);
245 ddp_ovev_rec.last_update_login := rosetta_g_miss_num_map(p6_a11);
246
247 ddp_ovdv_rec.id := rosetta_g_miss_num_map(p7_a0);
248 ddp_ovdv_rec.context_intent := p7_a1;
249 ddp_ovdv_rec.object_version_number := rosetta_g_miss_num_map(p7_a2);
250 ddp_ovdv_rec.orl_id := rosetta_g_miss_num_map(p7_a3);
251 ddp_ovdv_rec.ove_id := rosetta_g_miss_num_map(p7_a4);
252 ddp_ovdv_rec.individual_instructions := p7_a5;
253 ddp_ovdv_rec.copy_or_enter_flag := p7_a6;
254 ddp_ovdv_rec.context_org := rosetta_g_miss_num_map(p7_a7);
255 ddp_ovdv_rec.context_inv_org := rosetta_g_miss_num_map(p7_a8);
256 ddp_ovdv_rec.context_asset_book := p7_a9;
257 ddp_ovdv_rec.created_by := rosetta_g_miss_num_map(p7_a10);
258 ddp_ovdv_rec.creation_date := rosetta_g_miss_date_in_map(p7_a11);
259 ddp_ovdv_rec.last_updated_by := rosetta_g_miss_num_map(p7_a12);
260 ddp_ovdv_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a13);
261 ddp_ovdv_rec.last_update_login := rosetta_g_miss_num_map(p7_a14);
262
263
264 -- here's the delegated call to the old PL/SQL routine
265 okl_setupoverules_pvt.insert_overules(p_api_version,
266 p_init_msg_list,
267 x_return_status,
268 x_msg_count,
269 x_msg_data,
270 ddp_optv_rec,
271 ddp_ovev_rec,
272 ddp_ovdv_rec,
273 ddx_ovdv_rec);
274
275 -- copy data back from the local variables to OUT or IN-OUT args, if any
276
277
278
279
280
281
282
283
284 p8_a0 := rosetta_g_miss_num_map(ddx_ovdv_rec.id);
285 p8_a1 := ddx_ovdv_rec.context_intent;
286 p8_a2 := rosetta_g_miss_num_map(ddx_ovdv_rec.object_version_number);
287 p8_a3 := rosetta_g_miss_num_map(ddx_ovdv_rec.orl_id);
288 p8_a4 := rosetta_g_miss_num_map(ddx_ovdv_rec.ove_id);
289 p8_a5 := ddx_ovdv_rec.individual_instructions;
290 p8_a6 := ddx_ovdv_rec.copy_or_enter_flag;
291 p8_a7 := rosetta_g_miss_num_map(ddx_ovdv_rec.context_org);
292 p8_a8 := rosetta_g_miss_num_map(ddx_ovdv_rec.context_inv_org);
293 p8_a9 := ddx_ovdv_rec.context_asset_book;
294 p8_a10 := rosetta_g_miss_num_map(ddx_ovdv_rec.created_by);
295 p8_a11 := ddx_ovdv_rec.creation_date;
296 p8_a12 := rosetta_g_miss_num_map(ddx_ovdv_rec.last_updated_by);
297 p8_a13 := ddx_ovdv_rec.last_update_date;
298 p8_a14 := rosetta_g_miss_num_map(ddx_ovdv_rec.last_update_login);
299 end;
300
301 procedure delete_overules(p_api_version NUMBER
302 , p_init_msg_list VARCHAR2
303 , x_return_status out nocopy VARCHAR2
304 , x_msg_count out nocopy NUMBER
305 , x_msg_data out nocopy VARCHAR2
306 , p7_a0 JTF_NUMBER_TABLE
307 , p7_a1 JTF_VARCHAR2_TABLE_100
308 , p7_a2 JTF_NUMBER_TABLE
309 , p7_a3 JTF_NUMBER_TABLE
310 , p7_a4 JTF_NUMBER_TABLE
311 , p7_a5 JTF_VARCHAR2_TABLE_2000
312 , p7_a6 JTF_VARCHAR2_TABLE_100
313 , p7_a7 JTF_NUMBER_TABLE
314 , p7_a8 JTF_NUMBER_TABLE
315 , p7_a9 JTF_VARCHAR2_TABLE_100
316 , p7_a10 JTF_NUMBER_TABLE
317 , p7_a11 JTF_DATE_TABLE
318 , p7_a12 JTF_NUMBER_TABLE
319 , p7_a13 JTF_DATE_TABLE
320 , p7_a14 JTF_NUMBER_TABLE
321 , p5_a0 NUMBER := 0-1962.0724
322 , p5_a1 NUMBER := 0-1962.0724
323 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
324 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
325 , p5_a4 DATE := fnd_api.g_miss_date
326 , p5_a5 DATE := fnd_api.g_miss_date
327 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
328 , p5_a7 VARCHAR2 := fnd_api.g_miss_char
329 , p5_a8 VARCHAR2 := fnd_api.g_miss_char
330 , p5_a9 VARCHAR2 := fnd_api.g_miss_char
331 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
332 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
333 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
334 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
335 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
336 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
337 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
338 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
339 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
340 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
341 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
342 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
343 , p5_a22 NUMBER := 0-1962.0724
344 , p5_a23 DATE := fnd_api.g_miss_date
345 , p5_a24 NUMBER := 0-1962.0724
346 , p5_a25 DATE := fnd_api.g_miss_date
347 , p5_a26 NUMBER := 0-1962.0724
348 , p6_a0 NUMBER := 0-1962.0724
349 , p6_a1 NUMBER := 0-1962.0724
350 , p6_a2 NUMBER := 0-1962.0724
351 , p6_a3 VARCHAR2 := fnd_api.g_miss_char
352 , p6_a4 VARCHAR2 := fnd_api.g_miss_char
353 , p6_a5 DATE := fnd_api.g_miss_date
354 , p6_a6 DATE := fnd_api.g_miss_date
355 , p6_a7 NUMBER := 0-1962.0724
356 , p6_a8 DATE := fnd_api.g_miss_date
357 , p6_a9 NUMBER := 0-1962.0724
358 , p6_a10 DATE := fnd_api.g_miss_date
359 , p6_a11 NUMBER := 0-1962.0724
360 )
361
362 as
363 ddp_optv_rec okl_setupoverules_pvt.optv_rec_type;
364 ddp_ovev_rec okl_setupoverules_pvt.ovev_rec_type;
365 ddp_ovdv_tbl okl_setupoverules_pvt.ovdv_tbl_type;
366 ddindx binary_integer; indx binary_integer;
367 begin
368
369 -- copy data to the local IN or IN-OUT args, if any
370
371
372
373
374
375 ddp_optv_rec.id := rosetta_g_miss_num_map(p5_a0);
376 ddp_optv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
377 ddp_optv_rec.name := p5_a2;
378 ddp_optv_rec.description := p5_a3;
379 ddp_optv_rec.from_date := rosetta_g_miss_date_in_map(p5_a4);
380 ddp_optv_rec.to_date := rosetta_g_miss_date_in_map(p5_a5);
381 ddp_optv_rec.attribute_category := p5_a6;
382 ddp_optv_rec.attribute1 := p5_a7;
383 ddp_optv_rec.attribute2 := p5_a8;
384 ddp_optv_rec.attribute3 := p5_a9;
385 ddp_optv_rec.attribute4 := p5_a10;
386 ddp_optv_rec.attribute5 := p5_a11;
387 ddp_optv_rec.attribute6 := p5_a12;
388 ddp_optv_rec.attribute7 := p5_a13;
389 ddp_optv_rec.attribute8 := p5_a14;
390 ddp_optv_rec.attribute9 := p5_a15;
391 ddp_optv_rec.attribute10 := p5_a16;
392 ddp_optv_rec.attribute11 := p5_a17;
393 ddp_optv_rec.attribute12 := p5_a18;
394 ddp_optv_rec.attribute13 := p5_a19;
395 ddp_optv_rec.attribute14 := p5_a20;
396 ddp_optv_rec.attribute15 := p5_a21;
397 ddp_optv_rec.created_by := rosetta_g_miss_num_map(p5_a22);
398 ddp_optv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a23);
399 ddp_optv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a24);
400 ddp_optv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a25);
401 ddp_optv_rec.last_update_login := rosetta_g_miss_num_map(p5_a26);
402
403 ddp_ovev_rec.id := rosetta_g_miss_num_map(p6_a0);
404 ddp_ovev_rec.object_version_number := rosetta_g_miss_num_map(p6_a1);
405 ddp_ovev_rec.opt_id := rosetta_g_miss_num_map(p6_a2);
406 ddp_ovev_rec.value := p6_a3;
407 ddp_ovev_rec.description := p6_a4;
408 ddp_ovev_rec.from_date := rosetta_g_miss_date_in_map(p6_a5);
409 ddp_ovev_rec.to_date := rosetta_g_miss_date_in_map(p6_a6);
410 ddp_ovev_rec.created_by := rosetta_g_miss_num_map(p6_a7);
411 ddp_ovev_rec.creation_date := rosetta_g_miss_date_in_map(p6_a8);
412 ddp_ovev_rec.last_updated_by := rosetta_g_miss_num_map(p6_a9);
413 ddp_ovev_rec.last_update_date := rosetta_g_miss_date_in_map(p6_a10);
414 ddp_ovev_rec.last_update_login := rosetta_g_miss_num_map(p6_a11);
415
416 okl_ovd_pvt_w.rosetta_table_copy_in_p5(ddp_ovdv_tbl, p7_a0
417 , p7_a1
418 , p7_a2
419 , p7_a3
420 , p7_a4
421 , p7_a5
422 , p7_a6
423 , p7_a7
424 , p7_a8
425 , p7_a9
426 , p7_a10
427 , p7_a11
428 , p7_a12
429 , p7_a13
430 , p7_a14
431 );
432
433 -- here's the delegated call to the old PL/SQL routine
434 okl_setupoverules_pvt.delete_overules(p_api_version,
435 p_init_msg_list,
436 x_return_status,
437 x_msg_count,
438 x_msg_data,
439 ddp_optv_rec,
440 ddp_ovev_rec,
441 ddp_ovdv_tbl);
442
443 -- copy data back from the local variables to OUT or IN-OUT args, if any
444
445
446
447
448
449
450
451 end;
452
453 end okl_setupoverules_pvt_w;