1: package body okl_setuppqvalues_pvt_w as
2: /* $Header: OKLESUVB.pls 120.2 2007/09/26 08:50:47 rajnisku ship $ */
3: rosetta_g_mistake_date date := to_date('01/01/+4713', 'MM/DD/SYYYY');
4: rosetta_g_miss_date date := to_date('01/01/-4712', 'MM/DD/SYYYY');
5: rosetta_g_mistake_date_high date := to_date('01/01/+4710', 'MM/DD/SYYYY');
50: , p0_a11 NUMBER := 0-1962.0724
51: )
52:
53: as
54: ddp_pqvv_rec okl_setuppqvalues_pvt.pqvv_rec_type;
55: ddx_no_data_found boolean;
56: ddx_pqvv_rec okl_setuppqvalues_pvt.pqvv_rec_type;
57: ddindx binary_integer; indx binary_integer;
58: begin
52:
53: as
54: ddp_pqvv_rec okl_setuppqvalues_pvt.pqvv_rec_type;
55: ddx_no_data_found boolean;
56: ddx_pqvv_rec okl_setuppqvalues_pvt.pqvv_rec_type;
57: ddindx binary_integer; indx binary_integer;
58: begin
59:
60: -- copy data to the local IN or IN-OUT args, if any
74:
75:
76:
77: -- here's the delegated call to the old PL/SQL routine
78: okl_setuppqvalues_pvt.get_rec(ddp_pqvv_rec,
79: ddx_no_data_found,
80: x_return_status,
81: ddx_pqvv_rec);
82:
180: , p7_a11 NUMBER := 0-1962.0724
181: )
182:
183: as
184: ddp_pqyv_rec okl_setuppqvalues_pvt.pqyv_rec_type;
185: ddp_pdtv_rec okl_setuppqvalues_pvt.pdtv_rec_type;
186: ddp_pqvv_rec okl_setuppqvalues_pvt.pqvv_rec_type;
187: ddx_pqvv_rec okl_setuppqvalues_pvt.pqvv_rec_type;
188: ddindx binary_integer; indx binary_integer;
181: )
182:
183: as
184: ddp_pqyv_rec okl_setuppqvalues_pvt.pqyv_rec_type;
185: ddp_pdtv_rec okl_setuppqvalues_pvt.pdtv_rec_type;
186: ddp_pqvv_rec okl_setuppqvalues_pvt.pqvv_rec_type;
187: ddx_pqvv_rec okl_setuppqvalues_pvt.pqvv_rec_type;
188: ddindx binary_integer; indx binary_integer;
189: begin
182:
183: as
184: ddp_pqyv_rec okl_setuppqvalues_pvt.pqyv_rec_type;
185: ddp_pdtv_rec okl_setuppqvalues_pvt.pdtv_rec_type;
186: ddp_pqvv_rec okl_setuppqvalues_pvt.pqvv_rec_type;
187: ddx_pqvv_rec okl_setuppqvalues_pvt.pqvv_rec_type;
188: ddindx binary_integer; indx binary_integer;
189: begin
190:
183: as
184: ddp_pqyv_rec okl_setuppqvalues_pvt.pqyv_rec_type;
185: ddp_pdtv_rec okl_setuppqvalues_pvt.pdtv_rec_type;
186: ddp_pqvv_rec okl_setuppqvalues_pvt.pqvv_rec_type;
187: ddx_pqvv_rec okl_setuppqvalues_pvt.pqvv_rec_type;
188: ddindx binary_integer; indx binary_integer;
189: begin
190:
191: -- copy data to the local IN or IN-OUT args, if any
255: ddp_pqvv_rec.last_update_login := rosetta_g_miss_num_map(p7_a11);
256:
257:
258: -- here's the delegated call to the old PL/SQL routine
259: okl_setuppqvalues_pvt.insert_pqvalues(p_api_version,
260: p_init_msg_list,
261: x_return_status,
262: x_msg_count,
263: x_msg_data,
365: , p6_a32 NUMBER := 0-1962.0724
366: )
367:
368: as
369: ddp_pqyv_rec okl_setuppqvalues_pvt.pqyv_rec_type;
370: ddp_pdtv_rec okl_setuppqvalues_pvt.pdtv_rec_type;
371: ddp_pqvv_tbl okl_setuppqvalues_pvt.pqvv_tbl_type;
372: ddx_pqvv_tbl okl_setuppqvalues_pvt.pqvv_tbl_type;
373: ddindx binary_integer; indx binary_integer;
366: )
367:
368: as
369: ddp_pqyv_rec okl_setuppqvalues_pvt.pqyv_rec_type;
370: ddp_pdtv_rec okl_setuppqvalues_pvt.pdtv_rec_type;
371: ddp_pqvv_tbl okl_setuppqvalues_pvt.pqvv_tbl_type;
372: ddx_pqvv_tbl okl_setuppqvalues_pvt.pqvv_tbl_type;
373: ddindx binary_integer; indx binary_integer;
374: begin
367:
368: as
369: ddp_pqyv_rec okl_setuppqvalues_pvt.pqyv_rec_type;
370: ddp_pdtv_rec okl_setuppqvalues_pvt.pdtv_rec_type;
371: ddp_pqvv_tbl okl_setuppqvalues_pvt.pqvv_tbl_type;
372: ddx_pqvv_tbl okl_setuppqvalues_pvt.pqvv_tbl_type;
373: ddindx binary_integer; indx binary_integer;
374: begin
375:
368: as
369: ddp_pqyv_rec okl_setuppqvalues_pvt.pqyv_rec_type;
370: ddp_pdtv_rec okl_setuppqvalues_pvt.pdtv_rec_type;
371: ddp_pqvv_tbl okl_setuppqvalues_pvt.pqvv_tbl_type;
372: ddx_pqvv_tbl okl_setuppqvalues_pvt.pqvv_tbl_type;
373: ddindx binary_integer; indx binary_integer;
374: begin
375:
376: -- copy data to the local IN or IN-OUT args, if any
441: );
442:
443:
444: -- here's the delegated call to the old PL/SQL routine
445: okl_setuppqvalues_pvt.insert_pqvalues(p_api_version,
446: p_init_msg_list,
447: x_return_status,
448: x_msg_count,
449: x_msg_data,
552: , p7_a11 NUMBER := 0-1962.0724
553: )
554:
555: as
556: ddp_pqyv_rec okl_setuppqvalues_pvt.pqyv_rec_type;
557: ddp_pdtv_rec okl_setuppqvalues_pvt.pdtv_rec_type;
558: ddp_pqvv_rec okl_setuppqvalues_pvt.pqvv_rec_type;
559: ddx_pqvv_rec okl_setuppqvalues_pvt.pqvv_rec_type;
560: ddindx binary_integer; indx binary_integer;
553: )
554:
555: as
556: ddp_pqyv_rec okl_setuppqvalues_pvt.pqyv_rec_type;
557: ddp_pdtv_rec okl_setuppqvalues_pvt.pdtv_rec_type;
558: ddp_pqvv_rec okl_setuppqvalues_pvt.pqvv_rec_type;
559: ddx_pqvv_rec okl_setuppqvalues_pvt.pqvv_rec_type;
560: ddindx binary_integer; indx binary_integer;
561: begin
554:
555: as
556: ddp_pqyv_rec okl_setuppqvalues_pvt.pqyv_rec_type;
557: ddp_pdtv_rec okl_setuppqvalues_pvt.pdtv_rec_type;
558: ddp_pqvv_rec okl_setuppqvalues_pvt.pqvv_rec_type;
559: ddx_pqvv_rec okl_setuppqvalues_pvt.pqvv_rec_type;
560: ddindx binary_integer; indx binary_integer;
561: begin
562:
555: as
556: ddp_pqyv_rec okl_setuppqvalues_pvt.pqyv_rec_type;
557: ddp_pdtv_rec okl_setuppqvalues_pvt.pdtv_rec_type;
558: ddp_pqvv_rec okl_setuppqvalues_pvt.pqvv_rec_type;
559: ddx_pqvv_rec okl_setuppqvalues_pvt.pqvv_rec_type;
560: ddindx binary_integer; indx binary_integer;
561: begin
562:
563: -- copy data to the local IN or IN-OUT args, if any
627: ddp_pqvv_rec.last_update_login := rosetta_g_miss_num_map(p7_a11);
628:
629:
630: -- here's the delegated call to the old PL/SQL routine
631: okl_setuppqvalues_pvt.update_pqvalues(p_api_version,
632: p_init_msg_list,
633: x_return_status,
634: x_msg_count,
635: x_msg_data,
737: , p6_a32 NUMBER := 0-1962.0724
738: )
739:
740: as
741: ddp_pqyv_rec okl_setuppqvalues_pvt.pqyv_rec_type;
742: ddp_pdtv_rec okl_setuppqvalues_pvt.pdtv_rec_type;
743: ddp_pqvv_tbl okl_setuppqvalues_pvt.pqvv_tbl_type;
744: ddx_pqvv_tbl okl_setuppqvalues_pvt.pqvv_tbl_type;
745: ddindx binary_integer; indx binary_integer;
738: )
739:
740: as
741: ddp_pqyv_rec okl_setuppqvalues_pvt.pqyv_rec_type;
742: ddp_pdtv_rec okl_setuppqvalues_pvt.pdtv_rec_type;
743: ddp_pqvv_tbl okl_setuppqvalues_pvt.pqvv_tbl_type;
744: ddx_pqvv_tbl okl_setuppqvalues_pvt.pqvv_tbl_type;
745: ddindx binary_integer; indx binary_integer;
746: begin
739:
740: as
741: ddp_pqyv_rec okl_setuppqvalues_pvt.pqyv_rec_type;
742: ddp_pdtv_rec okl_setuppqvalues_pvt.pdtv_rec_type;
743: ddp_pqvv_tbl okl_setuppqvalues_pvt.pqvv_tbl_type;
744: ddx_pqvv_tbl okl_setuppqvalues_pvt.pqvv_tbl_type;
745: ddindx binary_integer; indx binary_integer;
746: begin
747:
740: as
741: ddp_pqyv_rec okl_setuppqvalues_pvt.pqyv_rec_type;
742: ddp_pdtv_rec okl_setuppqvalues_pvt.pdtv_rec_type;
743: ddp_pqvv_tbl okl_setuppqvalues_pvt.pqvv_tbl_type;
744: ddx_pqvv_tbl okl_setuppqvalues_pvt.pqvv_tbl_type;
745: ddindx binary_integer; indx binary_integer;
746: begin
747:
748: -- copy data to the local IN or IN-OUT args, if any
813: );
814:
815:
816: -- here's the delegated call to the old PL/SQL routine
817: okl_setuppqvalues_pvt.update_pqvalues(p_api_version,
818: p_init_msg_list,
819: x_return_status,
820: x_msg_count,
821: x_msg_data,
847: , p8_a11
848: );
849: end;
850:
851: end okl_setuppqvalues_pvt_w;