1: package body okl_contract_line_item_pub_w as
2: /* $Header: OKLUCLIB.pls 115.2 2003/10/16 01:15:36 smereddy 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:
48: , p6_a10 out nocopy JTF_NUMBER_TABLE
49: )
50:
51: as
52: ddp_line_item_tbl okl_contract_line_item_pub.line_item_tbl_type;
53: ddx_line_item_tbl okl_contract_line_item_pub.line_item_tbl_type;
54: ddindx binary_integer; indx binary_integer;
55: begin
56:
49: )
50:
51: as
52: ddp_line_item_tbl okl_contract_line_item_pub.line_item_tbl_type;
53: ddx_line_item_tbl okl_contract_line_item_pub.line_item_tbl_type;
54: ddindx binary_integer; indx binary_integer;
55: begin
56:
57: -- 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_contract_line_item_pub.create_contract_line_item(p_api_version,
79: p_init_msg_list,
80: x_return_status,
81: x_msg_count,
82: x_msg_data,
133: , p6_a10 out nocopy JTF_NUMBER_TABLE
134: )
135:
136: as
137: ddp_line_item_tbl okl_contract_line_item_pub.line_item_tbl_type;
138: ddx_line_item_tbl okl_contract_line_item_pub.line_item_tbl_type;
139: ddindx binary_integer; indx binary_integer;
140: begin
141:
134: )
135:
136: as
137: ddp_line_item_tbl okl_contract_line_item_pub.line_item_tbl_type;
138: ddx_line_item_tbl okl_contract_line_item_pub.line_item_tbl_type;
139: ddindx binary_integer; indx binary_integer;
140: begin
141:
142: -- copy data to the local IN or IN-OUT args, if any
159: );
160:
161:
162: -- here's the delegated call to the old PL/SQL routine
163: okl_contract_line_item_pub.update_contract_line_item(p_api_version,
164: p_init_msg_list,
165: x_return_status,
166: x_msg_count,
167: x_msg_data,
207: , p5_a10 JTF_NUMBER_TABLE
208: )
209:
210: as
211: ddp_line_item_tbl okl_contract_line_item_pub.line_item_tbl_type;
212: ddindx binary_integer; indx binary_integer;
213: begin
214:
215: -- copy data to the local IN or IN-OUT args, if any
231: , p5_a10
232: );
233:
234: -- here's the delegated call to the old PL/SQL routine
235: okl_contract_line_item_pub.delete_contract_line_item(p_api_version,
236: p_init_msg_list,
237: x_return_status,
238: x_msg_count,
239: x_msg_data,
672: , p7_a19 NUMBER := 0-1962.0724
673: )
674:
675: as
676: ddp_clev_rec okl_contract_line_item_pub.clev_rec_type;
677: ddp_klev_rec okl_contract_line_item_pub.klev_rec_type;
678: ddp_cimv_rec okl_contract_line_item_pub.cimv_rec_type;
679: ddx_clev_rec okl_contract_line_item_pub.clev_rec_type;
680: ddx_klev_rec okl_contract_line_item_pub.klev_rec_type;
673: )
674:
675: as
676: ddp_clev_rec okl_contract_line_item_pub.clev_rec_type;
677: ddp_klev_rec okl_contract_line_item_pub.klev_rec_type;
678: ddp_cimv_rec okl_contract_line_item_pub.cimv_rec_type;
679: ddx_clev_rec okl_contract_line_item_pub.clev_rec_type;
680: ddx_klev_rec okl_contract_line_item_pub.klev_rec_type;
681: ddx_cimv_rec okl_contract_line_item_pub.cimv_rec_type;
674:
675: as
676: ddp_clev_rec okl_contract_line_item_pub.clev_rec_type;
677: ddp_klev_rec okl_contract_line_item_pub.klev_rec_type;
678: ddp_cimv_rec okl_contract_line_item_pub.cimv_rec_type;
679: ddx_clev_rec okl_contract_line_item_pub.clev_rec_type;
680: ddx_klev_rec okl_contract_line_item_pub.klev_rec_type;
681: ddx_cimv_rec okl_contract_line_item_pub.cimv_rec_type;
682: ddindx binary_integer; indx binary_integer;
675: as
676: ddp_clev_rec okl_contract_line_item_pub.clev_rec_type;
677: ddp_klev_rec okl_contract_line_item_pub.klev_rec_type;
678: ddp_cimv_rec okl_contract_line_item_pub.cimv_rec_type;
679: ddx_clev_rec okl_contract_line_item_pub.clev_rec_type;
680: ddx_klev_rec okl_contract_line_item_pub.klev_rec_type;
681: ddx_cimv_rec okl_contract_line_item_pub.cimv_rec_type;
682: ddindx binary_integer; indx binary_integer;
683: begin
676: ddp_clev_rec okl_contract_line_item_pub.clev_rec_type;
677: ddp_klev_rec okl_contract_line_item_pub.klev_rec_type;
678: ddp_cimv_rec okl_contract_line_item_pub.cimv_rec_type;
679: ddx_clev_rec okl_contract_line_item_pub.clev_rec_type;
680: ddx_klev_rec okl_contract_line_item_pub.klev_rec_type;
681: ddx_cimv_rec okl_contract_line_item_pub.cimv_rec_type;
682: ddindx binary_integer; indx binary_integer;
683: begin
684:
677: ddp_klev_rec okl_contract_line_item_pub.klev_rec_type;
678: ddp_cimv_rec okl_contract_line_item_pub.cimv_rec_type;
679: ddx_clev_rec okl_contract_line_item_pub.clev_rec_type;
680: ddx_klev_rec okl_contract_line_item_pub.klev_rec_type;
681: ddx_cimv_rec okl_contract_line_item_pub.cimv_rec_type;
682: ddindx binary_integer; indx binary_integer;
683: begin
684:
685: -- copy data to the local IN or IN-OUT args, if any
903:
904:
905:
906: -- here's the delegated call to the old PL/SQL routine
907: okl_contract_line_item_pub.create_contract_line_item(p_api_version,
908: p_init_msg_list,
909: x_return_status,
910: x_msg_count,
911: x_msg_data,
1563: , p7_a19 NUMBER := 0-1962.0724
1564: )
1565:
1566: as
1567: ddp_clev_rec okl_contract_line_item_pub.clev_rec_type;
1568: ddp_klev_rec okl_contract_line_item_pub.klev_rec_type;
1569: ddp_cimv_rec okl_contract_line_item_pub.cimv_rec_type;
1570: ddx_clev_rec okl_contract_line_item_pub.clev_rec_type;
1571: ddx_klev_rec okl_contract_line_item_pub.klev_rec_type;
1564: )
1565:
1566: as
1567: ddp_clev_rec okl_contract_line_item_pub.clev_rec_type;
1568: ddp_klev_rec okl_contract_line_item_pub.klev_rec_type;
1569: ddp_cimv_rec okl_contract_line_item_pub.cimv_rec_type;
1570: ddx_clev_rec okl_contract_line_item_pub.clev_rec_type;
1571: ddx_klev_rec okl_contract_line_item_pub.klev_rec_type;
1572: ddx_cimv_rec okl_contract_line_item_pub.cimv_rec_type;
1565:
1566: as
1567: ddp_clev_rec okl_contract_line_item_pub.clev_rec_type;
1568: ddp_klev_rec okl_contract_line_item_pub.klev_rec_type;
1569: ddp_cimv_rec okl_contract_line_item_pub.cimv_rec_type;
1570: ddx_clev_rec okl_contract_line_item_pub.clev_rec_type;
1571: ddx_klev_rec okl_contract_line_item_pub.klev_rec_type;
1572: ddx_cimv_rec okl_contract_line_item_pub.cimv_rec_type;
1573: ddindx binary_integer; indx binary_integer;
1566: as
1567: ddp_clev_rec okl_contract_line_item_pub.clev_rec_type;
1568: ddp_klev_rec okl_contract_line_item_pub.klev_rec_type;
1569: ddp_cimv_rec okl_contract_line_item_pub.cimv_rec_type;
1570: ddx_clev_rec okl_contract_line_item_pub.clev_rec_type;
1571: ddx_klev_rec okl_contract_line_item_pub.klev_rec_type;
1572: ddx_cimv_rec okl_contract_line_item_pub.cimv_rec_type;
1573: ddindx binary_integer; indx binary_integer;
1574: begin
1567: ddp_clev_rec okl_contract_line_item_pub.clev_rec_type;
1568: ddp_klev_rec okl_contract_line_item_pub.klev_rec_type;
1569: ddp_cimv_rec okl_contract_line_item_pub.cimv_rec_type;
1570: ddx_clev_rec okl_contract_line_item_pub.clev_rec_type;
1571: ddx_klev_rec okl_contract_line_item_pub.klev_rec_type;
1572: ddx_cimv_rec okl_contract_line_item_pub.cimv_rec_type;
1573: ddindx binary_integer; indx binary_integer;
1574: begin
1575:
1568: ddp_klev_rec okl_contract_line_item_pub.klev_rec_type;
1569: ddp_cimv_rec okl_contract_line_item_pub.cimv_rec_type;
1570: ddx_clev_rec okl_contract_line_item_pub.clev_rec_type;
1571: ddx_klev_rec okl_contract_line_item_pub.klev_rec_type;
1572: ddx_cimv_rec okl_contract_line_item_pub.cimv_rec_type;
1573: ddindx binary_integer; indx binary_integer;
1574: begin
1575:
1576: -- copy data to the local IN or IN-OUT args, if any
1794:
1795:
1796:
1797: -- here's the delegated call to the old PL/SQL routine
1798: okl_contract_line_item_pub.update_contract_line_item(p_api_version,
1799: p_init_msg_list,
1800: x_return_status,
1801: x_msg_count,
1802: x_msg_data,
2245: , p7_a19 NUMBER := 0-1962.0724
2246: )
2247:
2248: as
2249: ddp_clev_rec okl_contract_line_item_pub.clev_rec_type;
2250: ddp_klev_rec okl_contract_line_item_pub.klev_rec_type;
2251: ddp_cimv_rec okl_contract_line_item_pub.cimv_rec_type;
2252: ddindx binary_integer; indx binary_integer;
2253: begin
2246: )
2247:
2248: as
2249: ddp_clev_rec okl_contract_line_item_pub.clev_rec_type;
2250: ddp_klev_rec okl_contract_line_item_pub.klev_rec_type;
2251: ddp_cimv_rec okl_contract_line_item_pub.cimv_rec_type;
2252: ddindx binary_integer; indx binary_integer;
2253: begin
2254:
2247:
2248: as
2249: ddp_clev_rec okl_contract_line_item_pub.clev_rec_type;
2250: ddp_klev_rec okl_contract_line_item_pub.klev_rec_type;
2251: ddp_cimv_rec okl_contract_line_item_pub.cimv_rec_type;
2252: ddindx binary_integer; indx binary_integer;
2253: begin
2254:
2255: -- copy data to the local IN or IN-OUT args, if any
2470: ddp_cimv_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a18);
2471: ddp_cimv_rec.last_update_login := rosetta_g_miss_num_map(p7_a19);
2472:
2473: -- here's the delegated call to the old PL/SQL routine
2474: okl_contract_line_item_pub.delete_contract_line_item(p_api_version,
2475: p_init_msg_list,
2476: x_return_status,
2477: x_msg_count,
2478: x_msg_data,
2915: , p10_a19 out nocopy JTF_NUMBER_TABLE
2916: )
2917:
2918: as
2919: ddp_clev_tbl okl_contract_line_item_pub.clev_tbl_type;
2920: ddp_klev_tbl okl_contract_line_item_pub.klev_tbl_type;
2921: ddp_cimv_tbl okl_contract_line_item_pub.cimv_tbl_type;
2922: ddx_clev_tbl okl_contract_line_item_pub.clev_tbl_type;
2923: ddx_klev_tbl okl_contract_line_item_pub.klev_tbl_type;
2916: )
2917:
2918: as
2919: ddp_clev_tbl okl_contract_line_item_pub.clev_tbl_type;
2920: ddp_klev_tbl okl_contract_line_item_pub.klev_tbl_type;
2921: ddp_cimv_tbl okl_contract_line_item_pub.cimv_tbl_type;
2922: ddx_clev_tbl okl_contract_line_item_pub.clev_tbl_type;
2923: ddx_klev_tbl okl_contract_line_item_pub.klev_tbl_type;
2924: ddx_cimv_tbl okl_contract_line_item_pub.cimv_tbl_type;
2917:
2918: as
2919: ddp_clev_tbl okl_contract_line_item_pub.clev_tbl_type;
2920: ddp_klev_tbl okl_contract_line_item_pub.klev_tbl_type;
2921: ddp_cimv_tbl okl_contract_line_item_pub.cimv_tbl_type;
2922: ddx_clev_tbl okl_contract_line_item_pub.clev_tbl_type;
2923: ddx_klev_tbl okl_contract_line_item_pub.klev_tbl_type;
2924: ddx_cimv_tbl okl_contract_line_item_pub.cimv_tbl_type;
2925: ddindx binary_integer; indx binary_integer;
2918: as
2919: ddp_clev_tbl okl_contract_line_item_pub.clev_tbl_type;
2920: ddp_klev_tbl okl_contract_line_item_pub.klev_tbl_type;
2921: ddp_cimv_tbl okl_contract_line_item_pub.cimv_tbl_type;
2922: ddx_clev_tbl okl_contract_line_item_pub.clev_tbl_type;
2923: ddx_klev_tbl okl_contract_line_item_pub.klev_tbl_type;
2924: ddx_cimv_tbl okl_contract_line_item_pub.cimv_tbl_type;
2925: ddindx binary_integer; indx binary_integer;
2926: begin
2919: ddp_clev_tbl okl_contract_line_item_pub.clev_tbl_type;
2920: ddp_klev_tbl okl_contract_line_item_pub.klev_tbl_type;
2921: ddp_cimv_tbl okl_contract_line_item_pub.cimv_tbl_type;
2922: ddx_clev_tbl okl_contract_line_item_pub.clev_tbl_type;
2923: ddx_klev_tbl okl_contract_line_item_pub.klev_tbl_type;
2924: ddx_cimv_tbl okl_contract_line_item_pub.cimv_tbl_type;
2925: ddindx binary_integer; indx binary_integer;
2926: begin
2927:
2920: ddp_klev_tbl okl_contract_line_item_pub.klev_tbl_type;
2921: ddp_cimv_tbl okl_contract_line_item_pub.cimv_tbl_type;
2922: ddx_clev_tbl okl_contract_line_item_pub.clev_tbl_type;
2923: ddx_klev_tbl okl_contract_line_item_pub.klev_tbl_type;
2924: ddx_cimv_tbl okl_contract_line_item_pub.cimv_tbl_type;
2925: ddindx binary_integer; indx binary_integer;
2926: begin
2927:
2928: -- copy data to the local IN or IN-OUT args, if any
3149:
3150:
3151:
3152: -- here's the delegated call to the old PL/SQL routine
3153: okl_contract_line_item_pub.create_contract_line_item(p_api_version,
3154: p_init_msg_list,
3155: x_return_status,
3156: x_msg_count,
3157: x_msg_data,
3603: , p7_a19 JTF_NUMBER_TABLE
3604: )
3605:
3606: as
3607: ddp_clev_tbl okl_contract_line_item_pub.clev_tbl_type;
3608: ddp_klev_tbl okl_contract_line_item_pub.klev_tbl_type;
3609: ddp_cimv_tbl okl_contract_line_item_pub.cimv_tbl_type;
3610: ddindx binary_integer; indx binary_integer;
3611: begin
3604: )
3605:
3606: as
3607: ddp_clev_tbl okl_contract_line_item_pub.clev_tbl_type;
3608: ddp_klev_tbl okl_contract_line_item_pub.klev_tbl_type;
3609: ddp_cimv_tbl okl_contract_line_item_pub.cimv_tbl_type;
3610: ddindx binary_integer; indx binary_integer;
3611: begin
3612:
3605:
3606: as
3607: ddp_clev_tbl okl_contract_line_item_pub.clev_tbl_type;
3608: ddp_klev_tbl okl_contract_line_item_pub.klev_tbl_type;
3609: ddp_cimv_tbl okl_contract_line_item_pub.cimv_tbl_type;
3610: ddindx binary_integer; indx binary_integer;
3611: begin
3612:
3613: -- copy data to the local IN or IN-OUT args, if any
3831: , p7_a19
3832: );
3833:
3834: -- here's the delegated call to the old PL/SQL routine
3835: okl_contract_line_item_pub.delete_contract_line_item(p_api_version,
3836: p_init_msg_list,
3837: x_return_status,
3838: x_msg_count,
3839: x_msg_data,
4276: , p10_a19 out nocopy JTF_NUMBER_TABLE
4277: )
4278:
4279: as
4280: ddp_clev_tbl okl_contract_line_item_pub.clev_tbl_type;
4281: ddp_klev_tbl okl_contract_line_item_pub.klev_tbl_type;
4282: ddp_cimv_tbl okl_contract_line_item_pub.cimv_tbl_type;
4283: ddx_clev_tbl okl_contract_line_item_pub.clev_tbl_type;
4284: ddx_klev_tbl okl_contract_line_item_pub.klev_tbl_type;
4277: )
4278:
4279: as
4280: ddp_clev_tbl okl_contract_line_item_pub.clev_tbl_type;
4281: ddp_klev_tbl okl_contract_line_item_pub.klev_tbl_type;
4282: ddp_cimv_tbl okl_contract_line_item_pub.cimv_tbl_type;
4283: ddx_clev_tbl okl_contract_line_item_pub.clev_tbl_type;
4284: ddx_klev_tbl okl_contract_line_item_pub.klev_tbl_type;
4285: ddx_cimv_tbl okl_contract_line_item_pub.cimv_tbl_type;
4278:
4279: as
4280: ddp_clev_tbl okl_contract_line_item_pub.clev_tbl_type;
4281: ddp_klev_tbl okl_contract_line_item_pub.klev_tbl_type;
4282: ddp_cimv_tbl okl_contract_line_item_pub.cimv_tbl_type;
4283: ddx_clev_tbl okl_contract_line_item_pub.clev_tbl_type;
4284: ddx_klev_tbl okl_contract_line_item_pub.klev_tbl_type;
4285: ddx_cimv_tbl okl_contract_line_item_pub.cimv_tbl_type;
4286: ddindx binary_integer; indx binary_integer;
4279: as
4280: ddp_clev_tbl okl_contract_line_item_pub.clev_tbl_type;
4281: ddp_klev_tbl okl_contract_line_item_pub.klev_tbl_type;
4282: ddp_cimv_tbl okl_contract_line_item_pub.cimv_tbl_type;
4283: ddx_clev_tbl okl_contract_line_item_pub.clev_tbl_type;
4284: ddx_klev_tbl okl_contract_line_item_pub.klev_tbl_type;
4285: ddx_cimv_tbl okl_contract_line_item_pub.cimv_tbl_type;
4286: ddindx binary_integer; indx binary_integer;
4287: begin
4280: ddp_clev_tbl okl_contract_line_item_pub.clev_tbl_type;
4281: ddp_klev_tbl okl_contract_line_item_pub.klev_tbl_type;
4282: ddp_cimv_tbl okl_contract_line_item_pub.cimv_tbl_type;
4283: ddx_clev_tbl okl_contract_line_item_pub.clev_tbl_type;
4284: ddx_klev_tbl okl_contract_line_item_pub.klev_tbl_type;
4285: ddx_cimv_tbl okl_contract_line_item_pub.cimv_tbl_type;
4286: ddindx binary_integer; indx binary_integer;
4287: begin
4288:
4281: ddp_klev_tbl okl_contract_line_item_pub.klev_tbl_type;
4282: ddp_cimv_tbl okl_contract_line_item_pub.cimv_tbl_type;
4283: ddx_clev_tbl okl_contract_line_item_pub.clev_tbl_type;
4284: ddx_klev_tbl okl_contract_line_item_pub.klev_tbl_type;
4285: ddx_cimv_tbl okl_contract_line_item_pub.cimv_tbl_type;
4286: ddindx binary_integer; indx binary_integer;
4287: begin
4288:
4289: -- copy data to the local IN or IN-OUT args, if any
4510:
4511:
4512:
4513: -- here's the delegated call to the old PL/SQL routine
4514: okl_contract_line_item_pub.update_contract_line_item(p_api_version,
4515: p_init_msg_list,
4516: x_return_status,
4517: x_msg_count,
4518: x_msg_data,
4747: , p10_a19
4748: );
4749: end;
4750:
4751: end okl_contract_line_item_pub_w;