DBA Data[Home] [Help]

PACKAGE BODY: APPS.OKL_SETUPOVDTEMPLATES_PUB_W

Source


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