1: package body okl_cntx_grp_prmtrs_pub_w as
2: /* $Header: OKLUCGMB.pls 120.1 2005/07/08 10:19:39 asawanka 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:
44: , p5_a8 NUMBER := 0-1962.0724
45: )
46:
47: as
48: ddp_cgmv_rec okl_cntx_grp_prmtrs_pub.cgmv_rec_type;
49: ddx_cgmv_rec okl_cntx_grp_prmtrs_pub.cgmv_rec_type;
50: ddindx binary_integer; indx binary_integer;
51: begin
52:
45: )
46:
47: as
48: ddp_cgmv_rec okl_cntx_grp_prmtrs_pub.cgmv_rec_type;
49: ddx_cgmv_rec okl_cntx_grp_prmtrs_pub.cgmv_rec_type;
50: ddindx binary_integer; indx binary_integer;
51: begin
52:
53: -- copy data to the local IN or IN-OUT args, if any
67: ddp_cgmv_rec.last_update_login := rosetta_g_miss_num_map(p5_a8);
68:
69:
70: -- here's the delegated call to the old PL/SQL routine
71: okl_cntx_grp_prmtrs_pub.insert_cntx_grp_prmtrs(p_api_version,
72: p_init_msg_list,
73: x_return_status,
74: x_msg_count,
75: x_msg_data,
119: , p6_a8 out nocopy JTF_NUMBER_TABLE
120: )
121:
122: as
123: ddp_cgmv_tbl okl_cntx_grp_prmtrs_pub.cgmv_tbl_type;
124: ddx_cgmv_tbl okl_cntx_grp_prmtrs_pub.cgmv_tbl_type;
125: ddindx binary_integer; indx binary_integer;
126: begin
127:
120: )
121:
122: as
123: ddp_cgmv_tbl okl_cntx_grp_prmtrs_pub.cgmv_tbl_type;
124: ddx_cgmv_tbl okl_cntx_grp_prmtrs_pub.cgmv_tbl_type;
125: ddindx binary_integer; indx binary_integer;
126: begin
127:
128: -- copy data to the local IN or IN-OUT args, if any
143: );
144:
145:
146: -- here's the delegated call to the old PL/SQL routine
147: okl_cntx_grp_prmtrs_pub.insert_cntx_grp_prmtrs(p_api_version,
148: p_init_msg_list,
149: x_return_status,
150: x_msg_count,
151: x_msg_data,
187: , p5_a8 NUMBER := 0-1962.0724
188: )
189:
190: as
191: ddp_cgmv_rec okl_cntx_grp_prmtrs_pub.cgmv_rec_type;
192: ddindx binary_integer; indx binary_integer;
193: begin
194:
195: -- copy data to the local IN or IN-OUT args, if any
208: ddp_cgmv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a7);
209: ddp_cgmv_rec.last_update_login := rosetta_g_miss_num_map(p5_a8);
210:
211: -- here's the delegated call to the old PL/SQL routine
212: okl_cntx_grp_prmtrs_pub.lock_cntx_grp_prmtrs(p_api_version,
213: p_init_msg_list,
214: x_return_status,
215: x_msg_count,
216: x_msg_data,
240: , p5_a8 JTF_NUMBER_TABLE
241: )
242:
243: as
244: ddp_cgmv_tbl okl_cntx_grp_prmtrs_pub.cgmv_tbl_type;
245: ddindx binary_integer; indx binary_integer;
246: begin
247:
248: -- copy data to the local IN or IN-OUT args, if any
262: , p5_a8
263: );
264:
265: -- here's the delegated call to the old PL/SQL routine
266: okl_cntx_grp_prmtrs_pub.lock_cntx_grp_prmtrs(p_api_version,
267: p_init_msg_list,
268: x_return_status,
269: x_msg_count,
270: x_msg_data,
303: , p5_a8 NUMBER := 0-1962.0724
304: )
305:
306: as
307: ddp_cgmv_rec okl_cntx_grp_prmtrs_pub.cgmv_rec_type;
308: ddx_cgmv_rec okl_cntx_grp_prmtrs_pub.cgmv_rec_type;
309: ddindx binary_integer; indx binary_integer;
310: begin
311:
304: )
305:
306: as
307: ddp_cgmv_rec okl_cntx_grp_prmtrs_pub.cgmv_rec_type;
308: ddx_cgmv_rec okl_cntx_grp_prmtrs_pub.cgmv_rec_type;
309: ddindx binary_integer; indx binary_integer;
310: begin
311:
312: -- copy data to the local IN or IN-OUT args, if any
326: ddp_cgmv_rec.last_update_login := rosetta_g_miss_num_map(p5_a8);
327:
328:
329: -- here's the delegated call to the old PL/SQL routine
330: okl_cntx_grp_prmtrs_pub.update_cntx_grp_prmtrs(p_api_version,
331: p_init_msg_list,
332: x_return_status,
333: x_msg_count,
334: x_msg_data,
378: , p6_a8 out nocopy JTF_NUMBER_TABLE
379: )
380:
381: as
382: ddp_cgmv_tbl okl_cntx_grp_prmtrs_pub.cgmv_tbl_type;
383: ddx_cgmv_tbl okl_cntx_grp_prmtrs_pub.cgmv_tbl_type;
384: ddindx binary_integer; indx binary_integer;
385: begin
386:
379: )
380:
381: as
382: ddp_cgmv_tbl okl_cntx_grp_prmtrs_pub.cgmv_tbl_type;
383: ddx_cgmv_tbl okl_cntx_grp_prmtrs_pub.cgmv_tbl_type;
384: ddindx binary_integer; indx binary_integer;
385: begin
386:
387: -- copy data to the local IN or IN-OUT args, if any
402: );
403:
404:
405: -- here's the delegated call to the old PL/SQL routine
406: okl_cntx_grp_prmtrs_pub.update_cntx_grp_prmtrs(p_api_version,
407: p_init_msg_list,
408: x_return_status,
409: x_msg_count,
410: x_msg_data,
446: , p5_a8 NUMBER := 0-1962.0724
447: )
448:
449: as
450: ddp_cgmv_rec okl_cntx_grp_prmtrs_pub.cgmv_rec_type;
451: ddindx binary_integer; indx binary_integer;
452: begin
453:
454: -- copy data to the local IN or IN-OUT args, if any
467: ddp_cgmv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a7);
468: ddp_cgmv_rec.last_update_login := rosetta_g_miss_num_map(p5_a8);
469:
470: -- here's the delegated call to the old PL/SQL routine
471: okl_cntx_grp_prmtrs_pub.delete_cntx_grp_prmtrs(p_api_version,
472: p_init_msg_list,
473: x_return_status,
474: x_msg_count,
475: x_msg_data,
499: , p5_a8 JTF_NUMBER_TABLE
500: )
501:
502: as
503: ddp_cgmv_tbl okl_cntx_grp_prmtrs_pub.cgmv_tbl_type;
504: ddindx binary_integer; indx binary_integer;
505: begin
506:
507: -- copy data to the local IN or IN-OUT args, if any
521: , p5_a8
522: );
523:
524: -- here's the delegated call to the old PL/SQL routine
525: okl_cntx_grp_prmtrs_pub.delete_cntx_grp_prmtrs(p_api_version,
526: p_init_msg_list,
527: x_return_status,
528: x_msg_count,
529: x_msg_data,
553: , p5_a8 NUMBER := 0-1962.0724
554: )
555:
556: as
557: ddp_cgmv_rec okl_cntx_grp_prmtrs_pub.cgmv_rec_type;
558: ddindx binary_integer; indx binary_integer;
559: begin
560:
561: -- copy data to the local IN or IN-OUT args, if any
574: ddp_cgmv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a7);
575: ddp_cgmv_rec.last_update_login := rosetta_g_miss_num_map(p5_a8);
576:
577: -- here's the delegated call to the old PL/SQL routine
578: okl_cntx_grp_prmtrs_pub.validate_cntx_grp_prmtrs(p_api_version,
579: p_init_msg_list,
580: x_return_status,
581: x_msg_count,
582: x_msg_data,
606: , p5_a8 JTF_NUMBER_TABLE
607: )
608:
609: as
610: ddp_cgmv_tbl okl_cntx_grp_prmtrs_pub.cgmv_tbl_type;
611: ddindx binary_integer; indx binary_integer;
612: begin
613:
614: -- copy data to the local IN or IN-OUT args, if any
628: , p5_a8
629: );
630:
631: -- here's the delegated call to the old PL/SQL routine
632: okl_cntx_grp_prmtrs_pub.validate_cntx_grp_prmtrs(p_api_version,
633: p_init_msg_list,
634: x_return_status,
635: x_msg_count,
636: x_msg_data,
643:
644:
645: end;
646:
647: end okl_cntx_grp_prmtrs_pub_w;