1: package body okl_trx_csh_batch_pub_w as
2: /* $Header: OKLUBTCB.pls 120.6 2007/09/28 06:49:55 varangan 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');
115: , p6_a42 out nocopy JTF_NUMBER_TABLE
116: )
117:
118: as
119: ddp_btcv_tbl okl_trx_csh_batch_pub.btcv_tbl_type;
120: ddx_btcv_tbl okl_trx_csh_batch_pub.btcv_tbl_type;
121: ddindx binary_integer; indx binary_integer;
122: begin
123:
116: )
117:
118: as
119: ddp_btcv_tbl okl_trx_csh_batch_pub.btcv_tbl_type;
120: ddx_btcv_tbl okl_trx_csh_batch_pub.btcv_tbl_type;
121: ddindx binary_integer; indx binary_integer;
122: begin
123:
124: -- copy data to the local IN or IN-OUT args, if any
173: );
174:
175:
176: -- here's the delegated call to the old PL/SQL routine
177: okl_trx_csh_batch_pub.insert_trx_csh_batch(p_api_version,
178: p_init_msg_list,
179: x_return_status,
180: x_msg_count,
181: x_msg_data,
328: , p5_a42 NUMBER := 0-1962.0724
329: )
330:
331: as
332: ddp_btcv_rec okl_trx_csh_batch_pub.btcv_rec_type;
333: ddx_btcv_rec okl_trx_csh_batch_pub.btcv_rec_type;
334: ddindx binary_integer; indx binary_integer;
335: begin
336:
329: )
330:
331: as
332: ddp_btcv_rec okl_trx_csh_batch_pub.btcv_rec_type;
333: ddx_btcv_rec okl_trx_csh_batch_pub.btcv_rec_type;
334: ddindx binary_integer; indx binary_integer;
335: begin
336:
337: -- copy data to the local IN or IN-OUT args, if any
385: ddp_btcv_rec.remit_bank_id := rosetta_g_miss_num_map(p5_a42);
386:
387:
388: -- here's the delegated call to the old PL/SQL routine
389: okl_trx_csh_batch_pub.insert_trx_csh_batch(p_api_version,
390: p_init_msg_list,
391: x_return_status,
392: x_msg_count,
393: x_msg_data,
496: , p5_a42 JTF_NUMBER_TABLE
497: )
498:
499: as
500: ddp_btcv_tbl okl_trx_csh_batch_pub.btcv_tbl_type;
501: ddindx binary_integer; indx binary_integer;
502: begin
503:
504: -- copy data to the local IN or IN-OUT args, if any
552: , p5_a42
553: );
554:
555: -- here's the delegated call to the old PL/SQL routine
556: okl_trx_csh_batch_pub.lock_trx_csh_batch(p_api_version,
557: p_init_msg_list,
558: x_return_status,
559: x_msg_count,
560: x_msg_data,
618: , p5_a42 NUMBER := 0-1962.0724
619: )
620:
621: as
622: ddp_btcv_rec okl_trx_csh_batch_pub.btcv_rec_type;
623: ddindx binary_integer; indx binary_integer;
624: begin
625:
626: -- copy data to the local IN or IN-OUT args, if any
673: ddp_btcv_rec.currency_conversion_date := rosetta_g_miss_date_in_map(p5_a41);
674: ddp_btcv_rec.remit_bank_id := rosetta_g_miss_num_map(p5_a42);
675:
676: -- here's the delegated call to the old PL/SQL routine
677: okl_trx_csh_batch_pub.lock_trx_csh_batch(p_api_version,
678: p_init_msg_list,
679: x_return_status,
680: x_msg_count,
681: x_msg_data,
782: , p6_a42 out nocopy JTF_NUMBER_TABLE
783: )
784:
785: as
786: ddp_btcv_tbl okl_trx_csh_batch_pub.btcv_tbl_type;
787: ddx_btcv_tbl okl_trx_csh_batch_pub.btcv_tbl_type;
788: ddindx binary_integer; indx binary_integer;
789: begin
790:
783: )
784:
785: as
786: ddp_btcv_tbl okl_trx_csh_batch_pub.btcv_tbl_type;
787: ddx_btcv_tbl okl_trx_csh_batch_pub.btcv_tbl_type;
788: ddindx binary_integer; indx binary_integer;
789: begin
790:
791: -- copy data to the local IN or IN-OUT args, if any
840: );
841:
842:
843: -- here's the delegated call to the old PL/SQL routine
844: okl_trx_csh_batch_pub.update_trx_csh_batch(p_api_version,
845: p_init_msg_list,
846: x_return_status,
847: x_msg_count,
848: x_msg_data,
995: , p5_a42 NUMBER := 0-1962.0724
996: )
997:
998: as
999: ddp_btcv_rec okl_trx_csh_batch_pub.btcv_rec_type;
1000: ddx_btcv_rec okl_trx_csh_batch_pub.btcv_rec_type;
1001: ddindx binary_integer; indx binary_integer;
1002: begin
1003:
996: )
997:
998: as
999: ddp_btcv_rec okl_trx_csh_batch_pub.btcv_rec_type;
1000: ddx_btcv_rec okl_trx_csh_batch_pub.btcv_rec_type;
1001: ddindx binary_integer; indx binary_integer;
1002: begin
1003:
1004: -- copy data to the local IN or IN-OUT args, if any
1052: ddp_btcv_rec.remit_bank_id := rosetta_g_miss_num_map(p5_a42);
1053:
1054:
1055: -- here's the delegated call to the old PL/SQL routine
1056: okl_trx_csh_batch_pub.update_trx_csh_batch(p_api_version,
1057: p_init_msg_list,
1058: x_return_status,
1059: x_msg_count,
1060: x_msg_data,
1163: , p5_a42 JTF_NUMBER_TABLE
1164: )
1165:
1166: as
1167: ddp_btcv_tbl okl_trx_csh_batch_pub.btcv_tbl_type;
1168: ddindx binary_integer; indx binary_integer;
1169: begin
1170:
1171: -- copy data to the local IN or IN-OUT args, if any
1219: , p5_a42
1220: );
1221:
1222: -- here's the delegated call to the old PL/SQL routine
1223: okl_trx_csh_batch_pub.delete_trx_csh_batch(p_api_version,
1224: p_init_msg_list,
1225: x_return_status,
1226: x_msg_count,
1227: x_msg_data,
1285: , p5_a42 NUMBER := 0-1962.0724
1286: )
1287:
1288: as
1289: ddp_btcv_rec okl_trx_csh_batch_pub.btcv_rec_type;
1290: ddindx binary_integer; indx binary_integer;
1291: begin
1292:
1293: -- copy data to the local IN or IN-OUT args, if any
1340: ddp_btcv_rec.currency_conversion_date := rosetta_g_miss_date_in_map(p5_a41);
1341: ddp_btcv_rec.remit_bank_id := rosetta_g_miss_num_map(p5_a42);
1342:
1343: -- here's the delegated call to the old PL/SQL routine
1344: okl_trx_csh_batch_pub.delete_trx_csh_batch(p_api_version,
1345: p_init_msg_list,
1346: x_return_status,
1347: x_msg_count,
1348: x_msg_data,
1406: , p5_a42 JTF_NUMBER_TABLE
1407: )
1408:
1409: as
1410: ddp_btcv_tbl okl_trx_csh_batch_pub.btcv_tbl_type;
1411: ddindx binary_integer; indx binary_integer;
1412: begin
1413:
1414: -- copy data to the local IN or IN-OUT args, if any
1462: , p5_a42
1463: );
1464:
1465: -- here's the delegated call to the old PL/SQL routine
1466: okl_trx_csh_batch_pub.validate_trx_csh_batch(p_api_version,
1467: p_init_msg_list,
1468: x_return_status,
1469: x_msg_count,
1470: x_msg_data,
1528: , p5_a42 NUMBER := 0-1962.0724
1529: )
1530:
1531: as
1532: ddp_btcv_rec okl_trx_csh_batch_pub.btcv_rec_type;
1533: ddindx binary_integer; indx binary_integer;
1534: begin
1535:
1536: -- copy data to the local IN or IN-OUT args, if any
1583: ddp_btcv_rec.currency_conversion_date := rosetta_g_miss_date_in_map(p5_a41);
1584: ddp_btcv_rec.remit_bank_id := rosetta_g_miss_num_map(p5_a42);
1585:
1586: -- here's the delegated call to the old PL/SQL routine
1587: okl_trx_csh_batch_pub.validate_trx_csh_batch(p_api_version,
1588: p_init_msg_list,
1589: x_return_status,
1590: x_msg_count,
1591: x_msg_data,
1754: , p5_a42 NUMBER := 0-1962.0724
1755: )
1756:
1757: as
1758: ddp_btcv_rec okl_trx_csh_batch_pub.btcv_rec_type;
1759: ddx_btcv_rec okl_trx_csh_batch_pub.btcv_rec_type;
1760: ddp_btch_lines_tbl okl_trx_csh_batch_pub.okl_btch_dtls_tbl_type;
1761: ddx_btch_lines_tbl okl_trx_csh_batch_pub.okl_btch_dtls_tbl_type;
1762: ddindx binary_integer; indx binary_integer;
1755: )
1756:
1757: as
1758: ddp_btcv_rec okl_trx_csh_batch_pub.btcv_rec_type;
1759: ddx_btcv_rec okl_trx_csh_batch_pub.btcv_rec_type;
1760: ddp_btch_lines_tbl okl_trx_csh_batch_pub.okl_btch_dtls_tbl_type;
1761: ddx_btch_lines_tbl okl_trx_csh_batch_pub.okl_btch_dtls_tbl_type;
1762: ddindx binary_integer; indx binary_integer;
1763: begin
1756:
1757: as
1758: ddp_btcv_rec okl_trx_csh_batch_pub.btcv_rec_type;
1759: ddx_btcv_rec okl_trx_csh_batch_pub.btcv_rec_type;
1760: ddp_btch_lines_tbl okl_trx_csh_batch_pub.okl_btch_dtls_tbl_type;
1761: ddx_btch_lines_tbl okl_trx_csh_batch_pub.okl_btch_dtls_tbl_type;
1762: ddindx binary_integer; indx binary_integer;
1763: begin
1764:
1757: as
1758: ddp_btcv_rec okl_trx_csh_batch_pub.btcv_rec_type;
1759: ddx_btcv_rec okl_trx_csh_batch_pub.btcv_rec_type;
1760: ddp_btch_lines_tbl okl_trx_csh_batch_pub.okl_btch_dtls_tbl_type;
1761: ddx_btch_lines_tbl okl_trx_csh_batch_pub.okl_btch_dtls_tbl_type;
1762: ddindx binary_integer; indx binary_integer;
1763: begin
1764:
1765: -- copy data to the local IN or IN-OUT args, if any
1847: );
1848:
1849:
1850: -- here's the delegated call to the old PL/SQL routine
1851: okl_trx_csh_batch_pub.handle_batch_receipt(p_api_version,
1852: p_init_msg_list,
1853: x_return_status,
1854: x_msg_count,
1855: x_msg_data,
1943: , p8_a30
1944: );
1945: end;
1946:
1947: end okl_trx_csh_batch_pub_w;