14:
15: ------------------------------------------------------------------------------
16: -- GLOBAL CONSTANTS
17: ------------------------------------------------------------------------------
18: G_FALSE CONSTANT VARCHAR2(1) := FND_API.G_FALSE;
19: G_TRUE CONSTANT VARCHAR2(1) := FND_API.G_TRUE;
20: G_RET_STS_SUCCESS CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
21: G_RET_STS_ERROR CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_ERROR;
22: G_RET_STS_UNEXP_ERROR CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_UNEXP_ERROR;
15: ------------------------------------------------------------------------------
16: -- GLOBAL CONSTANTS
17: ------------------------------------------------------------------------------
18: G_FALSE CONSTANT VARCHAR2(1) := FND_API.G_FALSE;
19: G_TRUE CONSTANT VARCHAR2(1) := FND_API.G_TRUE;
20: G_RET_STS_SUCCESS CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
21: G_RET_STS_ERROR CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_ERROR;
22: G_RET_STS_UNEXP_ERROR CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_UNEXP_ERROR;
23: G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'ERROR_MESSAGE';
16: -- GLOBAL CONSTANTS
17: ------------------------------------------------------------------------------
18: G_FALSE CONSTANT VARCHAR2(1) := FND_API.G_FALSE;
19: G_TRUE CONSTANT VARCHAR2(1) := FND_API.G_TRUE;
20: G_RET_STS_SUCCESS CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
21: G_RET_STS_ERROR CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_ERROR;
22: G_RET_STS_UNEXP_ERROR CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_UNEXP_ERROR;
23: G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'ERROR_MESSAGE';
24: G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'ERROR_CODE';
17: ------------------------------------------------------------------------------
18: G_FALSE CONSTANT VARCHAR2(1) := FND_API.G_FALSE;
19: G_TRUE CONSTANT VARCHAR2(1) := FND_API.G_TRUE;
20: G_RET_STS_SUCCESS CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
21: G_RET_STS_ERROR CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_ERROR;
22: G_RET_STS_UNEXP_ERROR CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_UNEXP_ERROR;
23: G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'ERROR_MESSAGE';
24: G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'ERROR_CODE';
25: G_DLV_QA_TYPE CONSTANT VARCHAR2(30) := 'DELIVERABLE';
18: G_FALSE CONSTANT VARCHAR2(1) := FND_API.G_FALSE;
19: G_TRUE CONSTANT VARCHAR2(1) := FND_API.G_TRUE;
20: G_RET_STS_SUCCESS CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
21: G_RET_STS_ERROR CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_ERROR;
22: G_RET_STS_UNEXP_ERROR CONSTANT VARCHAR2(1) := FND_API.G_RET_STS_UNEXP_ERROR;
23: G_SQLERRM_TOKEN CONSTANT VARCHAR2(200) := 'ERROR_MESSAGE';
24: G_SQLCODE_TOKEN CONSTANT VARCHAR2(200) := 'ERROR_CODE';
25: G_DLV_QA_TYPE CONSTANT VARCHAR2(30) := 'DELIVERABLE';
26:
191: ------------------------------
192: PROCEDURE copy_cdrl_for_exhibit
193: (
194: p_api_version IN NUMBER,
195: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
196: p_commit IN VARCHAR2:=FND_API.G_FALSE,
197:
198: p_doc_type IN VARCHAR2,
199: p_doc_id IN NUMBER,
192: PROCEDURE copy_cdrl_for_exhibit
193: (
194: p_api_version IN NUMBER,
195: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
196: p_commit IN VARCHAR2:=FND_API.G_FALSE,
197:
198: p_doc_type IN VARCHAR2,
199: p_doc_id IN NUMBER,
200: p_doc_version IN NUMBER,
264:
265: -- Standard Start of API savepoint
266: SAVEPOINT g_copy_cdrl_for_exhibit;
267: -- Standard call to check for call compatibility.
268: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
269: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
270: END IF;
271: -- Initialize message list if p_init_msg_list is set to TRUE.
272: IF FND_API.to_Boolean( p_init_msg_list ) THEN
265: -- Standard Start of API savepoint
266: SAVEPOINT g_copy_cdrl_for_exhibit;
267: -- Standard call to check for call compatibility.
268: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
269: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
270: END IF;
271: -- Initialize message list if p_init_msg_list is set to TRUE.
272: IF FND_API.to_Boolean( p_init_msg_list ) THEN
273: FND_MSG_PUB.initialize;
268: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
269: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
270: END IF;
271: -- Initialize message list if p_init_msg_list is set to TRUE.
272: IF FND_API.to_Boolean( p_init_msg_list ) THEN
273: FND_MSG_PUB.initialize;
274: END IF;
275:
276: -- Initialize API return status to success
545: l_msg_count,
546: l_msg_data,
547: l_errorcode
548: );
549: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
550: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
551: END IF;
552: END LOOP;
553:
546: l_msg_data,
547: l_errorcode
548: );
549: if l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
550: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
551: END IF;
552: END LOOP;
553:
554: -- copy attachments
585:
586: PROCEDURE delete_cdrl_for_exhibits
587: (
588: p_api_version IN NUMBER,
589: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
590: p_commit IN VARCHAR2:=FND_API.G_FALSE,
591:
592:
593: p_doc_type IN VARCHAR2,
586: PROCEDURE delete_cdrl_for_exhibits
587: (
588: p_api_version IN NUMBER,
589: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
590: p_commit IN VARCHAR2:=FND_API.G_FALSE,
591:
592:
593: p_doc_type IN VARCHAR2,
594: p_doc_id IN NUMBER,
655:
656: delete_deliverables(del_id_tbl,p_mode);
657: END LOOP;
658:
659: IF FND_API.To_Boolean( p_commit ) THEN
660: COMMIT WORK;
661: END IF;
662:
663: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
670: --------------------------------------
671: PROCEDURE create_exhibit_for_cdrl
672: (
673: p_api_version IN NUMBER,
674: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
675: p_commit IN VARCHAR2:=FND_API.G_FALSE,
676:
677: p_doc_class IN VARCHAR2,
678: p_doc_type IN VARCHAR2,
671: PROCEDURE create_exhibit_for_cdrl
672: (
673: p_api_version IN NUMBER,
674: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
675: p_commit IN VARCHAR2:=FND_API.G_FALSE,
676:
677: p_doc_class IN VARCHAR2,
678: p_doc_type IN VARCHAR2,
679: p_doc_id IN NUMBER,
726:
727: -- Standard Start of API savepoint
728: SAVEPOINT g_copy_del_for_exhibit;
729: -- Standard call to check for call compatibility.
730: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
731: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
732: END IF;
733: -- Initialize message list if p_init_msg_list is set to TRUE.
734: IF FND_API.to_Boolean( p_init_msg_list ) THEN
727: -- Standard Start of API savepoint
728: SAVEPOINT g_copy_del_for_exhibit;
729: -- Standard call to check for call compatibility.
730: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
731: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
732: END IF;
733: -- Initialize message list if p_init_msg_list is set to TRUE.
734: IF FND_API.to_Boolean( p_init_msg_list ) THEN
735: FND_MSG_PUB.initialize;
730: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
731: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
732: END IF;
733: -- Initialize message list if p_init_msg_list is set to TRUE.
734: IF FND_API.to_Boolean( p_init_msg_list ) THEN
735: FND_MSG_PUB.initialize;
736: END IF;
737: -- Initialize API return status to success
738: x_return_status := G_RET_STS_SUCCESS;
762: IF l_return_status = 'EXHIBIT_NUM_USED_BY_ELIN'
763: THEN
764: Okc_Api.Set_Message(G_APP_NAME
765: ,'OKC_EXHB_USED_BY_ELIN');
766: RAISE FND_API.G_EXC_ERROR;
767: END IF;
768: END IF;
769:
770:
810: IF l_return_status = 'EXHIBIT_NUM_USED_BY_ELIN'
811: THEN
812: Okc_Api.Set_Message(G_APP_NAME
813: ,'OKC_EXHB_USED_BY_ELIN');
814: RAISE FND_API.G_EXC_ERROR;
815: END IF;
816: END IF;
817: END IF;
818:
815: END IF;
816: END IF;
817: END IF;
818:
819: IF FND_API.To_Boolean( p_commit ) THEN
820: COMMIT WORK;
821: END IF;
822:
823: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
825: END IF;
826:
827: EXCEPTION
828:
829: WHEN FND_API.G_EXC_ERROR THEN
830: ROLLBACK TO g_copy_del_for_exhibit;
831:
832: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
833: FND_LOG.STRING( FND_LOG.LEVEL_ERROR ,g_module||l_api_name,'100: leaving create_exhibit_for_cdrl with G_EXC_ERROR');
839: p_count => x_msg_count,
840: p_data => x_msg_data
841: );
842:
843: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
844: ROLLBACK TO g_copy_del_for_exhibit;
845:
846: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
847: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'100: leaving create_exhibit_for_cdrl with G_EXC_UNEXPECTED_ERROR ');
872:
873: PROCEDURE delete_exhibit_for_cdrl
874: (
875: p_api_version IN NUMBER,
876: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
877: p_commit IN VARCHAR2:=FND_API.G_FALSE,
878:
879: p_doc_class IN VARCHAR2,
880:
873: PROCEDURE delete_exhibit_for_cdrl
874: (
875: p_api_version IN NUMBER,
876: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
877: p_commit IN VARCHAR2:=FND_API.G_FALSE,
878:
879: p_doc_class IN VARCHAR2,
880:
881: p_doc_type IN VARCHAR2,
931:
932: -- Standard Start of API savepoint
933: SAVEPOINT g_delete_exhibit_for_cdrl;
934: -- Standard call to check for call compatibility.
935: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
936: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
937: END IF;
938: -- Initialize message list if p_init_msg_list is set to TRUE.
939: IF FND_API.to_Boolean( p_init_msg_list ) THEN
932: -- Standard Start of API savepoint
933: SAVEPOINT g_delete_exhibit_for_cdrl;
934: -- Standard call to check for call compatibility.
935: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
936: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
937: END IF;
938: -- Initialize message list if p_init_msg_list is set to TRUE.
939: IF FND_API.to_Boolean( p_init_msg_list ) THEN
940: FND_MSG_PUB.initialize;
935: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
936: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
937: END IF;
938: -- Initialize message list if p_init_msg_list is set to TRUE.
939: IF FND_API.to_Boolean( p_init_msg_list ) THEN
940: FND_MSG_PUB.initialize;
941: END IF;
942: -- Initialize API return status to success
943: x_return_status := G_RET_STS_SUCCESS;
1017: END IF;
1018:
1019: END IF;
1020:
1021: IF FND_API.To_Boolean( p_commit ) THEN
1022: COMMIT WORK;
1023: END IF;
1024:
1025: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1027: END IF;
1028:
1029: EXCEPTION
1030:
1031: WHEN FND_API.G_EXC_ERROR THEN
1032: ROLLBACK TO g_delete_exhibit_for_cdrl;
1033:
1034: IF ( FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1035: FND_LOG.STRING( FND_LOG.LEVEL_ERROR ,g_module||l_api_name,'100: leaving delete_exhibit_for_cdrl with G_EXC_ERROR');
1041: p_count => x_msg_count,
1042: p_data => x_msg_data
1043: );
1044:
1045: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1046: ROLLBACK TO g_delete_exhibit_for_cdrl;
1047:
1048: IF ( FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1049: FND_LOG.STRING( FND_LOG.LEVEL_UNEXPECTED ,g_module||l_api_name,'100: leaving delete_exhibit_for_cdrl with G_EXC_UNEXPECTED_ERROR ');
1174:
1175: PROCEDURE ins_exb_and_get_dataItemNum (
1176:
1177: p_api_version IN NUMBER,
1178: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
1179: p_commit IN VARCHAR2:=FND_API.G_FALSE,
1180:
1181: p_doc_class IN VARCHAR2,
1182:
1175: PROCEDURE ins_exb_and_get_dataItemNum (
1176:
1177: p_api_version IN NUMBER,
1178: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
1179: p_commit IN VARCHAR2:=FND_API.G_FALSE,
1180:
1181: p_doc_class IN VARCHAR2,
1182:
1183: p_doc_type IN VARCHAR2,
1206: THEN
1207: delete_exhibit_for_cdrl
1208: (
1209: p_api_version => 1.0,
1210: p_init_msg_list => FND_API.G_FALSE,
1211: p_commit => FND_API.G_FALSE,
1212: p_doc_class => p_doc_class,
1213: p_doc_type => p_doc_type,
1214: p_doc_id => p_doc_id,
1207: delete_exhibit_for_cdrl
1208: (
1209: p_api_version => 1.0,
1210: p_init_msg_list => FND_API.G_FALSE,
1211: p_commit => FND_API.G_FALSE,
1212: p_doc_class => p_doc_class,
1213: p_doc_type => p_doc_type,
1214: p_doc_id => p_doc_id,
1215: p_doc_version => p_doc_version,
1225:
1226: create_exhibit_for_cdrl (
1227:
1228: p_api_version => 1.0 ,
1229: p_init_msg_list => FND_API.G_FALSE,
1230: p_commit => FND_API.G_FALSE,
1231:
1232: p_doc_class => p_doc_class,
1233: p_doc_type => p_doc_type,
1226: create_exhibit_for_cdrl (
1227:
1228: p_api_version => 1.0 ,
1229: p_init_msg_list => FND_API.G_FALSE,
1230: p_commit => FND_API.G_FALSE,
1231:
1232: p_doc_class => p_doc_class,
1233: p_doc_type => p_doc_type,
1234: p_doc_id => p_doc_id,
1253: /*
1254: PROCEDURE copy_exhibits (
1255:
1256: p_api_version IN NUMBER,
1257: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
1258: p_commit IN VARCHAR2:=FND_API.G_FALSE,
1259:
1260: p_doc_class IN VARCHAR2,
1261: p_doc_type IN VARCHAR2,
1254: PROCEDURE copy_exhibits (
1255:
1256: p_api_version IN NUMBER,
1257: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
1258: p_commit IN VARCHAR2:=FND_API.G_FALSE,
1259:
1260: p_doc_class IN VARCHAR2,
1261: p_doc_type IN VARCHAR2,
1262: p_doc_id IN NUMBER,
1303: -- Standard Start of API savepoint
1304: SAVEPOINT g_copy_exhibits;
1305:
1306: -- Standard call to check for call compatibility.
1307: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1308: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1309: END IF;
1310:
1311: -- Initialize message list if p_init_msg_list is set to TRUE.
1304: SAVEPOINT g_copy_exhibits;
1305:
1306: -- Standard call to check for call compatibility.
1307: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1308: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1309: END IF;
1310:
1311: -- Initialize message list if p_init_msg_list is set to TRUE.
1312: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1308: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1309: END IF;
1310:
1311: -- Initialize message list if p_init_msg_list is set to TRUE.
1312: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1313: FND_MSG_PUB.initialize;
1314: END IF;
1315:
1316: -- Initialize API return status to success
1329: -- insert exhibit.
1330: create_exhibit_for_cdrl
1331: (
1332: p_api_version => 1.0,
1333: p_init_msg_list => FND_API.G_FALSE,
1334: p_commit => FND_API.G_FALSE,
1335: p_doc_class => p_doc_class,
1336: p_doc_type => p_doc_type,
1337: p_doc_id => p_doc_id,
1330: create_exhibit_for_cdrl
1331: (
1332: p_api_version => 1.0,
1333: p_init_msg_list => FND_API.G_FALSE,
1334: p_commit => FND_API.G_FALSE,
1335: p_doc_class => p_doc_class,
1336: p_doc_type => p_doc_type,
1337: p_doc_id => p_doc_id,
1338: p_mode => p_mode,
1353:
1354: copy_cdrl_for_exhibits
1355: (
1356: p_api_version => 1.0,
1357: p_init_msg_list => FND_API.G_FALSE,
1358: p_commit => FND_API.G_FALSE,
1359:
1360: p_doc_class => p_doc_class,
1361: p_doc_type => p_doc_type,
1354: copy_cdrl_for_exhibits
1355: (
1356: p_api_version => 1.0,
1357: p_init_msg_list => FND_API.G_FALSE,
1358: p_commit => FND_API.G_FALSE,
1359:
1360: p_doc_class => p_doc_class,
1361: p_doc_type => p_doc_type,
1362: p_doc_id => p_doc_id,
1379: PROCEDURE specify_exhibits_for_cdrls
1380: (
1381:
1382: p_api_version IN NUMBER,
1383: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
1384: p_commit IN VARCHAR2:=FND_API.G_FALSE,
1385:
1386: p_cdrl_tbl IN deliverable_tbl_type,
1387: p_exhibit_code IN VARCHAR2,
1380: (
1381:
1382: p_api_version IN NUMBER,
1383: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
1384: p_commit IN VARCHAR2:=FND_API.G_FALSE,
1385:
1386: p_cdrl_tbl IN deliverable_tbl_type,
1387: p_exhibit_code IN VARCHAR2,
1388:
1446:
1447: -- Standard Start of API savepoint
1448: SAVEPOINT g_specify_exhibit;
1449: -- Standard call to check for call compatibility.
1450: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1451: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1452: END IF;
1453: -- Initialize message list if p_init_msg_list is set to TRUE.
1454: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1447: -- Standard Start of API savepoint
1448: SAVEPOINT g_specify_exhibit;
1449: -- Standard call to check for call compatibility.
1450: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1451: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1452: END IF;
1453: -- Initialize message list if p_init_msg_list is set to TRUE.
1454: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1455: FND_MSG_PUB.initialize;
1450: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1451: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1452: END IF;
1453: -- Initialize message list if p_init_msg_list is set to TRUE.
1454: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1455: FND_MSG_PUB.initialize;
1456: END IF;
1457:
1458: -- Initialize API return status to success
1514: -- Insert Exhibit
1515: create_exhibit_for_cdrl
1516: (
1517: p_api_version => 1.0,
1518: p_init_msg_list => FND_API.G_FALSE,
1519: p_commit => FND_API.G_FALSE,
1520:
1521: p_doc_class => p_doc_class,
1522: p_doc_type => p_doc_type,
1515: create_exhibit_for_cdrl
1516: (
1517: p_api_version => 1.0,
1518: p_init_msg_list => FND_API.G_FALSE,
1519: p_commit => FND_API.G_FALSE,
1520:
1521: p_doc_class => p_doc_class,
1522: p_doc_type => p_doc_type,
1523: p_doc_id => p_doc_id,
1536: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name, l_progress|| ' After Calling create_exhibit_for_cdrl return status ' || x_return_status);
1537: END IF;
1538:
1539: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1540: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1541: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1542: RAISE FND_API.G_EXC_ERROR ;
1543: END IF;
1544:
1538:
1539: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1540: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1541: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1542: RAISE FND_API.G_EXC_ERROR ;
1543: END IF;
1544:
1545: /*
1546:
1613:
1614: delete_exhibit_for_cdrl
1615: (
1616: p_api_version => 1.0,
1617: p_init_msg_list => FND_API.G_FALSE,
1618: p_commit => FND_API.G_FALSE,
1619:
1620: p_doc_class => p_doc_class,
1621:
1614: delete_exhibit_for_cdrl
1615: (
1616: p_api_version => 1.0,
1617: p_init_msg_list => FND_API.G_FALSE,
1618: p_commit => FND_API.G_FALSE,
1619:
1620: p_doc_class => p_doc_class,
1621:
1622: p_doc_type => p_doc_type,
1631: x_return_status => x_return_status
1632: );
1633:
1634: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1635: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1636: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1637: RAISE FND_API.G_EXC_ERROR ;
1638: END IF;
1639: END LOOP;
1633:
1634: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1635: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1636: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1637: RAISE FND_API.G_EXC_ERROR ;
1638: END IF;
1639: END LOOP;
1640: END IF;
1641:
1638: END IF;
1639: END LOOP;
1640: END IF;
1641:
1642: IF FND_API.To_Boolean( p_commit ) THEN
1643: COMMIT WORK;
1644: END IF;
1645:
1646: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1647: FND_LOG.STRING( FND_LOG.LEVEL_PROCEDURE, G_MODULE||l_api_name,'400: Leaving SPECIFY_EXHIBITS_FOR_CDRLS');
1648: END IF;
1649:
1650: EXCEPTION
1651: WHEN FND_API.G_EXC_ERROR THEN
1652: ROLLBACK TO g_specify_exhibit;
1653: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1654: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'500: Leaving SPECIFY_EXHIBITS_FOR_CDRLS:FND_API.G_EXC_ERROR Exception');
1655: END IF;
1650: EXCEPTION
1651: WHEN FND_API.G_EXC_ERROR THEN
1652: ROLLBACK TO g_specify_exhibit;
1653: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1654: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'500: Leaving SPECIFY_EXHIBITS_FOR_CDRLS:FND_API.G_EXC_ERROR Exception');
1655: END IF;
1656: x_return_status := G_RET_STS_ERROR ;
1657:
1658: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1654: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'500: Leaving SPECIFY_EXHIBITS_FOR_CDRLS:FND_API.G_EXC_ERROR Exception');
1655: END IF;
1656: x_return_status := G_RET_STS_ERROR ;
1657:
1658: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1659: ROLLBACK TO g_specify_exhibit;
1660: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1661: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'500: Leaving SPECIFY_EXHIBITS_FOR_CDRLS:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1662: END IF;
1657:
1658: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1659: ROLLBACK TO g_specify_exhibit;
1660: IF ( FND_LOG.LEVEL_EXCEPTION >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1661: FND_LOG.STRING( FND_LOG.LEVEL_EXCEPTION, G_MODULE||l_api_name,'500: Leaving SPECIFY_EXHIBITS_FOR_CDRLS:FND_API.G_EXC_UNEXPECTED_ERROR Exception');
1662: END IF;
1663: x_return_status := G_RET_STS_UNEXP_ERROR ;
1664:
1665: IF FND_MSG_PUB.Check_Msg_Level( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR ) THEN
1680:
1681: PROCEDURE delete_doc_exhibits (
1682:
1683: p_api_version IN NUMBER,
1684: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
1685: p_commit IN VARCHAR2:=FND_API.G_FALSE,
1686:
1687: p_doc_class IN VARCHAR2 DEFAULT NULL,
1688:
1681: PROCEDURE delete_doc_exhibits (
1682:
1683: p_api_version IN NUMBER,
1684: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
1685: p_commit IN VARCHAR2:=FND_API.G_FALSE,
1686:
1687: p_doc_class IN VARCHAR2 DEFAULT NULL,
1688:
1689: p_doc_type IN VARCHAR2,
1759:
1760: -- Standard Start of API savepoint
1761: SAVEPOINT g_delete_doc_exhibit;
1762: -- Standard call to check for call compatibility.
1763: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1764: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1765: END IF;
1766: -- Initialize message list if p_init_msg_list is set to TRUE.
1767: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1760: -- Standard Start of API savepoint
1761: SAVEPOINT g_delete_doc_exhibit;
1762: -- Standard call to check for call compatibility.
1763: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1764: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1765: END IF;
1766: -- Initialize message list if p_init_msg_list is set to TRUE.
1767: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1768: FND_MSG_PUB.initialize;
1763: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1764: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1765: END IF;
1766: -- Initialize message list if p_init_msg_list is set to TRUE.
1767: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1768: FND_MSG_PUB.initialize;
1769: END IF;
1770:
1771: -- Initialize API return status to success
1800:
1801: delete_exhibit_for_cdrl
1802: (
1803: p_api_version => 1.0,
1804: p_init_msg_list => FND_API.G_FALSE,
1805: p_commit => FND_API.G_FALSE,
1806:
1807: p_doc_class => l_bus_doc_class,
1808:
1801: delete_exhibit_for_cdrl
1802: (
1803: p_api_version => 1.0,
1804: p_init_msg_list => FND_API.G_FALSE,
1805: p_commit => FND_API.G_FALSE,
1806:
1807: p_doc_class => l_bus_doc_class,
1808:
1809: p_doc_type => p_doc_type,
1820: p_validate_before_delete => 'N'
1821: );
1822:
1823: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1824: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1825: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1826: RAISE FND_API.G_EXC_ERROR ;
1827: END IF;
1828: END LOOP;
1822:
1823: IF (x_return_status = G_RET_STS_UNEXP_ERROR) THEN
1824: RAISE FND_API.G_EXC_UNEXPECTED_ERROR ;
1825: ELSIF (x_return_status = G_RET_STS_ERROR) THEN
1826: RAISE FND_API.G_EXC_ERROR ;
1827: END IF;
1828: END LOOP;
1829: END IF;
1830:
1827: END IF;
1828: END LOOP;
1829: END IF;
1830:
1831: IF FND_API.To_Boolean( p_commit ) THEN
1832: COMMIT WORK;
1833: END IF;
1834:
1835: IF ( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1876: END has_Cdrls;
1877:
1878: PROCEDURE RETAIN_CDRLS_FOR_EXHIBITS (
1879: p_api_version IN NUMBER,
1880: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
1881: p_commit IN VARCHAR2:=FND_API.G_FALSE,
1882:
1883: p_doc_type IN VARCHAR2,
1884: p_doc_id IN NUMBER,
1877:
1878: PROCEDURE RETAIN_CDRLS_FOR_EXHIBITS (
1879: p_api_version IN NUMBER,
1880: p_init_msg_list IN VARCHAR2:=FND_API.G_FALSE,
1881: p_commit IN VARCHAR2:=FND_API.G_FALSE,
1882:
1883: p_doc_type IN VARCHAR2,
1884: p_doc_id IN NUMBER,
1885: p_doc_version IN NUMBER DEFAULT NULL,
1936:
1937: -- Standard Start of API savepoint
1938: SAVEPOINT G_RETAIN_CDRLS_FOR_EXHIBITS;
1939: -- Standard call to check for call compatibility.
1940: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1941: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1942: END IF;
1943: -- Initialize message list if p_init_msg_list is set to TRUE.
1944: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1937: -- Standard Start of API savepoint
1938: SAVEPOINT G_RETAIN_CDRLS_FOR_EXHIBITS;
1939: -- Standard call to check for call compatibility.
1940: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1941: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1942: END IF;
1943: -- Initialize message list if p_init_msg_list is set to TRUE.
1944: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1945: FND_MSG_PUB.initialize;
1940: IF NOT FND_API.Compatible_API_Call( l_api_version, p_api_version, l_api_name, G_PKG_NAME) THEN
1941: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1942: END IF;
1943: -- Initialize message list if p_init_msg_list is set to TRUE.
1944: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1945: FND_MSG_PUB.initialize;
1946: END IF;
1947:
1948: -- Initialize API return status to success
1982:
1983: delete_cdrl_for_exhibits
1984: (
1985: p_api_version => 1.0,
1986: p_init_msg_list => FND_API.G_FALSE,
1987: p_commit => FND_API.G_FALSE,
1988:
1989:
1990: p_doc_type => p_doc_type,
1983: delete_cdrl_for_exhibits
1984: (
1985: p_api_version => 1.0,
1986: p_init_msg_list => FND_API.G_FALSE,
1987: p_commit => FND_API.G_FALSE,
1988:
1989:
1990: p_doc_type => p_doc_type,
1991: p_doc_id => p_doc_id,
2025: x_msg_count,
2026: x_msg_data,
2027: x_errorcode
2028: );
2029: if x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2030: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2031: END IF;
2032: END get_new_deliverable_id;
2033:
2026: x_msg_data,
2027: x_errorcode
2028: );
2029: if x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
2030: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2031: END IF;
2032: END get_new_deliverable_id;
2033:
2034: