[Home] [Help]
PACKAGE BODY: APPS.OKL_PROCESS_TMPLTS_PUB_W
Source
1 package body okl_process_tmplts_pub_w as
2 /* $Header: OKLUPTMB.pls 120.2 2007/06/11 11:44:37 sosharma 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 insert_process_tmplts(p_api_version NUMBER
26 , p_init_msg_list VARCHAR2
27 , x_return_status out nocopy VARCHAR2
28 , x_msg_count out nocopy NUMBER
29 , x_msg_data out nocopy VARCHAR2
30 , p5_a0 JTF_NUMBER_TABLE
31 , p5_a1 JTF_NUMBER_TABLE
32 , p5_a2 JTF_VARCHAR2_TABLE_100
33 , p5_a3 JTF_NUMBER_TABLE
34 , p5_a4 JTF_VARCHAR2_TABLE_100
35 , p5_a5 JTF_VARCHAR2_TABLE_100
36 , p5_a6 JTF_DATE_TABLE
37 , p5_a7 JTF_DATE_TABLE
38 , p5_a8 JTF_NUMBER_TABLE
39 , p5_a9 JTF_VARCHAR2_TABLE_100
40 , p5_a10 JTF_VARCHAR2_TABLE_500
41 , p5_a11 JTF_VARCHAR2_TABLE_500
42 , p5_a12 JTF_VARCHAR2_TABLE_500
43 , p5_a13 JTF_VARCHAR2_TABLE_500
44 , p5_a14 JTF_VARCHAR2_TABLE_500
45 , p5_a15 JTF_VARCHAR2_TABLE_500
46 , p5_a16 JTF_VARCHAR2_TABLE_500
47 , p5_a17 JTF_VARCHAR2_TABLE_500
48 , p5_a18 JTF_VARCHAR2_TABLE_500
49 , p5_a19 JTF_VARCHAR2_TABLE_500
50 , p5_a20 JTF_VARCHAR2_TABLE_500
51 , p5_a21 JTF_VARCHAR2_TABLE_500
52 , p5_a22 JTF_VARCHAR2_TABLE_500
53 , p5_a23 JTF_VARCHAR2_TABLE_500
54 , p5_a24 JTF_VARCHAR2_TABLE_500
55 , p5_a25 JTF_NUMBER_TABLE
56 , p5_a26 JTF_DATE_TABLE
57 , p5_a27 JTF_NUMBER_TABLE
58 , p5_a28 JTF_DATE_TABLE
59 , p5_a29 JTF_NUMBER_TABLE
60 , p5_a30 JTF_VARCHAR2_TABLE_100
61 , p5_a31 JTF_VARCHAR2_TABLE_100
62 , p6_a0 out nocopy JTF_NUMBER_TABLE
63 , p6_a1 out nocopy JTF_NUMBER_TABLE
64 , p6_a2 out nocopy JTF_VARCHAR2_TABLE_100
65 , p6_a3 out nocopy JTF_NUMBER_TABLE
66 , p6_a4 out nocopy JTF_VARCHAR2_TABLE_100
67 , p6_a5 out nocopy JTF_VARCHAR2_TABLE_100
68 , p6_a6 out nocopy JTF_DATE_TABLE
69 , p6_a7 out nocopy JTF_DATE_TABLE
70 , p6_a8 out nocopy JTF_NUMBER_TABLE
71 , p6_a9 out nocopy JTF_VARCHAR2_TABLE_100
72 , p6_a10 out nocopy JTF_VARCHAR2_TABLE_500
73 , p6_a11 out nocopy JTF_VARCHAR2_TABLE_500
74 , p6_a12 out nocopy JTF_VARCHAR2_TABLE_500
75 , p6_a13 out nocopy JTF_VARCHAR2_TABLE_500
76 , p6_a14 out nocopy JTF_VARCHAR2_TABLE_500
77 , p6_a15 out nocopy JTF_VARCHAR2_TABLE_500
78 , p6_a16 out nocopy JTF_VARCHAR2_TABLE_500
79 , p6_a17 out nocopy JTF_VARCHAR2_TABLE_500
80 , p6_a18 out nocopy JTF_VARCHAR2_TABLE_500
81 , p6_a19 out nocopy JTF_VARCHAR2_TABLE_500
82 , p6_a20 out nocopy JTF_VARCHAR2_TABLE_500
83 , p6_a21 out nocopy JTF_VARCHAR2_TABLE_500
84 , p6_a22 out nocopy JTF_VARCHAR2_TABLE_500
85 , p6_a23 out nocopy JTF_VARCHAR2_TABLE_500
86 , p6_a24 out nocopy JTF_VARCHAR2_TABLE_500
87 , p6_a25 out nocopy JTF_NUMBER_TABLE
88 , p6_a26 out nocopy JTF_DATE_TABLE
89 , p6_a27 out nocopy JTF_NUMBER_TABLE
90 , p6_a28 out nocopy JTF_DATE_TABLE
91 , p6_a29 out nocopy JTF_NUMBER_TABLE
92 , p6_a30 out nocopy JTF_VARCHAR2_TABLE_100
93 , p6_a31 out nocopy JTF_VARCHAR2_TABLE_100
94 )
95
96 as
97 ddp_ptmv_tbl okl_process_tmplts_pub.ptmv_tbl_type;
98 ddx_ptmv_tbl okl_process_tmplts_pub.ptmv_tbl_type;
99 ddindx binary_integer; indx binary_integer;
100 begin
101
102 -- copy data to the local IN or IN-OUT args, if any
103
104
105
106
107
108 okl_ptm_pvt_w.rosetta_table_copy_in_p8(ddp_ptmv_tbl, p5_a0
109 , p5_a1
110 , p5_a2
111 , p5_a3
112 , p5_a4
113 , p5_a5
114 , p5_a6
115 , p5_a7
116 , p5_a8
117 , p5_a9
118 , p5_a10
119 , p5_a11
120 , p5_a12
121 , p5_a13
122 , p5_a14
123 , p5_a15
124 , p5_a16
125 , p5_a17
126 , p5_a18
127 , p5_a19
128 , p5_a20
129 , p5_a21
130 , p5_a22
131 , p5_a23
132 , p5_a24
133 , p5_a25
134 , p5_a26
135 , p5_a27
136 , p5_a28
137 , p5_a29
138 , p5_a30
139 , p5_a31
140 );
141
142
143 -- here's the delegated call to the old PL/SQL routine
144 okl_process_tmplts_pub.insert_process_tmplts(p_api_version,
145 p_init_msg_list,
146 x_return_status,
147 x_msg_count,
148 x_msg_data,
149 ddp_ptmv_tbl,
150 ddx_ptmv_tbl);
151
152 -- copy data back from the local variables to OUT or IN-OUT args, if any
153
154
155
156
157
158
159 okl_ptm_pvt_w.rosetta_table_copy_out_p8(ddx_ptmv_tbl, p6_a0
160 , p6_a1
161 , p6_a2
162 , p6_a3
163 , p6_a4
164 , p6_a5
165 , p6_a6
166 , p6_a7
167 , p6_a8
168 , p6_a9
169 , p6_a10
170 , p6_a11
171 , p6_a12
172 , p6_a13
173 , p6_a14
174 , p6_a15
175 , p6_a16
176 , p6_a17
177 , p6_a18
178 , p6_a19
179 , p6_a20
180 , p6_a21
181 , p6_a22
182 , p6_a23
183 , p6_a24
184 , p6_a25
185 , p6_a26
186 , p6_a27
187 , p6_a28
188 , p6_a29
189 , p6_a30
190 , p6_a31
191 );
192 end;
193
194 procedure insert_process_tmplts(p_api_version NUMBER
195 , p_init_msg_list VARCHAR2
196 , x_return_status out nocopy VARCHAR2
197 , x_msg_count out nocopy NUMBER
198 , x_msg_data out nocopy VARCHAR2
199 , p6_a0 out nocopy NUMBER
200 , p6_a1 out nocopy NUMBER
201 , p6_a2 out nocopy VARCHAR2
202 , p6_a3 out nocopy NUMBER
203 , p6_a4 out nocopy VARCHAR2
204 , p6_a5 out nocopy VARCHAR2
205 , p6_a6 out nocopy DATE
206 , p6_a7 out nocopy DATE
207 , p6_a8 out nocopy NUMBER
208 , p6_a9 out nocopy VARCHAR2
209 , p6_a10 out nocopy VARCHAR2
210 , p6_a11 out nocopy VARCHAR2
211 , p6_a12 out nocopy VARCHAR2
212 , p6_a13 out nocopy VARCHAR2
213 , p6_a14 out nocopy VARCHAR2
214 , p6_a15 out nocopy VARCHAR2
215 , p6_a16 out nocopy VARCHAR2
216 , p6_a17 out nocopy VARCHAR2
217 , p6_a18 out nocopy VARCHAR2
218 , p6_a19 out nocopy VARCHAR2
219 , p6_a20 out nocopy VARCHAR2
220 , p6_a21 out nocopy VARCHAR2
221 , p6_a22 out nocopy VARCHAR2
222 , p6_a23 out nocopy VARCHAR2
223 , p6_a24 out nocopy VARCHAR2
224 , p6_a25 out nocopy NUMBER
225 , p6_a26 out nocopy DATE
226 , p6_a27 out nocopy NUMBER
227 , p6_a28 out nocopy DATE
228 , p6_a29 out nocopy NUMBER
229 , p6_a30 out nocopy VARCHAR2
230 , p6_a31 out nocopy VARCHAR2
231 , p5_a0 NUMBER := 0-1962.0724
232 , p5_a1 NUMBER := 0-1962.0724
233 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
234 , p5_a3 NUMBER := 0-1962.0724
235 , p5_a4 VARCHAR2 := fnd_api.g_miss_char
236 , p5_a5 VARCHAR2 := fnd_api.g_miss_char
237 , p5_a6 DATE := fnd_api.g_miss_date
238 , p5_a7 DATE := fnd_api.g_miss_date
239 , p5_a8 NUMBER := 0-1962.0724
240 , p5_a9 VARCHAR2 := fnd_api.g_miss_char
241 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
242 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
243 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
244 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
245 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
246 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
247 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
248 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
249 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
250 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
251 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
252 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
253 , p5_a22 VARCHAR2 := fnd_api.g_miss_char
254 , p5_a23 VARCHAR2 := fnd_api.g_miss_char
255 , p5_a24 VARCHAR2 := fnd_api.g_miss_char
256 , p5_a25 NUMBER := 0-1962.0724
257 , p5_a26 DATE := fnd_api.g_miss_date
258 , p5_a27 NUMBER := 0-1962.0724
259 , p5_a28 DATE := fnd_api.g_miss_date
260 , p5_a29 NUMBER := 0-1962.0724
261 , p5_a30 VARCHAR2 := fnd_api.g_miss_char
262 , p5_a31 VARCHAR2 := fnd_api.g_miss_char
263 )
264
265 as
266 ddp_ptmv_rec okl_process_tmplts_pub.ptmv_rec_type;
267 ddx_ptmv_rec okl_process_tmplts_pub.ptmv_rec_type;
268 ddindx binary_integer; indx binary_integer;
269 begin
270
271 -- copy data to the local IN or IN-OUT args, if any
272
273
274
275
276
277 ddp_ptmv_rec.id := rosetta_g_miss_num_map(p5_a0);
278 ddp_ptmv_rec.org_id := rosetta_g_miss_num_map(p5_a1);
279 ddp_ptmv_rec.ptm_code := p5_a2;
280 ddp_ptmv_rec.jtf_amv_item_id := rosetta_g_miss_num_map(p5_a3);
281 ddp_ptmv_rec.sfwt_flag := p5_a4;
282 ddp_ptmv_rec.email_subject_line := p5_a5;
283 ddp_ptmv_rec.start_date := rosetta_g_miss_date_in_map(p5_a6);
284 ddp_ptmv_rec.end_date := rosetta_g_miss_date_in_map(p5_a7);
285 ddp_ptmv_rec.object_version_number := rosetta_g_miss_num_map(p5_a8);
286 ddp_ptmv_rec.attribute_category := p5_a9;
287 ddp_ptmv_rec.attribute1 := p5_a10;
288 ddp_ptmv_rec.attribute2 := p5_a11;
289 ddp_ptmv_rec.attribute3 := p5_a12;
290 ddp_ptmv_rec.attribute4 := p5_a13;
291 ddp_ptmv_rec.attribute5 := p5_a14;
292 ddp_ptmv_rec.attribute6 := p5_a15;
293 ddp_ptmv_rec.attribute7 := p5_a16;
294 ddp_ptmv_rec.attribute8 := p5_a17;
295 ddp_ptmv_rec.attribute9 := p5_a18;
296 ddp_ptmv_rec.attribute10 := p5_a19;
297 ddp_ptmv_rec.attribute11 := p5_a20;
298 ddp_ptmv_rec.attribute12 := p5_a21;
299 ddp_ptmv_rec.attribute13 := p5_a22;
300 ddp_ptmv_rec.attribute14 := p5_a23;
301 ddp_ptmv_rec.attribute15 := p5_a24;
302 ddp_ptmv_rec.created_by := rosetta_g_miss_num_map(p5_a25);
303 ddp_ptmv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a26);
304 ddp_ptmv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a27);
305 ddp_ptmv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a28);
306 ddp_ptmv_rec.last_update_login := rosetta_g_miss_num_map(p5_a29);
307 ddp_ptmv_rec.recipient_type_code := p5_a30;
308 ddp_ptmv_rec.xml_tmplt_code := p5_a31;
309
310
311 -- here's the delegated call to the old PL/SQL routine
312 okl_process_tmplts_pub.insert_process_tmplts(p_api_version,
313 p_init_msg_list,
314 x_return_status,
315 x_msg_count,
316 x_msg_data,
317 ddp_ptmv_rec,
318 ddx_ptmv_rec);
319
320 -- copy data back from the local variables to OUT or IN-OUT args, if any
321
322
323
324
325
326
327 p6_a0 := rosetta_g_miss_num_map(ddx_ptmv_rec.id);
328 p6_a1 := rosetta_g_miss_num_map(ddx_ptmv_rec.org_id);
329 p6_a2 := ddx_ptmv_rec.ptm_code;
330 p6_a3 := rosetta_g_miss_num_map(ddx_ptmv_rec.jtf_amv_item_id);
331 p6_a4 := ddx_ptmv_rec.sfwt_flag;
332 p6_a5 := ddx_ptmv_rec.email_subject_line;
333 p6_a6 := ddx_ptmv_rec.start_date;
334 p6_a7 := ddx_ptmv_rec.end_date;
335 p6_a8 := rosetta_g_miss_num_map(ddx_ptmv_rec.object_version_number);
336 p6_a9 := ddx_ptmv_rec.attribute_category;
337 p6_a10 := ddx_ptmv_rec.attribute1;
338 p6_a11 := ddx_ptmv_rec.attribute2;
339 p6_a12 := ddx_ptmv_rec.attribute3;
340 p6_a13 := ddx_ptmv_rec.attribute4;
341 p6_a14 := ddx_ptmv_rec.attribute5;
342 p6_a15 := ddx_ptmv_rec.attribute6;
343 p6_a16 := ddx_ptmv_rec.attribute7;
344 p6_a17 := ddx_ptmv_rec.attribute8;
345 p6_a18 := ddx_ptmv_rec.attribute9;
346 p6_a19 := ddx_ptmv_rec.attribute10;
347 p6_a20 := ddx_ptmv_rec.attribute11;
348 p6_a21 := ddx_ptmv_rec.attribute12;
349 p6_a22 := ddx_ptmv_rec.attribute13;
350 p6_a23 := ddx_ptmv_rec.attribute14;
351 p6_a24 := ddx_ptmv_rec.attribute15;
352 p6_a25 := rosetta_g_miss_num_map(ddx_ptmv_rec.created_by);
353 p6_a26 := ddx_ptmv_rec.creation_date;
354 p6_a27 := rosetta_g_miss_num_map(ddx_ptmv_rec.last_updated_by);
355 p6_a28 := ddx_ptmv_rec.last_update_date;
356 p6_a29 := rosetta_g_miss_num_map(ddx_ptmv_rec.last_update_login);
357 p6_a30 := ddx_ptmv_rec.recipient_type_code;
358 p6_a31 := ddx_ptmv_rec.xml_tmplt_code;
359 end;
360
361 procedure lock_process_tmplts(p_api_version NUMBER
362 , p_init_msg_list VARCHAR2
363 , x_return_status out nocopy VARCHAR2
364 , x_msg_count out nocopy NUMBER
365 , x_msg_data out nocopy VARCHAR2
366 , p5_a0 JTF_NUMBER_TABLE
367 , p5_a1 JTF_NUMBER_TABLE
368 , p5_a2 JTF_VARCHAR2_TABLE_100
369 , p5_a3 JTF_NUMBER_TABLE
370 , p5_a4 JTF_VARCHAR2_TABLE_100
371 , p5_a5 JTF_VARCHAR2_TABLE_100
372 , p5_a6 JTF_DATE_TABLE
373 , p5_a7 JTF_DATE_TABLE
374 , p5_a8 JTF_NUMBER_TABLE
375 , p5_a9 JTF_VARCHAR2_TABLE_100
376 , p5_a10 JTF_VARCHAR2_TABLE_500
377 , p5_a11 JTF_VARCHAR2_TABLE_500
378 , p5_a12 JTF_VARCHAR2_TABLE_500
379 , p5_a13 JTF_VARCHAR2_TABLE_500
380 , p5_a14 JTF_VARCHAR2_TABLE_500
381 , p5_a15 JTF_VARCHAR2_TABLE_500
382 , p5_a16 JTF_VARCHAR2_TABLE_500
383 , p5_a17 JTF_VARCHAR2_TABLE_500
384 , p5_a18 JTF_VARCHAR2_TABLE_500
385 , p5_a19 JTF_VARCHAR2_TABLE_500
386 , p5_a20 JTF_VARCHAR2_TABLE_500
387 , p5_a21 JTF_VARCHAR2_TABLE_500
388 , p5_a22 JTF_VARCHAR2_TABLE_500
389 , p5_a23 JTF_VARCHAR2_TABLE_500
390 , p5_a24 JTF_VARCHAR2_TABLE_500
391 , p5_a25 JTF_NUMBER_TABLE
392 , p5_a26 JTF_DATE_TABLE
393 , p5_a27 JTF_NUMBER_TABLE
394 , p5_a28 JTF_DATE_TABLE
395 , p5_a29 JTF_NUMBER_TABLE
396 , p5_a30 JTF_VARCHAR2_TABLE_100
397 , p5_a31 JTF_VARCHAR2_TABLE_100
398 )
399
400 as
401 ddp_ptmv_tbl okl_process_tmplts_pub.ptmv_tbl_type;
402 ddindx binary_integer; indx binary_integer;
403 begin
404
405 -- copy data to the local IN or IN-OUT args, if any
406
407
408
409
410
411 okl_ptm_pvt_w.rosetta_table_copy_in_p8(ddp_ptmv_tbl, p5_a0
412 , p5_a1
413 , p5_a2
414 , p5_a3
415 , p5_a4
416 , p5_a5
417 , p5_a6
418 , p5_a7
419 , p5_a8
420 , p5_a9
421 , p5_a10
422 , p5_a11
423 , p5_a12
424 , p5_a13
425 , p5_a14
426 , p5_a15
427 , p5_a16
428 , p5_a17
429 , p5_a18
430 , p5_a19
431 , p5_a20
432 , p5_a21
433 , p5_a22
434 , p5_a23
435 , p5_a24
436 , p5_a25
437 , p5_a26
438 , p5_a27
439 , p5_a28
440 , p5_a29
441 , p5_a30
442 , p5_a31
443 );
444
445 -- here's the delegated call to the old PL/SQL routine
446 okl_process_tmplts_pub.lock_process_tmplts(p_api_version,
447 p_init_msg_list,
448 x_return_status,
449 x_msg_count,
450 x_msg_data,
451 ddp_ptmv_tbl);
452
453 -- copy data back from the local variables to OUT or IN-OUT args, if any
454
455
456
457
458
459 end;
460
461 procedure lock_process_tmplts(p_api_version NUMBER
462 , p_init_msg_list VARCHAR2
463 , x_return_status out nocopy VARCHAR2
464 , x_msg_count out nocopy NUMBER
465 , x_msg_data out nocopy VARCHAR2
466 , p5_a0 NUMBER := 0-1962.0724
467 , p5_a1 NUMBER := 0-1962.0724
468 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
469 , p5_a3 NUMBER := 0-1962.0724
470 , p5_a4 VARCHAR2 := fnd_api.g_miss_char
471 , p5_a5 VARCHAR2 := fnd_api.g_miss_char
472 , p5_a6 DATE := fnd_api.g_miss_date
473 , p5_a7 DATE := fnd_api.g_miss_date
474 , p5_a8 NUMBER := 0-1962.0724
475 , p5_a9 VARCHAR2 := fnd_api.g_miss_char
476 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
477 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
478 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
479 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
480 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
481 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
482 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
483 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
484 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
485 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
486 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
487 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
488 , p5_a22 VARCHAR2 := fnd_api.g_miss_char
489 , p5_a23 VARCHAR2 := fnd_api.g_miss_char
490 , p5_a24 VARCHAR2 := fnd_api.g_miss_char
491 , p5_a25 NUMBER := 0-1962.0724
492 , p5_a26 DATE := fnd_api.g_miss_date
493 , p5_a27 NUMBER := 0-1962.0724
494 , p5_a28 DATE := fnd_api.g_miss_date
495 , p5_a29 NUMBER := 0-1962.0724
496 , p5_a30 VARCHAR2 := fnd_api.g_miss_char
497 , p5_a31 VARCHAR2 := fnd_api.g_miss_char
498 )
499
500 as
501 ddp_ptmv_rec okl_process_tmplts_pub.ptmv_rec_type;
502 ddindx binary_integer; indx binary_integer;
503 begin
504
505 -- copy data to the local IN or IN-OUT args, if any
506
507
508
509
510
511 ddp_ptmv_rec.id := rosetta_g_miss_num_map(p5_a0);
512 ddp_ptmv_rec.org_id := rosetta_g_miss_num_map(p5_a1);
513 ddp_ptmv_rec.ptm_code := p5_a2;
514 ddp_ptmv_rec.jtf_amv_item_id := rosetta_g_miss_num_map(p5_a3);
515 ddp_ptmv_rec.sfwt_flag := p5_a4;
516 ddp_ptmv_rec.email_subject_line := p5_a5;
517 ddp_ptmv_rec.start_date := rosetta_g_miss_date_in_map(p5_a6);
518 ddp_ptmv_rec.end_date := rosetta_g_miss_date_in_map(p5_a7);
519 ddp_ptmv_rec.object_version_number := rosetta_g_miss_num_map(p5_a8);
520 ddp_ptmv_rec.attribute_category := p5_a9;
521 ddp_ptmv_rec.attribute1 := p5_a10;
522 ddp_ptmv_rec.attribute2 := p5_a11;
523 ddp_ptmv_rec.attribute3 := p5_a12;
524 ddp_ptmv_rec.attribute4 := p5_a13;
525 ddp_ptmv_rec.attribute5 := p5_a14;
526 ddp_ptmv_rec.attribute6 := p5_a15;
527 ddp_ptmv_rec.attribute7 := p5_a16;
528 ddp_ptmv_rec.attribute8 := p5_a17;
529 ddp_ptmv_rec.attribute9 := p5_a18;
530 ddp_ptmv_rec.attribute10 := p5_a19;
531 ddp_ptmv_rec.attribute11 := p5_a20;
532 ddp_ptmv_rec.attribute12 := p5_a21;
533 ddp_ptmv_rec.attribute13 := p5_a22;
534 ddp_ptmv_rec.attribute14 := p5_a23;
535 ddp_ptmv_rec.attribute15 := p5_a24;
536 ddp_ptmv_rec.created_by := rosetta_g_miss_num_map(p5_a25);
537 ddp_ptmv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a26);
538 ddp_ptmv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a27);
539 ddp_ptmv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a28);
540 ddp_ptmv_rec.last_update_login := rosetta_g_miss_num_map(p5_a29);
541 ddp_ptmv_rec.recipient_type_code := p5_a30;
542 ddp_ptmv_rec.xml_tmplt_code := p5_a31;
543
544 -- here's the delegated call to the old PL/SQL routine
545 okl_process_tmplts_pub.lock_process_tmplts(p_api_version,
546 p_init_msg_list,
547 x_return_status,
548 x_msg_count,
549 x_msg_data,
550 ddp_ptmv_rec);
551
552 -- copy data back from the local variables to OUT or IN-OUT args, if any
553
554
555
556
557
558 end;
559
560 procedure update_process_tmplts(p_api_version NUMBER
561 , p_init_msg_list VARCHAR2
562 , x_return_status out nocopy VARCHAR2
563 , x_msg_count out nocopy NUMBER
564 , x_msg_data out nocopy VARCHAR2
565 , p5_a0 JTF_NUMBER_TABLE
566 , p5_a1 JTF_NUMBER_TABLE
567 , p5_a2 JTF_VARCHAR2_TABLE_100
568 , p5_a3 JTF_NUMBER_TABLE
569 , p5_a4 JTF_VARCHAR2_TABLE_100
570 , p5_a5 JTF_VARCHAR2_TABLE_100
571 , p5_a6 JTF_DATE_TABLE
572 , p5_a7 JTF_DATE_TABLE
573 , p5_a8 JTF_NUMBER_TABLE
574 , p5_a9 JTF_VARCHAR2_TABLE_100
575 , p5_a10 JTF_VARCHAR2_TABLE_500
576 , p5_a11 JTF_VARCHAR2_TABLE_500
577 , p5_a12 JTF_VARCHAR2_TABLE_500
578 , p5_a13 JTF_VARCHAR2_TABLE_500
579 , p5_a14 JTF_VARCHAR2_TABLE_500
580 , p5_a15 JTF_VARCHAR2_TABLE_500
581 , p5_a16 JTF_VARCHAR2_TABLE_500
582 , p5_a17 JTF_VARCHAR2_TABLE_500
583 , p5_a18 JTF_VARCHAR2_TABLE_500
584 , p5_a19 JTF_VARCHAR2_TABLE_500
585 , p5_a20 JTF_VARCHAR2_TABLE_500
586 , p5_a21 JTF_VARCHAR2_TABLE_500
587 , p5_a22 JTF_VARCHAR2_TABLE_500
588 , p5_a23 JTF_VARCHAR2_TABLE_500
589 , p5_a24 JTF_VARCHAR2_TABLE_500
590 , p5_a25 JTF_NUMBER_TABLE
591 , p5_a26 JTF_DATE_TABLE
592 , p5_a27 JTF_NUMBER_TABLE
593 , p5_a28 JTF_DATE_TABLE
594 , p5_a29 JTF_NUMBER_TABLE
595 , p5_a30 JTF_VARCHAR2_TABLE_100
596 , p5_a31 JTF_VARCHAR2_TABLE_100
597 , p6_a0 out nocopy JTF_NUMBER_TABLE
598 , p6_a1 out nocopy JTF_NUMBER_TABLE
599 , p6_a2 out nocopy JTF_VARCHAR2_TABLE_100
600 , p6_a3 out nocopy JTF_NUMBER_TABLE
601 , p6_a4 out nocopy JTF_VARCHAR2_TABLE_100
602 , p6_a5 out nocopy JTF_VARCHAR2_TABLE_100
603 , p6_a6 out nocopy JTF_DATE_TABLE
604 , p6_a7 out nocopy JTF_DATE_TABLE
605 , p6_a8 out nocopy JTF_NUMBER_TABLE
606 , p6_a9 out nocopy JTF_VARCHAR2_TABLE_100
607 , p6_a10 out nocopy JTF_VARCHAR2_TABLE_500
608 , p6_a11 out nocopy JTF_VARCHAR2_TABLE_500
609 , p6_a12 out nocopy JTF_VARCHAR2_TABLE_500
610 , p6_a13 out nocopy JTF_VARCHAR2_TABLE_500
611 , p6_a14 out nocopy JTF_VARCHAR2_TABLE_500
612 , p6_a15 out nocopy JTF_VARCHAR2_TABLE_500
613 , p6_a16 out nocopy JTF_VARCHAR2_TABLE_500
614 , p6_a17 out nocopy JTF_VARCHAR2_TABLE_500
615 , p6_a18 out nocopy JTF_VARCHAR2_TABLE_500
616 , p6_a19 out nocopy JTF_VARCHAR2_TABLE_500
617 , p6_a20 out nocopy JTF_VARCHAR2_TABLE_500
618 , p6_a21 out nocopy JTF_VARCHAR2_TABLE_500
619 , p6_a22 out nocopy JTF_VARCHAR2_TABLE_500
620 , p6_a23 out nocopy JTF_VARCHAR2_TABLE_500
621 , p6_a24 out nocopy JTF_VARCHAR2_TABLE_500
622 , p6_a25 out nocopy JTF_NUMBER_TABLE
623 , p6_a26 out nocopy JTF_DATE_TABLE
624 , p6_a27 out nocopy JTF_NUMBER_TABLE
625 , p6_a28 out nocopy JTF_DATE_TABLE
626 , p6_a29 out nocopy JTF_NUMBER_TABLE
627 , p6_a30 out nocopy JTF_VARCHAR2_TABLE_100
628 , p6_a31 out nocopy JTF_VARCHAR2_TABLE_100
629 )
630
631 as
632 ddp_ptmv_tbl okl_process_tmplts_pub.ptmv_tbl_type;
633 ddx_ptmv_tbl okl_process_tmplts_pub.ptmv_tbl_type;
634 ddindx binary_integer; indx binary_integer;
635 begin
636
637 -- copy data to the local IN or IN-OUT args, if any
638
639
640
641
642
643 okl_ptm_pvt_w.rosetta_table_copy_in_p8(ddp_ptmv_tbl, p5_a0
644 , p5_a1
645 , p5_a2
646 , p5_a3
647 , p5_a4
648 , p5_a5
649 , p5_a6
650 , p5_a7
651 , p5_a8
652 , p5_a9
653 , p5_a10
654 , p5_a11
655 , p5_a12
656 , p5_a13
657 , p5_a14
658 , p5_a15
659 , p5_a16
660 , p5_a17
661 , p5_a18
662 , p5_a19
663 , p5_a20
664 , p5_a21
665 , p5_a22
666 , p5_a23
667 , p5_a24
668 , p5_a25
669 , p5_a26
670 , p5_a27
671 , p5_a28
672 , p5_a29
673 , p5_a30
674 , p5_a31
675 );
676
677
678 -- here's the delegated call to the old PL/SQL routine
679 okl_process_tmplts_pub.update_process_tmplts(p_api_version,
680 p_init_msg_list,
681 x_return_status,
682 x_msg_count,
683 x_msg_data,
684 ddp_ptmv_tbl,
685 ddx_ptmv_tbl);
686
687 -- copy data back from the local variables to OUT or IN-OUT args, if any
688
689
690
691
692
693
694 okl_ptm_pvt_w.rosetta_table_copy_out_p8(ddx_ptmv_tbl, p6_a0
695 , p6_a1
696 , p6_a2
697 , p6_a3
698 , p6_a4
699 , p6_a5
700 , p6_a6
701 , p6_a7
702 , p6_a8
703 , p6_a9
704 , p6_a10
705 , p6_a11
706 , p6_a12
707 , p6_a13
708 , p6_a14
709 , p6_a15
710 , p6_a16
711 , p6_a17
712 , p6_a18
713 , p6_a19
714 , p6_a20
715 , p6_a21
716 , p6_a22
717 , p6_a23
718 , p6_a24
719 , p6_a25
720 , p6_a26
721 , p6_a27
722 , p6_a28
723 , p6_a29
724 , p6_a30
725 , p6_a31
726 );
727 end;
728
729 procedure update_process_tmplts(p_api_version NUMBER
730 , p_init_msg_list VARCHAR2
731 , x_return_status out nocopy VARCHAR2
732 , x_msg_count out nocopy NUMBER
733 , x_msg_data out nocopy VARCHAR2
734 , p6_a0 out nocopy NUMBER
735 , p6_a1 out nocopy NUMBER
736 , p6_a2 out nocopy VARCHAR2
737 , p6_a3 out nocopy NUMBER
738 , p6_a4 out nocopy VARCHAR2
739 , p6_a5 out nocopy VARCHAR2
740 , p6_a6 out nocopy DATE
741 , p6_a7 out nocopy DATE
742 , p6_a8 out nocopy NUMBER
743 , p6_a9 out nocopy VARCHAR2
744 , p6_a10 out nocopy VARCHAR2
745 , p6_a11 out nocopy VARCHAR2
746 , p6_a12 out nocopy VARCHAR2
747 , p6_a13 out nocopy VARCHAR2
748 , p6_a14 out nocopy VARCHAR2
749 , p6_a15 out nocopy VARCHAR2
750 , p6_a16 out nocopy VARCHAR2
751 , p6_a17 out nocopy VARCHAR2
752 , p6_a18 out nocopy VARCHAR2
753 , p6_a19 out nocopy VARCHAR2
754 , p6_a20 out nocopy VARCHAR2
755 , p6_a21 out nocopy VARCHAR2
756 , p6_a22 out nocopy VARCHAR2
757 , p6_a23 out nocopy VARCHAR2
758 , p6_a24 out nocopy VARCHAR2
759 , p6_a25 out nocopy NUMBER
760 , p6_a26 out nocopy DATE
761 , p6_a27 out nocopy NUMBER
762 , p6_a28 out nocopy DATE
763 , p6_a29 out nocopy NUMBER
764 , p6_a30 out nocopy VARCHAR2
765 , p6_a31 out nocopy VARCHAR2
766 , p5_a0 NUMBER := 0-1962.0724
767 , p5_a1 NUMBER := 0-1962.0724
768 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
769 , p5_a3 NUMBER := 0-1962.0724
770 , p5_a4 VARCHAR2 := fnd_api.g_miss_char
771 , p5_a5 VARCHAR2 := fnd_api.g_miss_char
772 , p5_a6 DATE := fnd_api.g_miss_date
773 , p5_a7 DATE := fnd_api.g_miss_date
774 , p5_a8 NUMBER := 0-1962.0724
775 , p5_a9 VARCHAR2 := fnd_api.g_miss_char
776 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
777 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
778 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
779 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
780 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
781 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
782 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
783 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
784 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
785 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
786 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
787 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
788 , p5_a22 VARCHAR2 := fnd_api.g_miss_char
789 , p5_a23 VARCHAR2 := fnd_api.g_miss_char
790 , p5_a24 VARCHAR2 := fnd_api.g_miss_char
791 , p5_a25 NUMBER := 0-1962.0724
792 , p5_a26 DATE := fnd_api.g_miss_date
793 , p5_a27 NUMBER := 0-1962.0724
794 , p5_a28 DATE := fnd_api.g_miss_date
795 , p5_a29 NUMBER := 0-1962.0724
796 , p5_a30 VARCHAR2 := fnd_api.g_miss_char
797 , p5_a31 VARCHAR2 := fnd_api.g_miss_char
798 )
799
800 as
801 ddp_ptmv_rec okl_process_tmplts_pub.ptmv_rec_type;
802 ddx_ptmv_rec okl_process_tmplts_pub.ptmv_rec_type;
803 ddindx binary_integer; indx binary_integer;
804 begin
805
806 -- copy data to the local IN or IN-OUT args, if any
807
808
809
810
811
812 ddp_ptmv_rec.id := rosetta_g_miss_num_map(p5_a0);
813 ddp_ptmv_rec.org_id := rosetta_g_miss_num_map(p5_a1);
814 ddp_ptmv_rec.ptm_code := p5_a2;
815 ddp_ptmv_rec.jtf_amv_item_id := rosetta_g_miss_num_map(p5_a3);
816 ddp_ptmv_rec.sfwt_flag := p5_a4;
817 ddp_ptmv_rec.email_subject_line := p5_a5;
818 ddp_ptmv_rec.start_date := rosetta_g_miss_date_in_map(p5_a6);
819 ddp_ptmv_rec.end_date := rosetta_g_miss_date_in_map(p5_a7);
820 ddp_ptmv_rec.object_version_number := rosetta_g_miss_num_map(p5_a8);
821 ddp_ptmv_rec.attribute_category := p5_a9;
822 ddp_ptmv_rec.attribute1 := p5_a10;
823 ddp_ptmv_rec.attribute2 := p5_a11;
824 ddp_ptmv_rec.attribute3 := p5_a12;
825 ddp_ptmv_rec.attribute4 := p5_a13;
826 ddp_ptmv_rec.attribute5 := p5_a14;
827 ddp_ptmv_rec.attribute6 := p5_a15;
828 ddp_ptmv_rec.attribute7 := p5_a16;
829 ddp_ptmv_rec.attribute8 := p5_a17;
830 ddp_ptmv_rec.attribute9 := p5_a18;
831 ddp_ptmv_rec.attribute10 := p5_a19;
832 ddp_ptmv_rec.attribute11 := p5_a20;
833 ddp_ptmv_rec.attribute12 := p5_a21;
834 ddp_ptmv_rec.attribute13 := p5_a22;
835 ddp_ptmv_rec.attribute14 := p5_a23;
836 ddp_ptmv_rec.attribute15 := p5_a24;
837 ddp_ptmv_rec.created_by := rosetta_g_miss_num_map(p5_a25);
838 ddp_ptmv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a26);
839 ddp_ptmv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a27);
840 ddp_ptmv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a28);
841 ddp_ptmv_rec.last_update_login := rosetta_g_miss_num_map(p5_a29);
842 ddp_ptmv_rec.recipient_type_code := p5_a30;
843 ddp_ptmv_rec.xml_tmplt_code := p5_a31;
844
845
846 -- here's the delegated call to the old PL/SQL routine
847 okl_process_tmplts_pub.update_process_tmplts(p_api_version,
848 p_init_msg_list,
849 x_return_status,
850 x_msg_count,
851 x_msg_data,
852 ddp_ptmv_rec,
853 ddx_ptmv_rec);
854
855 -- copy data back from the local variables to OUT or IN-OUT args, if any
856
857
858
859
860
861
862 p6_a0 := rosetta_g_miss_num_map(ddx_ptmv_rec.id);
863 p6_a1 := rosetta_g_miss_num_map(ddx_ptmv_rec.org_id);
864 p6_a2 := ddx_ptmv_rec.ptm_code;
865 p6_a3 := rosetta_g_miss_num_map(ddx_ptmv_rec.jtf_amv_item_id);
866 p6_a4 := ddx_ptmv_rec.sfwt_flag;
867 p6_a5 := ddx_ptmv_rec.email_subject_line;
868 p6_a6 := ddx_ptmv_rec.start_date;
869 p6_a7 := ddx_ptmv_rec.end_date;
870 p6_a8 := rosetta_g_miss_num_map(ddx_ptmv_rec.object_version_number);
871 p6_a9 := ddx_ptmv_rec.attribute_category;
872 p6_a10 := ddx_ptmv_rec.attribute1;
873 p6_a11 := ddx_ptmv_rec.attribute2;
874 p6_a12 := ddx_ptmv_rec.attribute3;
875 p6_a13 := ddx_ptmv_rec.attribute4;
876 p6_a14 := ddx_ptmv_rec.attribute5;
877 p6_a15 := ddx_ptmv_rec.attribute6;
878 p6_a16 := ddx_ptmv_rec.attribute7;
879 p6_a17 := ddx_ptmv_rec.attribute8;
880 p6_a18 := ddx_ptmv_rec.attribute9;
881 p6_a19 := ddx_ptmv_rec.attribute10;
882 p6_a20 := ddx_ptmv_rec.attribute11;
883 p6_a21 := ddx_ptmv_rec.attribute12;
884 p6_a22 := ddx_ptmv_rec.attribute13;
885 p6_a23 := ddx_ptmv_rec.attribute14;
886 p6_a24 := ddx_ptmv_rec.attribute15;
887 p6_a25 := rosetta_g_miss_num_map(ddx_ptmv_rec.created_by);
888 p6_a26 := ddx_ptmv_rec.creation_date;
889 p6_a27 := rosetta_g_miss_num_map(ddx_ptmv_rec.last_updated_by);
890 p6_a28 := ddx_ptmv_rec.last_update_date;
891 p6_a29 := rosetta_g_miss_num_map(ddx_ptmv_rec.last_update_login);
892 p6_a30 := ddx_ptmv_rec.recipient_type_code;
893 p6_a31 := ddx_ptmv_rec.xml_tmplt_code;
894 end;
895
896 procedure delete_process_tmplts(p_api_version NUMBER
897 , p_init_msg_list VARCHAR2
898 , x_return_status out nocopy VARCHAR2
899 , x_msg_count out nocopy NUMBER
900 , x_msg_data out nocopy VARCHAR2
901 , p5_a0 JTF_NUMBER_TABLE
902 , p5_a1 JTF_NUMBER_TABLE
903 , p5_a2 JTF_VARCHAR2_TABLE_100
904 , p5_a3 JTF_NUMBER_TABLE
905 , p5_a4 JTF_VARCHAR2_TABLE_100
906 , p5_a5 JTF_VARCHAR2_TABLE_100
907 , p5_a6 JTF_DATE_TABLE
908 , p5_a7 JTF_DATE_TABLE
909 , p5_a8 JTF_NUMBER_TABLE
910 , p5_a9 JTF_VARCHAR2_TABLE_100
911 , p5_a10 JTF_VARCHAR2_TABLE_500
912 , p5_a11 JTF_VARCHAR2_TABLE_500
913 , p5_a12 JTF_VARCHAR2_TABLE_500
914 , p5_a13 JTF_VARCHAR2_TABLE_500
915 , p5_a14 JTF_VARCHAR2_TABLE_500
916 , p5_a15 JTF_VARCHAR2_TABLE_500
917 , p5_a16 JTF_VARCHAR2_TABLE_500
918 , p5_a17 JTF_VARCHAR2_TABLE_500
919 , p5_a18 JTF_VARCHAR2_TABLE_500
920 , p5_a19 JTF_VARCHAR2_TABLE_500
921 , p5_a20 JTF_VARCHAR2_TABLE_500
922 , p5_a21 JTF_VARCHAR2_TABLE_500
923 , p5_a22 JTF_VARCHAR2_TABLE_500
924 , p5_a23 JTF_VARCHAR2_TABLE_500
925 , p5_a24 JTF_VARCHAR2_TABLE_500
926 , p5_a25 JTF_NUMBER_TABLE
927 , p5_a26 JTF_DATE_TABLE
928 , p5_a27 JTF_NUMBER_TABLE
929 , p5_a28 JTF_DATE_TABLE
930 , p5_a29 JTF_NUMBER_TABLE
931 , p5_a30 JTF_VARCHAR2_TABLE_100
932 , p5_a31 JTF_VARCHAR2_TABLE_100
933 )
934
935 as
936 ddp_ptmv_tbl okl_process_tmplts_pub.ptmv_tbl_type;
937 ddindx binary_integer; indx binary_integer;
938 begin
939
940 -- copy data to the local IN or IN-OUT args, if any
941
942
943
944
945
946 okl_ptm_pvt_w.rosetta_table_copy_in_p8(ddp_ptmv_tbl, p5_a0
947 , p5_a1
948 , p5_a2
949 , p5_a3
950 , p5_a4
951 , p5_a5
952 , p5_a6
953 , p5_a7
954 , p5_a8
955 , p5_a9
956 , p5_a10
957 , p5_a11
958 , p5_a12
959 , p5_a13
960 , p5_a14
961 , p5_a15
962 , p5_a16
963 , p5_a17
964 , p5_a18
965 , p5_a19
966 , p5_a20
967 , p5_a21
968 , p5_a22
969 , p5_a23
970 , p5_a24
971 , p5_a25
972 , p5_a26
973 , p5_a27
974 , p5_a28
975 , p5_a29
976 , p5_a30
977 , p5_a31
978 );
979
980 -- here's the delegated call to the old PL/SQL routine
981 okl_process_tmplts_pub.delete_process_tmplts(p_api_version,
982 p_init_msg_list,
983 x_return_status,
984 x_msg_count,
985 x_msg_data,
986 ddp_ptmv_tbl);
987
988 -- copy data back from the local variables to OUT or IN-OUT args, if any
989
990
991
992
993
994 end;
995
996 procedure delete_process_tmplts(p_api_version NUMBER
997 , p_init_msg_list VARCHAR2
998 , x_return_status out nocopy VARCHAR2
999 , x_msg_count out nocopy NUMBER
1000 , x_msg_data out nocopy VARCHAR2
1001 , p5_a0 NUMBER := 0-1962.0724
1002 , p5_a1 NUMBER := 0-1962.0724
1003 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
1004 , p5_a3 NUMBER := 0-1962.0724
1005 , p5_a4 VARCHAR2 := fnd_api.g_miss_char
1006 , p5_a5 VARCHAR2 := fnd_api.g_miss_char
1007 , p5_a6 DATE := fnd_api.g_miss_date
1008 , p5_a7 DATE := fnd_api.g_miss_date
1009 , p5_a8 NUMBER := 0-1962.0724
1010 , p5_a9 VARCHAR2 := fnd_api.g_miss_char
1011 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
1012 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
1013 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
1014 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
1015 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
1016 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
1017 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
1018 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
1019 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
1020 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
1021 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
1022 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
1023 , p5_a22 VARCHAR2 := fnd_api.g_miss_char
1024 , p5_a23 VARCHAR2 := fnd_api.g_miss_char
1025 , p5_a24 VARCHAR2 := fnd_api.g_miss_char
1026 , p5_a25 NUMBER := 0-1962.0724
1027 , p5_a26 DATE := fnd_api.g_miss_date
1028 , p5_a27 NUMBER := 0-1962.0724
1029 , p5_a28 DATE := fnd_api.g_miss_date
1030 , p5_a29 NUMBER := 0-1962.0724
1031 , p5_a30 VARCHAR2 := fnd_api.g_miss_char
1032 , p5_a31 VARCHAR2 := fnd_api.g_miss_char
1033 )
1034
1035 as
1036 ddp_ptmv_rec okl_process_tmplts_pub.ptmv_rec_type;
1037 ddindx binary_integer; indx binary_integer;
1038 begin
1039
1040 -- copy data to the local IN or IN-OUT args, if any
1041
1042
1043
1044
1045
1046 ddp_ptmv_rec.id := rosetta_g_miss_num_map(p5_a0);
1047 ddp_ptmv_rec.org_id := rosetta_g_miss_num_map(p5_a1);
1048 ddp_ptmv_rec.ptm_code := p5_a2;
1049 ddp_ptmv_rec.jtf_amv_item_id := rosetta_g_miss_num_map(p5_a3);
1050 ddp_ptmv_rec.sfwt_flag := p5_a4;
1051 ddp_ptmv_rec.email_subject_line := p5_a5;
1052 ddp_ptmv_rec.start_date := rosetta_g_miss_date_in_map(p5_a6);
1053 ddp_ptmv_rec.end_date := rosetta_g_miss_date_in_map(p5_a7);
1054 ddp_ptmv_rec.object_version_number := rosetta_g_miss_num_map(p5_a8);
1055 ddp_ptmv_rec.attribute_category := p5_a9;
1056 ddp_ptmv_rec.attribute1 := p5_a10;
1057 ddp_ptmv_rec.attribute2 := p5_a11;
1058 ddp_ptmv_rec.attribute3 := p5_a12;
1059 ddp_ptmv_rec.attribute4 := p5_a13;
1060 ddp_ptmv_rec.attribute5 := p5_a14;
1061 ddp_ptmv_rec.attribute6 := p5_a15;
1062 ddp_ptmv_rec.attribute7 := p5_a16;
1063 ddp_ptmv_rec.attribute8 := p5_a17;
1064 ddp_ptmv_rec.attribute9 := p5_a18;
1065 ddp_ptmv_rec.attribute10 := p5_a19;
1066 ddp_ptmv_rec.attribute11 := p5_a20;
1067 ddp_ptmv_rec.attribute12 := p5_a21;
1068 ddp_ptmv_rec.attribute13 := p5_a22;
1069 ddp_ptmv_rec.attribute14 := p5_a23;
1070 ddp_ptmv_rec.attribute15 := p5_a24;
1071 ddp_ptmv_rec.created_by := rosetta_g_miss_num_map(p5_a25);
1072 ddp_ptmv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a26);
1073 ddp_ptmv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a27);
1074 ddp_ptmv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a28);
1075 ddp_ptmv_rec.last_update_login := rosetta_g_miss_num_map(p5_a29);
1076 ddp_ptmv_rec.recipient_type_code := p5_a30;
1077 ddp_ptmv_rec.xml_tmplt_code := p5_a31;
1078
1079 -- here's the delegated call to the old PL/SQL routine
1080 okl_process_tmplts_pub.delete_process_tmplts(p_api_version,
1081 p_init_msg_list,
1082 x_return_status,
1083 x_msg_count,
1084 x_msg_data,
1085 ddp_ptmv_rec);
1086
1087 -- copy data back from the local variables to OUT or IN-OUT args, if any
1088
1089
1090
1091
1092
1093 end;
1094
1095 procedure validate_process_tmplts(p_api_version NUMBER
1096 , p_init_msg_list VARCHAR2
1097 , x_return_status out nocopy VARCHAR2
1098 , x_msg_count out nocopy NUMBER
1099 , x_msg_data out nocopy VARCHAR2
1100 , p5_a0 JTF_NUMBER_TABLE
1101 , p5_a1 JTF_NUMBER_TABLE
1102 , p5_a2 JTF_VARCHAR2_TABLE_100
1103 , p5_a3 JTF_NUMBER_TABLE
1104 , p5_a4 JTF_VARCHAR2_TABLE_100
1105 , p5_a5 JTF_VARCHAR2_TABLE_100
1106 , p5_a6 JTF_DATE_TABLE
1107 , p5_a7 JTF_DATE_TABLE
1108 , p5_a8 JTF_NUMBER_TABLE
1109 , p5_a9 JTF_VARCHAR2_TABLE_100
1110 , p5_a10 JTF_VARCHAR2_TABLE_500
1111 , p5_a11 JTF_VARCHAR2_TABLE_500
1112 , p5_a12 JTF_VARCHAR2_TABLE_500
1113 , p5_a13 JTF_VARCHAR2_TABLE_500
1114 , p5_a14 JTF_VARCHAR2_TABLE_500
1115 , p5_a15 JTF_VARCHAR2_TABLE_500
1116 , p5_a16 JTF_VARCHAR2_TABLE_500
1117 , p5_a17 JTF_VARCHAR2_TABLE_500
1118 , p5_a18 JTF_VARCHAR2_TABLE_500
1119 , p5_a19 JTF_VARCHAR2_TABLE_500
1120 , p5_a20 JTF_VARCHAR2_TABLE_500
1121 , p5_a21 JTF_VARCHAR2_TABLE_500
1122 , p5_a22 JTF_VARCHAR2_TABLE_500
1123 , p5_a23 JTF_VARCHAR2_TABLE_500
1124 , p5_a24 JTF_VARCHAR2_TABLE_500
1125 , p5_a25 JTF_NUMBER_TABLE
1126 , p5_a26 JTF_DATE_TABLE
1127 , p5_a27 JTF_NUMBER_TABLE
1128 , p5_a28 JTF_DATE_TABLE
1129 , p5_a29 JTF_NUMBER_TABLE
1130 , p5_a30 JTF_VARCHAR2_TABLE_100
1131 , p5_a31 JTF_VARCHAR2_TABLE_100
1132 )
1133
1134 as
1135 ddp_ptmv_tbl okl_process_tmplts_pub.ptmv_tbl_type;
1136 ddindx binary_integer; indx binary_integer;
1137 begin
1138
1139 -- copy data to the local IN or IN-OUT args, if any
1140
1141
1142
1143
1144
1145 okl_ptm_pvt_w.rosetta_table_copy_in_p8(ddp_ptmv_tbl, p5_a0
1146 , p5_a1
1147 , p5_a2
1148 , p5_a3
1149 , p5_a4
1150 , p5_a5
1151 , p5_a6
1152 , p5_a7
1153 , p5_a8
1154 , p5_a9
1155 , p5_a10
1156 , p5_a11
1157 , p5_a12
1158 , p5_a13
1159 , p5_a14
1160 , p5_a15
1161 , p5_a16
1162 , p5_a17
1163 , p5_a18
1164 , p5_a19
1165 , p5_a20
1166 , p5_a21
1167 , p5_a22
1168 , p5_a23
1169 , p5_a24
1170 , p5_a25
1171 , p5_a26
1172 , p5_a27
1173 , p5_a28
1174 , p5_a29
1175 , p5_a30
1176 , p5_a31
1177 );
1178
1179 -- here's the delegated call to the old PL/SQL routine
1180 okl_process_tmplts_pub.validate_process_tmplts(p_api_version,
1181 p_init_msg_list,
1182 x_return_status,
1183 x_msg_count,
1184 x_msg_data,
1185 ddp_ptmv_tbl);
1186
1187 -- copy data back from the local variables to OUT or IN-OUT args, if any
1188
1189
1190
1191
1192
1193 end;
1194
1195 procedure validate_process_tmplts(p_api_version NUMBER
1196 , p_init_msg_list VARCHAR2
1197 , x_return_status out nocopy VARCHAR2
1198 , x_msg_count out nocopy NUMBER
1199 , x_msg_data out nocopy VARCHAR2
1200 , p5_a0 NUMBER := 0-1962.0724
1201 , p5_a1 NUMBER := 0-1962.0724
1202 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
1203 , p5_a3 NUMBER := 0-1962.0724
1204 , p5_a4 VARCHAR2 := fnd_api.g_miss_char
1205 , p5_a5 VARCHAR2 := fnd_api.g_miss_char
1206 , p5_a6 DATE := fnd_api.g_miss_date
1207 , p5_a7 DATE := fnd_api.g_miss_date
1208 , p5_a8 NUMBER := 0-1962.0724
1209 , p5_a9 VARCHAR2 := fnd_api.g_miss_char
1210 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
1211 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
1212 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
1213 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
1214 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
1215 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
1216 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
1217 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
1218 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
1219 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
1220 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
1221 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
1222 , p5_a22 VARCHAR2 := fnd_api.g_miss_char
1223 , p5_a23 VARCHAR2 := fnd_api.g_miss_char
1224 , p5_a24 VARCHAR2 := fnd_api.g_miss_char
1225 , p5_a25 NUMBER := 0-1962.0724
1226 , p5_a26 DATE := fnd_api.g_miss_date
1227 , p5_a27 NUMBER := 0-1962.0724
1228 , p5_a28 DATE := fnd_api.g_miss_date
1229 , p5_a29 NUMBER := 0-1962.0724
1230 , p5_a30 VARCHAR2 := fnd_api.g_miss_char
1231 , p5_a31 VARCHAR2 := fnd_api.g_miss_char
1232 )
1233
1234 as
1235 ddp_ptmv_rec okl_process_tmplts_pub.ptmv_rec_type;
1236 ddindx binary_integer; indx binary_integer;
1237 begin
1238
1239 -- copy data to the local IN or IN-OUT args, if any
1240
1241
1242
1243
1244
1245 ddp_ptmv_rec.id := rosetta_g_miss_num_map(p5_a0);
1246 ddp_ptmv_rec.org_id := rosetta_g_miss_num_map(p5_a1);
1247 ddp_ptmv_rec.ptm_code := p5_a2;
1248 ddp_ptmv_rec.jtf_amv_item_id := rosetta_g_miss_num_map(p5_a3);
1249 ddp_ptmv_rec.sfwt_flag := p5_a4;
1250 ddp_ptmv_rec.email_subject_line := p5_a5;
1251 ddp_ptmv_rec.start_date := rosetta_g_miss_date_in_map(p5_a6);
1252 ddp_ptmv_rec.end_date := rosetta_g_miss_date_in_map(p5_a7);
1253 ddp_ptmv_rec.object_version_number := rosetta_g_miss_num_map(p5_a8);
1254 ddp_ptmv_rec.attribute_category := p5_a9;
1255 ddp_ptmv_rec.attribute1 := p5_a10;
1256 ddp_ptmv_rec.attribute2 := p5_a11;
1257 ddp_ptmv_rec.attribute3 := p5_a12;
1258 ddp_ptmv_rec.attribute4 := p5_a13;
1259 ddp_ptmv_rec.attribute5 := p5_a14;
1260 ddp_ptmv_rec.attribute6 := p5_a15;
1261 ddp_ptmv_rec.attribute7 := p5_a16;
1262 ddp_ptmv_rec.attribute8 := p5_a17;
1263 ddp_ptmv_rec.attribute9 := p5_a18;
1264 ddp_ptmv_rec.attribute10 := p5_a19;
1265 ddp_ptmv_rec.attribute11 := p5_a20;
1266 ddp_ptmv_rec.attribute12 := p5_a21;
1267 ddp_ptmv_rec.attribute13 := p5_a22;
1268 ddp_ptmv_rec.attribute14 := p5_a23;
1269 ddp_ptmv_rec.attribute15 := p5_a24;
1270 ddp_ptmv_rec.created_by := rosetta_g_miss_num_map(p5_a25);
1271 ddp_ptmv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a26);
1272 ddp_ptmv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a27);
1273 ddp_ptmv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a28);
1274 ddp_ptmv_rec.last_update_login := rosetta_g_miss_num_map(p5_a29);
1275 ddp_ptmv_rec.recipient_type_code := p5_a30;
1276 ddp_ptmv_rec.xml_tmplt_code := p5_a31;
1277
1278 -- here's the delegated call to the old PL/SQL routine
1279 okl_process_tmplts_pub.validate_process_tmplts(p_api_version,
1280 p_init_msg_list,
1281 x_return_status,
1282 x_msg_count,
1283 x_msg_data,
1284 ddp_ptmv_rec);
1285
1286 -- copy data back from the local variables to OUT or IN-OUT args, if any
1287
1288
1289
1290
1291
1292 end;
1293
1294 end okl_process_tmplts_pub_w;