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