[Home] [Help]
PACKAGE BODY: APPS.OKL_DF_CTGY_RMK_TMS_PUB_W
Source
1 package body okl_df_ctgy_rmk_tms_pub_w as
2 /* $Header: OKLUDCTB.pls 120.2 2005/12/08 18:01:51 stmathew 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 function rosetta_g_miss_num_map(n number) return number as
7 a number := fnd_api.g_miss_num;
8 b number := 0-1962.0724;
9 begin
10 if n=a then return b; end if;
11 if n=b then return a; end if;
12 return n;
13 end;
14
15 -- this is to workaround the JDBC bug regarding IN DATE of value GMiss
16 function rosetta_g_miss_date_in_map(d date) return date as
17 begin
18 if d = rosetta_g_mistake_date then return fnd_api.g_miss_date; end if;
19 return d;
20 end;
21
22 procedure insert_df_ctgy_rmk_tms(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 , p5_a0 JTF_NUMBER_TABLE
28 , p5_a1 JTF_NUMBER_TABLE
29 , p5_a2 JTF_NUMBER_TABLE
30 , p5_a3 JTF_NUMBER_TABLE
31 , p5_a4 JTF_NUMBER_TABLE
32 , p5_a5 JTF_DATE_TABLE
33 , p5_a6 JTF_DATE_TABLE
34 , p5_a7 JTF_NUMBER_TABLE
35 , p5_a8 JTF_NUMBER_TABLE
36 , p5_a9 JTF_DATE_TABLE
37 , p5_a10 JTF_NUMBER_TABLE
38 , p5_a11 JTF_DATE_TABLE
39 , p5_a12 JTF_NUMBER_TABLE
40 , p6_a0 out nocopy JTF_NUMBER_TABLE
41 , p6_a1 out nocopy JTF_NUMBER_TABLE
42 , p6_a2 out nocopy JTF_NUMBER_TABLE
43 , p6_a3 out nocopy JTF_NUMBER_TABLE
44 , p6_a4 out nocopy JTF_NUMBER_TABLE
45 , p6_a5 out nocopy JTF_DATE_TABLE
46 , p6_a6 out nocopy JTF_DATE_TABLE
47 , p6_a7 out nocopy JTF_NUMBER_TABLE
48 , p6_a8 out nocopy JTF_NUMBER_TABLE
49 , p6_a9 out nocopy JTF_DATE_TABLE
50 , p6_a10 out nocopy JTF_NUMBER_TABLE
51 , p6_a11 out nocopy JTF_DATE_TABLE
52 , p6_a12 out nocopy JTF_NUMBER_TABLE
53 )
54
55 as
56 ddp_dctv_tbl okl_df_ctgy_rmk_tms_pub.dctv_tbl_type;
57 ddx_dctv_tbl okl_df_ctgy_rmk_tms_pub.dctv_tbl_type;
58 ddindx binary_integer; indx binary_integer;
59 begin
60
61 -- copy data to the local IN or IN-OUT args, if any
62
63
64
65
66
67 okl_dct_pvt_w.rosetta_table_copy_in_p5(ddp_dctv_tbl, p5_a0
68 , p5_a1
69 , p5_a2
70 , p5_a3
71 , p5_a4
72 , p5_a5
73 , p5_a6
74 , p5_a7
75 , p5_a8
76 , p5_a9
77 , p5_a10
78 , p5_a11
79 , p5_a12
80 );
81
82
83 -- here's the delegated call to the old PL/SQL routine
84 okl_df_ctgy_rmk_tms_pub.insert_df_ctgy_rmk_tms(p_api_version,
85 p_init_msg_list,
86 x_return_status,
87 x_msg_count,
88 x_msg_data,
89 ddp_dctv_tbl,
90 ddx_dctv_tbl);
91
92 -- copy data back from the local variables to out nocopy or IN-OUT args, if any
93
94
95
96
97
98
99 okl_dct_pvt_w.rosetta_table_copy_out_p5(ddx_dctv_tbl, p6_a0
100 , p6_a1
101 , p6_a2
102 , p6_a3
103 , p6_a4
104 , p6_a5
105 , p6_a6
106 , p6_a7
107 , p6_a8
108 , p6_a9
109 , p6_a10
110 , p6_a11
111 , p6_a12
112 );
113 end;
114
115 procedure insert_df_ctgy_rmk_tms(p_api_version NUMBER
116 , p_init_msg_list VARCHAR2
117 , x_return_status out nocopy VARCHAR2
118 , x_msg_count out nocopy NUMBER
119 , x_msg_data out nocopy VARCHAR2
120 , p6_a0 out nocopy NUMBER
121 , p6_a1 out nocopy NUMBER
122 , p6_a2 out nocopy NUMBER
123 , p6_a3 out nocopy NUMBER
124 , p6_a4 out nocopy NUMBER
125 , p6_a5 out nocopy DATE
126 , p6_a6 out nocopy DATE
127 , p6_a7 out nocopy NUMBER
128 , p6_a8 out nocopy NUMBER
129 , p6_a9 out nocopy DATE
130 , p6_a10 out nocopy NUMBER
131 , p6_a11 out nocopy DATE
132 , p6_a12 out nocopy NUMBER
133 , p5_a0 NUMBER := 0-1962.0724
134 , p5_a1 NUMBER := 0-1962.0724
135 , p5_a2 NUMBER := 0-1962.0724
136 , p5_a3 NUMBER := 0-1962.0724
137 , p5_a4 NUMBER := 0-1962.0724
138 , p5_a5 DATE := fnd_api.g_miss_date
139 , p5_a6 DATE := fnd_api.g_miss_date
140 , p5_a7 NUMBER := 0-1962.0724
141 , p5_a8 NUMBER := 0-1962.0724
142 , p5_a9 DATE := fnd_api.g_miss_date
143 , p5_a10 NUMBER := 0-1962.0724
144 , p5_a11 DATE := fnd_api.g_miss_date
145 , p5_a12 NUMBER := 0-1962.0724
146 )
147
148 as
149 ddp_dctv_rec okl_df_ctgy_rmk_tms_pub.dctv_rec_type;
150 ddx_dctv_rec okl_df_ctgy_rmk_tms_pub.dctv_rec_type;
151 ddindx binary_integer; indx binary_integer;
152 begin
153
154 -- copy data to the local IN or IN-OUT args, if any
155
156
157
158
159
160 ddp_dctv_rec.id := rosetta_g_miss_num_map(p5_a0);
161 ddp_dctv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
162 ddp_dctv_rec.rmr_id := rosetta_g_miss_num_map(p5_a2);
163 ddp_dctv_rec.ico_id := rosetta_g_miss_num_map(p5_a3);
164 ddp_dctv_rec.iln_id := rosetta_g_miss_num_map(p5_a4);
165 ddp_dctv_rec.date_effective_from := rosetta_g_miss_date_in_map(p5_a5);
166 ddp_dctv_rec.date_effective_to := rosetta_g_miss_date_in_map(p5_a6);
167 ddp_dctv_rec.org_id := rosetta_g_miss_num_map(p5_a7);
168 ddp_dctv_rec.created_by := rosetta_g_miss_num_map(p5_a8);
169 ddp_dctv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a9);
170 ddp_dctv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a10);
171 ddp_dctv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a11);
172 ddp_dctv_rec.last_update_login := rosetta_g_miss_num_map(p5_a12);
173
174
175 -- here's the delegated call to the old PL/SQL routine
176 okl_df_ctgy_rmk_tms_pub.insert_df_ctgy_rmk_tms(p_api_version,
177 p_init_msg_list,
178 x_return_status,
179 x_msg_count,
180 x_msg_data,
181 ddp_dctv_rec,
182 ddx_dctv_rec);
183
184 -- copy data back from the local variables to out nocopy or IN-OUT args, if any
185
186
187
188
189
190
191 p6_a0 := rosetta_g_miss_num_map(ddx_dctv_rec.id);
192 p6_a1 := rosetta_g_miss_num_map(ddx_dctv_rec.object_version_number);
193 p6_a2 := rosetta_g_miss_num_map(ddx_dctv_rec.rmr_id);
194 p6_a3 := rosetta_g_miss_num_map(ddx_dctv_rec.ico_id);
195 p6_a4 := rosetta_g_miss_num_map(ddx_dctv_rec.iln_id);
196 p6_a5 := ddx_dctv_rec.date_effective_from;
197 p6_a6 := ddx_dctv_rec.date_effective_to;
198 p6_a7 := rosetta_g_miss_num_map(ddx_dctv_rec.org_id);
199 p6_a8 := rosetta_g_miss_num_map(ddx_dctv_rec.created_by);
200 p6_a9 := ddx_dctv_rec.creation_date;
201 p6_a10 := rosetta_g_miss_num_map(ddx_dctv_rec.last_updated_by);
202 p6_a11 := ddx_dctv_rec.last_update_date;
203 p6_a12 := rosetta_g_miss_num_map(ddx_dctv_rec.last_update_login);
204 end;
205
206 procedure lock_df_ctgy_rmk_tms(p_api_version NUMBER
207 , p_init_msg_list VARCHAR2
208 , x_return_status out nocopy VARCHAR2
209 , x_msg_count out nocopy NUMBER
210 , x_msg_data out nocopy VARCHAR2
211 , p5_a0 JTF_NUMBER_TABLE
212 , p5_a1 JTF_NUMBER_TABLE
213 , p5_a2 JTF_NUMBER_TABLE
214 , p5_a3 JTF_NUMBER_TABLE
215 , p5_a4 JTF_NUMBER_TABLE
216 , p5_a5 JTF_DATE_TABLE
217 , p5_a6 JTF_DATE_TABLE
218 , p5_a7 JTF_NUMBER_TABLE
219 , p5_a8 JTF_NUMBER_TABLE
220 , p5_a9 JTF_DATE_TABLE
221 , p5_a10 JTF_NUMBER_TABLE
222 , p5_a11 JTF_DATE_TABLE
223 , p5_a12 JTF_NUMBER_TABLE
224 )
225
226 as
227 ddp_dctv_tbl okl_df_ctgy_rmk_tms_pub.dctv_tbl_type;
228 ddindx binary_integer; indx binary_integer;
229 begin
230
231 -- copy data to the local IN or IN-OUT args, if any
232
233
234
235
236
237 okl_dct_pvt_w.rosetta_table_copy_in_p5(ddp_dctv_tbl, p5_a0
238 , p5_a1
239 , p5_a2
240 , p5_a3
241 , p5_a4
242 , p5_a5
243 , p5_a6
244 , p5_a7
245 , p5_a8
246 , p5_a9
247 , p5_a10
248 , p5_a11
249 , p5_a12
250 );
251
252 -- here's the delegated call to the old PL/SQL routine
253 okl_df_ctgy_rmk_tms_pub.lock_df_ctgy_rmk_tms(p_api_version,
254 p_init_msg_list,
255 x_return_status,
256 x_msg_count,
257 x_msg_data,
258 ddp_dctv_tbl);
259
260 -- copy data back from the local variables to out nocopy or IN-OUT args, if any
261
262
263
264
265
266 end;
267
268 procedure lock_df_ctgy_rmk_tms(p_api_version NUMBER
269 , p_init_msg_list VARCHAR2
270 , x_return_status out nocopy VARCHAR2
271 , x_msg_count out nocopy NUMBER
272 , x_msg_data out nocopy VARCHAR2
273 , p5_a0 NUMBER := 0-1962.0724
274 , p5_a1 NUMBER := 0-1962.0724
275 , p5_a2 NUMBER := 0-1962.0724
276 , p5_a3 NUMBER := 0-1962.0724
277 , p5_a4 NUMBER := 0-1962.0724
278 , p5_a5 DATE := fnd_api.g_miss_date
279 , p5_a6 DATE := fnd_api.g_miss_date
280 , p5_a7 NUMBER := 0-1962.0724
281 , p5_a8 NUMBER := 0-1962.0724
282 , p5_a9 DATE := fnd_api.g_miss_date
283 , p5_a10 NUMBER := 0-1962.0724
284 , p5_a11 DATE := fnd_api.g_miss_date
285 , p5_a12 NUMBER := 0-1962.0724
286 )
287
288 as
289 ddp_dctv_rec okl_df_ctgy_rmk_tms_pub.dctv_rec_type;
290 ddindx binary_integer; indx binary_integer;
291 begin
292
293 -- copy data to the local IN or IN-OUT args, if any
294
295
296
297
298
299 ddp_dctv_rec.id := rosetta_g_miss_num_map(p5_a0);
300 ddp_dctv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
301 ddp_dctv_rec.rmr_id := rosetta_g_miss_num_map(p5_a2);
302 ddp_dctv_rec.ico_id := rosetta_g_miss_num_map(p5_a3);
303 ddp_dctv_rec.iln_id := rosetta_g_miss_num_map(p5_a4);
304 ddp_dctv_rec.date_effective_from := rosetta_g_miss_date_in_map(p5_a5);
305 ddp_dctv_rec.date_effective_to := rosetta_g_miss_date_in_map(p5_a6);
306 ddp_dctv_rec.org_id := rosetta_g_miss_num_map(p5_a7);
307 ddp_dctv_rec.created_by := rosetta_g_miss_num_map(p5_a8);
308 ddp_dctv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a9);
309 ddp_dctv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a10);
310 ddp_dctv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a11);
311 ddp_dctv_rec.last_update_login := rosetta_g_miss_num_map(p5_a12);
312
313 -- here's the delegated call to the old PL/SQL routine
314 okl_df_ctgy_rmk_tms_pub.lock_df_ctgy_rmk_tms(p_api_version,
315 p_init_msg_list,
316 x_return_status,
317 x_msg_count,
318 x_msg_data,
319 ddp_dctv_rec);
320
321 -- copy data back from the local variables to out nocopy or IN-OUT args, if any
322
323
324
325
326
327 end;
328
329 procedure update_df_ctgy_rmk_tms(p_api_version NUMBER
330 , p_init_msg_list VARCHAR2
331 , x_return_status out nocopy VARCHAR2
332 , x_msg_count out nocopy NUMBER
333 , x_msg_data out nocopy VARCHAR2
334 , p5_a0 JTF_NUMBER_TABLE
335 , p5_a1 JTF_NUMBER_TABLE
336 , p5_a2 JTF_NUMBER_TABLE
337 , p5_a3 JTF_NUMBER_TABLE
338 , p5_a4 JTF_NUMBER_TABLE
339 , p5_a5 JTF_DATE_TABLE
340 , p5_a6 JTF_DATE_TABLE
341 , p5_a7 JTF_NUMBER_TABLE
342 , p5_a8 JTF_NUMBER_TABLE
343 , p5_a9 JTF_DATE_TABLE
344 , p5_a10 JTF_NUMBER_TABLE
345 , p5_a11 JTF_DATE_TABLE
346 , p5_a12 JTF_NUMBER_TABLE
347 , p6_a0 out nocopy JTF_NUMBER_TABLE
348 , p6_a1 out nocopy JTF_NUMBER_TABLE
349 , p6_a2 out nocopy JTF_NUMBER_TABLE
350 , p6_a3 out nocopy JTF_NUMBER_TABLE
351 , p6_a4 out nocopy JTF_NUMBER_TABLE
352 , p6_a5 out nocopy JTF_DATE_TABLE
353 , p6_a6 out nocopy JTF_DATE_TABLE
354 , p6_a7 out nocopy JTF_NUMBER_TABLE
355 , p6_a8 out nocopy JTF_NUMBER_TABLE
356 , p6_a9 out nocopy JTF_DATE_TABLE
357 , p6_a10 out nocopy JTF_NUMBER_TABLE
358 , p6_a11 out nocopy JTF_DATE_TABLE
359 , p6_a12 out nocopy JTF_NUMBER_TABLE
360 )
361
362 as
363 ddp_dctv_tbl okl_df_ctgy_rmk_tms_pub.dctv_tbl_type;
364 ddx_dctv_tbl okl_df_ctgy_rmk_tms_pub.dctv_tbl_type;
365 ddindx binary_integer; indx binary_integer;
366 begin
367
368 -- copy data to the local IN or IN-OUT args, if any
369
370
371
372
373
374 okl_dct_pvt_w.rosetta_table_copy_in_p5(ddp_dctv_tbl, p5_a0
375 , p5_a1
376 , p5_a2
377 , p5_a3
378 , p5_a4
379 , p5_a5
380 , p5_a6
381 , p5_a7
382 , p5_a8
383 , p5_a9
384 , p5_a10
385 , p5_a11
386 , p5_a12
387 );
388
389
390 -- here's the delegated call to the old PL/SQL routine
391 okl_df_ctgy_rmk_tms_pub.update_df_ctgy_rmk_tms(p_api_version,
392 p_init_msg_list,
393 x_return_status,
394 x_msg_count,
395 x_msg_data,
396 ddp_dctv_tbl,
397 ddx_dctv_tbl);
398
399 -- copy data back from the local variables to out nocopy or IN-OUT args, if any
400
401
402
403
404
405
406 okl_dct_pvt_w.rosetta_table_copy_out_p5(ddx_dctv_tbl, p6_a0
407 , p6_a1
408 , p6_a2
409 , p6_a3
410 , p6_a4
411 , p6_a5
412 , p6_a6
413 , p6_a7
414 , p6_a8
415 , p6_a9
416 , p6_a10
417 , p6_a11
418 , p6_a12
419 );
420 end;
421
422 procedure update_df_ctgy_rmk_tms(p_api_version NUMBER
423 , p_init_msg_list VARCHAR2
424 , x_return_status out nocopy VARCHAR2
425 , x_msg_count out nocopy NUMBER
426 , x_msg_data out nocopy VARCHAR2
427 , p6_a0 out nocopy NUMBER
428 , p6_a1 out nocopy NUMBER
429 , p6_a2 out nocopy NUMBER
430 , p6_a3 out nocopy NUMBER
431 , p6_a4 out nocopy NUMBER
432 , p6_a5 out nocopy DATE
433 , p6_a6 out nocopy DATE
434 , p6_a7 out nocopy NUMBER
435 , p6_a8 out nocopy NUMBER
436 , p6_a9 out nocopy DATE
437 , p6_a10 out nocopy NUMBER
438 , p6_a11 out nocopy DATE
439 , p6_a12 out nocopy NUMBER
440 , p5_a0 NUMBER := 0-1962.0724
441 , p5_a1 NUMBER := 0-1962.0724
442 , p5_a2 NUMBER := 0-1962.0724
443 , p5_a3 NUMBER := 0-1962.0724
444 , p5_a4 NUMBER := 0-1962.0724
445 , p5_a5 DATE := fnd_api.g_miss_date
446 , p5_a6 DATE := fnd_api.g_miss_date
447 , p5_a7 NUMBER := 0-1962.0724
448 , p5_a8 NUMBER := 0-1962.0724
449 , p5_a9 DATE := fnd_api.g_miss_date
450 , p5_a10 NUMBER := 0-1962.0724
451 , p5_a11 DATE := fnd_api.g_miss_date
452 , p5_a12 NUMBER := 0-1962.0724
453 )
454
455 as
456 ddp_dctv_rec okl_df_ctgy_rmk_tms_pub.dctv_rec_type;
457 ddx_dctv_rec okl_df_ctgy_rmk_tms_pub.dctv_rec_type;
458 ddindx binary_integer; indx binary_integer;
459 begin
460
461 -- copy data to the local IN or IN-OUT args, if any
462
463
464
465
466
467 ddp_dctv_rec.id := rosetta_g_miss_num_map(p5_a0);
468 ddp_dctv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
469 ddp_dctv_rec.rmr_id := rosetta_g_miss_num_map(p5_a2);
470 ddp_dctv_rec.ico_id := rosetta_g_miss_num_map(p5_a3);
471 ddp_dctv_rec.iln_id := rosetta_g_miss_num_map(p5_a4);
472 ddp_dctv_rec.date_effective_from := rosetta_g_miss_date_in_map(p5_a5);
473 ddp_dctv_rec.date_effective_to := rosetta_g_miss_date_in_map(p5_a6);
474 ddp_dctv_rec.org_id := rosetta_g_miss_num_map(p5_a7);
475 ddp_dctv_rec.created_by := rosetta_g_miss_num_map(p5_a8);
476 ddp_dctv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a9);
477 ddp_dctv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a10);
478 ddp_dctv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a11);
479 ddp_dctv_rec.last_update_login := rosetta_g_miss_num_map(p5_a12);
480
481
482 -- here's the delegated call to the old PL/SQL routine
483 okl_df_ctgy_rmk_tms_pub.update_df_ctgy_rmk_tms(p_api_version,
484 p_init_msg_list,
485 x_return_status,
486 x_msg_count,
487 x_msg_data,
488 ddp_dctv_rec,
489 ddx_dctv_rec);
490
491 -- copy data back from the local variables to out nocopy or IN-OUT args, if any
492
493
494
495
496
497
498 p6_a0 := rosetta_g_miss_num_map(ddx_dctv_rec.id);
499 p6_a1 := rosetta_g_miss_num_map(ddx_dctv_rec.object_version_number);
500 p6_a2 := rosetta_g_miss_num_map(ddx_dctv_rec.rmr_id);
501 p6_a3 := rosetta_g_miss_num_map(ddx_dctv_rec.ico_id);
502 p6_a4 := rosetta_g_miss_num_map(ddx_dctv_rec.iln_id);
503 p6_a5 := ddx_dctv_rec.date_effective_from;
504 p6_a6 := ddx_dctv_rec.date_effective_to;
505 p6_a7 := rosetta_g_miss_num_map(ddx_dctv_rec.org_id);
506 p6_a8 := rosetta_g_miss_num_map(ddx_dctv_rec.created_by);
507 p6_a9 := ddx_dctv_rec.creation_date;
508 p6_a10 := rosetta_g_miss_num_map(ddx_dctv_rec.last_updated_by);
509 p6_a11 := ddx_dctv_rec.last_update_date;
510 p6_a12 := rosetta_g_miss_num_map(ddx_dctv_rec.last_update_login);
511 end;
512
513 procedure delete_df_ctgy_rmk_tms(p_api_version NUMBER
514 , p_init_msg_list VARCHAR2
515 , x_return_status out nocopy VARCHAR2
516 , x_msg_count out nocopy NUMBER
517 , x_msg_data out nocopy VARCHAR2
518 , p5_a0 JTF_NUMBER_TABLE
519 , p5_a1 JTF_NUMBER_TABLE
520 , p5_a2 JTF_NUMBER_TABLE
521 , p5_a3 JTF_NUMBER_TABLE
522 , p5_a4 JTF_NUMBER_TABLE
523 , p5_a5 JTF_DATE_TABLE
524 , p5_a6 JTF_DATE_TABLE
525 , p5_a7 JTF_NUMBER_TABLE
526 , p5_a8 JTF_NUMBER_TABLE
527 , p5_a9 JTF_DATE_TABLE
528 , p5_a10 JTF_NUMBER_TABLE
529 , p5_a11 JTF_DATE_TABLE
530 , p5_a12 JTF_NUMBER_TABLE
531 )
532
533 as
534 ddp_dctv_tbl okl_df_ctgy_rmk_tms_pub.dctv_tbl_type;
535 ddindx binary_integer; indx binary_integer;
536 begin
537
538 -- copy data to the local IN or IN-OUT args, if any
539
540
541
542
543
544 okl_dct_pvt_w.rosetta_table_copy_in_p5(ddp_dctv_tbl, p5_a0
545 , p5_a1
546 , p5_a2
547 , p5_a3
548 , p5_a4
549 , p5_a5
550 , p5_a6
551 , p5_a7
552 , p5_a8
553 , p5_a9
554 , p5_a10
555 , p5_a11
556 , p5_a12
557 );
558
559 -- here's the delegated call to the old PL/SQL routine
560 okl_df_ctgy_rmk_tms_pub.delete_df_ctgy_rmk_tms(p_api_version,
561 p_init_msg_list,
562 x_return_status,
563 x_msg_count,
564 x_msg_data,
565 ddp_dctv_tbl);
566
567 -- copy data back from the local variables to out nocopy or IN-OUT args, if any
568
569
570
571
572
573 end;
574
575 procedure delete_df_ctgy_rmk_tms(p_api_version NUMBER
576 , p_init_msg_list VARCHAR2
577 , x_return_status out nocopy VARCHAR2
578 , x_msg_count out nocopy NUMBER
579 , x_msg_data out nocopy VARCHAR2
580 , p5_a0 NUMBER := 0-1962.0724
581 , p5_a1 NUMBER := 0-1962.0724
582 , p5_a2 NUMBER := 0-1962.0724
583 , p5_a3 NUMBER := 0-1962.0724
584 , p5_a4 NUMBER := 0-1962.0724
585 , p5_a5 DATE := fnd_api.g_miss_date
586 , p5_a6 DATE := fnd_api.g_miss_date
587 , p5_a7 NUMBER := 0-1962.0724
588 , p5_a8 NUMBER := 0-1962.0724
589 , p5_a9 DATE := fnd_api.g_miss_date
590 , p5_a10 NUMBER := 0-1962.0724
591 , p5_a11 DATE := fnd_api.g_miss_date
592 , p5_a12 NUMBER := 0-1962.0724
593 )
594
595 as
596 ddp_dctv_rec okl_df_ctgy_rmk_tms_pub.dctv_rec_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 ddp_dctv_rec.id := rosetta_g_miss_num_map(p5_a0);
607 ddp_dctv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
608 ddp_dctv_rec.rmr_id := rosetta_g_miss_num_map(p5_a2);
609 ddp_dctv_rec.ico_id := rosetta_g_miss_num_map(p5_a3);
610 ddp_dctv_rec.iln_id := rosetta_g_miss_num_map(p5_a4);
611 ddp_dctv_rec.date_effective_from := rosetta_g_miss_date_in_map(p5_a5);
612 ddp_dctv_rec.date_effective_to := rosetta_g_miss_date_in_map(p5_a6);
613 ddp_dctv_rec.org_id := rosetta_g_miss_num_map(p5_a7);
614 ddp_dctv_rec.created_by := rosetta_g_miss_num_map(p5_a8);
615 ddp_dctv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a9);
616 ddp_dctv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a10);
617 ddp_dctv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a11);
618 ddp_dctv_rec.last_update_login := rosetta_g_miss_num_map(p5_a12);
619
620 -- here's the delegated call to the old PL/SQL routine
621 okl_df_ctgy_rmk_tms_pub.delete_df_ctgy_rmk_tms(p_api_version,
622 p_init_msg_list,
623 x_return_status,
624 x_msg_count,
625 x_msg_data,
626 ddp_dctv_rec);
627
628 -- copy data back from the local variables to out nocopy or IN-OUT args, if any
629
630
631
632
633
634 end;
635
636 procedure validate_df_ctgy_rmk_tms(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 JTF_NUMBER_TABLE
642 , p5_a1 JTF_NUMBER_TABLE
643 , p5_a2 JTF_NUMBER_TABLE
644 , p5_a3 JTF_NUMBER_TABLE
645 , p5_a4 JTF_NUMBER_TABLE
646 , p5_a5 JTF_DATE_TABLE
647 , p5_a6 JTF_DATE_TABLE
648 , p5_a7 JTF_NUMBER_TABLE
649 , p5_a8 JTF_NUMBER_TABLE
650 , p5_a9 JTF_DATE_TABLE
651 , p5_a10 JTF_NUMBER_TABLE
652 , p5_a11 JTF_DATE_TABLE
653 , p5_a12 JTF_NUMBER_TABLE
654 )
655
656 as
657 ddp_dctv_tbl okl_df_ctgy_rmk_tms_pub.dctv_tbl_type;
658 ddindx binary_integer; indx binary_integer;
659 begin
660
661 -- copy data to the local IN or IN-OUT args, if any
662
663
664
665
666
667 okl_dct_pvt_w.rosetta_table_copy_in_p5(ddp_dctv_tbl, p5_a0
668 , p5_a1
669 , p5_a2
670 , p5_a3
671 , p5_a4
672 , p5_a5
673 , p5_a6
674 , p5_a7
675 , p5_a8
676 , p5_a9
677 , p5_a10
678 , p5_a11
679 , p5_a12
680 );
681
682 -- here's the delegated call to the old PL/SQL routine
683 okl_df_ctgy_rmk_tms_pub.validate_df_ctgy_rmk_tms(p_api_version,
684 p_init_msg_list,
685 x_return_status,
686 x_msg_count,
687 x_msg_data,
688 ddp_dctv_tbl);
689
690 -- copy data back from the local variables to out nocopy or IN-OUT args, if any
691
692
693
694
695
696 end;
697
698 procedure validate_df_ctgy_rmk_tms(p_api_version NUMBER
699 , p_init_msg_list VARCHAR2
700 , x_return_status out nocopy VARCHAR2
701 , x_msg_count out nocopy NUMBER
702 , x_msg_data out nocopy VARCHAR2
703 , p5_a0 NUMBER := 0-1962.0724
704 , p5_a1 NUMBER := 0-1962.0724
705 , p5_a2 NUMBER := 0-1962.0724
706 , p5_a3 NUMBER := 0-1962.0724
707 , p5_a4 NUMBER := 0-1962.0724
708 , p5_a5 DATE := fnd_api.g_miss_date
709 , p5_a6 DATE := fnd_api.g_miss_date
710 , p5_a7 NUMBER := 0-1962.0724
711 , p5_a8 NUMBER := 0-1962.0724
712 , p5_a9 DATE := fnd_api.g_miss_date
713 , p5_a10 NUMBER := 0-1962.0724
714 , p5_a11 DATE := fnd_api.g_miss_date
715 , p5_a12 NUMBER := 0-1962.0724
716 )
717
718 as
719 ddp_dctv_rec okl_df_ctgy_rmk_tms_pub.dctv_rec_type;
720 ddindx binary_integer; indx binary_integer;
721 begin
722
723 -- copy data to the local IN or IN-OUT args, if any
724
725
726
727
728
729 ddp_dctv_rec.id := rosetta_g_miss_num_map(p5_a0);
730 ddp_dctv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
731 ddp_dctv_rec.rmr_id := rosetta_g_miss_num_map(p5_a2);
732 ddp_dctv_rec.ico_id := rosetta_g_miss_num_map(p5_a3);
733 ddp_dctv_rec.iln_id := rosetta_g_miss_num_map(p5_a4);
734 ddp_dctv_rec.date_effective_from := rosetta_g_miss_date_in_map(p5_a5);
735 ddp_dctv_rec.date_effective_to := rosetta_g_miss_date_in_map(p5_a6);
736 ddp_dctv_rec.org_id := rosetta_g_miss_num_map(p5_a7);
737 ddp_dctv_rec.created_by := rosetta_g_miss_num_map(p5_a8);
738 ddp_dctv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a9);
739 ddp_dctv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a10);
740 ddp_dctv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a11);
741 ddp_dctv_rec.last_update_login := rosetta_g_miss_num_map(p5_a12);
742
743 -- here's the delegated call to the old PL/SQL routine
744 okl_df_ctgy_rmk_tms_pub.validate_df_ctgy_rmk_tms(p_api_version,
745 p_init_msg_list,
746 x_return_status,
747 x_msg_count,
748 x_msg_data,
749 ddp_dctv_rec);
750
751 -- copy data back from the local variables to out nocopy or IN-OUT args, if any
752
753
754
755
756
757 end;
758
759 end okl_df_ctgy_rmk_tms_pub_w;