eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.
PACKAGE BODY: APPS.OKL_SETUPOPTVALUES_PUB_W

Source


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