[Home] [Help]
PACKAGE BODY: APPS.OKL_PDT_QUALITYS_PUB_W
Source
1 package body okl_pdt_qualitys_pub_w as
2 /* $Header: OKLUPQYB.pls 115.6 2002/12/24 04:16:03 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 create_pdt_qualitys(p_api_version NUMBER
23 , p_init_msg_list VARCHAR2
24 , x_return_status out nocopy VARCHAR2
25 , x_msg_count out nocopy NUMBER
26 , x_msg_data out nocopy VARCHAR2
27 , p6_a0 JTF_NUMBER_TABLE
28 , p6_a1 JTF_NUMBER_TABLE
29 , p6_a2 JTF_NUMBER_TABLE
30 , p6_a3 JTF_VARCHAR2_TABLE_200
31 , p6_a4 JTF_VARCHAR2_TABLE_2000
32 , p6_a5 JTF_DATE_TABLE
33 , p6_a6 JTF_DATE_TABLE
34 , p6_a7 JTF_NUMBER_TABLE
35 , p6_a8 JTF_DATE_TABLE
36 , p6_a9 JTF_NUMBER_TABLE
37 , p6_a10 JTF_DATE_TABLE
38 , p6_a11 JTF_NUMBER_TABLE
39 , p7_a0 out nocopy NUMBER
40 , p7_a1 out nocopy NUMBER
41 , p7_a2 out nocopy VARCHAR2
42 , p7_a3 out nocopy VARCHAR2
43 , p7_a4 out nocopy VARCHAR2
44 , p7_a5 out nocopy DATE
45 , p7_a6 out nocopy DATE
46 , p7_a7 out nocopy NUMBER
47 , p7_a8 out nocopy DATE
48 , p7_a9 out nocopy NUMBER
49 , p7_a10 out nocopy DATE
50 , p7_a11 out nocopy NUMBER
51 , p8_a0 out nocopy JTF_NUMBER_TABLE
52 , p8_a1 out nocopy JTF_NUMBER_TABLE
53 , p8_a2 out nocopy JTF_NUMBER_TABLE
54 , p8_a3 out nocopy JTF_VARCHAR2_TABLE_200
55 , p8_a4 out nocopy JTF_VARCHAR2_TABLE_2000
56 , p8_a5 out nocopy JTF_DATE_TABLE
57 , p8_a6 out nocopy JTF_DATE_TABLE
58 , p8_a7 out nocopy JTF_NUMBER_TABLE
59 , p8_a8 out nocopy JTF_DATE_TABLE
60 , p8_a9 out nocopy JTF_NUMBER_TABLE
61 , p8_a10 out nocopy JTF_DATE_TABLE
62 , p8_a11 out nocopy JTF_NUMBER_TABLE
63 , p5_a0 NUMBER := 0-1962.0724
64 , p5_a1 NUMBER := 0-1962.0724
65 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
66 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
67 , p5_a4 VARCHAR2 := fnd_api.g_miss_char
68 , p5_a5 DATE := fnd_api.g_miss_date
69 , p5_a6 DATE := fnd_api.g_miss_date
70 , p5_a7 NUMBER := 0-1962.0724
71 , p5_a8 DATE := fnd_api.g_miss_date
72 , p5_a9 NUMBER := 0-1962.0724
73 , p5_a10 DATE := fnd_api.g_miss_date
74 , p5_a11 NUMBER := 0-1962.0724
75 )
76
77 as
78 ddp_pqyv_rec okl_pdt_qualitys_pub.pqyv_rec_type;
79 ddp_qvev_tbl okl_pdt_qualitys_pub.qvev_tbl_type;
80 ddx_pqyv_rec okl_pdt_qualitys_pub.pqyv_rec_type;
81 ddx_qvev_tbl okl_pdt_qualitys_pub.qvev_tbl_type;
82 ddindx binary_integer; indx binary_integer;
83 begin
84
85 -- copy data to the local IN or IN-OUT args, if any
86
87
88
89
90
91 ddp_pqyv_rec.id := rosetta_g_miss_num_map(p5_a0);
92 ddp_pqyv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
93 ddp_pqyv_rec.name := p5_a2;
94 ddp_pqyv_rec.description := p5_a3;
95 ddp_pqyv_rec.location_yn := p5_a4;
96 ddp_pqyv_rec.from_date := rosetta_g_miss_date_in_map(p5_a5);
97 ddp_pqyv_rec.to_date := rosetta_g_miss_date_in_map(p5_a6);
98 ddp_pqyv_rec.created_by := rosetta_g_miss_num_map(p5_a7);
99 ddp_pqyv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a8);
100 ddp_pqyv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a9);
101 ddp_pqyv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a10);
102 ddp_pqyv_rec.last_update_login := rosetta_g_miss_num_map(p5_a11);
103
104 okl_qve_pvt_w.rosetta_table_copy_in_p5(ddp_qvev_tbl, p6_a0
105 , p6_a1
106 , p6_a2
107 , p6_a3
108 , p6_a4
109 , p6_a5
110 , p6_a6
111 , p6_a7
112 , p6_a8
113 , p6_a9
114 , p6_a10
115 , p6_a11
116 );
117
118
119
120 -- here's the delegated call to the old PL/SQL routine
121 okl_pdt_qualitys_pub.create_pdt_qualitys(p_api_version,
122 p_init_msg_list,
123 x_return_status,
124 x_msg_count,
125 x_msg_data,
126 ddp_pqyv_rec,
127 ddp_qvev_tbl,
128 ddx_pqyv_rec,
129 ddx_qvev_tbl);
130
131 -- copy data back from the local variables to OUT or IN-OUT args, if any
132
133
134
135
136
137
138
139 p7_a0 := rosetta_g_miss_num_map(ddx_pqyv_rec.id);
140 p7_a1 := rosetta_g_miss_num_map(ddx_pqyv_rec.object_version_number);
141 p7_a2 := ddx_pqyv_rec.name;
142 p7_a3 := ddx_pqyv_rec.description;
143 p7_a4 := ddx_pqyv_rec.location_yn;
144 p7_a5 := ddx_pqyv_rec.from_date;
145 p7_a6 := ddx_pqyv_rec.to_date;
146 p7_a7 := rosetta_g_miss_num_map(ddx_pqyv_rec.created_by);
147 p7_a8 := ddx_pqyv_rec.creation_date;
148 p7_a9 := rosetta_g_miss_num_map(ddx_pqyv_rec.last_updated_by);
149 p7_a10 := ddx_pqyv_rec.last_update_date;
150 p7_a11 := rosetta_g_miss_num_map(ddx_pqyv_rec.last_update_login);
151
152 okl_qve_pvt_w.rosetta_table_copy_out_p5(ddx_qvev_tbl, p8_a0
153 , p8_a1
154 , p8_a2
155 , p8_a3
156 , p8_a4
157 , p8_a5
158 , p8_a6
159 , p8_a7
160 , p8_a8
161 , p8_a9
162 , p8_a10
163 , p8_a11
164 );
165 end;
166
167 procedure update_pdt_qualitys(p_api_version NUMBER
168 , p_init_msg_list VARCHAR2
169 , x_return_status out nocopy VARCHAR2
170 , x_msg_count out nocopy NUMBER
171 , x_msg_data out nocopy VARCHAR2
172 , p6_a0 JTF_NUMBER_TABLE
173 , p6_a1 JTF_NUMBER_TABLE
174 , p6_a2 JTF_NUMBER_TABLE
175 , p6_a3 JTF_VARCHAR2_TABLE_200
176 , p6_a4 JTF_VARCHAR2_TABLE_2000
177 , p6_a5 JTF_DATE_TABLE
178 , p6_a6 JTF_DATE_TABLE
179 , p6_a7 JTF_NUMBER_TABLE
180 , p6_a8 JTF_DATE_TABLE
181 , p6_a9 JTF_NUMBER_TABLE
182 , p6_a10 JTF_DATE_TABLE
183 , p6_a11 JTF_NUMBER_TABLE
184 , p7_a0 out nocopy NUMBER
185 , p7_a1 out nocopy NUMBER
186 , p7_a2 out nocopy VARCHAR2
187 , p7_a3 out nocopy VARCHAR2
188 , p7_a4 out nocopy VARCHAR2
189 , p7_a5 out nocopy DATE
190 , p7_a6 out nocopy DATE
191 , p7_a7 out nocopy NUMBER
192 , p7_a8 out nocopy DATE
193 , p7_a9 out nocopy NUMBER
194 , p7_a10 out nocopy DATE
195 , p7_a11 out nocopy NUMBER
196 , p8_a0 out nocopy JTF_NUMBER_TABLE
197 , p8_a1 out nocopy JTF_NUMBER_TABLE
198 , p8_a2 out nocopy JTF_NUMBER_TABLE
199 , p8_a3 out nocopy JTF_VARCHAR2_TABLE_200
200 , p8_a4 out nocopy JTF_VARCHAR2_TABLE_2000
201 , p8_a5 out nocopy JTF_DATE_TABLE
202 , p8_a6 out nocopy JTF_DATE_TABLE
203 , p8_a7 out nocopy JTF_NUMBER_TABLE
204 , p8_a8 out nocopy JTF_DATE_TABLE
205 , p8_a9 out nocopy JTF_NUMBER_TABLE
206 , p8_a10 out nocopy JTF_DATE_TABLE
207 , p8_a11 out nocopy JTF_NUMBER_TABLE
208 , p5_a0 NUMBER := 0-1962.0724
209 , p5_a1 NUMBER := 0-1962.0724
210 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
211 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
212 , p5_a4 VARCHAR2 := fnd_api.g_miss_char
213 , p5_a5 DATE := fnd_api.g_miss_date
214 , p5_a6 DATE := fnd_api.g_miss_date
215 , p5_a7 NUMBER := 0-1962.0724
216 , p5_a8 DATE := fnd_api.g_miss_date
217 , p5_a9 NUMBER := 0-1962.0724
218 , p5_a10 DATE := fnd_api.g_miss_date
219 , p5_a11 NUMBER := 0-1962.0724
220 )
221
222 as
223 ddp_pqyv_rec okl_pdt_qualitys_pub.pqyv_rec_type;
224 ddp_qvev_tbl okl_pdt_qualitys_pub.qvev_tbl_type;
225 ddx_pqyv_rec okl_pdt_qualitys_pub.pqyv_rec_type;
226 ddx_qvev_tbl okl_pdt_qualitys_pub.qvev_tbl_type;
227 ddindx binary_integer; indx binary_integer;
228 begin
229
230 -- copy data to the local IN or IN-OUT args, if any
231
232
233
234
235
236 ddp_pqyv_rec.id := rosetta_g_miss_num_map(p5_a0);
237 ddp_pqyv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
238 ddp_pqyv_rec.name := p5_a2;
239 ddp_pqyv_rec.description := p5_a3;
240 ddp_pqyv_rec.location_yn := p5_a4;
241 ddp_pqyv_rec.from_date := rosetta_g_miss_date_in_map(p5_a5);
242 ddp_pqyv_rec.to_date := rosetta_g_miss_date_in_map(p5_a6);
243 ddp_pqyv_rec.created_by := rosetta_g_miss_num_map(p5_a7);
244 ddp_pqyv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a8);
245 ddp_pqyv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a9);
246 ddp_pqyv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a10);
247 ddp_pqyv_rec.last_update_login := rosetta_g_miss_num_map(p5_a11);
248
249 okl_qve_pvt_w.rosetta_table_copy_in_p5(ddp_qvev_tbl, p6_a0
250 , p6_a1
251 , p6_a2
252 , p6_a3
253 , p6_a4
254 , p6_a5
255 , p6_a6
256 , p6_a7
257 , p6_a8
258 , p6_a9
259 , p6_a10
260 , p6_a11
261 );
262
263
264
265 -- here's the delegated call to the old PL/SQL routine
266 okl_pdt_qualitys_pub.update_pdt_qualitys(p_api_version,
267 p_init_msg_list,
268 x_return_status,
269 x_msg_count,
270 x_msg_data,
271 ddp_pqyv_rec,
272 ddp_qvev_tbl,
273 ddx_pqyv_rec,
274 ddx_qvev_tbl);
275
276 -- copy data back from the local variables to OUT or IN-OUT args, if any
277
278
279
280
281
282
283
284 p7_a0 := rosetta_g_miss_num_map(ddx_pqyv_rec.id);
285 p7_a1 := rosetta_g_miss_num_map(ddx_pqyv_rec.object_version_number);
286 p7_a2 := ddx_pqyv_rec.name;
287 p7_a3 := ddx_pqyv_rec.description;
288 p7_a4 := ddx_pqyv_rec.location_yn;
289 p7_a5 := ddx_pqyv_rec.from_date;
290 p7_a6 := ddx_pqyv_rec.to_date;
291 p7_a7 := rosetta_g_miss_num_map(ddx_pqyv_rec.created_by);
292 p7_a8 := ddx_pqyv_rec.creation_date;
293 p7_a9 := rosetta_g_miss_num_map(ddx_pqyv_rec.last_updated_by);
294 p7_a10 := ddx_pqyv_rec.last_update_date;
295 p7_a11 := rosetta_g_miss_num_map(ddx_pqyv_rec.last_update_login);
296
297 okl_qve_pvt_w.rosetta_table_copy_out_p5(ddx_qvev_tbl, p8_a0
298 , p8_a1
299 , p8_a2
300 , p8_a3
301 , p8_a4
302 , p8_a5
303 , p8_a6
304 , p8_a7
305 , p8_a8
306 , p8_a9
307 , p8_a10
308 , p8_a11
309 );
310 end;
311
312 procedure validate_pdt_qualitys(p_api_version NUMBER
313 , p_init_msg_list VARCHAR2
314 , x_return_status out nocopy VARCHAR2
315 , x_msg_count out nocopy NUMBER
316 , x_msg_data out nocopy VARCHAR2
317 , p6_a0 JTF_NUMBER_TABLE
318 , p6_a1 JTF_NUMBER_TABLE
319 , p6_a2 JTF_NUMBER_TABLE
320 , p6_a3 JTF_VARCHAR2_TABLE_200
321 , p6_a4 JTF_VARCHAR2_TABLE_2000
322 , p6_a5 JTF_DATE_TABLE
323 , p6_a6 JTF_DATE_TABLE
324 , p6_a7 JTF_NUMBER_TABLE
325 , p6_a8 JTF_DATE_TABLE
326 , p6_a9 JTF_NUMBER_TABLE
327 , p6_a10 JTF_DATE_TABLE
328 , p6_a11 JTF_NUMBER_TABLE
329 , p5_a0 NUMBER := 0-1962.0724
330 , p5_a1 NUMBER := 0-1962.0724
331 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
332 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
333 , p5_a4 VARCHAR2 := fnd_api.g_miss_char
334 , p5_a5 DATE := fnd_api.g_miss_date
335 , p5_a6 DATE := fnd_api.g_miss_date
336 , p5_a7 NUMBER := 0-1962.0724
337 , p5_a8 DATE := fnd_api.g_miss_date
338 , p5_a9 NUMBER := 0-1962.0724
339 , p5_a10 DATE := fnd_api.g_miss_date
340 , p5_a11 NUMBER := 0-1962.0724
341 )
342
343 as
344 ddp_pqyv_rec okl_pdt_qualitys_pub.pqyv_rec_type;
345 ddp_qvev_tbl okl_pdt_qualitys_pub.qvev_tbl_type;
346 ddindx binary_integer; indx binary_integer;
347 begin
348
349 -- copy data to the local IN or IN-OUT args, if any
350
351
352
353
354
355 ddp_pqyv_rec.id := rosetta_g_miss_num_map(p5_a0);
356 ddp_pqyv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
357 ddp_pqyv_rec.name := p5_a2;
358 ddp_pqyv_rec.description := p5_a3;
359 ddp_pqyv_rec.location_yn := p5_a4;
360 ddp_pqyv_rec.from_date := rosetta_g_miss_date_in_map(p5_a5);
361 ddp_pqyv_rec.to_date := rosetta_g_miss_date_in_map(p5_a6);
362 ddp_pqyv_rec.created_by := rosetta_g_miss_num_map(p5_a7);
363 ddp_pqyv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a8);
364 ddp_pqyv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a9);
365 ddp_pqyv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a10);
366 ddp_pqyv_rec.last_update_login := rosetta_g_miss_num_map(p5_a11);
367
368 okl_qve_pvt_w.rosetta_table_copy_in_p5(ddp_qvev_tbl, p6_a0
369 , p6_a1
370 , p6_a2
371 , p6_a3
372 , p6_a4
373 , p6_a5
374 , p6_a6
375 , p6_a7
376 , p6_a8
377 , p6_a9
378 , p6_a10
379 , p6_a11
380 );
381
382 -- here's the delegated call to the old PL/SQL routine
383 okl_pdt_qualitys_pub.validate_pdt_qualitys(p_api_version,
384 p_init_msg_list,
385 x_return_status,
386 x_msg_count,
387 x_msg_data,
388 ddp_pqyv_rec,
389 ddp_qvev_tbl);
390
391 -- copy data back from the local variables to OUT or IN-OUT args, if any
392
393
394
395
396
397
398 end;
399
400 procedure create_pdt_qualitys(p_api_version NUMBER
401 , p_init_msg_list VARCHAR2
402 , x_return_status out nocopy VARCHAR2
403 , x_msg_count out nocopy NUMBER
404 , x_msg_data out nocopy VARCHAR2
405 , p5_a0 JTF_NUMBER_TABLE
406 , p5_a1 JTF_NUMBER_TABLE
407 , p5_a2 JTF_VARCHAR2_TABLE_200
408 , p5_a3 JTF_VARCHAR2_TABLE_2000
409 , p5_a4 JTF_VARCHAR2_TABLE_100
410 , p5_a5 JTF_DATE_TABLE
411 , p5_a6 JTF_DATE_TABLE
412 , p5_a7 JTF_NUMBER_TABLE
413 , p5_a8 JTF_DATE_TABLE
414 , p5_a9 JTF_NUMBER_TABLE
415 , p5_a10 JTF_DATE_TABLE
416 , p5_a11 JTF_NUMBER_TABLE
417 , p6_a0 out nocopy JTF_NUMBER_TABLE
418 , p6_a1 out nocopy JTF_NUMBER_TABLE
419 , p6_a2 out nocopy JTF_VARCHAR2_TABLE_200
420 , p6_a3 out nocopy JTF_VARCHAR2_TABLE_2000
421 , p6_a4 out nocopy JTF_VARCHAR2_TABLE_100
422 , p6_a5 out nocopy JTF_DATE_TABLE
423 , p6_a6 out nocopy JTF_DATE_TABLE
424 , p6_a7 out nocopy JTF_NUMBER_TABLE
425 , p6_a8 out nocopy JTF_DATE_TABLE
426 , p6_a9 out nocopy JTF_NUMBER_TABLE
427 , p6_a10 out nocopy JTF_DATE_TABLE
428 , p6_a11 out nocopy JTF_NUMBER_TABLE
429 )
430
431 as
432 ddp_pqyv_tbl okl_pdt_qualitys_pub.pqyv_tbl_type;
433 ddx_pqyv_tbl okl_pdt_qualitys_pub.pqyv_tbl_type;
434 ddindx binary_integer; indx binary_integer;
435 begin
436
437 -- copy data to the local IN or IN-OUT args, if any
438
439
440
441
442
443 okl_pqy_pvt_w.rosetta_table_copy_in_p5(ddp_pqyv_tbl, p5_a0
444 , p5_a1
445 , p5_a2
446 , p5_a3
447 , p5_a4
448 , p5_a5
449 , p5_a6
450 , p5_a7
451 , p5_a8
452 , p5_a9
453 , p5_a10
454 , p5_a11
455 );
456
457
458 -- here's the delegated call to the old PL/SQL routine
459 okl_pdt_qualitys_pub.create_pdt_qualitys(p_api_version,
460 p_init_msg_list,
461 x_return_status,
462 x_msg_count,
463 x_msg_data,
464 ddp_pqyv_tbl,
465 ddx_pqyv_tbl);
466
467 -- copy data back from the local variables to OUT or IN-OUT args, if any
468
469
470
471
472
473
474 okl_pqy_pvt_w.rosetta_table_copy_out_p5(ddx_pqyv_tbl, p6_a0
475 , p6_a1
476 , p6_a2
477 , p6_a3
478 , p6_a4
479 , p6_a5
480 , p6_a6
481 , p6_a7
482 , p6_a8
483 , p6_a9
484 , p6_a10
485 , p6_a11
486 );
487 end;
488
489 procedure create_pdt_qualitys(p_api_version NUMBER
490 , p_init_msg_list VARCHAR2
491 , x_return_status out nocopy VARCHAR2
492 , x_msg_count out nocopy NUMBER
493 , x_msg_data out nocopy VARCHAR2
494 , p6_a0 out nocopy NUMBER
495 , p6_a1 out nocopy NUMBER
496 , p6_a2 out nocopy VARCHAR2
497 , p6_a3 out nocopy VARCHAR2
498 , p6_a4 out nocopy VARCHAR2
499 , p6_a5 out nocopy DATE
500 , p6_a6 out nocopy DATE
501 , p6_a7 out nocopy NUMBER
502 , p6_a8 out nocopy DATE
503 , p6_a9 out nocopy NUMBER
504 , p6_a10 out nocopy DATE
505 , p6_a11 out nocopy NUMBER
506 , p5_a0 NUMBER := 0-1962.0724
507 , p5_a1 NUMBER := 0-1962.0724
508 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
509 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
510 , p5_a4 VARCHAR2 := fnd_api.g_miss_char
511 , p5_a5 DATE := fnd_api.g_miss_date
512 , p5_a6 DATE := fnd_api.g_miss_date
513 , p5_a7 NUMBER := 0-1962.0724
514 , p5_a8 DATE := fnd_api.g_miss_date
515 , p5_a9 NUMBER := 0-1962.0724
516 , p5_a10 DATE := fnd_api.g_miss_date
517 , p5_a11 NUMBER := 0-1962.0724
518 )
519
520 as
521 ddp_pqyv_rec okl_pdt_qualitys_pub.pqyv_rec_type;
522 ddx_pqyv_rec okl_pdt_qualitys_pub.pqyv_rec_type;
523 ddindx binary_integer; indx binary_integer;
524 begin
525
526 -- copy data to the local IN or IN-OUT args, if any
527
528
529
530
531
532 ddp_pqyv_rec.id := rosetta_g_miss_num_map(p5_a0);
533 ddp_pqyv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
534 ddp_pqyv_rec.name := p5_a2;
535 ddp_pqyv_rec.description := p5_a3;
536 ddp_pqyv_rec.location_yn := p5_a4;
537 ddp_pqyv_rec.from_date := rosetta_g_miss_date_in_map(p5_a5);
538 ddp_pqyv_rec.to_date := rosetta_g_miss_date_in_map(p5_a6);
539 ddp_pqyv_rec.created_by := rosetta_g_miss_num_map(p5_a7);
540 ddp_pqyv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a8);
541 ddp_pqyv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a9);
542 ddp_pqyv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a10);
543 ddp_pqyv_rec.last_update_login := rosetta_g_miss_num_map(p5_a11);
544
545
546 -- here's the delegated call to the old PL/SQL routine
547 okl_pdt_qualitys_pub.create_pdt_qualitys(p_api_version,
548 p_init_msg_list,
549 x_return_status,
550 x_msg_count,
551 x_msg_data,
552 ddp_pqyv_rec,
553 ddx_pqyv_rec);
554
555 -- copy data back from the local variables to OUT or IN-OUT args, if any
556
557
558
559
560
561
562 p6_a0 := rosetta_g_miss_num_map(ddx_pqyv_rec.id);
563 p6_a1 := rosetta_g_miss_num_map(ddx_pqyv_rec.object_version_number);
564 p6_a2 := ddx_pqyv_rec.name;
565 p6_a3 := ddx_pqyv_rec.description;
566 p6_a4 := ddx_pqyv_rec.location_yn;
567 p6_a5 := ddx_pqyv_rec.from_date;
568 p6_a6 := ddx_pqyv_rec.to_date;
569 p6_a7 := rosetta_g_miss_num_map(ddx_pqyv_rec.created_by);
570 p6_a8 := ddx_pqyv_rec.creation_date;
571 p6_a9 := rosetta_g_miss_num_map(ddx_pqyv_rec.last_updated_by);
572 p6_a10 := ddx_pqyv_rec.last_update_date;
573 p6_a11 := rosetta_g_miss_num_map(ddx_pqyv_rec.last_update_login);
574 end;
575
576 procedure lock_pdt_qualitys(p_api_version NUMBER
577 , p_init_msg_list VARCHAR2
578 , x_return_status out nocopy VARCHAR2
579 , x_msg_count out nocopy NUMBER
580 , x_msg_data out nocopy VARCHAR2
581 , p5_a0 JTF_NUMBER_TABLE
582 , p5_a1 JTF_NUMBER_TABLE
583 , p5_a2 JTF_VARCHAR2_TABLE_200
584 , p5_a3 JTF_VARCHAR2_TABLE_2000
585 , p5_a4 JTF_VARCHAR2_TABLE_100
586 , p5_a5 JTF_DATE_TABLE
587 , p5_a6 JTF_DATE_TABLE
588 , p5_a7 JTF_NUMBER_TABLE
589 , p5_a8 JTF_DATE_TABLE
590 , p5_a9 JTF_NUMBER_TABLE
591 , p5_a10 JTF_DATE_TABLE
592 , p5_a11 JTF_NUMBER_TABLE
593 )
594
595 as
596 ddp_pqyv_tbl okl_pdt_qualitys_pub.pqyv_tbl_type;
597 ddindx binary_integer; indx binary_integer;
598 begin
599
600 -- copy data to the local IN or IN-OUT args, if any
601
602
603
604
605
606 okl_pqy_pvt_w.rosetta_table_copy_in_p5(ddp_pqyv_tbl, p5_a0
607 , p5_a1
608 , p5_a2
609 , p5_a3
610 , p5_a4
611 , p5_a5
612 , p5_a6
613 , p5_a7
614 , p5_a8
615 , p5_a9
616 , p5_a10
617 , p5_a11
618 );
619
620 -- here's the delegated call to the old PL/SQL routine
621 okl_pdt_qualitys_pub.lock_pdt_qualitys(p_api_version,
622 p_init_msg_list,
623 x_return_status,
624 x_msg_count,
625 x_msg_data,
626 ddp_pqyv_tbl);
627
628 -- copy data back from the local variables to OUT or IN-OUT args, if any
629
630
631
632
633
634 end;
635
636 procedure lock_pdt_qualitys(p_api_version NUMBER
637 , p_init_msg_list VARCHAR2
638 , x_return_status out nocopy VARCHAR2
639 , x_msg_count out nocopy NUMBER
640 , x_msg_data out nocopy VARCHAR2
641 , p5_a0 NUMBER := 0-1962.0724
642 , p5_a1 NUMBER := 0-1962.0724
643 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
644 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
645 , p5_a4 VARCHAR2 := fnd_api.g_miss_char
646 , p5_a5 DATE := fnd_api.g_miss_date
647 , p5_a6 DATE := fnd_api.g_miss_date
648 , p5_a7 NUMBER := 0-1962.0724
649 , p5_a8 DATE := fnd_api.g_miss_date
650 , p5_a9 NUMBER := 0-1962.0724
651 , p5_a10 DATE := fnd_api.g_miss_date
652 , p5_a11 NUMBER := 0-1962.0724
653 )
654
655 as
656 ddp_pqyv_rec okl_pdt_qualitys_pub.pqyv_rec_type;
657 ddindx binary_integer; indx binary_integer;
658 begin
659
660 -- copy data to the local IN or IN-OUT args, if any
661
662
663
664
665
666 ddp_pqyv_rec.id := rosetta_g_miss_num_map(p5_a0);
667 ddp_pqyv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
668 ddp_pqyv_rec.name := p5_a2;
669 ddp_pqyv_rec.description := p5_a3;
670 ddp_pqyv_rec.location_yn := p5_a4;
671 ddp_pqyv_rec.from_date := rosetta_g_miss_date_in_map(p5_a5);
672 ddp_pqyv_rec.to_date := rosetta_g_miss_date_in_map(p5_a6);
673 ddp_pqyv_rec.created_by := rosetta_g_miss_num_map(p5_a7);
674 ddp_pqyv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a8);
675 ddp_pqyv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a9);
676 ddp_pqyv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a10);
677 ddp_pqyv_rec.last_update_login := rosetta_g_miss_num_map(p5_a11);
678
679 -- here's the delegated call to the old PL/SQL routine
680 okl_pdt_qualitys_pub.lock_pdt_qualitys(p_api_version,
681 p_init_msg_list,
682 x_return_status,
683 x_msg_count,
684 x_msg_data,
685 ddp_pqyv_rec);
686
687 -- copy data back from the local variables to OUT or IN-OUT args, if any
688
689
690
691
692
693 end;
694
695 procedure update_pdt_qualitys(p_api_version NUMBER
696 , p_init_msg_list VARCHAR2
697 , x_return_status out nocopy VARCHAR2
698 , x_msg_count out nocopy NUMBER
699 , x_msg_data out nocopy VARCHAR2
700 , p5_a0 JTF_NUMBER_TABLE
701 , p5_a1 JTF_NUMBER_TABLE
702 , p5_a2 JTF_VARCHAR2_TABLE_200
703 , p5_a3 JTF_VARCHAR2_TABLE_2000
704 , p5_a4 JTF_VARCHAR2_TABLE_100
705 , p5_a5 JTF_DATE_TABLE
706 , p5_a6 JTF_DATE_TABLE
707 , p5_a7 JTF_NUMBER_TABLE
708 , p5_a8 JTF_DATE_TABLE
709 , p5_a9 JTF_NUMBER_TABLE
710 , p5_a10 JTF_DATE_TABLE
711 , p5_a11 JTF_NUMBER_TABLE
712 , p6_a0 out nocopy JTF_NUMBER_TABLE
713 , p6_a1 out nocopy JTF_NUMBER_TABLE
714 , p6_a2 out nocopy JTF_VARCHAR2_TABLE_200
715 , p6_a3 out nocopy JTF_VARCHAR2_TABLE_2000
716 , p6_a4 out nocopy JTF_VARCHAR2_TABLE_100
717 , p6_a5 out nocopy JTF_DATE_TABLE
718 , p6_a6 out nocopy JTF_DATE_TABLE
719 , p6_a7 out nocopy JTF_NUMBER_TABLE
720 , p6_a8 out nocopy JTF_DATE_TABLE
721 , p6_a9 out nocopy JTF_NUMBER_TABLE
722 , p6_a10 out nocopy JTF_DATE_TABLE
723 , p6_a11 out nocopy JTF_NUMBER_TABLE
724 )
725
726 as
727 ddp_pqyv_tbl okl_pdt_qualitys_pub.pqyv_tbl_type;
728 ddx_pqyv_tbl okl_pdt_qualitys_pub.pqyv_tbl_type;
729 ddindx binary_integer; indx binary_integer;
730 begin
731
732 -- copy data to the local IN or IN-OUT args, if any
733
734
735
736
737
738 okl_pqy_pvt_w.rosetta_table_copy_in_p5(ddp_pqyv_tbl, p5_a0
739 , p5_a1
740 , p5_a2
741 , p5_a3
742 , p5_a4
743 , p5_a5
744 , p5_a6
745 , p5_a7
746 , p5_a8
747 , p5_a9
748 , p5_a10
749 , p5_a11
750 );
751
752
753 -- here's the delegated call to the old PL/SQL routine
754 okl_pdt_qualitys_pub.update_pdt_qualitys(p_api_version,
755 p_init_msg_list,
756 x_return_status,
757 x_msg_count,
758 x_msg_data,
759 ddp_pqyv_tbl,
760 ddx_pqyv_tbl);
761
762 -- copy data back from the local variables to OUT or IN-OUT args, if any
763
764
765
766
767
768
769 okl_pqy_pvt_w.rosetta_table_copy_out_p5(ddx_pqyv_tbl, p6_a0
770 , p6_a1
771 , p6_a2
772 , p6_a3
773 , p6_a4
774 , p6_a5
775 , p6_a6
776 , p6_a7
777 , p6_a8
778 , p6_a9
779 , p6_a10
780 , p6_a11
781 );
782 end;
783
784 procedure update_pdt_qualitys(p_api_version NUMBER
785 , p_init_msg_list VARCHAR2
786 , x_return_status out nocopy VARCHAR2
787 , x_msg_count out nocopy NUMBER
788 , x_msg_data out nocopy VARCHAR2
789 , p6_a0 out nocopy NUMBER
790 , p6_a1 out nocopy NUMBER
791 , p6_a2 out nocopy VARCHAR2
792 , p6_a3 out nocopy VARCHAR2
793 , p6_a4 out nocopy VARCHAR2
794 , p6_a5 out nocopy DATE
795 , p6_a6 out nocopy DATE
796 , p6_a7 out nocopy NUMBER
797 , p6_a8 out nocopy DATE
798 , p6_a9 out nocopy NUMBER
799 , p6_a10 out nocopy DATE
800 , p6_a11 out nocopy NUMBER
801 , p5_a0 NUMBER := 0-1962.0724
802 , p5_a1 NUMBER := 0-1962.0724
803 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
804 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
805 , p5_a4 VARCHAR2 := fnd_api.g_miss_char
806 , p5_a5 DATE := fnd_api.g_miss_date
807 , p5_a6 DATE := fnd_api.g_miss_date
808 , p5_a7 NUMBER := 0-1962.0724
809 , p5_a8 DATE := fnd_api.g_miss_date
810 , p5_a9 NUMBER := 0-1962.0724
811 , p5_a10 DATE := fnd_api.g_miss_date
812 , p5_a11 NUMBER := 0-1962.0724
813 )
814
815 as
816 ddp_pqyv_rec okl_pdt_qualitys_pub.pqyv_rec_type;
817 ddx_pqyv_rec okl_pdt_qualitys_pub.pqyv_rec_type;
818 ddindx binary_integer; indx binary_integer;
819 begin
820
821 -- copy data to the local IN or IN-OUT args, if any
822
823
824
825
826
827 ddp_pqyv_rec.id := rosetta_g_miss_num_map(p5_a0);
828 ddp_pqyv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
829 ddp_pqyv_rec.name := p5_a2;
830 ddp_pqyv_rec.description := p5_a3;
831 ddp_pqyv_rec.location_yn := p5_a4;
832 ddp_pqyv_rec.from_date := rosetta_g_miss_date_in_map(p5_a5);
833 ddp_pqyv_rec.to_date := rosetta_g_miss_date_in_map(p5_a6);
834 ddp_pqyv_rec.created_by := rosetta_g_miss_num_map(p5_a7);
835 ddp_pqyv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a8);
836 ddp_pqyv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a9);
837 ddp_pqyv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a10);
838 ddp_pqyv_rec.last_update_login := rosetta_g_miss_num_map(p5_a11);
839
840
841 -- here's the delegated call to the old PL/SQL routine
842 okl_pdt_qualitys_pub.update_pdt_qualitys(p_api_version,
843 p_init_msg_list,
844 x_return_status,
845 x_msg_count,
846 x_msg_data,
847 ddp_pqyv_rec,
848 ddx_pqyv_rec);
849
850 -- copy data back from the local variables to OUT or IN-OUT args, if any
851
852
853
854
855
856
857 p6_a0 := rosetta_g_miss_num_map(ddx_pqyv_rec.id);
858 p6_a1 := rosetta_g_miss_num_map(ddx_pqyv_rec.object_version_number);
859 p6_a2 := ddx_pqyv_rec.name;
860 p6_a3 := ddx_pqyv_rec.description;
861 p6_a4 := ddx_pqyv_rec.location_yn;
862 p6_a5 := ddx_pqyv_rec.from_date;
863 p6_a6 := ddx_pqyv_rec.to_date;
864 p6_a7 := rosetta_g_miss_num_map(ddx_pqyv_rec.created_by);
865 p6_a8 := ddx_pqyv_rec.creation_date;
866 p6_a9 := rosetta_g_miss_num_map(ddx_pqyv_rec.last_updated_by);
867 p6_a10 := ddx_pqyv_rec.last_update_date;
868 p6_a11 := rosetta_g_miss_num_map(ddx_pqyv_rec.last_update_login);
869 end;
870
871 procedure delete_pdt_qualitys(p_api_version NUMBER
872 , p_init_msg_list VARCHAR2
873 , x_return_status out nocopy VARCHAR2
874 , x_msg_count out nocopy NUMBER
875 , x_msg_data out nocopy VARCHAR2
876 , p5_a0 JTF_NUMBER_TABLE
877 , p5_a1 JTF_NUMBER_TABLE
878 , p5_a2 JTF_VARCHAR2_TABLE_200
879 , p5_a3 JTF_VARCHAR2_TABLE_2000
880 , p5_a4 JTF_VARCHAR2_TABLE_100
881 , p5_a5 JTF_DATE_TABLE
882 , p5_a6 JTF_DATE_TABLE
883 , p5_a7 JTF_NUMBER_TABLE
884 , p5_a8 JTF_DATE_TABLE
885 , p5_a9 JTF_NUMBER_TABLE
886 , p5_a10 JTF_DATE_TABLE
887 , p5_a11 JTF_NUMBER_TABLE
888 )
889
890 as
891 ddp_pqyv_tbl okl_pdt_qualitys_pub.pqyv_tbl_type;
892 ddindx binary_integer; indx binary_integer;
893 begin
894
895 -- copy data to the local IN or IN-OUT args, if any
896
897
898
899
900
901 okl_pqy_pvt_w.rosetta_table_copy_in_p5(ddp_pqyv_tbl, p5_a0
902 , p5_a1
903 , p5_a2
904 , p5_a3
905 , p5_a4
906 , p5_a5
907 , p5_a6
908 , p5_a7
909 , p5_a8
910 , p5_a9
911 , p5_a10
912 , p5_a11
913 );
914
915 -- here's the delegated call to the old PL/SQL routine
916 okl_pdt_qualitys_pub.delete_pdt_qualitys(p_api_version,
917 p_init_msg_list,
918 x_return_status,
919 x_msg_count,
920 x_msg_data,
921 ddp_pqyv_tbl);
922
923 -- copy data back from the local variables to OUT or IN-OUT args, if any
924
925
926
927
928
929 end;
930
931 procedure delete_pdt_qualitys(p_api_version NUMBER
932 , p_init_msg_list VARCHAR2
933 , x_return_status out nocopy VARCHAR2
934 , x_msg_count out nocopy NUMBER
935 , x_msg_data out nocopy VARCHAR2
936 , p5_a0 NUMBER := 0-1962.0724
937 , p5_a1 NUMBER := 0-1962.0724
938 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
939 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
940 , p5_a4 VARCHAR2 := fnd_api.g_miss_char
941 , p5_a5 DATE := fnd_api.g_miss_date
942 , p5_a6 DATE := fnd_api.g_miss_date
943 , p5_a7 NUMBER := 0-1962.0724
944 , p5_a8 DATE := fnd_api.g_miss_date
945 , p5_a9 NUMBER := 0-1962.0724
946 , p5_a10 DATE := fnd_api.g_miss_date
947 , p5_a11 NUMBER := 0-1962.0724
948 )
949
950 as
951 ddp_pqyv_rec okl_pdt_qualitys_pub.pqyv_rec_type;
952 ddindx binary_integer; indx binary_integer;
953 begin
954
955 -- copy data to the local IN or IN-OUT args, if any
956
957
958
959
960
961 ddp_pqyv_rec.id := rosetta_g_miss_num_map(p5_a0);
962 ddp_pqyv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
963 ddp_pqyv_rec.name := p5_a2;
964 ddp_pqyv_rec.description := p5_a3;
965 ddp_pqyv_rec.location_yn := p5_a4;
966 ddp_pqyv_rec.from_date := rosetta_g_miss_date_in_map(p5_a5);
967 ddp_pqyv_rec.to_date := rosetta_g_miss_date_in_map(p5_a6);
968 ddp_pqyv_rec.created_by := rosetta_g_miss_num_map(p5_a7);
969 ddp_pqyv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a8);
970 ddp_pqyv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a9);
971 ddp_pqyv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a10);
972 ddp_pqyv_rec.last_update_login := rosetta_g_miss_num_map(p5_a11);
973
974 -- here's the delegated call to the old PL/SQL routine
975 okl_pdt_qualitys_pub.delete_pdt_qualitys(p_api_version,
976 p_init_msg_list,
977 x_return_status,
978 x_msg_count,
979 x_msg_data,
980 ddp_pqyv_rec);
981
982 -- copy data back from the local variables to OUT or IN-OUT args, if any
983
984
985
986
987
988 end;
989
990 procedure validate_pdt_qualitys(p_api_version NUMBER
991 , p_init_msg_list VARCHAR2
992 , x_return_status out nocopy VARCHAR2
993 , x_msg_count out nocopy NUMBER
994 , x_msg_data out nocopy VARCHAR2
995 , p5_a0 JTF_NUMBER_TABLE
996 , p5_a1 JTF_NUMBER_TABLE
997 , p5_a2 JTF_VARCHAR2_TABLE_200
998 , p5_a3 JTF_VARCHAR2_TABLE_2000
999 , p5_a4 JTF_VARCHAR2_TABLE_100
1000 , p5_a5 JTF_DATE_TABLE
1001 , p5_a6 JTF_DATE_TABLE
1002 , p5_a7 JTF_NUMBER_TABLE
1003 , p5_a8 JTF_DATE_TABLE
1004 , p5_a9 JTF_NUMBER_TABLE
1005 , p5_a10 JTF_DATE_TABLE
1006 , p5_a11 JTF_NUMBER_TABLE
1007 )
1008
1009 as
1010 ddp_pqyv_tbl okl_pdt_qualitys_pub.pqyv_tbl_type;
1011 ddindx binary_integer; indx binary_integer;
1012 begin
1013
1014 -- copy data to the local IN or IN-OUT args, if any
1015
1016
1017
1018
1019
1020 okl_pqy_pvt_w.rosetta_table_copy_in_p5(ddp_pqyv_tbl, p5_a0
1021 , p5_a1
1022 , p5_a2
1023 , p5_a3
1024 , p5_a4
1025 , p5_a5
1026 , p5_a6
1027 , p5_a7
1028 , p5_a8
1029 , p5_a9
1030 , p5_a10
1031 , p5_a11
1032 );
1033
1034 -- here's the delegated call to the old PL/SQL routine
1035 okl_pdt_qualitys_pub.validate_pdt_qualitys(p_api_version,
1036 p_init_msg_list,
1037 x_return_status,
1038 x_msg_count,
1039 x_msg_data,
1040 ddp_pqyv_tbl);
1041
1042 -- copy data back from the local variables to OUT or IN-OUT args, if any
1043
1044
1045
1046
1047
1048 end;
1049
1050 procedure validate_pdt_qualitys(p_api_version NUMBER
1051 , p_init_msg_list VARCHAR2
1052 , x_return_status out nocopy VARCHAR2
1053 , x_msg_count out nocopy NUMBER
1054 , x_msg_data out nocopy VARCHAR2
1055 , p5_a0 NUMBER := 0-1962.0724
1056 , p5_a1 NUMBER := 0-1962.0724
1057 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
1058 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
1059 , p5_a4 VARCHAR2 := fnd_api.g_miss_char
1060 , p5_a5 DATE := fnd_api.g_miss_date
1061 , p5_a6 DATE := fnd_api.g_miss_date
1062 , p5_a7 NUMBER := 0-1962.0724
1063 , p5_a8 DATE := fnd_api.g_miss_date
1064 , p5_a9 NUMBER := 0-1962.0724
1065 , p5_a10 DATE := fnd_api.g_miss_date
1066 , p5_a11 NUMBER := 0-1962.0724
1067 )
1068
1069 as
1070 ddp_pqyv_rec okl_pdt_qualitys_pub.pqyv_rec_type;
1071 ddindx binary_integer; indx binary_integer;
1072 begin
1073
1074 -- copy data to the local IN or IN-OUT args, if any
1075
1076
1077
1078
1079
1080 ddp_pqyv_rec.id := rosetta_g_miss_num_map(p5_a0);
1081 ddp_pqyv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
1082 ddp_pqyv_rec.name := p5_a2;
1083 ddp_pqyv_rec.description := p5_a3;
1084 ddp_pqyv_rec.location_yn := p5_a4;
1085 ddp_pqyv_rec.from_date := rosetta_g_miss_date_in_map(p5_a5);
1086 ddp_pqyv_rec.to_date := rosetta_g_miss_date_in_map(p5_a6);
1087 ddp_pqyv_rec.created_by := rosetta_g_miss_num_map(p5_a7);
1088 ddp_pqyv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a8);
1089 ddp_pqyv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a9);
1090 ddp_pqyv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a10);
1091 ddp_pqyv_rec.last_update_login := rosetta_g_miss_num_map(p5_a11);
1092
1093 -- here's the delegated call to the old PL/SQL routine
1094 okl_pdt_qualitys_pub.validate_pdt_qualitys(p_api_version,
1095 p_init_msg_list,
1096 x_return_status,
1097 x_msg_count,
1098 x_msg_data,
1099 ddp_pqyv_rec);
1100
1101 -- copy data back from the local variables to OUT or IN-OUT args, if any
1102
1103
1104
1105
1106
1107 end;
1108
1109 procedure create_pdt_quality_vals(p_api_version NUMBER
1110 , p_init_msg_list VARCHAR2
1111 , x_return_status out nocopy VARCHAR2
1112 , x_msg_count out nocopy NUMBER
1113 , x_msg_data out nocopy VARCHAR2
1114 , p5_a0 JTF_NUMBER_TABLE
1115 , p5_a1 JTF_NUMBER_TABLE
1116 , p5_a2 JTF_NUMBER_TABLE
1117 , p5_a3 JTF_VARCHAR2_TABLE_200
1118 , p5_a4 JTF_VARCHAR2_TABLE_2000
1119 , p5_a5 JTF_DATE_TABLE
1120 , p5_a6 JTF_DATE_TABLE
1121 , p5_a7 JTF_NUMBER_TABLE
1122 , p5_a8 JTF_DATE_TABLE
1123 , p5_a9 JTF_NUMBER_TABLE
1124 , p5_a10 JTF_DATE_TABLE
1125 , p5_a11 JTF_NUMBER_TABLE
1126 , p6_a0 out nocopy JTF_NUMBER_TABLE
1127 , p6_a1 out nocopy JTF_NUMBER_TABLE
1128 , p6_a2 out nocopy JTF_NUMBER_TABLE
1129 , p6_a3 out nocopy JTF_VARCHAR2_TABLE_200
1130 , p6_a4 out nocopy JTF_VARCHAR2_TABLE_2000
1131 , p6_a5 out nocopy JTF_DATE_TABLE
1132 , p6_a6 out nocopy JTF_DATE_TABLE
1133 , p6_a7 out nocopy JTF_NUMBER_TABLE
1134 , p6_a8 out nocopy JTF_DATE_TABLE
1135 , p6_a9 out nocopy JTF_NUMBER_TABLE
1136 , p6_a10 out nocopy JTF_DATE_TABLE
1137 , p6_a11 out nocopy JTF_NUMBER_TABLE
1138 )
1139
1140 as
1141 ddp_qvev_tbl okl_pdt_qualitys_pub.qvev_tbl_type;
1142 ddx_qvev_tbl okl_pdt_qualitys_pub.qvev_tbl_type;
1143 ddindx binary_integer; indx binary_integer;
1144 begin
1145
1146 -- copy data to the local IN or IN-OUT args, if any
1147
1148
1149
1150
1151
1152 okl_qve_pvt_w.rosetta_table_copy_in_p5(ddp_qvev_tbl, p5_a0
1153 , p5_a1
1154 , p5_a2
1155 , p5_a3
1156 , p5_a4
1157 , p5_a5
1158 , p5_a6
1159 , p5_a7
1160 , p5_a8
1161 , p5_a9
1162 , p5_a10
1163 , p5_a11
1164 );
1165
1166
1167 -- here's the delegated call to the old PL/SQL routine
1168 okl_pdt_qualitys_pub.create_pdt_quality_vals(p_api_version,
1169 p_init_msg_list,
1170 x_return_status,
1171 x_msg_count,
1172 x_msg_data,
1173 ddp_qvev_tbl,
1174 ddx_qvev_tbl);
1175
1176 -- copy data back from the local variables to OUT or IN-OUT args, if any
1177
1178
1179
1180
1181
1182
1183 okl_qve_pvt_w.rosetta_table_copy_out_p5(ddx_qvev_tbl, p6_a0
1184 , p6_a1
1185 , p6_a2
1186 , p6_a3
1187 , p6_a4
1188 , p6_a5
1189 , p6_a6
1190 , p6_a7
1191 , p6_a8
1192 , p6_a9
1193 , p6_a10
1194 , p6_a11
1195 );
1196 end;
1197
1198 procedure create_pdt_quality_vals(p_api_version NUMBER
1199 , p_init_msg_list VARCHAR2
1200 , x_return_status out nocopy VARCHAR2
1201 , x_msg_count out nocopy NUMBER
1202 , x_msg_data out nocopy VARCHAR2
1203 , p6_a0 out nocopy NUMBER
1204 , p6_a1 out nocopy NUMBER
1205 , p6_a2 out nocopy NUMBER
1206 , p6_a3 out nocopy VARCHAR2
1207 , p6_a4 out nocopy VARCHAR2
1208 , p6_a5 out nocopy DATE
1209 , p6_a6 out nocopy DATE
1210 , p6_a7 out nocopy NUMBER
1211 , p6_a8 out nocopy DATE
1212 , p6_a9 out nocopy NUMBER
1213 , p6_a10 out nocopy DATE
1214 , p6_a11 out nocopy NUMBER
1215 , p5_a0 NUMBER := 0-1962.0724
1216 , p5_a1 NUMBER := 0-1962.0724
1217 , p5_a2 NUMBER := 0-1962.0724
1218 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
1219 , p5_a4 VARCHAR2 := fnd_api.g_miss_char
1220 , p5_a5 DATE := fnd_api.g_miss_date
1221 , p5_a6 DATE := fnd_api.g_miss_date
1222 , p5_a7 NUMBER := 0-1962.0724
1223 , p5_a8 DATE := fnd_api.g_miss_date
1224 , p5_a9 NUMBER := 0-1962.0724
1225 , p5_a10 DATE := fnd_api.g_miss_date
1226 , p5_a11 NUMBER := 0-1962.0724
1227 )
1228
1229 as
1230 ddp_qvev_rec okl_pdt_qualitys_pub.qvev_rec_type;
1231 ddx_qvev_rec okl_pdt_qualitys_pub.qvev_rec_type;
1232 ddindx binary_integer; indx binary_integer;
1233 begin
1234
1235 -- copy data to the local IN or IN-OUT args, if any
1236
1237
1238
1239
1240
1241 ddp_qvev_rec.id := rosetta_g_miss_num_map(p5_a0);
1242 ddp_qvev_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
1243 ddp_qvev_rec.pqy_id := rosetta_g_miss_num_map(p5_a2);
1244 ddp_qvev_rec.value := p5_a3;
1245 ddp_qvev_rec.description := p5_a4;
1246 ddp_qvev_rec.from_date := rosetta_g_miss_date_in_map(p5_a5);
1247 ddp_qvev_rec.to_date := rosetta_g_miss_date_in_map(p5_a6);
1248 ddp_qvev_rec.created_by := rosetta_g_miss_num_map(p5_a7);
1249 ddp_qvev_rec.creation_date := rosetta_g_miss_date_in_map(p5_a8);
1250 ddp_qvev_rec.last_updated_by := rosetta_g_miss_num_map(p5_a9);
1251 ddp_qvev_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a10);
1252 ddp_qvev_rec.last_update_login := rosetta_g_miss_num_map(p5_a11);
1253
1254
1255 -- here's the delegated call to the old PL/SQL routine
1256 okl_pdt_qualitys_pub.create_pdt_quality_vals(p_api_version,
1257 p_init_msg_list,
1258 x_return_status,
1259 x_msg_count,
1260 x_msg_data,
1261 ddp_qvev_rec,
1262 ddx_qvev_rec);
1263
1264 -- copy data back from the local variables to OUT or IN-OUT args, if any
1265
1266
1267
1268
1269
1270
1271 p6_a0 := rosetta_g_miss_num_map(ddx_qvev_rec.id);
1272 p6_a1 := rosetta_g_miss_num_map(ddx_qvev_rec.object_version_number);
1273 p6_a2 := rosetta_g_miss_num_map(ddx_qvev_rec.pqy_id);
1274 p6_a3 := ddx_qvev_rec.value;
1275 p6_a4 := ddx_qvev_rec.description;
1276 p6_a5 := ddx_qvev_rec.from_date;
1277 p6_a6 := ddx_qvev_rec.to_date;
1278 p6_a7 := rosetta_g_miss_num_map(ddx_qvev_rec.created_by);
1279 p6_a8 := ddx_qvev_rec.creation_date;
1280 p6_a9 := rosetta_g_miss_num_map(ddx_qvev_rec.last_updated_by);
1281 p6_a10 := ddx_qvev_rec.last_update_date;
1282 p6_a11 := rosetta_g_miss_num_map(ddx_qvev_rec.last_update_login);
1283 end;
1284
1285 procedure lock_pdt_quality_vals(p_api_version NUMBER
1286 , p_init_msg_list VARCHAR2
1287 , x_return_status out nocopy VARCHAR2
1288 , x_msg_count out nocopy NUMBER
1289 , x_msg_data out nocopy VARCHAR2
1290 , p5_a0 JTF_NUMBER_TABLE
1291 , p5_a1 JTF_NUMBER_TABLE
1292 , p5_a2 JTF_NUMBER_TABLE
1293 , p5_a3 JTF_VARCHAR2_TABLE_200
1294 , p5_a4 JTF_VARCHAR2_TABLE_2000
1295 , p5_a5 JTF_DATE_TABLE
1296 , p5_a6 JTF_DATE_TABLE
1297 , p5_a7 JTF_NUMBER_TABLE
1298 , p5_a8 JTF_DATE_TABLE
1299 , p5_a9 JTF_NUMBER_TABLE
1300 , p5_a10 JTF_DATE_TABLE
1301 , p5_a11 JTF_NUMBER_TABLE
1302 )
1303
1304 as
1305 ddp_qvev_tbl okl_pdt_qualitys_pub.qvev_tbl_type;
1306 ddindx binary_integer; indx binary_integer;
1307 begin
1308
1309 -- copy data to the local IN or IN-OUT args, if any
1310
1311
1312
1313
1314
1315 okl_qve_pvt_w.rosetta_table_copy_in_p5(ddp_qvev_tbl, p5_a0
1316 , p5_a1
1317 , p5_a2
1318 , p5_a3
1319 , p5_a4
1320 , p5_a5
1321 , p5_a6
1322 , p5_a7
1323 , p5_a8
1324 , p5_a9
1325 , p5_a10
1326 , p5_a11
1327 );
1328
1329 -- here's the delegated call to the old PL/SQL routine
1330 okl_pdt_qualitys_pub.lock_pdt_quality_vals(p_api_version,
1331 p_init_msg_list,
1332 x_return_status,
1333 x_msg_count,
1334 x_msg_data,
1335 ddp_qvev_tbl);
1336
1337 -- copy data back from the local variables to OUT or IN-OUT args, if any
1338
1339
1340
1341
1342
1343 end;
1344
1345 procedure lock_pdt_quality_vals(p_api_version NUMBER
1346 , p_init_msg_list VARCHAR2
1347 , x_return_status out nocopy VARCHAR2
1348 , x_msg_count out nocopy NUMBER
1349 , x_msg_data out nocopy VARCHAR2
1350 , p5_a0 NUMBER := 0-1962.0724
1351 , p5_a1 NUMBER := 0-1962.0724
1352 , p5_a2 NUMBER := 0-1962.0724
1353 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
1354 , p5_a4 VARCHAR2 := fnd_api.g_miss_char
1355 , p5_a5 DATE := fnd_api.g_miss_date
1356 , p5_a6 DATE := fnd_api.g_miss_date
1357 , p5_a7 NUMBER := 0-1962.0724
1358 , p5_a8 DATE := fnd_api.g_miss_date
1359 , p5_a9 NUMBER := 0-1962.0724
1360 , p5_a10 DATE := fnd_api.g_miss_date
1361 , p5_a11 NUMBER := 0-1962.0724
1362 )
1363
1364 as
1365 ddp_qvev_rec okl_pdt_qualitys_pub.qvev_rec_type;
1366 ddindx binary_integer; indx binary_integer;
1367 begin
1368
1369 -- copy data to the local IN or IN-OUT args, if any
1370
1371
1372
1373
1374
1375 ddp_qvev_rec.id := rosetta_g_miss_num_map(p5_a0);
1376 ddp_qvev_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
1377 ddp_qvev_rec.pqy_id := rosetta_g_miss_num_map(p5_a2);
1378 ddp_qvev_rec.value := p5_a3;
1379 ddp_qvev_rec.description := p5_a4;
1380 ddp_qvev_rec.from_date := rosetta_g_miss_date_in_map(p5_a5);
1381 ddp_qvev_rec.to_date := rosetta_g_miss_date_in_map(p5_a6);
1382 ddp_qvev_rec.created_by := rosetta_g_miss_num_map(p5_a7);
1383 ddp_qvev_rec.creation_date := rosetta_g_miss_date_in_map(p5_a8);
1384 ddp_qvev_rec.last_updated_by := rosetta_g_miss_num_map(p5_a9);
1385 ddp_qvev_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a10);
1386 ddp_qvev_rec.last_update_login := rosetta_g_miss_num_map(p5_a11);
1387
1388 -- here's the delegated call to the old PL/SQL routine
1389 okl_pdt_qualitys_pub.lock_pdt_quality_vals(p_api_version,
1390 p_init_msg_list,
1391 x_return_status,
1392 x_msg_count,
1393 x_msg_data,
1394 ddp_qvev_rec);
1395
1396 -- copy data back from the local variables to OUT or IN-OUT args, if any
1397
1398
1399
1400
1401
1402 end;
1403
1404 procedure update_pdt_quality_vals(p_api_version NUMBER
1405 , p_init_msg_list VARCHAR2
1406 , x_return_status out nocopy VARCHAR2
1407 , x_msg_count out nocopy NUMBER
1408 , x_msg_data out nocopy VARCHAR2
1409 , p5_a0 JTF_NUMBER_TABLE
1410 , p5_a1 JTF_NUMBER_TABLE
1411 , p5_a2 JTF_NUMBER_TABLE
1412 , p5_a3 JTF_VARCHAR2_TABLE_200
1413 , p5_a4 JTF_VARCHAR2_TABLE_2000
1414 , p5_a5 JTF_DATE_TABLE
1415 , p5_a6 JTF_DATE_TABLE
1416 , p5_a7 JTF_NUMBER_TABLE
1417 , p5_a8 JTF_DATE_TABLE
1418 , p5_a9 JTF_NUMBER_TABLE
1419 , p5_a10 JTF_DATE_TABLE
1420 , p5_a11 JTF_NUMBER_TABLE
1421 , p6_a0 out nocopy JTF_NUMBER_TABLE
1422 , p6_a1 out nocopy JTF_NUMBER_TABLE
1423 , p6_a2 out nocopy JTF_NUMBER_TABLE
1424 , p6_a3 out nocopy JTF_VARCHAR2_TABLE_200
1425 , p6_a4 out nocopy JTF_VARCHAR2_TABLE_2000
1426 , p6_a5 out nocopy JTF_DATE_TABLE
1427 , p6_a6 out nocopy JTF_DATE_TABLE
1428 , p6_a7 out nocopy JTF_NUMBER_TABLE
1429 , p6_a8 out nocopy JTF_DATE_TABLE
1430 , p6_a9 out nocopy JTF_NUMBER_TABLE
1431 , p6_a10 out nocopy JTF_DATE_TABLE
1432 , p6_a11 out nocopy JTF_NUMBER_TABLE
1433 )
1434
1435 as
1436 ddp_qvev_tbl okl_pdt_qualitys_pub.qvev_tbl_type;
1437 ddx_qvev_tbl okl_pdt_qualitys_pub.qvev_tbl_type;
1438 ddindx binary_integer; indx binary_integer;
1439 begin
1440
1441 -- copy data to the local IN or IN-OUT args, if any
1442
1443
1444
1445
1446
1447 okl_qve_pvt_w.rosetta_table_copy_in_p5(ddp_qvev_tbl, p5_a0
1448 , p5_a1
1449 , p5_a2
1450 , p5_a3
1451 , p5_a4
1452 , p5_a5
1453 , p5_a6
1454 , p5_a7
1455 , p5_a8
1456 , p5_a9
1457 , p5_a10
1458 , p5_a11
1459 );
1460
1461
1462 -- here's the delegated call to the old PL/SQL routine
1463 okl_pdt_qualitys_pub.update_pdt_quality_vals(p_api_version,
1464 p_init_msg_list,
1465 x_return_status,
1466 x_msg_count,
1467 x_msg_data,
1468 ddp_qvev_tbl,
1469 ddx_qvev_tbl);
1470
1471 -- copy data back from the local variables to OUT or IN-OUT args, if any
1472
1473
1474
1475
1476
1477
1478 okl_qve_pvt_w.rosetta_table_copy_out_p5(ddx_qvev_tbl, p6_a0
1479 , p6_a1
1480 , p6_a2
1481 , p6_a3
1482 , p6_a4
1483 , p6_a5
1484 , p6_a6
1485 , p6_a7
1486 , p6_a8
1487 , p6_a9
1488 , p6_a10
1489 , p6_a11
1490 );
1491 end;
1492
1493 procedure update_pdt_quality_vals(p_api_version NUMBER
1494 , p_init_msg_list VARCHAR2
1495 , x_return_status out nocopy VARCHAR2
1496 , x_msg_count out nocopy NUMBER
1497 , x_msg_data out nocopy VARCHAR2
1498 , p6_a0 out nocopy NUMBER
1499 , p6_a1 out nocopy NUMBER
1500 , p6_a2 out nocopy NUMBER
1501 , p6_a3 out nocopy VARCHAR2
1502 , p6_a4 out nocopy VARCHAR2
1503 , p6_a5 out nocopy DATE
1504 , p6_a6 out nocopy DATE
1505 , p6_a7 out nocopy NUMBER
1506 , p6_a8 out nocopy DATE
1507 , p6_a9 out nocopy NUMBER
1508 , p6_a10 out nocopy DATE
1509 , p6_a11 out nocopy NUMBER
1510 , p5_a0 NUMBER := 0-1962.0724
1511 , p5_a1 NUMBER := 0-1962.0724
1512 , p5_a2 NUMBER := 0-1962.0724
1513 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
1514 , p5_a4 VARCHAR2 := fnd_api.g_miss_char
1515 , p5_a5 DATE := fnd_api.g_miss_date
1516 , p5_a6 DATE := fnd_api.g_miss_date
1517 , p5_a7 NUMBER := 0-1962.0724
1518 , p5_a8 DATE := fnd_api.g_miss_date
1519 , p5_a9 NUMBER := 0-1962.0724
1520 , p5_a10 DATE := fnd_api.g_miss_date
1521 , p5_a11 NUMBER := 0-1962.0724
1522 )
1523
1524 as
1525 ddp_qvev_rec okl_pdt_qualitys_pub.qvev_rec_type;
1526 ddx_qvev_rec okl_pdt_qualitys_pub.qvev_rec_type;
1527 ddindx binary_integer; indx binary_integer;
1528 begin
1529
1530 -- copy data to the local IN or IN-OUT args, if any
1531
1532
1533
1534
1535
1536 ddp_qvev_rec.id := rosetta_g_miss_num_map(p5_a0);
1537 ddp_qvev_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
1538 ddp_qvev_rec.pqy_id := rosetta_g_miss_num_map(p5_a2);
1539 ddp_qvev_rec.value := p5_a3;
1540 ddp_qvev_rec.description := p5_a4;
1541 ddp_qvev_rec.from_date := rosetta_g_miss_date_in_map(p5_a5);
1542 ddp_qvev_rec.to_date := rosetta_g_miss_date_in_map(p5_a6);
1543 ddp_qvev_rec.created_by := rosetta_g_miss_num_map(p5_a7);
1544 ddp_qvev_rec.creation_date := rosetta_g_miss_date_in_map(p5_a8);
1545 ddp_qvev_rec.last_updated_by := rosetta_g_miss_num_map(p5_a9);
1546 ddp_qvev_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a10);
1547 ddp_qvev_rec.last_update_login := rosetta_g_miss_num_map(p5_a11);
1548
1549
1550 -- here's the delegated call to the old PL/SQL routine
1551 okl_pdt_qualitys_pub.update_pdt_quality_vals(p_api_version,
1552 p_init_msg_list,
1553 x_return_status,
1554 x_msg_count,
1555 x_msg_data,
1556 ddp_qvev_rec,
1557 ddx_qvev_rec);
1558
1559 -- copy data back from the local variables to OUT or IN-OUT args, if any
1560
1561
1562
1563
1564
1565
1566 p6_a0 := rosetta_g_miss_num_map(ddx_qvev_rec.id);
1567 p6_a1 := rosetta_g_miss_num_map(ddx_qvev_rec.object_version_number);
1568 p6_a2 := rosetta_g_miss_num_map(ddx_qvev_rec.pqy_id);
1569 p6_a3 := ddx_qvev_rec.value;
1570 p6_a4 := ddx_qvev_rec.description;
1571 p6_a5 := ddx_qvev_rec.from_date;
1572 p6_a6 := ddx_qvev_rec.to_date;
1573 p6_a7 := rosetta_g_miss_num_map(ddx_qvev_rec.created_by);
1574 p6_a8 := ddx_qvev_rec.creation_date;
1575 p6_a9 := rosetta_g_miss_num_map(ddx_qvev_rec.last_updated_by);
1576 p6_a10 := ddx_qvev_rec.last_update_date;
1577 p6_a11 := rosetta_g_miss_num_map(ddx_qvev_rec.last_update_login);
1578 end;
1579
1580 procedure delete_pdt_quality_vals(p_api_version NUMBER
1581 , p_init_msg_list VARCHAR2
1582 , x_return_status out nocopy VARCHAR2
1583 , x_msg_count out nocopy NUMBER
1584 , x_msg_data out nocopy VARCHAR2
1585 , p5_a0 JTF_NUMBER_TABLE
1586 , p5_a1 JTF_NUMBER_TABLE
1587 , p5_a2 JTF_NUMBER_TABLE
1588 , p5_a3 JTF_VARCHAR2_TABLE_200
1589 , p5_a4 JTF_VARCHAR2_TABLE_2000
1590 , p5_a5 JTF_DATE_TABLE
1591 , p5_a6 JTF_DATE_TABLE
1592 , p5_a7 JTF_NUMBER_TABLE
1593 , p5_a8 JTF_DATE_TABLE
1594 , p5_a9 JTF_NUMBER_TABLE
1595 , p5_a10 JTF_DATE_TABLE
1596 , p5_a11 JTF_NUMBER_TABLE
1597 )
1598
1599 as
1600 ddp_qvev_tbl okl_pdt_qualitys_pub.qvev_tbl_type;
1601 ddindx binary_integer; indx binary_integer;
1602 begin
1603
1604 -- copy data to the local IN or IN-OUT args, if any
1605
1606
1607
1608
1609
1610 okl_qve_pvt_w.rosetta_table_copy_in_p5(ddp_qvev_tbl, p5_a0
1611 , p5_a1
1612 , p5_a2
1613 , p5_a3
1614 , p5_a4
1615 , p5_a5
1616 , p5_a6
1617 , p5_a7
1618 , p5_a8
1619 , p5_a9
1620 , p5_a10
1621 , p5_a11
1622 );
1623
1624 -- here's the delegated call to the old PL/SQL routine
1625 okl_pdt_qualitys_pub.delete_pdt_quality_vals(p_api_version,
1626 p_init_msg_list,
1627 x_return_status,
1628 x_msg_count,
1629 x_msg_data,
1630 ddp_qvev_tbl);
1631
1632 -- copy data back from the local variables to OUT or IN-OUT args, if any
1633
1634
1635
1636
1637
1638 end;
1639
1640 procedure delete_pdt_quality_vals(p_api_version NUMBER
1641 , p_init_msg_list VARCHAR2
1642 , x_return_status out nocopy VARCHAR2
1643 , x_msg_count out nocopy NUMBER
1644 , x_msg_data out nocopy VARCHAR2
1645 , p5_a0 NUMBER := 0-1962.0724
1646 , p5_a1 NUMBER := 0-1962.0724
1647 , p5_a2 NUMBER := 0-1962.0724
1648 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
1649 , p5_a4 VARCHAR2 := fnd_api.g_miss_char
1650 , p5_a5 DATE := fnd_api.g_miss_date
1651 , p5_a6 DATE := fnd_api.g_miss_date
1652 , p5_a7 NUMBER := 0-1962.0724
1653 , p5_a8 DATE := fnd_api.g_miss_date
1654 , p5_a9 NUMBER := 0-1962.0724
1655 , p5_a10 DATE := fnd_api.g_miss_date
1656 , p5_a11 NUMBER := 0-1962.0724
1657 )
1658
1659 as
1660 ddp_qvev_rec okl_pdt_qualitys_pub.qvev_rec_type;
1661 ddindx binary_integer; indx binary_integer;
1662 begin
1663
1664 -- copy data to the local IN or IN-OUT args, if any
1665
1666
1667
1668
1669
1670 ddp_qvev_rec.id := rosetta_g_miss_num_map(p5_a0);
1671 ddp_qvev_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
1672 ddp_qvev_rec.pqy_id := rosetta_g_miss_num_map(p5_a2);
1673 ddp_qvev_rec.value := p5_a3;
1674 ddp_qvev_rec.description := p5_a4;
1675 ddp_qvev_rec.from_date := rosetta_g_miss_date_in_map(p5_a5);
1676 ddp_qvev_rec.to_date := rosetta_g_miss_date_in_map(p5_a6);
1677 ddp_qvev_rec.created_by := rosetta_g_miss_num_map(p5_a7);
1678 ddp_qvev_rec.creation_date := rosetta_g_miss_date_in_map(p5_a8);
1679 ddp_qvev_rec.last_updated_by := rosetta_g_miss_num_map(p5_a9);
1680 ddp_qvev_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a10);
1681 ddp_qvev_rec.last_update_login := rosetta_g_miss_num_map(p5_a11);
1682
1683 -- here's the delegated call to the old PL/SQL routine
1684 okl_pdt_qualitys_pub.delete_pdt_quality_vals(p_api_version,
1685 p_init_msg_list,
1686 x_return_status,
1687 x_msg_count,
1688 x_msg_data,
1689 ddp_qvev_rec);
1690
1691 -- copy data back from the local variables to OUT or IN-OUT args, if any
1692
1693
1694
1695
1696
1697 end;
1698
1699 procedure validate_pdt_quality_vals(p_api_version NUMBER
1700 , p_init_msg_list VARCHAR2
1701 , x_return_status out nocopy VARCHAR2
1702 , x_msg_count out nocopy NUMBER
1703 , x_msg_data out nocopy VARCHAR2
1704 , p5_a0 JTF_NUMBER_TABLE
1705 , p5_a1 JTF_NUMBER_TABLE
1706 , p5_a2 JTF_NUMBER_TABLE
1707 , p5_a3 JTF_VARCHAR2_TABLE_200
1708 , p5_a4 JTF_VARCHAR2_TABLE_2000
1709 , p5_a5 JTF_DATE_TABLE
1710 , p5_a6 JTF_DATE_TABLE
1711 , p5_a7 JTF_NUMBER_TABLE
1712 , p5_a8 JTF_DATE_TABLE
1713 , p5_a9 JTF_NUMBER_TABLE
1714 , p5_a10 JTF_DATE_TABLE
1715 , p5_a11 JTF_NUMBER_TABLE
1716 )
1717
1718 as
1719 ddp_qvev_tbl okl_pdt_qualitys_pub.qvev_tbl_type;
1720 ddindx binary_integer; indx binary_integer;
1721 begin
1722
1723 -- copy data to the local IN or IN-OUT args, if any
1724
1725
1726
1727
1728
1729 okl_qve_pvt_w.rosetta_table_copy_in_p5(ddp_qvev_tbl, p5_a0
1730 , p5_a1
1731 , p5_a2
1732 , p5_a3
1733 , p5_a4
1734 , p5_a5
1735 , p5_a6
1736 , p5_a7
1737 , p5_a8
1738 , p5_a9
1739 , p5_a10
1740 , p5_a11
1741 );
1742
1743 -- here's the delegated call to the old PL/SQL routine
1744 okl_pdt_qualitys_pub.validate_pdt_quality_vals(p_api_version,
1745 p_init_msg_list,
1746 x_return_status,
1747 x_msg_count,
1748 x_msg_data,
1749 ddp_qvev_tbl);
1750
1751 -- copy data back from the local variables to OUT or IN-OUT args, if any
1752
1753
1754
1755
1756
1757 end;
1758
1759 procedure validate_pdt_quality_vals(p_api_version NUMBER
1760 , p_init_msg_list VARCHAR2
1761 , x_return_status out nocopy VARCHAR2
1762 , x_msg_count out nocopy NUMBER
1763 , x_msg_data out nocopy VARCHAR2
1764 , p5_a0 NUMBER := 0-1962.0724
1765 , p5_a1 NUMBER := 0-1962.0724
1766 , p5_a2 NUMBER := 0-1962.0724
1767 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
1768 , p5_a4 VARCHAR2 := fnd_api.g_miss_char
1769 , p5_a5 DATE := fnd_api.g_miss_date
1770 , p5_a6 DATE := fnd_api.g_miss_date
1771 , p5_a7 NUMBER := 0-1962.0724
1772 , p5_a8 DATE := fnd_api.g_miss_date
1773 , p5_a9 NUMBER := 0-1962.0724
1774 , p5_a10 DATE := fnd_api.g_miss_date
1775 , p5_a11 NUMBER := 0-1962.0724
1776 )
1777
1778 as
1779 ddp_qvev_rec okl_pdt_qualitys_pub.qvev_rec_type;
1780 ddindx binary_integer; indx binary_integer;
1781 begin
1782
1783 -- copy data to the local IN or IN-OUT args, if any
1784
1785
1786
1787
1788
1789 ddp_qvev_rec.id := rosetta_g_miss_num_map(p5_a0);
1790 ddp_qvev_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
1791 ddp_qvev_rec.pqy_id := rosetta_g_miss_num_map(p5_a2);
1792 ddp_qvev_rec.value := p5_a3;
1793 ddp_qvev_rec.description := p5_a4;
1794 ddp_qvev_rec.from_date := rosetta_g_miss_date_in_map(p5_a5);
1795 ddp_qvev_rec.to_date := rosetta_g_miss_date_in_map(p5_a6);
1796 ddp_qvev_rec.created_by := rosetta_g_miss_num_map(p5_a7);
1797 ddp_qvev_rec.creation_date := rosetta_g_miss_date_in_map(p5_a8);
1798 ddp_qvev_rec.last_updated_by := rosetta_g_miss_num_map(p5_a9);
1799 ddp_qvev_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a10);
1800 ddp_qvev_rec.last_update_login := rosetta_g_miss_num_map(p5_a11);
1801
1802 -- here's the delegated call to the old PL/SQL routine
1803 okl_pdt_qualitys_pub.validate_pdt_quality_vals(p_api_version,
1804 p_init_msg_list,
1805 x_return_status,
1806 x_msg_count,
1807 x_msg_data,
1808 ddp_qvev_rec);
1809
1810 -- copy data back from the local variables to OUT or IN-OUT args, if any
1811
1812
1813
1814
1815
1816 end;
1817
1818 end okl_pdt_qualitys_pub_w;