DBA Data[Home] [Help]

PACKAGE BODY: APPS.OKL_SETUPPOVALUES_PUB_W

Source


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