1: package body okl_contract_pvt_w as
2: /* $Header: OKLOKHRB.pls 115.10 2003/10/16 09:59:40 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:
18: if n=b then return a; end if;
19: return n;
20: end;
21:
22: procedure rosetta_table_copy_in_p4(t out nocopy okl_contract_pvt.hdr_tbl_type, a0 JTF_VARCHAR2_TABLE_300) as
23: ddindx binary_integer; indx binary_integer;
24: begin
25: if a0 is not null and a0.count > 0 then
26: if a0.count > 0 then
36: end loop;
37: end if;
38: end if;
39: end rosetta_table_copy_in_p4;
40: procedure rosetta_table_copy_out_p4(t okl_contract_pvt.hdr_tbl_type, a0 out nocopy JTF_VARCHAR2_TABLE_300) as
41: ddindx binary_integer; indx binary_integer;
42: begin
43: if t is null or t.count = 0 then
44: a0 := JTF_VARCHAR2_TABLE_300();
410: )
411:
412: as
413: ddp_chrv_rec okl_okc_migration_pvt.chrv_rec_type;
414: ddp_khrv_rec okl_contract_pvt.khrv_rec_type;
415: ddx_chrv_rec okl_okc_migration_pvt.chrv_rec_type;
416: ddx_khrv_rec okl_contract_pvt.khrv_rec_type;
417: ddindx binary_integer; indx binary_integer;
418: begin
412: as
413: ddp_chrv_rec okl_okc_migration_pvt.chrv_rec_type;
414: ddp_khrv_rec okl_contract_pvt.khrv_rec_type;
415: ddx_chrv_rec okl_okc_migration_pvt.chrv_rec_type;
416: ddx_khrv_rec okl_contract_pvt.khrv_rec_type;
417: ddindx binary_integer; indx binary_integer;
418: begin
419:
420: -- copy data to the local IN or IN-OUT args, if any
598:
599:
600:
601: -- here's the delegated call to the old PL/SQL routine
602: okl_contract_pvt.create_contract_header(p_api_version,
603: p_init_msg_list,
604: x_return_status,
605: x_msg_count,
606: x_msg_data,
1141: )
1142:
1143: as
1144: ddp_chrv_tbl okl_okc_migration_pvt.chrv_tbl_type;
1145: ddp_khrv_tbl okl_contract_pvt.khrv_tbl_type;
1146: ddx_chrv_tbl okl_okc_migration_pvt.chrv_tbl_type;
1147: ddx_khrv_tbl okl_contract_pvt.khrv_tbl_type;
1148: ddindx binary_integer; indx binary_integer;
1149: begin
1143: as
1144: ddp_chrv_tbl okl_okc_migration_pvt.chrv_tbl_type;
1145: ddp_khrv_tbl okl_contract_pvt.khrv_tbl_type;
1146: ddx_chrv_tbl okl_okc_migration_pvt.chrv_tbl_type;
1147: ddx_khrv_tbl okl_contract_pvt.khrv_tbl_type;
1148: ddindx binary_integer; indx binary_integer;
1149: begin
1150:
1151: -- copy data to the local IN or IN-OUT args, if any
1331:
1332:
1333:
1334: -- here's the delegated call to the old PL/SQL routine
1335: okl_contract_pvt.create_contract_header(p_api_version,
1336: p_init_msg_list,
1337: x_return_status,
1338: x_msg_count,
1339: x_msg_data,
1877: )
1878:
1879: as
1880: ddp_chrv_rec okl_okc_migration_pvt.chrv_rec_type;
1881: ddp_khrv_rec okl_contract_pvt.khrv_rec_type;
1882: ddx_chrv_rec okl_okc_migration_pvt.chrv_rec_type;
1883: ddx_khrv_rec okl_contract_pvt.khrv_rec_type;
1884: ddindx binary_integer; indx binary_integer;
1885: begin
1879: as
1880: ddp_chrv_rec okl_okc_migration_pvt.chrv_rec_type;
1881: ddp_khrv_rec okl_contract_pvt.khrv_rec_type;
1882: ddx_chrv_rec okl_okc_migration_pvt.chrv_rec_type;
1883: ddx_khrv_rec okl_contract_pvt.khrv_rec_type;
1884: ddindx binary_integer; indx binary_integer;
1885: begin
1886:
1887: -- copy data to the local IN or IN-OUT args, if any
2066:
2067:
2068:
2069: -- here's the delegated call to the old PL/SQL routine
2070: okl_contract_pvt.update_contract_header(p_api_version,
2071: p_init_msg_list,
2072: x_return_status,
2073: x_msg_count,
2074: x_msg_data,
2612: )
2613:
2614: as
2615: ddp_chrv_tbl okl_okc_migration_pvt.chrv_tbl_type;
2616: ddp_khrv_tbl okl_contract_pvt.khrv_tbl_type;
2617: ddx_chrv_tbl okl_okc_migration_pvt.chrv_tbl_type;
2618: ddx_khrv_tbl okl_contract_pvt.khrv_tbl_type;
2619: ddindx binary_integer; indx binary_integer;
2620: begin
2614: as
2615: ddp_chrv_tbl okl_okc_migration_pvt.chrv_tbl_type;
2616: ddp_khrv_tbl okl_contract_pvt.khrv_tbl_type;
2617: ddx_chrv_tbl okl_okc_migration_pvt.chrv_tbl_type;
2618: ddx_khrv_tbl okl_contract_pvt.khrv_tbl_type;
2619: ddindx binary_integer; indx binary_integer;
2620: begin
2621:
2622: -- copy data to the local IN or IN-OUT args, if any
2803:
2804:
2805:
2806: -- here's the delegated call to the old PL/SQL routine
2807: okl_contract_pvt.update_contract_header(p_api_version,
2808: p_init_msg_list,
2809: x_return_status,
2810: x_msg_count,
2811: x_msg_data,
3352: )
3353:
3354: as
3355: ddp_chrv_rec okl_okc_migration_pvt.chrv_rec_type;
3356: ddp_khrv_rec okl_contract_pvt.khrv_rec_type;
3357: ddx_chrv_rec okl_okc_migration_pvt.chrv_rec_type;
3358: ddx_khrv_rec okl_contract_pvt.khrv_rec_type;
3359: ddindx binary_integer; indx binary_integer;
3360: begin
3354: as
3355: ddp_chrv_rec okl_okc_migration_pvt.chrv_rec_type;
3356: ddp_khrv_rec okl_contract_pvt.khrv_rec_type;
3357: ddx_chrv_rec okl_okc_migration_pvt.chrv_rec_type;
3358: ddx_khrv_rec okl_contract_pvt.khrv_rec_type;
3359: ddindx binary_integer; indx binary_integer;
3360: begin
3361:
3362: -- copy data to the local IN or IN-OUT args, if any
3542:
3543:
3544:
3545: -- here's the delegated call to the old PL/SQL routine
3546: okl_contract_pvt.update_contract_header(p_api_version,
3547: p_init_msg_list,
3548: x_return_status,
3549: x_msg_count,
3550: x_msg_data,
3918: )
3919:
3920: as
3921: ddp_chrv_rec okl_okc_migration_pvt.chrv_rec_type;
3922: ddp_khrv_rec okl_contract_pvt.khrv_rec_type;
3923: ddindx binary_integer; indx binary_integer;
3924: begin
3925:
3926: -- copy data to the local IN or IN-OUT args, if any
4102: ddp_khrv_rec.securitized_code := p6_a64;
4103: ddp_khrv_rec.securitization_type := p6_a65;
4104:
4105: -- here's the delegated call to the old PL/SQL routine
4106: okl_contract_pvt.delete_contract_header(p_api_version,
4107: p_init_msg_list,
4108: x_return_status,
4109: x_msg_count,
4110: x_msg_data,
4299: )
4300:
4301: as
4302: ddp_chrv_tbl okl_okc_migration_pvt.chrv_tbl_type;
4303: ddp_khrv_tbl okl_contract_pvt.khrv_tbl_type;
4304: ddindx binary_integer; indx binary_integer;
4305: begin
4306:
4307: -- copy data to the local IN or IN-OUT args, if any
4485: , p6_a65
4486: );
4487:
4488: -- here's the delegated call to the old PL/SQL routine
4489: okl_contract_pvt.delete_contract_header(p_api_version,
4490: p_init_msg_list,
4491: x_return_status,
4492: x_msg_count,
4493: x_msg_data,
4682: )
4683:
4684: as
4685: ddp_chrv_rec okl_okc_migration_pvt.chrv_rec_type;
4686: ddp_khrv_rec okl_contract_pvt.khrv_rec_type;
4687: ddindx binary_integer; indx binary_integer;
4688: begin
4689:
4690: -- copy data to the local IN or IN-OUT args, if any
4866: ddp_khrv_rec.securitized_code := p6_a64;
4867: ddp_khrv_rec.securitization_type := p6_a65;
4868:
4869: -- here's the delegated call to the old PL/SQL routine
4870: okl_contract_pvt.lock_contract_header(p_api_version,
4871: p_init_msg_list,
4872: x_return_status,
4873: x_msg_count,
4874: x_msg_data,
5063: )
5064:
5065: as
5066: ddp_chrv_tbl okl_okc_migration_pvt.chrv_tbl_type;
5067: ddp_khrv_tbl okl_contract_pvt.khrv_tbl_type;
5068: ddindx binary_integer; indx binary_integer;
5069: begin
5070:
5071: -- copy data to the local IN or IN-OUT args, if any
5249: , p6_a65
5250: );
5251:
5252: -- here's the delegated call to the old PL/SQL routine
5253: okl_contract_pvt.lock_contract_header(p_api_version,
5254: p_init_msg_list,
5255: x_return_status,
5256: x_msg_count,
5257: x_msg_data,
5446: )
5447:
5448: as
5449: ddp_chrv_rec okl_okc_migration_pvt.chrv_rec_type;
5450: ddp_khrv_rec okl_contract_pvt.khrv_rec_type;
5451: ddindx binary_integer; indx binary_integer;
5452: begin
5453:
5454: -- copy data to the local IN or IN-OUT args, if any
5630: ddp_khrv_rec.securitized_code := p6_a64;
5631: ddp_khrv_rec.securitization_type := p6_a65;
5632:
5633: -- here's the delegated call to the old PL/SQL routine
5634: okl_contract_pvt.validate_contract_header(p_api_version,
5635: p_init_msg_list,
5636: x_return_status,
5637: x_msg_count,
5638: x_msg_data,
5827: )
5828:
5829: as
5830: ddp_chrv_tbl okl_okc_migration_pvt.chrv_tbl_type;
5831: ddp_khrv_tbl okl_contract_pvt.khrv_tbl_type;
5832: ddindx binary_integer; indx binary_integer;
5833: begin
5834:
5835: -- copy data to the local IN or IN-OUT args, if any
6013: , p6_a65
6014: );
6015:
6016: -- here's the delegated call to the old PL/SQL routine
6017: okl_contract_pvt.validate_contract_header(p_api_version,
6018: p_init_msg_list,
6019: x_return_status,
6020: x_msg_count,
6021: x_msg_data,
6417: )
6418:
6419: as
6420: ddp_clev_rec okl_okc_migration_pvt.clev_rec_type;
6421: ddp_klev_rec okl_contract_pvt.klev_rec_type;
6422: ddx_clev_rec okl_okc_migration_pvt.clev_rec_type;
6423: ddx_klev_rec okl_contract_pvt.klev_rec_type;
6424: ddindx binary_integer; indx binary_integer;
6425: begin
6419: as
6420: ddp_clev_rec okl_okc_migration_pvt.clev_rec_type;
6421: ddp_klev_rec okl_contract_pvt.klev_rec_type;
6422: ddx_clev_rec okl_okc_migration_pvt.clev_rec_type;
6423: ddx_klev_rec okl_contract_pvt.klev_rec_type;
6424: ddindx binary_integer; indx binary_integer;
6425: begin
6426:
6427: -- copy data to the local IN or IN-OUT args, if any
6623:
6624:
6625:
6626: -- here's the delegated call to the old PL/SQL routine
6627: okl_contract_pvt.create_contract_line(p_api_version,
6628: p_init_msg_list,
6629: x_return_status,
6630: x_msg_count,
6631: x_msg_data,
7220: )
7221:
7222: as
7223: ddp_clev_tbl okl_okc_migration_pvt.clev_tbl_type;
7224: ddp_klev_tbl okl_contract_pvt.klev_tbl_type;
7225: ddx_clev_tbl okl_okc_migration_pvt.clev_tbl_type;
7226: ddx_klev_tbl okl_contract_pvt.klev_tbl_type;
7227: ddindx binary_integer; indx binary_integer;
7228: begin
7222: as
7223: ddp_clev_tbl okl_okc_migration_pvt.clev_tbl_type;
7224: ddp_klev_tbl okl_contract_pvt.klev_tbl_type;
7225: ddx_clev_tbl okl_okc_migration_pvt.clev_tbl_type;
7226: ddx_klev_tbl okl_contract_pvt.klev_tbl_type;
7227: ddindx binary_integer; indx binary_integer;
7228: begin
7229:
7230: -- copy data to the local IN or IN-OUT args, if any
7428:
7429:
7430:
7431: -- here's the delegated call to the old PL/SQL routine
7432: okl_contract_pvt.create_contract_line(p_api_version,
7433: p_init_msg_list,
7434: x_return_status,
7435: x_msg_count,
7436: x_msg_data,
8027: )
8028:
8029: as
8030: ddp_clev_rec okl_okc_migration_pvt.clev_rec_type;
8031: ddp_klev_rec okl_contract_pvt.klev_rec_type;
8032: ddx_clev_rec okl_okc_migration_pvt.clev_rec_type;
8033: ddx_klev_rec okl_contract_pvt.klev_rec_type;
8034: ddindx binary_integer; indx binary_integer;
8035: begin
8029: as
8030: ddp_clev_rec okl_okc_migration_pvt.clev_rec_type;
8031: ddp_klev_rec okl_contract_pvt.klev_rec_type;
8032: ddx_clev_rec okl_okc_migration_pvt.clev_rec_type;
8033: ddx_klev_rec okl_contract_pvt.klev_rec_type;
8034: ddindx binary_integer; indx binary_integer;
8035: begin
8036:
8037: -- copy data to the local IN or IN-OUT args, if any
8233:
8234:
8235:
8236: -- here's the delegated call to the old PL/SQL routine
8237: okl_contract_pvt.update_contract_line(p_api_version,
8238: p_init_msg_list,
8239: x_return_status,
8240: x_msg_count,
8241: x_msg_data,
8830: )
8831:
8832: as
8833: ddp_clev_tbl okl_okc_migration_pvt.clev_tbl_type;
8834: ddp_klev_tbl okl_contract_pvt.klev_tbl_type;
8835: ddx_clev_tbl okl_okc_migration_pvt.clev_tbl_type;
8836: ddx_klev_tbl okl_contract_pvt.klev_tbl_type;
8837: ddindx binary_integer; indx binary_integer;
8838: begin
8832: as
8833: ddp_clev_tbl okl_okc_migration_pvt.clev_tbl_type;
8834: ddp_klev_tbl okl_contract_pvt.klev_tbl_type;
8835: ddx_clev_tbl okl_okc_migration_pvt.clev_tbl_type;
8836: ddx_klev_tbl okl_contract_pvt.klev_tbl_type;
8837: ddindx binary_integer; indx binary_integer;
8838: begin
8839:
8840: -- copy data to the local IN or IN-OUT args, if any
9038:
9039:
9040:
9041: -- here's the delegated call to the old PL/SQL routine
9042: okl_contract_pvt.update_contract_line(p_api_version,
9043: p_init_msg_list,
9044: x_return_status,
9045: x_msg_count,
9046: x_msg_data,
9638: )
9639:
9640: as
9641: ddp_clev_rec okl_okc_migration_pvt.clev_rec_type;
9642: ddp_klev_rec okl_contract_pvt.klev_rec_type;
9643: ddx_clev_rec okl_okc_migration_pvt.clev_rec_type;
9644: ddx_klev_rec okl_contract_pvt.klev_rec_type;
9645: ddindx binary_integer; indx binary_integer;
9646: begin
9640: as
9641: ddp_clev_rec okl_okc_migration_pvt.clev_rec_type;
9642: ddp_klev_rec okl_contract_pvt.klev_rec_type;
9643: ddx_clev_rec okl_okc_migration_pvt.clev_rec_type;
9644: ddx_klev_rec okl_contract_pvt.klev_rec_type;
9645: ddindx binary_integer; indx binary_integer;
9646: begin
9647:
9648: -- copy data to the local IN or IN-OUT args, if any
9845:
9846:
9847:
9848: -- here's the delegated call to the old PL/SQL routine
9849: okl_contract_pvt.update_contract_line(p_api_version,
9850: p_init_msg_list,
9851: x_return_status,
9852: x_msg_count,
9853: x_msg_data,
10445: )
10446:
10447: as
10448: ddp_clev_tbl okl_okc_migration_pvt.clev_tbl_type;
10449: ddp_klev_tbl okl_contract_pvt.klev_tbl_type;
10450: ddx_clev_tbl okl_okc_migration_pvt.clev_tbl_type;
10451: ddx_klev_tbl okl_contract_pvt.klev_tbl_type;
10452: ddindx binary_integer; indx binary_integer;
10453: begin
10447: as
10448: ddp_clev_tbl okl_okc_migration_pvt.clev_tbl_type;
10449: ddp_klev_tbl okl_contract_pvt.klev_tbl_type;
10450: ddx_clev_tbl okl_okc_migration_pvt.clev_tbl_type;
10451: ddx_klev_tbl okl_contract_pvt.klev_tbl_type;
10452: ddindx binary_integer; indx binary_integer;
10453: begin
10454:
10455: -- copy data to the local IN or IN-OUT args, if any
10654:
10655:
10656:
10657: -- here's the delegated call to the old PL/SQL routine
10658: okl_contract_pvt.update_contract_line(p_api_version,
10659: p_init_msg_list,
10660: x_return_status,
10661: x_msg_count,
10662: x_msg_data,
11066: )
11067:
11068: as
11069: ddp_clev_rec okl_okc_migration_pvt.clev_rec_type;
11070: ddp_klev_rec okl_contract_pvt.klev_rec_type;
11071: ddindx binary_integer; indx binary_integer;
11072: begin
11073:
11074: -- copy data to the local IN or IN-OUT args, if any
11268: ddp_klev_rec.pay_investor_event := p6_a97;
11269: ddp_klev_rec.pay_investor_remittance_days := rosetta_g_miss_num_map(p6_a98);
11270:
11271: -- here's the delegated call to the old PL/SQL routine
11272: okl_contract_pvt.delete_contract_line(p_api_version,
11273: p_init_msg_list,
11274: x_return_status,
11275: x_msg_count,
11276: x_msg_data,
11483: )
11484:
11485: as
11486: ddp_clev_tbl okl_okc_migration_pvt.clev_tbl_type;
11487: ddp_klev_tbl okl_contract_pvt.klev_tbl_type;
11488: ddindx binary_integer; indx binary_integer;
11489: begin
11490:
11491: -- copy data to the local IN or IN-OUT args, if any
11687: , p6_a98
11688: );
11689:
11690: -- here's the delegated call to the old PL/SQL routine
11691: okl_contract_pvt.delete_contract_line(p_api_version,
11692: p_init_msg_list,
11693: x_return_status,
11694: x_msg_count,
11695: x_msg_data,
11903: )
11904:
11905: as
11906: ddp_clev_rec okl_okc_migration_pvt.clev_rec_type;
11907: ddp_klev_rec okl_contract_pvt.klev_rec_type;
11908: ddindx binary_integer; indx binary_integer;
11909: begin
11910:
11911: -- copy data to the local IN or IN-OUT args, if any
12106: ddp_klev_rec.pay_investor_remittance_days := rosetta_g_miss_num_map(p6_a98);
12107:
12108:
12109: -- here's the delegated call to the old PL/SQL routine
12110: okl_contract_pvt.delete_contract_line(p_api_version,
12111: p_init_msg_list,
12112: x_return_status,
12113: x_msg_count,
12114: x_msg_data,
12324: )
12325:
12326: as
12327: ddp_clev_tbl okl_okc_migration_pvt.clev_tbl_type;
12328: ddp_klev_tbl okl_contract_pvt.klev_tbl_type;
12329: ddindx binary_integer; indx binary_integer;
12330: begin
12331:
12332: -- copy data to the local IN or IN-OUT args, if any
12529: );
12530:
12531:
12532: -- here's the delegated call to the old PL/SQL routine
12533: okl_contract_pvt.delete_contract_line(p_api_version,
12534: p_init_msg_list,
12535: x_return_status,
12536: x_msg_count,
12537: x_msg_data,
12746: )
12747:
12748: as
12749: ddp_clev_rec okl_okc_migration_pvt.clev_rec_type;
12750: ddp_klev_rec okl_contract_pvt.klev_rec_type;
12751: ddindx binary_integer; indx binary_integer;
12752: begin
12753:
12754: -- copy data to the local IN or IN-OUT args, if any
12948: ddp_klev_rec.pay_investor_event := p6_a97;
12949: ddp_klev_rec.pay_investor_remittance_days := rosetta_g_miss_num_map(p6_a98);
12950:
12951: -- here's the delegated call to the old PL/SQL routine
12952: okl_contract_pvt.lock_contract_line(p_api_version,
12953: p_init_msg_list,
12954: x_return_status,
12955: x_msg_count,
12956: x_msg_data,
13163: )
13164:
13165: as
13166: ddp_clev_tbl okl_okc_migration_pvt.clev_tbl_type;
13167: ddp_klev_tbl okl_contract_pvt.klev_tbl_type;
13168: ddindx binary_integer; indx binary_integer;
13169: begin
13170:
13171: -- copy data to the local IN or IN-OUT args, if any
13367: , p6_a98
13368: );
13369:
13370: -- here's the delegated call to the old PL/SQL routine
13371: okl_contract_pvt.lock_contract_line(p_api_version,
13372: p_init_msg_list,
13373: x_return_status,
13374: x_msg_count,
13375: x_msg_data,
13582: )
13583:
13584: as
13585: ddp_clev_rec okl_okc_migration_pvt.clev_rec_type;
13586: ddp_klev_rec okl_contract_pvt.klev_rec_type;
13587: ddindx binary_integer; indx binary_integer;
13588: begin
13589:
13590: -- copy data to the local IN or IN-OUT args, if any
13784: ddp_klev_rec.pay_investor_event := p6_a97;
13785: ddp_klev_rec.pay_investor_remittance_days := rosetta_g_miss_num_map(p6_a98);
13786:
13787: -- here's the delegated call to the old PL/SQL routine
13788: okl_contract_pvt.validate_contract_line(p_api_version,
13789: p_init_msg_list,
13790: x_return_status,
13791: x_msg_count,
13792: x_msg_data,
13999: )
14000:
14001: as
14002: ddp_clev_tbl okl_okc_migration_pvt.clev_tbl_type;
14003: ddp_klev_tbl okl_contract_pvt.klev_tbl_type;
14004: ddindx binary_integer; indx binary_integer;
14005: begin
14006:
14007: -- copy data to the local IN or IN-OUT args, if any
14203: , p6_a98
14204: );
14205:
14206: -- here's the delegated call to the old PL/SQL routine
14207: okl_contract_pvt.validate_contract_line(p_api_version,
14208: p_init_msg_list,
14209: x_return_status,
14210: x_msg_count,
14211: x_msg_data,
14284: ddp_gvev_rec.last_update_login := rosetta_g_miss_num_map(p5_a13);
14285:
14286:
14287: -- here's the delegated call to the old PL/SQL routine
14288: okl_contract_pvt.create_governance(p_api_version,
14289: p_init_msg_list,
14290: x_return_status,
14291: x_msg_count,
14292: x_msg_data,
14380: );
14381:
14382:
14383: -- here's the delegated call to the old PL/SQL routine
14384: okl_contract_pvt.create_governance(p_api_version,
14385: p_init_msg_list,
14386: x_return_status,
14387: x_msg_count,
14388: x_msg_data,
14476: ddp_gvev_rec.last_update_login := rosetta_g_miss_num_map(p5_a13);
14477:
14478:
14479: -- here's the delegated call to the old PL/SQL routine
14480: okl_contract_pvt.update_governance(p_api_version,
14481: p_init_msg_list,
14482: x_return_status,
14483: x_msg_count,
14484: x_msg_data,
14572: );
14573:
14574:
14575: -- here's the delegated call to the old PL/SQL routine
14576: okl_contract_pvt.update_governance(p_api_version,
14577: p_init_msg_list,
14578: x_return_status,
14579: x_msg_count,
14580: x_msg_data,
14652: ddp_gvev_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a12);
14653: ddp_gvev_rec.last_update_login := rosetta_g_miss_num_map(p5_a13);
14654:
14655: -- here's the delegated call to the old PL/SQL routine
14656: okl_contract_pvt.delete_governance(p_api_version,
14657: p_init_msg_list,
14658: x_return_status,
14659: x_msg_count,
14660: x_msg_data,
14716: , p5_a13
14717: );
14718:
14719: -- here's the delegated call to the old PL/SQL routine
14720: okl_contract_pvt.delete_governance(p_api_version,
14721: p_init_msg_list,
14722: x_return_status,
14723: x_msg_count,
14724: x_msg_data,
14779: ddp_gvev_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a12);
14780: ddp_gvev_rec.last_update_login := rosetta_g_miss_num_map(p5_a13);
14781:
14782: -- here's the delegated call to the old PL/SQL routine
14783: okl_contract_pvt.lock_governance(p_api_version,
14784: p_init_msg_list,
14785: x_return_status,
14786: x_msg_count,
14787: x_msg_data,
14843: , p5_a13
14844: );
14845:
14846: -- here's the delegated call to the old PL/SQL routine
14847: okl_contract_pvt.lock_governance(p_api_version,
14848: p_init_msg_list,
14849: x_return_status,
14850: x_msg_count,
14851: x_msg_data,
14906: ddp_gvev_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a12);
14907: ddp_gvev_rec.last_update_login := rosetta_g_miss_num_map(p5_a13);
14908:
14909: -- here's the delegated call to the old PL/SQL routine
14910: okl_contract_pvt.validate_governance(p_api_version,
14911: p_init_msg_list,
14912: x_return_status,
14913: x_msg_count,
14914: x_msg_data,
14970: , p5_a13
14971: );
14972:
14973: -- here's the delegated call to the old PL/SQL routine
14974: okl_contract_pvt.validate_governance(p_api_version,
14975: p_init_msg_list,
14976: x_return_status,
14977: x_msg_count,
14978: x_msg_data,
15001: , x_hdr_tbl out nocopy JTF_VARCHAR2_TABLE_300
15002: )
15003:
15004: as
15005: ddx_hdr_tbl okl_contract_pvt.hdr_tbl_type;
15006: ddindx binary_integer; indx binary_integer;
15007: begin
15008:
15009: -- copy data to the local IN or IN-OUT args, if any
15020:
15021:
15022:
15023: -- here's the delegated call to the old PL/SQL routine
15024: okl_contract_pvt.get_contract_header_info(p_api_version,
15025: p_init_msg_list,
15026: x_return_status,
15027: x_msg_count,
15028: x_msg_data,
15047:
15048:
15049:
15050:
15051: okl_contract_pvt_w.rosetta_table_copy_out_p4(ddx_hdr_tbl, x_hdr_tbl);
15052: end;
15053:
15054: end okl_contract_pvt_w;
15050:
15051: okl_contract_pvt_w.rosetta_table_copy_out_p4(ddx_hdr_tbl, x_hdr_tbl);
15052: end;
15053:
15054: end okl_contract_pvt_w;