390: -- OKE_API.end_activity
391: -- OKE_FUNDSOURCE_PVT.create_funding
392: -- OKE_ALLOCATION_PVT.add_allocation
393: -- OKE_FUNDSOURCE_PVT.update_funding
394: -- OKE_AGREEMENT_PVT.create_agreement
395: --
396:
397: PROCEDURE create_funding(p_api_version IN NUMBER ,
398: p_init_msg_list IN VARCHAR2 := OKE_API.G_FALSE ,
548: --
549:
550: IF (FND_API.to_boolean(p_agreement_flag)) THEN
551:
552: --dbms_output.put_line('calling oke_agreement_pvt.create_agreement');
553: --FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'calling oke_agreement_pvt.create_agreement');
554:
555: OKE_AGREEMENT_PVT.create_agreement(p_api_version => G_API_VERSION_NUMBER ,
556: p_init_msg_list => OKE_API.G_FALSE ,
549:
550: IF (FND_API.to_boolean(p_agreement_flag)) THEN
551:
552: --dbms_output.put_line('calling oke_agreement_pvt.create_agreement');
553: --FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'calling oke_agreement_pvt.create_agreement');
554:
555: OKE_AGREEMENT_PVT.create_agreement(p_api_version => G_API_VERSION_NUMBER ,
556: p_init_msg_list => OKE_API.G_FALSE ,
557: p_commit => OKE_API.G_FALSE ,
551:
552: --dbms_output.put_line('calling oke_agreement_pvt.create_agreement');
553: --FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'calling oke_agreement_pvt.create_agreement');
554:
555: OKE_AGREEMENT_PVT.create_agreement(p_api_version => G_API_VERSION_NUMBER ,
556: p_init_msg_list => OKE_API.G_FALSE ,
557: p_commit => OKE_API.G_FALSE ,
558: p_msg_count => x_msg_count ,
559: p_msg_data => x_msg_data ,
631: -- Calling subprograms: OKE_API.start_activity
632: -- OKE_API.end_activity
633: -- OKE_FUNDSOURCE_PVT.update_funding
634: -- OKE_API.set_message
635: -- OKE_AGREEMENT_PVT.update_agreement
636: -- OKE_AGREEMENT_PVT.create_agreement
637: -- OKE_FUNDING_UTIL_PKG.check_agreement_exist
638: -- check_update_add
639: -- OKE_ALLOCATION_PVT.add_allocation
632: -- OKE_API.end_activity
633: -- OKE_FUNDSOURCE_PVT.update_funding
634: -- OKE_API.set_message
635: -- OKE_AGREEMENT_PVT.update_agreement
636: -- OKE_AGREEMENT_PVT.create_agreement
637: -- OKE_FUNDING_UTIL_PKG.check_agreement_exist
638: -- check_update_add
639: -- OKE_ALLOCATION_PVT.add_allocation
640: -- OKE_ALLOCATION_PVT.update_allocation
809: x_return_status => l_agreement_exist
810: );
811: IF (l_agreement_exist = 'Y') THEN
812:
813: --dbms_output.put_line('calling oke_agreement_pvt.update_agreement');
814: --FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'calling oke_agreement_pvt.update_agreement');
815:
816: open get_term;
817: fetch get_term into l_receivables_term_id;
810: );
811: IF (l_agreement_exist = 'Y') THEN
812:
813: --dbms_output.put_line('calling oke_agreement_pvt.update_agreement');
814: --FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'calling oke_agreement_pvt.update_agreement');
815:
816: open get_term;
817: fetch get_term into l_receivables_term_id;
818: close get_term;
816: open get_term;
817: fetch get_term into l_receivables_term_id;
818: close get_term;
819:
820: OKE_AGREEMENT_PVT.update_agreement(p_api_version => p_api_version ,
821: p_init_msg_list => OKE_API.G_FALSE ,
822: p_commit => OKE_API.G_FALSE ,
823: p_msg_count => x_msg_count ,
824: p_msg_data => x_msg_data ,
830: );
831:
832: ELSE
833:
834: --dbms_output.put_line('calling oke_agreement_pvt.create_agreement');
835: --FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'calling oke_agreement_pvt.create_agreement');
836:
837: OKE_AGREEMENT_PVT.create_agreement(p_api_version => p_api_version ,
838: p_init_msg_list => OKE_API.G_FALSE ,
831:
832: ELSE
833:
834: --dbms_output.put_line('calling oke_agreement_pvt.create_agreement');
835: --FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'calling oke_agreement_pvt.create_agreement');
836:
837: OKE_AGREEMENT_PVT.create_agreement(p_api_version => p_api_version ,
838: p_init_msg_list => OKE_API.G_FALSE ,
839: p_commit => OKE_API.G_FALSE ,
833:
834: --dbms_output.put_line('calling oke_agreement_pvt.create_agreement');
835: --FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'calling oke_agreement_pvt.create_agreement');
836:
837: OKE_AGREEMENT_PVT.create_agreement(p_api_version => p_api_version ,
838: p_init_msg_list => OKE_API.G_FALSE ,
839: p_commit => OKE_API.G_FALSE ,
840: p_msg_count => x_msg_count ,
841: p_msg_data => x_msg_data ,
1077: --
1078: -- Calling subprograms: OKE_API.start_activity
1079: -- OKE_API.end_activity
1080: -- OKE_ALLOCATION_PVT.add_allocation
1081: -- OKE_AGREEMENT_PVT.add_pa_funding
1082: --
1083:
1084: PROCEDURE add_allocation(p_api_version IN NUMBER ,
1085: p_init_msg_list IN VARCHAR2 := OKE_API.G_FALSE ,
1174: --
1175: l_allocation_in_rec := get_record(p_fund_allocation_id => l_allocation_in_rec.fund_allocation_id);
1176: l_allocation_in_rec.agreement_id := p_allocation_in_rec.agreement_id;
1177:
1178: --dbms_output.put_line('calling oke_agreement_pvt.add_pa_funding from oke_funding_pub');
1179: --FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'calling oke_agreement_pvt.add_pa_funding from oke_funding_pub');
1180:
1181: OKE_AGREEMENT_PVT.add_pa_funding(p_api_version => p_api_version ,
1182: p_init_msg_list => OKE_API.G_FALSE ,
1175: l_allocation_in_rec := get_record(p_fund_allocation_id => l_allocation_in_rec.fund_allocation_id);
1176: l_allocation_in_rec.agreement_id := p_allocation_in_rec.agreement_id;
1177:
1178: --dbms_output.put_line('calling oke_agreement_pvt.add_pa_funding from oke_funding_pub');
1179: --FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'calling oke_agreement_pvt.add_pa_funding from oke_funding_pub');
1180:
1181: OKE_AGREEMENT_PVT.add_pa_funding(p_api_version => p_api_version ,
1182: p_init_msg_list => OKE_API.G_FALSE ,
1183: p_commit => OKE_API.G_FALSE ,
1177:
1178: --dbms_output.put_line('calling oke_agreement_pvt.add_pa_funding from oke_funding_pub');
1179: --FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'calling oke_agreement_pvt.add_pa_funding from oke_funding_pub');
1180:
1181: OKE_AGREEMENT_PVT.add_pa_funding(p_api_version => p_api_version ,
1182: p_init_msg_list => OKE_API.G_FALSE ,
1183: p_commit => OKE_API.G_FALSE ,
1184: p_msg_count => x_msg_count ,
1185: p_msg_data => x_msg_data ,
1252: --
1253: -- Calling subprograms: OKE_API.start_activity
1254: -- OKE_API.end_activity
1255: -- OKE_ALLOCATION_PVT.update_allocation
1256: -- OKE_AGREEMENT_PVT.update_pa_funding
1257: -- OKE_AGREEMENT_PVT.add_pa_funding
1258: -- check_update_add_pa
1259: --
1260:
1253: -- Calling subprograms: OKE_API.start_activity
1254: -- OKE_API.end_activity
1255: -- OKE_ALLOCATION_PVT.update_allocation
1256: -- OKE_AGREEMENT_PVT.update_pa_funding
1257: -- OKE_AGREEMENT_PVT.add_pa_funding
1258: -- check_update_add_pa
1259: --
1260:
1261: PROCEDURE update_allocation(p_api_version IN NUMBER ,
1353: --FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'check if it is a update or add in pa');
1354:
1355: IF (check_update_add_pa(p_fund_allocation_id => p_allocation_in_rec.fund_allocation_id)) THEN
1356:
1357: --dbms_output.put_line('calling oke_agreement_pvt.update_pa_funding from oke_funding_pub');
1358: --FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'calling oke_agreement_pvt.update_pa_funding from oke_funding_pub');
1359:
1360: OKE_AGREEMENT_PVT.update_pa_funding(p_api_version => p_api_version ,
1361: p_init_msg_list => OKE_API.G_FALSE ,
1354:
1355: IF (check_update_add_pa(p_fund_allocation_id => p_allocation_in_rec.fund_allocation_id)) THEN
1356:
1357: --dbms_output.put_line('calling oke_agreement_pvt.update_pa_funding from oke_funding_pub');
1358: --FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'calling oke_agreement_pvt.update_pa_funding from oke_funding_pub');
1359:
1360: OKE_AGREEMENT_PVT.update_pa_funding(p_api_version => p_api_version ,
1361: p_init_msg_list => OKE_API.G_FALSE ,
1362: p_commit => OKE_API.G_FALSE ,
1356:
1357: --dbms_output.put_line('calling oke_agreement_pvt.update_pa_funding from oke_funding_pub');
1358: --FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'calling oke_agreement_pvt.update_pa_funding from oke_funding_pub');
1359:
1360: OKE_AGREEMENT_PVT.update_pa_funding(p_api_version => p_api_version ,
1361: p_init_msg_list => OKE_API.G_FALSE ,
1362: p_commit => OKE_API.G_FALSE ,
1363: p_msg_count => x_msg_count ,
1364: p_msg_data => x_msg_data ,
1366: p_return_status => x_return_status
1367: );
1368: ELSE
1369:
1370: --dbms_output.put_line('calling oke_agreement_pvt.add_pa_funding from oke_funding_pub');
1371: --FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'calling oke_agreement_pvt.add_pa_funding from oke_funding_pub');
1372:
1373: OKE_AGREEMENT_PVT.add_pa_funding(p_api_version => p_api_version ,
1374: p_init_msg_list => OKE_API.G_FALSE ,
1367: );
1368: ELSE
1369:
1370: --dbms_output.put_line('calling oke_agreement_pvt.add_pa_funding from oke_funding_pub');
1371: --FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'calling oke_agreement_pvt.add_pa_funding from oke_funding_pub');
1372:
1373: OKE_AGREEMENT_PVT.add_pa_funding(p_api_version => p_api_version ,
1374: p_init_msg_list => OKE_API.G_FALSE ,
1375: p_commit => OKE_API.G_FALSE ,
1369:
1370: --dbms_output.put_line('calling oke_agreement_pvt.add_pa_funding from oke_funding_pub');
1371: --FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE ,g_module||l_api_name,'calling oke_agreement_pvt.add_pa_funding from oke_funding_pub');
1372:
1373: OKE_AGREEMENT_PVT.add_pa_funding(p_api_version => p_api_version ,
1374: p_init_msg_list => OKE_API.G_FALSE ,
1375: p_commit => OKE_API.G_FALSE ,
1376: p_msg_count => x_msg_count ,
1377: p_msg_data => x_msg_data ,