[Home] [Help]
PACKAGE BODY: APPS.OKL_SETUPPQVALUES_PVT_W
Source
1 package body okl_setuppqvalues_pvt_w as
2 /* $Header: OKLESUVB.pls 120.2 2007/09/26 08:50:47 rajnisku ship $ */
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 rosetta_g_mistake_date_high date := to_date('01/01/+4710', 'MM/DD/SYYYY');
6 rosetta_g_mistake_date_low date := to_date('01/01/-4710', 'MM/DD/SYYYY');
7
8 -- this is to workaround the JDBC bug regarding IN DATE of value GMiss
9 function rosetta_g_miss_date_in_map(d date) return date as
10 begin
11 if d > rosetta_g_mistake_date_high then return fnd_api.g_miss_date; end if;
12 if d < rosetta_g_mistake_date_low then return fnd_api.g_miss_date; end if;
13 return d;
14 end;
15
16 function rosetta_g_miss_num_map(n number) return number as
17 a number := fnd_api.g_miss_num;
18 b number := 0-1962.0724;
19 begin
20 if n=a then return b; end if;
21 if n=b then return a; end if;
22 return n;
23 end;
24
25 procedure get_rec(x_no_data_found out nocopy number
26 , x_return_status out nocopy VARCHAR2
27 , p3_a0 out nocopy NUMBER
28 , p3_a1 out nocopy NUMBER
29 , p3_a2 out nocopy NUMBER
30 , p3_a3 out nocopy NUMBER
31 , p3_a4 out nocopy NUMBER
32 , p3_a5 out nocopy DATE
33 , p3_a6 out nocopy DATE
34 , p3_a7 out nocopy NUMBER
35 , p3_a8 out nocopy DATE
36 , p3_a9 out nocopy NUMBER
37 , p3_a10 out nocopy DATE
38 , p3_a11 out nocopy NUMBER
39 , p0_a0 NUMBER := 0-1962.0724
40 , p0_a1 NUMBER := 0-1962.0724
41 , p0_a2 NUMBER := 0-1962.0724
42 , p0_a3 NUMBER := 0-1962.0724
43 , p0_a4 NUMBER := 0-1962.0724
44 , p0_a5 DATE := fnd_api.g_miss_date
45 , p0_a6 DATE := fnd_api.g_miss_date
46 , p0_a7 NUMBER := 0-1962.0724
47 , p0_a8 DATE := fnd_api.g_miss_date
48 , p0_a9 NUMBER := 0-1962.0724
49 , p0_a10 DATE := fnd_api.g_miss_date
50 , p0_a11 NUMBER := 0-1962.0724
51 )
52
53 as
54 ddp_pqvv_rec okl_setuppqvalues_pvt.pqvv_rec_type;
55 ddx_no_data_found boolean;
56 ddx_pqvv_rec okl_setuppqvalues_pvt.pqvv_rec_type;
57 ddindx binary_integer; indx binary_integer;
58 begin
59
60 -- copy data to the local IN or IN-OUT args, if any
61 ddp_pqvv_rec.id := rosetta_g_miss_num_map(p0_a0);
62 ddp_pqvv_rec.object_version_number := rosetta_g_miss_num_map(p0_a1);
63 ddp_pqvv_rec.pdq_id := rosetta_g_miss_num_map(p0_a2);
64 ddp_pqvv_rec.pdt_id := rosetta_g_miss_num_map(p0_a3);
65 ddp_pqvv_rec.qve_id := rosetta_g_miss_num_map(p0_a4);
66 ddp_pqvv_rec.from_date := rosetta_g_miss_date_in_map(p0_a5);
67 ddp_pqvv_rec.to_date := rosetta_g_miss_date_in_map(p0_a6);
68 ddp_pqvv_rec.created_by := rosetta_g_miss_num_map(p0_a7);
69 ddp_pqvv_rec.creation_date := rosetta_g_miss_date_in_map(p0_a8);
70 ddp_pqvv_rec.last_updated_by := rosetta_g_miss_num_map(p0_a9);
71 ddp_pqvv_rec.last_update_date := rosetta_g_miss_date_in_map(p0_a10);
72 ddp_pqvv_rec.last_update_login := rosetta_g_miss_num_map(p0_a11);
73
74
75
76
77 -- here's the delegated call to the old PL/SQL routine
78 okl_setuppqvalues_pvt.get_rec(ddp_pqvv_rec,
79 ddx_no_data_found,
80 x_return_status,
81 ddx_pqvv_rec);
82
83 -- copy data back from the local variables to OUT or IN-OUT args, if any
84
85 if ddx_no_data_found is null
86 then x_no_data_found := null;
87 elsif ddx_no_data_found
88 then x_no_data_found := 1;
89 else x_no_data_found := 0;
90 end if;
91
92
93 p3_a0 := rosetta_g_miss_num_map(ddx_pqvv_rec.id);
94 p3_a1 := rosetta_g_miss_num_map(ddx_pqvv_rec.object_version_number);
95 p3_a2 := rosetta_g_miss_num_map(ddx_pqvv_rec.pdq_id);
96 p3_a3 := rosetta_g_miss_num_map(ddx_pqvv_rec.pdt_id);
97 p3_a4 := rosetta_g_miss_num_map(ddx_pqvv_rec.qve_id);
98 p3_a5 := ddx_pqvv_rec.from_date;
99 p3_a6 := ddx_pqvv_rec.to_date;
100 p3_a7 := rosetta_g_miss_num_map(ddx_pqvv_rec.created_by);
101 p3_a8 := ddx_pqvv_rec.creation_date;
102 p3_a9 := rosetta_g_miss_num_map(ddx_pqvv_rec.last_updated_by);
103 p3_a10 := ddx_pqvv_rec.last_update_date;
104 p3_a11 := rosetta_g_miss_num_map(ddx_pqvv_rec.last_update_login);
105 end;
106
107 procedure insert_pqvalues(p_api_version NUMBER
108 , p_init_msg_list VARCHAR2
109 , x_return_status out nocopy VARCHAR2
110 , x_msg_count out nocopy NUMBER
111 , x_msg_data out nocopy VARCHAR2
112 , p8_a0 out nocopy NUMBER
113 , p8_a1 out nocopy NUMBER
114 , p8_a2 out nocopy NUMBER
115 , p8_a3 out nocopy NUMBER
116 , p8_a4 out nocopy NUMBER
117 , p8_a5 out nocopy DATE
118 , p8_a6 out nocopy DATE
119 , p8_a7 out nocopy NUMBER
120 , p8_a8 out nocopy DATE
121 , p8_a9 out nocopy NUMBER
122 , p8_a10 out nocopy DATE
123 , p8_a11 out nocopy NUMBER
124 , p5_a0 NUMBER := 0-1962.0724
125 , p5_a1 NUMBER := 0-1962.0724
126 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
127 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
128 , p5_a4 VARCHAR2 := fnd_api.g_miss_char
129 , p5_a5 DATE := fnd_api.g_miss_date
130 , p5_a6 DATE := fnd_api.g_miss_date
131 , p5_a7 NUMBER := 0-1962.0724
132 , p5_a8 DATE := fnd_api.g_miss_date
133 , p5_a9 NUMBER := 0-1962.0724
134 , p5_a10 DATE := fnd_api.g_miss_date
135 , p5_a11 NUMBER := 0-1962.0724
136 , p6_a0 NUMBER := 0-1962.0724
137 , p6_a1 NUMBER := 0-1962.0724
138 , p6_a2 NUMBER := 0-1962.0724
139 , p6_a3 NUMBER := 0-1962.0724
140 , p6_a4 VARCHAR2 := fnd_api.g_miss_char
141 , p6_a5 VARCHAR2 := fnd_api.g_miss_char
142 , p6_a6 NUMBER := 0-1962.0724
143 , p6_a7 VARCHAR2 := fnd_api.g_miss_char
144 , p6_a8 VARCHAR2 := fnd_api.g_miss_char
145 , p6_a9 DATE := fnd_api.g_miss_date
146 , p6_a10 VARCHAR2 := fnd_api.g_miss_char
147 , p6_a11 DATE := fnd_api.g_miss_date
148 , p6_a12 VARCHAR2 := fnd_api.g_miss_char
149 , p6_a13 VARCHAR2 := fnd_api.g_miss_char
150 , p6_a14 VARCHAR2 := fnd_api.g_miss_char
151 , p6_a15 VARCHAR2 := fnd_api.g_miss_char
152 , p6_a16 VARCHAR2 := fnd_api.g_miss_char
153 , p6_a17 VARCHAR2 := fnd_api.g_miss_char
154 , p6_a18 VARCHAR2 := fnd_api.g_miss_char
155 , p6_a19 VARCHAR2 := fnd_api.g_miss_char
156 , p6_a20 VARCHAR2 := fnd_api.g_miss_char
157 , p6_a21 VARCHAR2 := fnd_api.g_miss_char
158 , p6_a22 VARCHAR2 := fnd_api.g_miss_char
159 , p6_a23 VARCHAR2 := fnd_api.g_miss_char
160 , p6_a24 VARCHAR2 := fnd_api.g_miss_char
161 , p6_a25 VARCHAR2 := fnd_api.g_miss_char
162 , p6_a26 VARCHAR2 := fnd_api.g_miss_char
163 , p6_a27 VARCHAR2 := fnd_api.g_miss_char
164 , p6_a28 NUMBER := 0-1962.0724
165 , p6_a29 DATE := fnd_api.g_miss_date
166 , p6_a30 NUMBER := 0-1962.0724
167 , p6_a31 DATE := fnd_api.g_miss_date
168 , p6_a32 NUMBER := 0-1962.0724
169 , p7_a0 NUMBER := 0-1962.0724
170 , p7_a1 NUMBER := 0-1962.0724
171 , p7_a2 NUMBER := 0-1962.0724
172 , p7_a3 NUMBER := 0-1962.0724
173 , p7_a4 NUMBER := 0-1962.0724
174 , p7_a5 DATE := fnd_api.g_miss_date
175 , p7_a6 DATE := fnd_api.g_miss_date
176 , p7_a7 NUMBER := 0-1962.0724
177 , p7_a8 DATE := fnd_api.g_miss_date
178 , p7_a9 NUMBER := 0-1962.0724
179 , p7_a10 DATE := fnd_api.g_miss_date
180 , p7_a11 NUMBER := 0-1962.0724
181 )
182
183 as
184 ddp_pqyv_rec okl_setuppqvalues_pvt.pqyv_rec_type;
185 ddp_pdtv_rec okl_setuppqvalues_pvt.pdtv_rec_type;
186 ddp_pqvv_rec okl_setuppqvalues_pvt.pqvv_rec_type;
187 ddx_pqvv_rec okl_setuppqvalues_pvt.pqvv_rec_type;
188 ddindx binary_integer; indx binary_integer;
189 begin
190
191 -- copy data to the local IN or IN-OUT args, if any
192
193
194
195
196
197 ddp_pqyv_rec.id := rosetta_g_miss_num_map(p5_a0);
198 ddp_pqyv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
199 ddp_pqyv_rec.name := p5_a2;
200 ddp_pqyv_rec.description := p5_a3;
201 ddp_pqyv_rec.location_yn := p5_a4;
202 ddp_pqyv_rec.from_date := rosetta_g_miss_date_in_map(p5_a5);
203 ddp_pqyv_rec.to_date := rosetta_g_miss_date_in_map(p5_a6);
204 ddp_pqyv_rec.created_by := rosetta_g_miss_num_map(p5_a7);
205 ddp_pqyv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a8);
206 ddp_pqyv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a9);
207 ddp_pqyv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a10);
208 ddp_pqyv_rec.last_update_login := rosetta_g_miss_num_map(p5_a11);
209
210 ddp_pdtv_rec.id := rosetta_g_miss_num_map(p6_a0);
211 ddp_pdtv_rec.object_version_number := rosetta_g_miss_num_map(p6_a1);
212 ddp_pdtv_rec.aes_id := rosetta_g_miss_num_map(p6_a2);
213 ddp_pdtv_rec.ptl_id := rosetta_g_miss_num_map(p6_a3);
214 ddp_pdtv_rec.name := p6_a4;
215 ddp_pdtv_rec.description := p6_a5;
216 ddp_pdtv_rec.reporting_pdt_id := rosetta_g_miss_num_map(p6_a6);
217 ddp_pdtv_rec.product_status_code := p6_a7;
218 ddp_pdtv_rec.legacy_product_yn := p6_a8;
219 ddp_pdtv_rec.from_date := rosetta_g_miss_date_in_map(p6_a9);
220 ddp_pdtv_rec.version := p6_a10;
221 ddp_pdtv_rec.to_date := rosetta_g_miss_date_in_map(p6_a11);
222 ddp_pdtv_rec.attribute_category := p6_a12;
223 ddp_pdtv_rec.attribute1 := p6_a13;
224 ddp_pdtv_rec.attribute2 := p6_a14;
225 ddp_pdtv_rec.attribute3 := p6_a15;
226 ddp_pdtv_rec.attribute4 := p6_a16;
227 ddp_pdtv_rec.attribute5 := p6_a17;
228 ddp_pdtv_rec.attribute6 := p6_a18;
229 ddp_pdtv_rec.attribute7 := p6_a19;
230 ddp_pdtv_rec.attribute8 := p6_a20;
231 ddp_pdtv_rec.attribute9 := p6_a21;
232 ddp_pdtv_rec.attribute10 := p6_a22;
233 ddp_pdtv_rec.attribute11 := p6_a23;
234 ddp_pdtv_rec.attribute12 := p6_a24;
235 ddp_pdtv_rec.attribute13 := p6_a25;
236 ddp_pdtv_rec.attribute14 := p6_a26;
237 ddp_pdtv_rec.attribute15 := p6_a27;
238 ddp_pdtv_rec.created_by := rosetta_g_miss_num_map(p6_a28);
239 ddp_pdtv_rec.creation_date := rosetta_g_miss_date_in_map(p6_a29);
240 ddp_pdtv_rec.last_updated_by := rosetta_g_miss_num_map(p6_a30);
241 ddp_pdtv_rec.last_update_date := rosetta_g_miss_date_in_map(p6_a31);
242 ddp_pdtv_rec.last_update_login := rosetta_g_miss_num_map(p6_a32);
243
244 ddp_pqvv_rec.id := rosetta_g_miss_num_map(p7_a0);
245 ddp_pqvv_rec.object_version_number := rosetta_g_miss_num_map(p7_a1);
246 ddp_pqvv_rec.pdq_id := rosetta_g_miss_num_map(p7_a2);
247 ddp_pqvv_rec.pdt_id := rosetta_g_miss_num_map(p7_a3);
248 ddp_pqvv_rec.qve_id := rosetta_g_miss_num_map(p7_a4);
249 ddp_pqvv_rec.from_date := rosetta_g_miss_date_in_map(p7_a5);
250 ddp_pqvv_rec.to_date := rosetta_g_miss_date_in_map(p7_a6);
251 ddp_pqvv_rec.created_by := rosetta_g_miss_num_map(p7_a7);
252 ddp_pqvv_rec.creation_date := rosetta_g_miss_date_in_map(p7_a8);
253 ddp_pqvv_rec.last_updated_by := rosetta_g_miss_num_map(p7_a9);
254 ddp_pqvv_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a10);
255 ddp_pqvv_rec.last_update_login := rosetta_g_miss_num_map(p7_a11);
256
257
258 -- here's the delegated call to the old PL/SQL routine
259 okl_setuppqvalues_pvt.insert_pqvalues(p_api_version,
260 p_init_msg_list,
261 x_return_status,
262 x_msg_count,
263 x_msg_data,
264 ddp_pqyv_rec,
265 ddp_pdtv_rec,
266 ddp_pqvv_rec,
267 ddx_pqvv_rec);
268
269 -- copy data back from the local variables to OUT or IN-OUT args, if any
270
271
272
273
274
275
276
277
278 p8_a0 := rosetta_g_miss_num_map(ddx_pqvv_rec.id);
279 p8_a1 := rosetta_g_miss_num_map(ddx_pqvv_rec.object_version_number);
280 p8_a2 := rosetta_g_miss_num_map(ddx_pqvv_rec.pdq_id);
281 p8_a3 := rosetta_g_miss_num_map(ddx_pqvv_rec.pdt_id);
282 p8_a4 := rosetta_g_miss_num_map(ddx_pqvv_rec.qve_id);
283 p8_a5 := ddx_pqvv_rec.from_date;
284 p8_a6 := ddx_pqvv_rec.to_date;
285 p8_a7 := rosetta_g_miss_num_map(ddx_pqvv_rec.created_by);
286 p8_a8 := ddx_pqvv_rec.creation_date;
287 p8_a9 := rosetta_g_miss_num_map(ddx_pqvv_rec.last_updated_by);
288 p8_a10 := ddx_pqvv_rec.last_update_date;
289 p8_a11 := rosetta_g_miss_num_map(ddx_pqvv_rec.last_update_login);
290 end;
291
292 procedure insert_pqvalues(p_api_version NUMBER
293 , p_init_msg_list VARCHAR2
294 , x_return_status out nocopy VARCHAR2
295 , x_msg_count out nocopy NUMBER
296 , x_msg_data out nocopy VARCHAR2
297 , p7_a0 JTF_NUMBER_TABLE
298 , p7_a1 JTF_NUMBER_TABLE
299 , p7_a2 JTF_NUMBER_TABLE
300 , p7_a3 JTF_NUMBER_TABLE
301 , p7_a4 JTF_NUMBER_TABLE
302 , p7_a5 JTF_DATE_TABLE
303 , p7_a6 JTF_DATE_TABLE
304 , p7_a7 JTF_NUMBER_TABLE
305 , p7_a8 JTF_DATE_TABLE
306 , p7_a9 JTF_NUMBER_TABLE
307 , p7_a10 JTF_DATE_TABLE
308 , p7_a11 JTF_NUMBER_TABLE
309 , p8_a0 out nocopy JTF_NUMBER_TABLE
310 , p8_a1 out nocopy JTF_NUMBER_TABLE
311 , p8_a2 out nocopy JTF_NUMBER_TABLE
312 , p8_a3 out nocopy JTF_NUMBER_TABLE
313 , p8_a4 out nocopy JTF_NUMBER_TABLE
314 , p8_a5 out nocopy JTF_DATE_TABLE
315 , p8_a6 out nocopy JTF_DATE_TABLE
316 , p8_a7 out nocopy JTF_NUMBER_TABLE
317 , p8_a8 out nocopy JTF_DATE_TABLE
318 , p8_a9 out nocopy JTF_NUMBER_TABLE
319 , p8_a10 out nocopy JTF_DATE_TABLE
320 , p8_a11 out nocopy JTF_NUMBER_TABLE
321 , p5_a0 NUMBER := 0-1962.0724
322 , p5_a1 NUMBER := 0-1962.0724
323 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
324 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
325 , p5_a4 VARCHAR2 := fnd_api.g_miss_char
326 , p5_a5 DATE := fnd_api.g_miss_date
327 , p5_a6 DATE := fnd_api.g_miss_date
328 , p5_a7 NUMBER := 0-1962.0724
329 , p5_a8 DATE := fnd_api.g_miss_date
330 , p5_a9 NUMBER := 0-1962.0724
331 , p5_a10 DATE := fnd_api.g_miss_date
332 , p5_a11 NUMBER := 0-1962.0724
333 , p6_a0 NUMBER := 0-1962.0724
334 , p6_a1 NUMBER := 0-1962.0724
335 , p6_a2 NUMBER := 0-1962.0724
336 , p6_a3 NUMBER := 0-1962.0724
337 , p6_a4 VARCHAR2 := fnd_api.g_miss_char
338 , p6_a5 VARCHAR2 := fnd_api.g_miss_char
339 , p6_a6 NUMBER := 0-1962.0724
340 , p6_a7 VARCHAR2 := fnd_api.g_miss_char
341 , p6_a8 VARCHAR2 := fnd_api.g_miss_char
342 , p6_a9 DATE := fnd_api.g_miss_date
343 , p6_a10 VARCHAR2 := fnd_api.g_miss_char
344 , p6_a11 DATE := fnd_api.g_miss_date
345 , p6_a12 VARCHAR2 := fnd_api.g_miss_char
346 , p6_a13 VARCHAR2 := fnd_api.g_miss_char
347 , p6_a14 VARCHAR2 := fnd_api.g_miss_char
348 , p6_a15 VARCHAR2 := fnd_api.g_miss_char
349 , p6_a16 VARCHAR2 := fnd_api.g_miss_char
350 , p6_a17 VARCHAR2 := fnd_api.g_miss_char
351 , p6_a18 VARCHAR2 := fnd_api.g_miss_char
352 , p6_a19 VARCHAR2 := fnd_api.g_miss_char
353 , p6_a20 VARCHAR2 := fnd_api.g_miss_char
354 , p6_a21 VARCHAR2 := fnd_api.g_miss_char
355 , p6_a22 VARCHAR2 := fnd_api.g_miss_char
356 , p6_a23 VARCHAR2 := fnd_api.g_miss_char
357 , p6_a24 VARCHAR2 := fnd_api.g_miss_char
358 , p6_a25 VARCHAR2 := fnd_api.g_miss_char
359 , p6_a26 VARCHAR2 := fnd_api.g_miss_char
360 , p6_a27 VARCHAR2 := fnd_api.g_miss_char
361 , p6_a28 NUMBER := 0-1962.0724
362 , p6_a29 DATE := fnd_api.g_miss_date
363 , p6_a30 NUMBER := 0-1962.0724
364 , p6_a31 DATE := fnd_api.g_miss_date
365 , p6_a32 NUMBER := 0-1962.0724
366 )
367
368 as
369 ddp_pqyv_rec okl_setuppqvalues_pvt.pqyv_rec_type;
370 ddp_pdtv_rec okl_setuppqvalues_pvt.pdtv_rec_type;
371 ddp_pqvv_tbl okl_setuppqvalues_pvt.pqvv_tbl_type;
372 ddx_pqvv_tbl okl_setuppqvalues_pvt.pqvv_tbl_type;
373 ddindx binary_integer; indx binary_integer;
374 begin
375
376 -- copy data to the local IN or IN-OUT args, if any
377
378
379
380
381
382 ddp_pqyv_rec.id := rosetta_g_miss_num_map(p5_a0);
383 ddp_pqyv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
384 ddp_pqyv_rec.name := p5_a2;
385 ddp_pqyv_rec.description := p5_a3;
386 ddp_pqyv_rec.location_yn := p5_a4;
387 ddp_pqyv_rec.from_date := rosetta_g_miss_date_in_map(p5_a5);
388 ddp_pqyv_rec.to_date := rosetta_g_miss_date_in_map(p5_a6);
389 ddp_pqyv_rec.created_by := rosetta_g_miss_num_map(p5_a7);
390 ddp_pqyv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a8);
391 ddp_pqyv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a9);
392 ddp_pqyv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a10);
393 ddp_pqyv_rec.last_update_login := rosetta_g_miss_num_map(p5_a11);
394
395 ddp_pdtv_rec.id := rosetta_g_miss_num_map(p6_a0);
396 ddp_pdtv_rec.object_version_number := rosetta_g_miss_num_map(p6_a1);
397 ddp_pdtv_rec.aes_id := rosetta_g_miss_num_map(p6_a2);
398 ddp_pdtv_rec.ptl_id := rosetta_g_miss_num_map(p6_a3);
399 ddp_pdtv_rec.name := p6_a4;
400 ddp_pdtv_rec.description := p6_a5;
401 ddp_pdtv_rec.reporting_pdt_id := rosetta_g_miss_num_map(p6_a6);
402 ddp_pdtv_rec.product_status_code := p6_a7;
403 ddp_pdtv_rec.legacy_product_yn := p6_a8;
404 ddp_pdtv_rec.from_date := rosetta_g_miss_date_in_map(p6_a9);
405 ddp_pdtv_rec.version := p6_a10;
406 ddp_pdtv_rec.to_date := rosetta_g_miss_date_in_map(p6_a11);
407 ddp_pdtv_rec.attribute_category := p6_a12;
408 ddp_pdtv_rec.attribute1 := p6_a13;
409 ddp_pdtv_rec.attribute2 := p6_a14;
410 ddp_pdtv_rec.attribute3 := p6_a15;
411 ddp_pdtv_rec.attribute4 := p6_a16;
412 ddp_pdtv_rec.attribute5 := p6_a17;
413 ddp_pdtv_rec.attribute6 := p6_a18;
414 ddp_pdtv_rec.attribute7 := p6_a19;
415 ddp_pdtv_rec.attribute8 := p6_a20;
416 ddp_pdtv_rec.attribute9 := p6_a21;
417 ddp_pdtv_rec.attribute10 := p6_a22;
418 ddp_pdtv_rec.attribute11 := p6_a23;
419 ddp_pdtv_rec.attribute12 := p6_a24;
420 ddp_pdtv_rec.attribute13 := p6_a25;
421 ddp_pdtv_rec.attribute14 := p6_a26;
422 ddp_pdtv_rec.attribute15 := p6_a27;
423 ddp_pdtv_rec.created_by := rosetta_g_miss_num_map(p6_a28);
424 ddp_pdtv_rec.creation_date := rosetta_g_miss_date_in_map(p6_a29);
425 ddp_pdtv_rec.last_updated_by := rosetta_g_miss_num_map(p6_a30);
426 ddp_pdtv_rec.last_update_date := rosetta_g_miss_date_in_map(p6_a31);
427 ddp_pdtv_rec.last_update_login := rosetta_g_miss_num_map(p6_a32);
428
429 okl_pqv_pvt_w.rosetta_table_copy_in_p5(ddp_pqvv_tbl, p7_a0
430 , p7_a1
431 , p7_a2
432 , p7_a3
433 , p7_a4
434 , p7_a5
435 , p7_a6
436 , p7_a7
437 , p7_a8
438 , p7_a9
439 , p7_a10
440 , p7_a11
441 );
442
443
444 -- here's the delegated call to the old PL/SQL routine
445 okl_setuppqvalues_pvt.insert_pqvalues(p_api_version,
446 p_init_msg_list,
447 x_return_status,
448 x_msg_count,
449 x_msg_data,
450 ddp_pqyv_rec,
451 ddp_pdtv_rec,
452 ddp_pqvv_tbl,
453 ddx_pqvv_tbl);
454
455 -- copy data back from the local variables to OUT or IN-OUT args, if any
456
457
458
459
460
461
462
463
464 okl_pqv_pvt_w.rosetta_table_copy_out_p5(ddx_pqvv_tbl, p8_a0
465 , p8_a1
466 , p8_a2
467 , p8_a3
468 , p8_a4
469 , p8_a5
470 , p8_a6
471 , p8_a7
472 , p8_a8
473 , p8_a9
474 , p8_a10
475 , p8_a11
476 );
477 end;
478
479 procedure update_pqvalues(p_api_version NUMBER
480 , p_init_msg_list VARCHAR2
481 , x_return_status out nocopy VARCHAR2
482 , x_msg_count out nocopy NUMBER
483 , x_msg_data out nocopy VARCHAR2
484 , p8_a0 out nocopy NUMBER
485 , p8_a1 out nocopy NUMBER
486 , p8_a2 out nocopy NUMBER
487 , p8_a3 out nocopy NUMBER
488 , p8_a4 out nocopy NUMBER
489 , p8_a5 out nocopy DATE
490 , p8_a6 out nocopy DATE
491 , p8_a7 out nocopy NUMBER
492 , p8_a8 out nocopy DATE
493 , p8_a9 out nocopy NUMBER
494 , p8_a10 out nocopy DATE
495 , p8_a11 out nocopy NUMBER
496 , p5_a0 NUMBER := 0-1962.0724
497 , p5_a1 NUMBER := 0-1962.0724
498 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
499 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
500 , p5_a4 VARCHAR2 := fnd_api.g_miss_char
501 , p5_a5 DATE := fnd_api.g_miss_date
502 , p5_a6 DATE := fnd_api.g_miss_date
503 , p5_a7 NUMBER := 0-1962.0724
504 , p5_a8 DATE := fnd_api.g_miss_date
505 , p5_a9 NUMBER := 0-1962.0724
506 , p5_a10 DATE := fnd_api.g_miss_date
507 , p5_a11 NUMBER := 0-1962.0724
508 , p6_a0 NUMBER := 0-1962.0724
509 , p6_a1 NUMBER := 0-1962.0724
510 , p6_a2 NUMBER := 0-1962.0724
511 , p6_a3 NUMBER := 0-1962.0724
512 , p6_a4 VARCHAR2 := fnd_api.g_miss_char
513 , p6_a5 VARCHAR2 := fnd_api.g_miss_char
514 , p6_a6 NUMBER := 0-1962.0724
515 , p6_a7 VARCHAR2 := fnd_api.g_miss_char
516 , p6_a8 VARCHAR2 := fnd_api.g_miss_char
517 , p6_a9 DATE := fnd_api.g_miss_date
518 , p6_a10 VARCHAR2 := fnd_api.g_miss_char
519 , p6_a11 DATE := fnd_api.g_miss_date
520 , p6_a12 VARCHAR2 := fnd_api.g_miss_char
521 , p6_a13 VARCHAR2 := fnd_api.g_miss_char
522 , p6_a14 VARCHAR2 := fnd_api.g_miss_char
523 , p6_a15 VARCHAR2 := fnd_api.g_miss_char
524 , p6_a16 VARCHAR2 := fnd_api.g_miss_char
525 , p6_a17 VARCHAR2 := fnd_api.g_miss_char
526 , p6_a18 VARCHAR2 := fnd_api.g_miss_char
527 , p6_a19 VARCHAR2 := fnd_api.g_miss_char
528 , p6_a20 VARCHAR2 := fnd_api.g_miss_char
529 , p6_a21 VARCHAR2 := fnd_api.g_miss_char
530 , p6_a22 VARCHAR2 := fnd_api.g_miss_char
531 , p6_a23 VARCHAR2 := fnd_api.g_miss_char
532 , p6_a24 VARCHAR2 := fnd_api.g_miss_char
533 , p6_a25 VARCHAR2 := fnd_api.g_miss_char
534 , p6_a26 VARCHAR2 := fnd_api.g_miss_char
535 , p6_a27 VARCHAR2 := fnd_api.g_miss_char
536 , p6_a28 NUMBER := 0-1962.0724
537 , p6_a29 DATE := fnd_api.g_miss_date
538 , p6_a30 NUMBER := 0-1962.0724
539 , p6_a31 DATE := fnd_api.g_miss_date
540 , p6_a32 NUMBER := 0-1962.0724
541 , p7_a0 NUMBER := 0-1962.0724
542 , p7_a1 NUMBER := 0-1962.0724
543 , p7_a2 NUMBER := 0-1962.0724
544 , p7_a3 NUMBER := 0-1962.0724
545 , p7_a4 NUMBER := 0-1962.0724
546 , p7_a5 DATE := fnd_api.g_miss_date
547 , p7_a6 DATE := fnd_api.g_miss_date
548 , p7_a7 NUMBER := 0-1962.0724
549 , p7_a8 DATE := fnd_api.g_miss_date
550 , p7_a9 NUMBER := 0-1962.0724
551 , p7_a10 DATE := fnd_api.g_miss_date
552 , p7_a11 NUMBER := 0-1962.0724
553 )
554
555 as
556 ddp_pqyv_rec okl_setuppqvalues_pvt.pqyv_rec_type;
557 ddp_pdtv_rec okl_setuppqvalues_pvt.pdtv_rec_type;
558 ddp_pqvv_rec okl_setuppqvalues_pvt.pqvv_rec_type;
559 ddx_pqvv_rec okl_setuppqvalues_pvt.pqvv_rec_type;
560 ddindx binary_integer; indx binary_integer;
561 begin
562
563 -- copy data to the local IN or IN-OUT args, if any
564
565
566
567
568
569 ddp_pqyv_rec.id := rosetta_g_miss_num_map(p5_a0);
570 ddp_pqyv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
571 ddp_pqyv_rec.name := p5_a2;
572 ddp_pqyv_rec.description := p5_a3;
573 ddp_pqyv_rec.location_yn := p5_a4;
574 ddp_pqyv_rec.from_date := rosetta_g_miss_date_in_map(p5_a5);
575 ddp_pqyv_rec.to_date := rosetta_g_miss_date_in_map(p5_a6);
576 ddp_pqyv_rec.created_by := rosetta_g_miss_num_map(p5_a7);
577 ddp_pqyv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a8);
578 ddp_pqyv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a9);
579 ddp_pqyv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a10);
580 ddp_pqyv_rec.last_update_login := rosetta_g_miss_num_map(p5_a11);
581
582 ddp_pdtv_rec.id := rosetta_g_miss_num_map(p6_a0);
583 ddp_pdtv_rec.object_version_number := rosetta_g_miss_num_map(p6_a1);
584 ddp_pdtv_rec.aes_id := rosetta_g_miss_num_map(p6_a2);
585 ddp_pdtv_rec.ptl_id := rosetta_g_miss_num_map(p6_a3);
586 ddp_pdtv_rec.name := p6_a4;
587 ddp_pdtv_rec.description := p6_a5;
588 ddp_pdtv_rec.reporting_pdt_id := rosetta_g_miss_num_map(p6_a6);
589 ddp_pdtv_rec.product_status_code := p6_a7;
590 ddp_pdtv_rec.legacy_product_yn := p6_a8;
591 ddp_pdtv_rec.from_date := rosetta_g_miss_date_in_map(p6_a9);
592 ddp_pdtv_rec.version := p6_a10;
593 ddp_pdtv_rec.to_date := rosetta_g_miss_date_in_map(p6_a11);
594 ddp_pdtv_rec.attribute_category := p6_a12;
595 ddp_pdtv_rec.attribute1 := p6_a13;
596 ddp_pdtv_rec.attribute2 := p6_a14;
597 ddp_pdtv_rec.attribute3 := p6_a15;
598 ddp_pdtv_rec.attribute4 := p6_a16;
599 ddp_pdtv_rec.attribute5 := p6_a17;
600 ddp_pdtv_rec.attribute6 := p6_a18;
601 ddp_pdtv_rec.attribute7 := p6_a19;
602 ddp_pdtv_rec.attribute8 := p6_a20;
603 ddp_pdtv_rec.attribute9 := p6_a21;
604 ddp_pdtv_rec.attribute10 := p6_a22;
605 ddp_pdtv_rec.attribute11 := p6_a23;
606 ddp_pdtv_rec.attribute12 := p6_a24;
607 ddp_pdtv_rec.attribute13 := p6_a25;
608 ddp_pdtv_rec.attribute14 := p6_a26;
609 ddp_pdtv_rec.attribute15 := p6_a27;
610 ddp_pdtv_rec.created_by := rosetta_g_miss_num_map(p6_a28);
611 ddp_pdtv_rec.creation_date := rosetta_g_miss_date_in_map(p6_a29);
612 ddp_pdtv_rec.last_updated_by := rosetta_g_miss_num_map(p6_a30);
613 ddp_pdtv_rec.last_update_date := rosetta_g_miss_date_in_map(p6_a31);
614 ddp_pdtv_rec.last_update_login := rosetta_g_miss_num_map(p6_a32);
615
616 ddp_pqvv_rec.id := rosetta_g_miss_num_map(p7_a0);
617 ddp_pqvv_rec.object_version_number := rosetta_g_miss_num_map(p7_a1);
618 ddp_pqvv_rec.pdq_id := rosetta_g_miss_num_map(p7_a2);
619 ddp_pqvv_rec.pdt_id := rosetta_g_miss_num_map(p7_a3);
620 ddp_pqvv_rec.qve_id := rosetta_g_miss_num_map(p7_a4);
621 ddp_pqvv_rec.from_date := rosetta_g_miss_date_in_map(p7_a5);
622 ddp_pqvv_rec.to_date := rosetta_g_miss_date_in_map(p7_a6);
623 ddp_pqvv_rec.created_by := rosetta_g_miss_num_map(p7_a7);
624 ddp_pqvv_rec.creation_date := rosetta_g_miss_date_in_map(p7_a8);
625 ddp_pqvv_rec.last_updated_by := rosetta_g_miss_num_map(p7_a9);
626 ddp_pqvv_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a10);
627 ddp_pqvv_rec.last_update_login := rosetta_g_miss_num_map(p7_a11);
628
629
630 -- here's the delegated call to the old PL/SQL routine
631 okl_setuppqvalues_pvt.update_pqvalues(p_api_version,
632 p_init_msg_list,
633 x_return_status,
634 x_msg_count,
635 x_msg_data,
636 ddp_pqyv_rec,
637 ddp_pdtv_rec,
638 ddp_pqvv_rec,
639 ddx_pqvv_rec);
640
641 -- copy data back from the local variables to OUT or IN-OUT args, if any
642
643
644
645
646
647
648
649
650 p8_a0 := rosetta_g_miss_num_map(ddx_pqvv_rec.id);
651 p8_a1 := rosetta_g_miss_num_map(ddx_pqvv_rec.object_version_number);
652 p8_a2 := rosetta_g_miss_num_map(ddx_pqvv_rec.pdq_id);
653 p8_a3 := rosetta_g_miss_num_map(ddx_pqvv_rec.pdt_id);
654 p8_a4 := rosetta_g_miss_num_map(ddx_pqvv_rec.qve_id);
655 p8_a5 := ddx_pqvv_rec.from_date;
656 p8_a6 := ddx_pqvv_rec.to_date;
657 p8_a7 := rosetta_g_miss_num_map(ddx_pqvv_rec.created_by);
658 p8_a8 := ddx_pqvv_rec.creation_date;
659 p8_a9 := rosetta_g_miss_num_map(ddx_pqvv_rec.last_updated_by);
660 p8_a10 := ddx_pqvv_rec.last_update_date;
661 p8_a11 := rosetta_g_miss_num_map(ddx_pqvv_rec.last_update_login);
662 end;
663
664 procedure update_pqvalues(p_api_version NUMBER
665 , p_init_msg_list VARCHAR2
666 , x_return_status out nocopy VARCHAR2
667 , x_msg_count out nocopy NUMBER
668 , x_msg_data out nocopy VARCHAR2
669 , p7_a0 JTF_NUMBER_TABLE
670 , p7_a1 JTF_NUMBER_TABLE
671 , p7_a2 JTF_NUMBER_TABLE
672 , p7_a3 JTF_NUMBER_TABLE
673 , p7_a4 JTF_NUMBER_TABLE
674 , p7_a5 JTF_DATE_TABLE
675 , p7_a6 JTF_DATE_TABLE
676 , p7_a7 JTF_NUMBER_TABLE
677 , p7_a8 JTF_DATE_TABLE
678 , p7_a9 JTF_NUMBER_TABLE
679 , p7_a10 JTF_DATE_TABLE
680 , p7_a11 JTF_NUMBER_TABLE
681 , p8_a0 out nocopy JTF_NUMBER_TABLE
682 , p8_a1 out nocopy JTF_NUMBER_TABLE
683 , p8_a2 out nocopy JTF_NUMBER_TABLE
684 , p8_a3 out nocopy JTF_NUMBER_TABLE
685 , p8_a4 out nocopy JTF_NUMBER_TABLE
686 , p8_a5 out nocopy JTF_DATE_TABLE
687 , p8_a6 out nocopy JTF_DATE_TABLE
688 , p8_a7 out nocopy JTF_NUMBER_TABLE
689 , p8_a8 out nocopy JTF_DATE_TABLE
690 , p8_a9 out nocopy JTF_NUMBER_TABLE
691 , p8_a10 out nocopy JTF_DATE_TABLE
692 , p8_a11 out nocopy JTF_NUMBER_TABLE
693 , p5_a0 NUMBER := 0-1962.0724
694 , p5_a1 NUMBER := 0-1962.0724
695 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
696 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
697 , p5_a4 VARCHAR2 := fnd_api.g_miss_char
698 , p5_a5 DATE := fnd_api.g_miss_date
699 , p5_a6 DATE := fnd_api.g_miss_date
700 , p5_a7 NUMBER := 0-1962.0724
701 , p5_a8 DATE := fnd_api.g_miss_date
702 , p5_a9 NUMBER := 0-1962.0724
703 , p5_a10 DATE := fnd_api.g_miss_date
704 , p5_a11 NUMBER := 0-1962.0724
705 , p6_a0 NUMBER := 0-1962.0724
706 , p6_a1 NUMBER := 0-1962.0724
707 , p6_a2 NUMBER := 0-1962.0724
708 , p6_a3 NUMBER := 0-1962.0724
709 , p6_a4 VARCHAR2 := fnd_api.g_miss_char
710 , p6_a5 VARCHAR2 := fnd_api.g_miss_char
711 , p6_a6 NUMBER := 0-1962.0724
712 , p6_a7 VARCHAR2 := fnd_api.g_miss_char
713 , p6_a8 VARCHAR2 := fnd_api.g_miss_char
714 , p6_a9 DATE := fnd_api.g_miss_date
715 , p6_a10 VARCHAR2 := fnd_api.g_miss_char
716 , p6_a11 DATE := fnd_api.g_miss_date
717 , p6_a12 VARCHAR2 := fnd_api.g_miss_char
718 , p6_a13 VARCHAR2 := fnd_api.g_miss_char
719 , p6_a14 VARCHAR2 := fnd_api.g_miss_char
720 , p6_a15 VARCHAR2 := fnd_api.g_miss_char
721 , p6_a16 VARCHAR2 := fnd_api.g_miss_char
722 , p6_a17 VARCHAR2 := fnd_api.g_miss_char
723 , p6_a18 VARCHAR2 := fnd_api.g_miss_char
724 , p6_a19 VARCHAR2 := fnd_api.g_miss_char
725 , p6_a20 VARCHAR2 := fnd_api.g_miss_char
726 , p6_a21 VARCHAR2 := fnd_api.g_miss_char
727 , p6_a22 VARCHAR2 := fnd_api.g_miss_char
728 , p6_a23 VARCHAR2 := fnd_api.g_miss_char
729 , p6_a24 VARCHAR2 := fnd_api.g_miss_char
730 , p6_a25 VARCHAR2 := fnd_api.g_miss_char
731 , p6_a26 VARCHAR2 := fnd_api.g_miss_char
732 , p6_a27 VARCHAR2 := fnd_api.g_miss_char
733 , p6_a28 NUMBER := 0-1962.0724
734 , p6_a29 DATE := fnd_api.g_miss_date
735 , p6_a30 NUMBER := 0-1962.0724
736 , p6_a31 DATE := fnd_api.g_miss_date
737 , p6_a32 NUMBER := 0-1962.0724
738 )
739
740 as
741 ddp_pqyv_rec okl_setuppqvalues_pvt.pqyv_rec_type;
742 ddp_pdtv_rec okl_setuppqvalues_pvt.pdtv_rec_type;
743 ddp_pqvv_tbl okl_setuppqvalues_pvt.pqvv_tbl_type;
744 ddx_pqvv_tbl okl_setuppqvalues_pvt.pqvv_tbl_type;
745 ddindx binary_integer; indx binary_integer;
746 begin
747
748 -- copy data to the local IN or IN-OUT args, if any
749
750
751
752
753
754 ddp_pqyv_rec.id := rosetta_g_miss_num_map(p5_a0);
755 ddp_pqyv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
756 ddp_pqyv_rec.name := p5_a2;
757 ddp_pqyv_rec.description := p5_a3;
758 ddp_pqyv_rec.location_yn := p5_a4;
759 ddp_pqyv_rec.from_date := rosetta_g_miss_date_in_map(p5_a5);
760 ddp_pqyv_rec.to_date := rosetta_g_miss_date_in_map(p5_a6);
761 ddp_pqyv_rec.created_by := rosetta_g_miss_num_map(p5_a7);
762 ddp_pqyv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a8);
763 ddp_pqyv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a9);
764 ddp_pqyv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a10);
765 ddp_pqyv_rec.last_update_login := rosetta_g_miss_num_map(p5_a11);
766
767 ddp_pdtv_rec.id := rosetta_g_miss_num_map(p6_a0);
768 ddp_pdtv_rec.object_version_number := rosetta_g_miss_num_map(p6_a1);
769 ddp_pdtv_rec.aes_id := rosetta_g_miss_num_map(p6_a2);
770 ddp_pdtv_rec.ptl_id := rosetta_g_miss_num_map(p6_a3);
771 ddp_pdtv_rec.name := p6_a4;
772 ddp_pdtv_rec.description := p6_a5;
773 ddp_pdtv_rec.reporting_pdt_id := rosetta_g_miss_num_map(p6_a6);
774 ddp_pdtv_rec.product_status_code := p6_a7;
775 ddp_pdtv_rec.legacy_product_yn := p6_a8;
776 ddp_pdtv_rec.from_date := rosetta_g_miss_date_in_map(p6_a9);
777 ddp_pdtv_rec.version := p6_a10;
778 ddp_pdtv_rec.to_date := rosetta_g_miss_date_in_map(p6_a11);
779 ddp_pdtv_rec.attribute_category := p6_a12;
780 ddp_pdtv_rec.attribute1 := p6_a13;
781 ddp_pdtv_rec.attribute2 := p6_a14;
782 ddp_pdtv_rec.attribute3 := p6_a15;
783 ddp_pdtv_rec.attribute4 := p6_a16;
784 ddp_pdtv_rec.attribute5 := p6_a17;
785 ddp_pdtv_rec.attribute6 := p6_a18;
786 ddp_pdtv_rec.attribute7 := p6_a19;
787 ddp_pdtv_rec.attribute8 := p6_a20;
788 ddp_pdtv_rec.attribute9 := p6_a21;
789 ddp_pdtv_rec.attribute10 := p6_a22;
790 ddp_pdtv_rec.attribute11 := p6_a23;
791 ddp_pdtv_rec.attribute12 := p6_a24;
792 ddp_pdtv_rec.attribute13 := p6_a25;
793 ddp_pdtv_rec.attribute14 := p6_a26;
794 ddp_pdtv_rec.attribute15 := p6_a27;
795 ddp_pdtv_rec.created_by := rosetta_g_miss_num_map(p6_a28);
796 ddp_pdtv_rec.creation_date := rosetta_g_miss_date_in_map(p6_a29);
797 ddp_pdtv_rec.last_updated_by := rosetta_g_miss_num_map(p6_a30);
798 ddp_pdtv_rec.last_update_date := rosetta_g_miss_date_in_map(p6_a31);
799 ddp_pdtv_rec.last_update_login := rosetta_g_miss_num_map(p6_a32);
800
801 okl_pqv_pvt_w.rosetta_table_copy_in_p5(ddp_pqvv_tbl, p7_a0
802 , p7_a1
803 , p7_a2
804 , p7_a3
805 , p7_a4
806 , p7_a5
807 , p7_a6
808 , p7_a7
809 , p7_a8
810 , p7_a9
811 , p7_a10
812 , p7_a11
813 );
814
815
816 -- here's the delegated call to the old PL/SQL routine
817 okl_setuppqvalues_pvt.update_pqvalues(p_api_version,
818 p_init_msg_list,
819 x_return_status,
820 x_msg_count,
821 x_msg_data,
822 ddp_pqyv_rec,
823 ddp_pdtv_rec,
824 ddp_pqvv_tbl,
825 ddx_pqvv_tbl);
826
827 -- copy data back from the local variables to OUT or IN-OUT args, if any
828
829
830
831
832
833
834
835
836 okl_pqv_pvt_w.rosetta_table_copy_out_p5(ddx_pqvv_tbl, p8_a0
837 , p8_a1
838 , p8_a2
839 , p8_a3
840 , p8_a4
841 , p8_a5
842 , p8_a6
843 , p8_a7
844 , p8_a8
845 , p8_a9
846 , p8_a10
847 , p8_a11
848 );
849 end;
850
851 end okl_setuppqvalues_pvt_w;