[Home] [Help]
PACKAGE BODY: APPS.OKL_SETUPOPTVALUES_PVT_W
Source
1 package body okl_setupoptvalues_pvt_w as
2 /* $Header: OKLESOVB.pls 115.2 2002/12/24 04:02:58 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 NUMBER
26 , p3_a2 out nocopy NUMBER
27 , p3_a3 out nocopy VARCHAR2
28 , p3_a4 out nocopy VARCHAR2
29 , p3_a5 out nocopy DATE
30 , p3_a6 out nocopy DATE
31 , p3_a7 out nocopy NUMBER
32 , p3_a8 out nocopy DATE
33 , p3_a9 out nocopy NUMBER
34 , p3_a10 out nocopy DATE
35 , p3_a11 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 VARCHAR2 := fnd_api.g_miss_char
40 , p0_a4 VARCHAR2 := fnd_api.g_miss_char
41 , p0_a5 DATE := fnd_api.g_miss_date
42 , p0_a6 DATE := fnd_api.g_miss_date
43 , p0_a7 NUMBER := 0-1962.0724
44 , p0_a8 DATE := fnd_api.g_miss_date
45 , p0_a9 NUMBER := 0-1962.0724
46 , p0_a10 DATE := fnd_api.g_miss_date
47 , p0_a11 NUMBER := 0-1962.0724
48 )
49
50 as
51 ddp_ovev_rec okl_setupoptvalues_pvt.ovev_rec_type;
52 ddx_no_data_found boolean;
53 ddx_ovev_rec okl_setupoptvalues_pvt.ovev_rec_type;
54 ddindx binary_integer; indx binary_integer;
55 begin
56
57 -- copy data to the local IN or IN-OUT args, if any
58 ddp_ovev_rec.id := rosetta_g_miss_num_map(p0_a0);
59 ddp_ovev_rec.object_version_number := rosetta_g_miss_num_map(p0_a1);
60 ddp_ovev_rec.opt_id := rosetta_g_miss_num_map(p0_a2);
61 ddp_ovev_rec.value := p0_a3;
62 ddp_ovev_rec.description := p0_a4;
63 ddp_ovev_rec.from_date := rosetta_g_miss_date_in_map(p0_a5);
64 ddp_ovev_rec.to_date := rosetta_g_miss_date_in_map(p0_a6);
65 ddp_ovev_rec.created_by := rosetta_g_miss_num_map(p0_a7);
66 ddp_ovev_rec.creation_date := rosetta_g_miss_date_in_map(p0_a8);
67 ddp_ovev_rec.last_updated_by := rosetta_g_miss_num_map(p0_a9);
68 ddp_ovev_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a10);
69 ddp_ovev_rec.last_update_login := rosetta_g_miss_num_map(p0_a11);
70
71
72
73
74 -- here's the delegated call to the old PL/SQL routine
75 okl_setupoptvalues_pvt.get_rec(ddp_ovev_rec,
76 x_return_status,
77 ddx_no_data_found,
78 ddx_ovev_rec);
79
80 -- copy data back from the local variables to OUT or IN-OUT args, if any
81
82
83 if ddx_no_data_found is null
84 then x_no_data_found := null;
85 elsif ddx_no_data_found
86 then x_no_data_found := 1;
87 else x_no_data_found := 0;
88 end if;
89
90 p3_a0 := rosetta_g_miss_num_map(ddx_ovev_rec.id);
91 p3_a1 := rosetta_g_miss_num_map(ddx_ovev_rec.object_version_number);
92 p3_a2 := rosetta_g_miss_num_map(ddx_ovev_rec.opt_id);
93 p3_a3 := ddx_ovev_rec.value;
94 p3_a4 := ddx_ovev_rec.description;
95 p3_a5 := ddx_ovev_rec.from_date;
96 p3_a6 := ddx_ovev_rec.to_date;
97 p3_a7 := rosetta_g_miss_num_map(ddx_ovev_rec.created_by);
98 p3_a8 := ddx_ovev_rec.creation_date;
99 p3_a9 := rosetta_g_miss_num_map(ddx_ovev_rec.last_updated_by);
100 p3_a10 := ddx_ovev_rec.last_update_date;
101 p3_a11 := rosetta_g_miss_num_map(ddx_ovev_rec.last_update_login);
102 end;
103
104 procedure get_rul_rec(x_return_status out nocopy VARCHAR2
105 , x_no_data_found out nocopy number
106 , p3_a0 out nocopy NUMBER
107 , p3_a1 out nocopy NUMBER
108 , p3_a2 out nocopy VARCHAR2
109 , p3_a3 out nocopy VARCHAR2
110 , p3_a4 out nocopy VARCHAR2
111 , p3_a5 out nocopy VARCHAR2
112 , p3_a6 out nocopy VARCHAR2
113 , p3_a7 out nocopy VARCHAR2
114 , p3_a8 out nocopy VARCHAR2
115 , p3_a9 out nocopy VARCHAR2
116 , p3_a10 out nocopy VARCHAR2
117 , p3_a11 out nocopy VARCHAR2
118 , p3_a12 out nocopy NUMBER
119 , p3_a13 out nocopy NUMBER
120 , p3_a14 out nocopy NUMBER
121 , p3_a15 out nocopy VARCHAR2
122 , p3_a16 out nocopy VARCHAR2
123 , p3_a17 out nocopy VARCHAR2
124 , p3_a18 out nocopy VARCHAR2
125 , p3_a19 out nocopy VARCHAR2
126 , p3_a20 out nocopy VARCHAR2
127 , p3_a21 out nocopy VARCHAR2
128 , p3_a22 out nocopy VARCHAR2
129 , p3_a23 out nocopy VARCHAR2
130 , p3_a24 out nocopy VARCHAR2
131 , p3_a25 out nocopy VARCHAR2
132 , p3_a26 out nocopy VARCHAR2
133 , p3_a27 out nocopy VARCHAR2
134 , p3_a28 out nocopy VARCHAR2
135 , p3_a29 out nocopy VARCHAR2
136 , p3_a30 out nocopy VARCHAR2
137 , p3_a31 out nocopy VARCHAR2
138 , p3_a32 out nocopy VARCHAR2
139 , p3_a33 out nocopy VARCHAR2
140 , p3_a34 out nocopy NUMBER
141 , p3_a35 out nocopy DATE
142 , p3_a36 out nocopy NUMBER
143 , p3_a37 out nocopy DATE
144 , p3_a38 out nocopy NUMBER
145 , p3_a39 out nocopy VARCHAR2
146 , p3_a40 out nocopy VARCHAR2
147 , p3_a41 out nocopy VARCHAR2
148 , p3_a42 out nocopy VARCHAR2
149 , p3_a43 out nocopy VARCHAR2
150 , p3_a44 out nocopy VARCHAR2
151 , p3_a45 out nocopy VARCHAR2
152 , p3_a46 out nocopy VARCHAR2
153 , p3_a47 out nocopy VARCHAR2
154 , p3_a48 out nocopy VARCHAR2
155 , p3_a49 out nocopy VARCHAR2
156 , p3_a50 out nocopy VARCHAR2
157 , p3_a51 out nocopy VARCHAR2
158 , p3_a52 out nocopy VARCHAR2
159 , p3_a53 out nocopy VARCHAR2
160 , p3_a54 out nocopy VARCHAR2
161 , p3_a55 out nocopy VARCHAR2
162 , p3_a56 out nocopy VARCHAR2
163 , p3_a57 out nocopy VARCHAR2
164 , p3_a58 out nocopy VARCHAR2
165 , p3_a59 out nocopy NUMBER
166 , p0_a0 NUMBER := 0-1962.0724
167 , p0_a1 NUMBER := 0-1962.0724
168 , p0_a2 VARCHAR2 := fnd_api.g_miss_char
169 , p0_a3 VARCHAR2 := fnd_api.g_miss_char
170 , p0_a4 VARCHAR2 := fnd_api.g_miss_char
171 , p0_a5 VARCHAR2 := fnd_api.g_miss_char
172 , p0_a6 VARCHAR2 := fnd_api.g_miss_char
173 , p0_a7 VARCHAR2 := fnd_api.g_miss_char
174 , p0_a8 VARCHAR2 := fnd_api.g_miss_char
175 , p0_a9 VARCHAR2 := fnd_api.g_miss_char
176 , p0_a10 VARCHAR2 := fnd_api.g_miss_char
177 , p0_a11 VARCHAR2 := fnd_api.g_miss_char
178 , p0_a12 NUMBER := 0-1962.0724
179 , p0_a13 NUMBER := 0-1962.0724
180 , p0_a14 NUMBER := 0-1962.0724
181 , p0_a15 VARCHAR2 := fnd_api.g_miss_char
182 , p0_a16 VARCHAR2 := fnd_api.g_miss_char
183 , p0_a17 VARCHAR2 := fnd_api.g_miss_char
184 , p0_a18 VARCHAR2 := fnd_api.g_miss_char
185 , p0_a19 VARCHAR2 := fnd_api.g_miss_char
186 , p0_a20 VARCHAR2 := fnd_api.g_miss_char
187 , p0_a21 VARCHAR2 := fnd_api.g_miss_char
188 , p0_a22 VARCHAR2 := fnd_api.g_miss_char
189 , p0_a23 VARCHAR2 := fnd_api.g_miss_char
190 , p0_a24 VARCHAR2 := fnd_api.g_miss_char
191 , p0_a25 VARCHAR2 := fnd_api.g_miss_char
192 , p0_a26 VARCHAR2 := fnd_api.g_miss_char
193 , p0_a27 VARCHAR2 := fnd_api.g_miss_char
194 , p0_a28 VARCHAR2 := fnd_api.g_miss_char
195 , p0_a29 VARCHAR2 := fnd_api.g_miss_char
196 , p0_a30 VARCHAR2 := fnd_api.g_miss_char
197 , p0_a31 VARCHAR2 := fnd_api.g_miss_char
198 , p0_a32 VARCHAR2 := fnd_api.g_miss_char
199 , p0_a33 VARCHAR2 := fnd_api.g_miss_char
200 , p0_a34 NUMBER := 0-1962.0724
201 , p0_a35 DATE := fnd_api.g_miss_date
202 , p0_a36 NUMBER := 0-1962.0724
203 , p0_a37 DATE := fnd_api.g_miss_date
204 , p0_a38 NUMBER := 0-1962.0724
205 , p0_a39 VARCHAR2 := fnd_api.g_miss_char
206 , p0_a40 VARCHAR2 := fnd_api.g_miss_char
207 , p0_a41 VARCHAR2 := fnd_api.g_miss_char
208 , p0_a42 VARCHAR2 := fnd_api.g_miss_char
209 , p0_a43 VARCHAR2 := fnd_api.g_miss_char
210 , p0_a44 VARCHAR2 := fnd_api.g_miss_char
211 , p0_a45 VARCHAR2 := fnd_api.g_miss_char
212 , p0_a46 VARCHAR2 := fnd_api.g_miss_char
213 , p0_a47 VARCHAR2 := fnd_api.g_miss_char
214 , p0_a48 VARCHAR2 := fnd_api.g_miss_char
215 , p0_a49 VARCHAR2 := fnd_api.g_miss_char
216 , p0_a50 VARCHAR2 := fnd_api.g_miss_char
217 , p0_a51 VARCHAR2 := fnd_api.g_miss_char
218 , p0_a52 VARCHAR2 := fnd_api.g_miss_char
219 , p0_a53 VARCHAR2 := fnd_api.g_miss_char
220 , p0_a54 VARCHAR2 := fnd_api.g_miss_char
221 , p0_a55 VARCHAR2 := fnd_api.g_miss_char
222 , p0_a56 VARCHAR2 := fnd_api.g_miss_char
223 , p0_a57 VARCHAR2 := fnd_api.g_miss_char
224 , p0_a58 VARCHAR2 := fnd_api.g_miss_char
225 , p0_a59 NUMBER := 0-1962.0724
226 )
227
228 as
229 ddp_rulv_rec okl_setupoptvalues_pvt.rulv_rec_type;
230 ddx_no_data_found boolean;
231 ddx_rulv_rec okl_setupoptvalues_pvt.rulv_rec_type;
232 ddindx binary_integer; indx binary_integer;
233 begin
234
235 -- copy data to the local IN or IN-OUT args, if any
236 ddp_rulv_rec.id := rosetta_g_miss_num_map(p0_a0);
237 ddp_rulv_rec.object_version_number := rosetta_g_miss_num_map(p0_a1);
238 ddp_rulv_rec.sfwt_flag := p0_a2;
239 ddp_rulv_rec.object1_id1 := p0_a3;
240 ddp_rulv_rec.object2_id1 := p0_a4;
241 ddp_rulv_rec.object3_id1 := p0_a5;
242 ddp_rulv_rec.object1_id2 := p0_a6;
243 ddp_rulv_rec.object2_id2 := p0_a7;
244 ddp_rulv_rec.object3_id2 := p0_a8;
245 ddp_rulv_rec.jtot_object1_code := p0_a9;
246 ddp_rulv_rec.jtot_object2_code := p0_a10;
247 ddp_rulv_rec.jtot_object3_code := p0_a11;
248 ddp_rulv_rec.dnz_chr_id := rosetta_g_miss_num_map(p0_a12);
249 ddp_rulv_rec.rgp_id := rosetta_g_miss_num_map(p0_a13);
250 ddp_rulv_rec.priority := rosetta_g_miss_num_map(p0_a14);
251 ddp_rulv_rec.std_template_yn := p0_a15;
252 ddp_rulv_rec.comments := p0_a16;
253 ddp_rulv_rec.warn_yn := p0_a17;
254 ddp_rulv_rec.attribute_category := p0_a18;
255 ddp_rulv_rec.attribute1 := p0_a19;
256 ddp_rulv_rec.attribute2 := p0_a20;
257 ddp_rulv_rec.attribute3 := p0_a21;
258 ddp_rulv_rec.attribute4 := p0_a22;
259 ddp_rulv_rec.attribute5 := p0_a23;
260 ddp_rulv_rec.attribute6 := p0_a24;
261 ddp_rulv_rec.attribute7 := p0_a25;
262 ddp_rulv_rec.attribute8 := p0_a26;
263 ddp_rulv_rec.attribute9 := p0_a27;
264 ddp_rulv_rec.attribute10 := p0_a28;
265 ddp_rulv_rec.attribute11 := p0_a29;
266 ddp_rulv_rec.attribute12 := p0_a30;
267 ddp_rulv_rec.attribute13 := p0_a31;
268 ddp_rulv_rec.attribute14 := p0_a32;
269 ddp_rulv_rec.attribute15 := p0_a33;
270 ddp_rulv_rec.created_by := rosetta_g_miss_num_map(p0_a34);
271 ddp_rulv_rec.creation_date := rosetta_g_miss_date_in_map(p0_a35);
272 ddp_rulv_rec.last_updated_by := rosetta_g_miss_num_map(p0_a36);
273 ddp_rulv_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a37);
274 ddp_rulv_rec.last_update_login := rosetta_g_miss_num_map(p0_a38);
275 ddp_rulv_rec.rule_information_category := p0_a39;
276 ddp_rulv_rec.rule_information1 := p0_a40;
277 ddp_rulv_rec.rule_information2 := p0_a41;
278 ddp_rulv_rec.rule_information3 := p0_a42;
279 ddp_rulv_rec.rule_information4 := p0_a43;
280 ddp_rulv_rec.rule_information5 := p0_a44;
281 ddp_rulv_rec.rule_information6 := p0_a45;
282 ddp_rulv_rec.rule_information7 := p0_a46;
283 ddp_rulv_rec.rule_information8 := p0_a47;
284 ddp_rulv_rec.rule_information9 := p0_a48;
285 ddp_rulv_rec.rule_information10 := p0_a49;
286 ddp_rulv_rec.rule_information11 := p0_a50;
287 ddp_rulv_rec.rule_information12 := p0_a51;
288 ddp_rulv_rec.rule_information13 := p0_a52;
289 ddp_rulv_rec.rule_information14 := p0_a53;
290 ddp_rulv_rec.rule_information15 := p0_a54;
291 ddp_rulv_rec.template_yn := p0_a55;
292 ddp_rulv_rec.ans_set_jtot_object_code := p0_a56;
293 ddp_rulv_rec.ans_set_jtot_object_id1 := p0_a57;
294 ddp_rulv_rec.ans_set_jtot_object_id2 := p0_a58;
295 ddp_rulv_rec.display_sequence := rosetta_g_miss_num_map(p0_a59);
296
297
298
299
300 -- here's the delegated call to the old PL/SQL routine
301 okl_setupoptvalues_pvt.get_rul_rec(ddp_rulv_rec,
302 x_return_status,
303 ddx_no_data_found,
304 ddx_rulv_rec);
305
306 -- copy data back from the local variables to OUT or IN-OUT args, if any
307
308
309 if ddx_no_data_found is null
310 then x_no_data_found := null;
311 elsif ddx_no_data_found
312 then x_no_data_found := 1;
313 else x_no_data_found := 0;
314 end if;
315
316 p3_a0 := rosetta_g_miss_num_map(ddx_rulv_rec.id);
317 p3_a1 := rosetta_g_miss_num_map(ddx_rulv_rec.object_version_number);
318 p3_a2 := ddx_rulv_rec.sfwt_flag;
319 p3_a3 := ddx_rulv_rec.object1_id1;
320 p3_a4 := ddx_rulv_rec.object2_id1;
321 p3_a5 := ddx_rulv_rec.object3_id1;
322 p3_a6 := ddx_rulv_rec.object1_id2;
323 p3_a7 := ddx_rulv_rec.object2_id2;
324 p3_a8 := ddx_rulv_rec.object3_id2;
325 p3_a9 := ddx_rulv_rec.jtot_object1_code;
326 p3_a10 := ddx_rulv_rec.jtot_object2_code;
327 p3_a11 := ddx_rulv_rec.jtot_object3_code;
328 p3_a12 := rosetta_g_miss_num_map(ddx_rulv_rec.dnz_chr_id);
329 p3_a13 := rosetta_g_miss_num_map(ddx_rulv_rec.rgp_id);
330 p3_a14 := rosetta_g_miss_num_map(ddx_rulv_rec.priority);
331 p3_a15 := ddx_rulv_rec.std_template_yn;
332 p3_a16 := ddx_rulv_rec.comments;
333 p3_a17 := ddx_rulv_rec.warn_yn;
334 p3_a18 := ddx_rulv_rec.attribute_category;
335 p3_a19 := ddx_rulv_rec.attribute1;
336 p3_a20 := ddx_rulv_rec.attribute2;
337 p3_a21 := ddx_rulv_rec.attribute3;
338 p3_a22 := ddx_rulv_rec.attribute4;
339 p3_a23 := ddx_rulv_rec.attribute5;
340 p3_a24 := ddx_rulv_rec.attribute6;
341 p3_a25 := ddx_rulv_rec.attribute7;
342 p3_a26 := ddx_rulv_rec.attribute8;
343 p3_a27 := ddx_rulv_rec.attribute9;
344 p3_a28 := ddx_rulv_rec.attribute10;
345 p3_a29 := ddx_rulv_rec.attribute11;
346 p3_a30 := ddx_rulv_rec.attribute12;
347 p3_a31 := ddx_rulv_rec.attribute13;
348 p3_a32 := ddx_rulv_rec.attribute14;
349 p3_a33 := ddx_rulv_rec.attribute15;
350 p3_a34 := rosetta_g_miss_num_map(ddx_rulv_rec.created_by);
351 p3_a35 := ddx_rulv_rec.creation_date;
352 p3_a36 := rosetta_g_miss_num_map(ddx_rulv_rec.last_updated_by);
353 p3_a37 := ddx_rulv_rec.last_update_date;
354 p3_a38 := rosetta_g_miss_num_map(ddx_rulv_rec.last_update_login);
355 p3_a39 := ddx_rulv_rec.rule_information_category;
356 p3_a40 := ddx_rulv_rec.rule_information1;
357 p3_a41 := ddx_rulv_rec.rule_information2;
358 p3_a42 := ddx_rulv_rec.rule_information3;
359 p3_a43 := ddx_rulv_rec.rule_information4;
360 p3_a44 := ddx_rulv_rec.rule_information5;
361 p3_a45 := ddx_rulv_rec.rule_information6;
362 p3_a46 := ddx_rulv_rec.rule_information7;
363 p3_a47 := ddx_rulv_rec.rule_information8;
364 p3_a48 := ddx_rulv_rec.rule_information9;
365 p3_a49 := ddx_rulv_rec.rule_information10;
366 p3_a50 := ddx_rulv_rec.rule_information11;
367 p3_a51 := ddx_rulv_rec.rule_information12;
368 p3_a52 := ddx_rulv_rec.rule_information13;
369 p3_a53 := ddx_rulv_rec.rule_information14;
370 p3_a54 := ddx_rulv_rec.rule_information15;
371 p3_a55 := ddx_rulv_rec.template_yn;
372 p3_a56 := ddx_rulv_rec.ans_set_jtot_object_code;
373 p3_a57 := ddx_rulv_rec.ans_set_jtot_object_id1;
374 p3_a58 := ddx_rulv_rec.ans_set_jtot_object_id2;
375 p3_a59 := rosetta_g_miss_num_map(ddx_rulv_rec.display_sequence);
376 end;
377
378 procedure insert_optvalues(p_api_version NUMBER
379 , p_init_msg_list VARCHAR2
380 , x_return_status out nocopy VARCHAR2
381 , x_msg_count out nocopy NUMBER
382 , x_msg_data out nocopy VARCHAR2
383 , p7_a0 out nocopy NUMBER
384 , p7_a1 out nocopy NUMBER
385 , p7_a2 out nocopy NUMBER
386 , p7_a3 out nocopy VARCHAR2
387 , p7_a4 out nocopy VARCHAR2
388 , p7_a5 out nocopy DATE
389 , p7_a6 out nocopy DATE
390 , p7_a7 out nocopy NUMBER
391 , p7_a8 out nocopy DATE
392 , p7_a9 out nocopy NUMBER
393 , p7_a10 out nocopy DATE
394 , p7_a11 out nocopy NUMBER
395 , p5_a0 NUMBER := 0-1962.0724
396 , p5_a1 NUMBER := 0-1962.0724
397 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
398 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
399 , p5_a4 DATE := fnd_api.g_miss_date
400 , p5_a5 DATE := fnd_api.g_miss_date
401 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
402 , p5_a7 VARCHAR2 := fnd_api.g_miss_char
403 , p5_a8 VARCHAR2 := fnd_api.g_miss_char
404 , p5_a9 VARCHAR2 := fnd_api.g_miss_char
405 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
406 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
407 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
408 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
409 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
410 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
411 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
412 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
413 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
414 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
415 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
416 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
417 , p5_a22 NUMBER := 0-1962.0724
418 , p5_a23 DATE := fnd_api.g_miss_date
419 , p5_a24 NUMBER := 0-1962.0724
420 , p5_a25 DATE := fnd_api.g_miss_date
421 , p5_a26 NUMBER := 0-1962.0724
422 , p6_a0 NUMBER := 0-1962.0724
423 , p6_a1 NUMBER := 0-1962.0724
424 , p6_a2 NUMBER := 0-1962.0724
425 , p6_a3 VARCHAR2 := fnd_api.g_miss_char
426 , p6_a4 VARCHAR2 := fnd_api.g_miss_char
427 , p6_a5 DATE := fnd_api.g_miss_date
428 , p6_a6 DATE := fnd_api.g_miss_date
429 , p6_a7 NUMBER := 0-1962.0724
430 , p6_a8 DATE := fnd_api.g_miss_date
431 , p6_a9 NUMBER := 0-1962.0724
432 , p6_a10 DATE := fnd_api.g_miss_date
433 , p6_a11 NUMBER := 0-1962.0724
434 )
435
436 as
437 ddp_optv_rec okl_setupoptvalues_pvt.optv_rec_type;
438 ddp_ovev_rec okl_setupoptvalues_pvt.ovev_rec_type;
439 ddx_ovev_rec okl_setupoptvalues_pvt.ovev_rec_type;
440 ddindx binary_integer; indx binary_integer;
441 begin
442
443 -- copy data to the local IN or IN-OUT args, if any
444
445
446
447
448
449 ddp_optv_rec.id := rosetta_g_miss_num_map(p5_a0);
450 ddp_optv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
451 ddp_optv_rec.name := p5_a2;
452 ddp_optv_rec.description := p5_a3;
453 ddp_optv_rec.from_date := rosetta_g_miss_date_in_map(p5_a4);
454 ddp_optv_rec.to_date := rosetta_g_miss_date_in_map(p5_a5);
455 ddp_optv_rec.attribute_category := p5_a6;
456 ddp_optv_rec.attribute1 := p5_a7;
457 ddp_optv_rec.attribute2 := p5_a8;
458 ddp_optv_rec.attribute3 := p5_a9;
459 ddp_optv_rec.attribute4 := p5_a10;
460 ddp_optv_rec.attribute5 := p5_a11;
461 ddp_optv_rec.attribute6 := p5_a12;
462 ddp_optv_rec.attribute7 := p5_a13;
463 ddp_optv_rec.attribute8 := p5_a14;
464 ddp_optv_rec.attribute9 := p5_a15;
465 ddp_optv_rec.attribute10 := p5_a16;
466 ddp_optv_rec.attribute11 := p5_a17;
467 ddp_optv_rec.attribute12 := p5_a18;
468 ddp_optv_rec.attribute13 := p5_a19;
469 ddp_optv_rec.attribute14 := p5_a20;
470 ddp_optv_rec.attribute15 := p5_a21;
471 ddp_optv_rec.created_by := rosetta_g_miss_num_map(p5_a22);
472 ddp_optv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a23);
473 ddp_optv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a24);
474 ddp_optv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a25);
475 ddp_optv_rec.last_update_login := rosetta_g_miss_num_map(p5_a26);
476
477 ddp_ovev_rec.id := rosetta_g_miss_num_map(p6_a0);
478 ddp_ovev_rec.object_version_number := rosetta_g_miss_num_map(p6_a1);
479 ddp_ovev_rec.opt_id := rosetta_g_miss_num_map(p6_a2);
480 ddp_ovev_rec.value := p6_a3;
481 ddp_ovev_rec.description := p6_a4;
482 ddp_ovev_rec.from_date := rosetta_g_miss_date_in_map(p6_a5);
483 ddp_ovev_rec.to_date := rosetta_g_miss_date_in_map(p6_a6);
484 ddp_ovev_rec.created_by := rosetta_g_miss_num_map(p6_a7);
485 ddp_ovev_rec.creation_date := rosetta_g_miss_date_in_map(p6_a8);
486 ddp_ovev_rec.last_updated_by := rosetta_g_miss_num_map(p6_a9);
487 ddp_ovev_rec.last_update_date := rosetta_g_miss_date_in_map(p6_a10);
488 ddp_ovev_rec.last_update_login := rosetta_g_miss_num_map(p6_a11);
489
490
491 -- here's the delegated call to the old PL/SQL routine
492 okl_setupoptvalues_pvt.insert_optvalues(p_api_version,
493 p_init_msg_list,
494 x_return_status,
495 x_msg_count,
496 x_msg_data,
497 ddp_optv_rec,
498 ddp_ovev_rec,
499 ddx_ovev_rec);
500
501 -- copy data back from the local variables to OUT or IN-OUT args, if any
502
503
504
505
506
507
508
509 p7_a0 := rosetta_g_miss_num_map(ddx_ovev_rec.id);
510 p7_a1 := rosetta_g_miss_num_map(ddx_ovev_rec.object_version_number);
511 p7_a2 := rosetta_g_miss_num_map(ddx_ovev_rec.opt_id);
512 p7_a3 := ddx_ovev_rec.value;
513 p7_a4 := ddx_ovev_rec.description;
514 p7_a5 := ddx_ovev_rec.from_date;
515 p7_a6 := ddx_ovev_rec.to_date;
516 p7_a7 := rosetta_g_miss_num_map(ddx_ovev_rec.created_by);
517 p7_a8 := ddx_ovev_rec.creation_date;
518 p7_a9 := rosetta_g_miss_num_map(ddx_ovev_rec.last_updated_by);
519 p7_a10 := ddx_ovev_rec.last_update_date;
520 p7_a11 := rosetta_g_miss_num_map(ddx_ovev_rec.last_update_login);
521 end;
522
523 procedure update_optvalues(p_api_version NUMBER
524 , p_init_msg_list VARCHAR2
525 , x_return_status out nocopy VARCHAR2
526 , x_msg_count out nocopy NUMBER
527 , x_msg_data out nocopy VARCHAR2
528 , p7_a0 out nocopy NUMBER
529 , p7_a1 out nocopy NUMBER
530 , p7_a2 out nocopy NUMBER
531 , p7_a3 out nocopy VARCHAR2
532 , p7_a4 out nocopy VARCHAR2
533 , p7_a5 out nocopy DATE
534 , p7_a6 out nocopy DATE
535 , p7_a7 out nocopy NUMBER
536 , p7_a8 out nocopy DATE
537 , p7_a9 out nocopy NUMBER
538 , p7_a10 out nocopy DATE
539 , p7_a11 out nocopy NUMBER
540 , p5_a0 NUMBER := 0-1962.0724
541 , p5_a1 NUMBER := 0-1962.0724
542 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
543 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
544 , p5_a4 DATE := fnd_api.g_miss_date
545 , p5_a5 DATE := fnd_api.g_miss_date
546 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
547 , p5_a7 VARCHAR2 := fnd_api.g_miss_char
548 , p5_a8 VARCHAR2 := fnd_api.g_miss_char
549 , p5_a9 VARCHAR2 := fnd_api.g_miss_char
550 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
551 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
552 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
553 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
554 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
555 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
556 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
557 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
558 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
559 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
560 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
561 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
562 , p5_a22 NUMBER := 0-1962.0724
563 , p5_a23 DATE := fnd_api.g_miss_date
564 , p5_a24 NUMBER := 0-1962.0724
565 , p5_a25 DATE := fnd_api.g_miss_date
566 , p5_a26 NUMBER := 0-1962.0724
567 , p6_a0 NUMBER := 0-1962.0724
568 , p6_a1 NUMBER := 0-1962.0724
569 , p6_a2 NUMBER := 0-1962.0724
570 , p6_a3 VARCHAR2 := fnd_api.g_miss_char
571 , p6_a4 VARCHAR2 := fnd_api.g_miss_char
572 , p6_a5 DATE := fnd_api.g_miss_date
573 , p6_a6 DATE := fnd_api.g_miss_date
574 , p6_a7 NUMBER := 0-1962.0724
575 , p6_a8 DATE := fnd_api.g_miss_date
576 , p6_a9 NUMBER := 0-1962.0724
577 , p6_a10 DATE := fnd_api.g_miss_date
578 , p6_a11 NUMBER := 0-1962.0724
579 )
580
581 as
582 ddp_optv_rec okl_setupoptvalues_pvt.optv_rec_type;
583 ddp_ovev_rec okl_setupoptvalues_pvt.ovev_rec_type;
584 ddx_ovev_rec okl_setupoptvalues_pvt.ovev_rec_type;
585 ddindx binary_integer; indx binary_integer;
586 begin
587
588 -- copy data to the local IN or IN-OUT args, if any
589
590
591
592
593
594 ddp_optv_rec.id := rosetta_g_miss_num_map(p5_a0);
595 ddp_optv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
596 ddp_optv_rec.name := p5_a2;
597 ddp_optv_rec.description := p5_a3;
598 ddp_optv_rec.from_date := rosetta_g_miss_date_in_map(p5_a4);
599 ddp_optv_rec.to_date := rosetta_g_miss_date_in_map(p5_a5);
600 ddp_optv_rec.attribute_category := p5_a6;
601 ddp_optv_rec.attribute1 := p5_a7;
602 ddp_optv_rec.attribute2 := p5_a8;
603 ddp_optv_rec.attribute3 := p5_a9;
604 ddp_optv_rec.attribute4 := p5_a10;
605 ddp_optv_rec.attribute5 := p5_a11;
606 ddp_optv_rec.attribute6 := p5_a12;
607 ddp_optv_rec.attribute7 := p5_a13;
608 ddp_optv_rec.attribute8 := p5_a14;
609 ddp_optv_rec.attribute9 := p5_a15;
610 ddp_optv_rec.attribute10 := p5_a16;
611 ddp_optv_rec.attribute11 := p5_a17;
612 ddp_optv_rec.attribute12 := p5_a18;
613 ddp_optv_rec.attribute13 := p5_a19;
614 ddp_optv_rec.attribute14 := p5_a20;
615 ddp_optv_rec.attribute15 := p5_a21;
616 ddp_optv_rec.created_by := rosetta_g_miss_num_map(p5_a22);
617 ddp_optv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a23);
618 ddp_optv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a24);
619 ddp_optv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a25);
620 ddp_optv_rec.last_update_login := rosetta_g_miss_num_map(p5_a26);
621
622 ddp_ovev_rec.id := rosetta_g_miss_num_map(p6_a0);
623 ddp_ovev_rec.object_version_number := rosetta_g_miss_num_map(p6_a1);
624 ddp_ovev_rec.opt_id := rosetta_g_miss_num_map(p6_a2);
625 ddp_ovev_rec.value := p6_a3;
626 ddp_ovev_rec.description := p6_a4;
627 ddp_ovev_rec.from_date := rosetta_g_miss_date_in_map(p6_a5);
628 ddp_ovev_rec.to_date := rosetta_g_miss_date_in_map(p6_a6);
629 ddp_ovev_rec.created_by := rosetta_g_miss_num_map(p6_a7);
630 ddp_ovev_rec.creation_date := rosetta_g_miss_date_in_map(p6_a8);
631 ddp_ovev_rec.last_updated_by := rosetta_g_miss_num_map(p6_a9);
632 ddp_ovev_rec.last_update_date := rosetta_g_miss_date_in_map(p6_a10);
633 ddp_ovev_rec.last_update_login := rosetta_g_miss_num_map(p6_a11);
634
635
636 -- here's the delegated call to the old PL/SQL routine
637 okl_setupoptvalues_pvt.update_optvalues(p_api_version,
638 p_init_msg_list,
639 x_return_status,
640 x_msg_count,
641 x_msg_data,
642 ddp_optv_rec,
643 ddp_ovev_rec,
644 ddx_ovev_rec);
645
646 -- copy data back from the local variables to OUT or IN-OUT args, if any
647
648
649
650
651
652
653
654 p7_a0 := rosetta_g_miss_num_map(ddx_ovev_rec.id);
655 p7_a1 := rosetta_g_miss_num_map(ddx_ovev_rec.object_version_number);
656 p7_a2 := rosetta_g_miss_num_map(ddx_ovev_rec.opt_id);
657 p7_a3 := ddx_ovev_rec.value;
658 p7_a4 := ddx_ovev_rec.description;
659 p7_a5 := ddx_ovev_rec.from_date;
660 p7_a6 := ddx_ovev_rec.to_date;
661 p7_a7 := rosetta_g_miss_num_map(ddx_ovev_rec.created_by);
662 p7_a8 := ddx_ovev_rec.creation_date;
663 p7_a9 := rosetta_g_miss_num_map(ddx_ovev_rec.last_updated_by);
664 p7_a10 := ddx_ovev_rec.last_update_date;
665 p7_a11 := rosetta_g_miss_num_map(ddx_ovev_rec.last_update_login);
666 end;
667
668 end okl_setupoptvalues_pvt_w;