1: package body okl_txd_assets_pvt_w as
2: /* $Header: OKLOASDB.pls 115.6 2002/12/20 19:23:12 avsingh 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:
110: , p5_a41 DATE := fnd_api.g_miss_date
111: )
112:
113: as
114: ddp_asdv_rec okl_txd_assets_pvt.advv_rec_type;
115: ddx_asdv_rec okl_txd_assets_pvt.advv_rec_type;
116: ddindx binary_integer; indx binary_integer;
117: begin
118:
111: )
112:
113: as
114: ddp_asdv_rec okl_txd_assets_pvt.advv_rec_type;
115: ddx_asdv_rec okl_txd_assets_pvt.advv_rec_type;
116: ddindx binary_integer; indx binary_integer;
117: begin
118:
119: -- copy data to the local IN or IN-OUT args, if any
166: ddp_asdv_rec.currency_conversion_date := rosetta_g_miss_date_in_map(p5_a41);
167:
168:
169: -- here's the delegated call to the old PL/SQL routine
170: okl_txd_assets_pvt.create_txd_asset_def(p_api_version,
171: p_init_msg_list,
172: x_return_status,
173: x_msg_count,
174: x_msg_data,
317: , p6_a41 out nocopy JTF_DATE_TABLE
318: )
319:
320: as
321: ddp_asdv_tbl okl_txd_assets_pvt.advv_tbl_type;
322: ddx_asdv_tbl okl_txd_assets_pvt.advv_tbl_type;
323: ddindx binary_integer; indx binary_integer;
324: begin
325:
318: )
319:
320: as
321: ddp_asdv_tbl okl_txd_assets_pvt.advv_tbl_type;
322: ddx_asdv_tbl okl_txd_assets_pvt.advv_tbl_type;
323: ddindx binary_integer; indx binary_integer;
324: begin
325:
326: -- copy data to the local IN or IN-OUT args, if any
374: );
375:
376:
377: -- here's the delegated call to the old PL/SQL routine
378: okl_txd_assets_pvt.create_txd_asset_def(p_api_version,
379: p_init_msg_list,
380: x_return_status,
381: x_msg_count,
382: x_msg_data,
484: , p5_a41 DATE := fnd_api.g_miss_date
485: )
486:
487: as
488: ddp_asdv_rec okl_txd_assets_pvt.advv_rec_type;
489: ddindx binary_integer; indx binary_integer;
490: begin
491:
492: -- copy data to the local IN or IN-OUT args, if any
538: ddp_asdv_rec.currency_conversion_rate := rosetta_g_miss_num_map(p5_a40);
539: ddp_asdv_rec.currency_conversion_date := rosetta_g_miss_date_in_map(p5_a41);
540:
541: -- here's the delegated call to the old PL/SQL routine
542: okl_txd_assets_pvt.lock_txd_asset_def(p_api_version,
543: p_init_msg_list,
544: x_return_status,
545: x_msg_count,
546: x_msg_data,
603: , p5_a41 JTF_DATE_TABLE
604: )
605:
606: as
607: ddp_asdv_tbl okl_txd_assets_pvt.advv_tbl_type;
608: ddindx binary_integer; indx binary_integer;
609: begin
610:
611: -- copy data to the local IN or IN-OUT args, if any
658: , p5_a41
659: );
660:
661: -- here's the delegated call to the old PL/SQL routine
662: okl_txd_assets_pvt.lock_txd_asset_def(p_api_version,
663: p_init_msg_list,
664: x_return_status,
665: x_msg_count,
666: x_msg_data,
765: , p5_a41 DATE := fnd_api.g_miss_date
766: )
767:
768: as
769: ddp_asdv_rec okl_txd_assets_pvt.advv_rec_type;
770: ddx_asdv_rec okl_txd_assets_pvt.advv_rec_type;
771: ddindx binary_integer; indx binary_integer;
772: begin
773:
766: )
767:
768: as
769: ddp_asdv_rec okl_txd_assets_pvt.advv_rec_type;
770: ddx_asdv_rec okl_txd_assets_pvt.advv_rec_type;
771: ddindx binary_integer; indx binary_integer;
772: begin
773:
774: -- copy data to the local IN or IN-OUT args, if any
821: ddp_asdv_rec.currency_conversion_date := rosetta_g_miss_date_in_map(p5_a41);
822:
823:
824: -- here's the delegated call to the old PL/SQL routine
825: okl_txd_assets_pvt.update_txd_asset_def(p_api_version,
826: p_init_msg_list,
827: x_return_status,
828: x_msg_count,
829: x_msg_data,
972: , p6_a41 out nocopy JTF_DATE_TABLE
973: )
974:
975: as
976: ddp_asdv_tbl okl_txd_assets_pvt.advv_tbl_type;
977: ddx_asdv_tbl okl_txd_assets_pvt.advv_tbl_type;
978: ddindx binary_integer; indx binary_integer;
979: begin
980:
973: )
974:
975: as
976: ddp_asdv_tbl okl_txd_assets_pvt.advv_tbl_type;
977: ddx_asdv_tbl okl_txd_assets_pvt.advv_tbl_type;
978: ddindx binary_integer; indx binary_integer;
979: begin
980:
981: -- copy data to the local IN or IN-OUT args, if any
1029: );
1030:
1031:
1032: -- here's the delegated call to the old PL/SQL routine
1033: okl_txd_assets_pvt.update_txd_asset_def(p_api_version,
1034: p_init_msg_list,
1035: x_return_status,
1036: x_msg_count,
1037: x_msg_data,
1139: , p5_a41 DATE := fnd_api.g_miss_date
1140: )
1141:
1142: as
1143: ddp_asdv_rec okl_txd_assets_pvt.advv_rec_type;
1144: ddindx binary_integer; indx binary_integer;
1145: begin
1146:
1147: -- copy data to the local IN or IN-OUT args, if any
1193: ddp_asdv_rec.currency_conversion_rate := rosetta_g_miss_num_map(p5_a40);
1194: ddp_asdv_rec.currency_conversion_date := rosetta_g_miss_date_in_map(p5_a41);
1195:
1196: -- here's the delegated call to the old PL/SQL routine
1197: okl_txd_assets_pvt.delete_txd_asset_def(p_api_version,
1198: p_init_msg_list,
1199: x_return_status,
1200: x_msg_count,
1201: x_msg_data,
1258: , p5_a41 JTF_DATE_TABLE
1259: )
1260:
1261: as
1262: ddp_asdv_tbl okl_txd_assets_pvt.advv_tbl_type;
1263: ddindx binary_integer; indx binary_integer;
1264: begin
1265:
1266: -- copy data to the local IN or IN-OUT args, if any
1313: , p5_a41
1314: );
1315:
1316: -- here's the delegated call to the old PL/SQL routine
1317: okl_txd_assets_pvt.delete_txd_asset_def(p_api_version,
1318: p_init_msg_list,
1319: x_return_status,
1320: x_msg_count,
1321: x_msg_data,
1378: , p5_a41 DATE := fnd_api.g_miss_date
1379: )
1380:
1381: as
1382: ddp_asdv_rec okl_txd_assets_pvt.advv_rec_type;
1383: ddindx binary_integer; indx binary_integer;
1384: begin
1385:
1386: -- copy data to the local IN or IN-OUT args, if any
1432: ddp_asdv_rec.currency_conversion_rate := rosetta_g_miss_num_map(p5_a40);
1433: ddp_asdv_rec.currency_conversion_date := rosetta_g_miss_date_in_map(p5_a41);
1434:
1435: -- here's the delegated call to the old PL/SQL routine
1436: okl_txd_assets_pvt.validate_txd_asset_def(p_api_version,
1437: p_init_msg_list,
1438: x_return_status,
1439: x_msg_count,
1440: x_msg_data,
1497: , p5_a41 JTF_DATE_TABLE
1498: )
1499:
1500: as
1501: ddp_asdv_tbl okl_txd_assets_pvt.advv_tbl_type;
1502: ddindx binary_integer; indx binary_integer;
1503: begin
1504:
1505: -- copy data to the local IN or IN-OUT args, if any
1552: , p5_a41
1553: );
1554:
1555: -- here's the delegated call to the old PL/SQL routine
1556: okl_txd_assets_pvt.validate_txd_asset_def(p_api_version,
1557: p_init_msg_list,
1558: x_return_status,
1559: x_msg_count,
1560: x_msg_data,
1567:
1568:
1569: end;
1570:
1571: end okl_txd_assets_pvt_w;