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