442: ) then
443: raise FND_API.G_EXC_UNEXPECTED_ERROR;
444: end if;
445:
446: -- Initialize Message Stack on FND_MSG_PUB
447: if (FND_API.To_Boolean(p_init_msg_list)) then
448: FND_MSG_PUB.Initialize;
449: end if;
450:
444: end if;
445:
446: -- Initialize Message Stack on FND_MSG_PUB
447: if (FND_API.To_Boolean(p_init_msg_list)) then
448: FND_MSG_PUB.Initialize;
449: end if;
450:
451: FEM_ENGINES_PKG.Tech_Message (
452: p_severity => G_LOG_LEVEL_3
705: commit work;
706: end if;
707:
708: -- Standard call to get message count and if count is 1, get message info
709: FND_MSG_PUB.Count_And_Get (
710: p_count => x_msg_count
711: ,p_data => x_msg_data
712: );
713:
732: WHEN OTHERS THEN rollback;
733: END;
734:
735: x_return_status := FND_API.G_RET_STS_ERROR;
736: FND_MSG_PUB.Count_And_Get(
737: p_count => x_msg_count
738: ,p_data => x_msg_data
739: );
740:
750: EXCEPTION
751: WHEN OTHERS THEN rollback;
752: END;
753: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
754: FND_MSG_PUB.Count_And_Get(
755: p_count => x_msg_count
756: ,p_data => x_msg_data
757: );
758:
775: EXCEPTION
776: WHEN OTHERS THEN rollback;
777: END;
778: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
779: if (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) then
780: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
781: end if;
782: FND_MSG_PUB.Count_And_Get(
783: p_count => x_msg_count
776: WHEN OTHERS THEN rollback;
777: END;
778: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
779: if (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) then
780: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
781: end if;
782: FND_MSG_PUB.Count_And_Get(
783: p_count => x_msg_count
784: ,p_data => x_msg_data
778: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
779: if (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) then
780: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
781: end if;
782: FND_MSG_PUB.Count_And_Get(
783: p_count => x_msg_count
784: ,p_data => x_msg_data
785: );
786:
842: ) then
843: raise FND_API.G_EXC_UNEXPECTED_ERROR;
844: end if;
845:
846: -- Initialize Message Stack on FND_MSG_PUB
847: if (FND_API.To_Boolean(p_init_msg_list)) then
848: FND_MSG_PUB.Initialize;
849: end if;
850:
844: end if;
845:
846: -- Initialize Message Stack on FND_MSG_PUB
847: if (FND_API.To_Boolean(p_init_msg_list)) then
848: FND_MSG_PUB.Initialize;
849: end if;
850:
851: FEM_ENGINES_PKG.Tech_Message (
852: p_severity => G_LOG_LEVEL_2
878: commit work;
879: end if;
880:
881: -- Standard call to get message count and if count is 1, get message info
882: FND_MSG_PUB.Count_And_Get (
883: p_count => x_msg_count
884: ,p_data => x_msg_data
885: );
886:
894:
895: when FND_API.G_EXC_ERROR then
896: rollback to DuplicateObjectDefinition_PVT;
897: x_return_status := FND_API.G_RET_STS_ERROR;
898: FND_MSG_PUB.Count_And_Get(
899: p_count => x_msg_count
900: ,p_data => x_msg_data
901: );
902:
902:
903: when FND_API.G_EXC_UNEXPECTED_ERROR then
904: rollback to DuplicateObjectDefinition_PVT;
905: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
906: FND_MSG_PUB.Count_And_Get(
907: p_count => x_msg_count
908: ,p_data => x_msg_data
909: );
910:
910:
911: when others then
912: rollback to DuplicateObjectDefinition_PVT;
913: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
914: if (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) then
915: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
916: end if;
917: FND_MSG_PUB.Count_And_Get(
918: p_count => x_msg_count
911: when others then
912: rollback to DuplicateObjectDefinition_PVT;
913: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
914: if (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) then
915: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
916: end if;
917: FND_MSG_PUB.Count_And_Get(
918: p_count => x_msg_count
919: ,p_data => x_msg_data
913: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
914: if (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) then
915: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
916: end if;
917: FND_MSG_PUB.Count_And_Get(
918: p_count => x_msg_count
919: ,p_data => x_msg_data
920: );
921:
977: ) then
978: raise FND_API.G_EXC_UNEXPECTED_ERROR;
979: end if;
980:
981: -- Initialize Message Stack on FND_MSG_PUB
982: if (FND_API.To_Boolean(p_init_msg_list)) then
983: FND_MSG_PUB.Initialize;
984: end if;
985:
979: end if;
980:
981: -- Initialize Message Stack on FND_MSG_PUB
982: if (FND_API.To_Boolean(p_init_msg_list)) then
983: FND_MSG_PUB.Initialize;
984: end if;
985:
986: FEM_ENGINES_PKG.Tech_Message (
987: p_severity => G_LOG_LEVEL_2
1031: commit work;
1032: end if;
1033:
1034: -- Standard call to get message count and if count is 1, get message info
1035: FND_MSG_PUB.Count_And_Get (
1036: p_count => x_msg_count
1037: ,p_data => x_msg_data
1038: );
1039:
1047:
1048: when FND_API.G_EXC_ERROR then
1049: rollback to BackupObjectDefinition_PVT;
1050: x_return_status := FND_API.G_RET_STS_ERROR;
1051: FND_MSG_PUB.Count_And_Get(
1052: p_count => x_msg_count
1053: ,p_data => x_msg_data
1054: );
1055:
1055:
1056: when FND_API.G_EXC_UNEXPECTED_ERROR then
1057: rollback to BackupObjectDefinition_PVT;
1058: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1059: FND_MSG_PUB.Count_And_Get(
1060: p_count => x_msg_count
1061: ,p_data => x_msg_data
1062: );
1063:
1063:
1064: when others then
1065: rollback to BackupObjectDefinition_PVT;
1066: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1067: if (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) then
1068: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1069: end if;
1070: FND_MSG_PUB.Count_And_Get(
1071: p_count => x_msg_count
1064: when others then
1065: rollback to BackupObjectDefinition_PVT;
1066: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1067: if (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) then
1068: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1069: end if;
1070: FND_MSG_PUB.Count_And_Get(
1071: p_count => x_msg_count
1072: ,p_data => x_msg_data
1066: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1067: if (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) then
1068: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1069: end if;
1070: FND_MSG_PUB.Count_And_Get(
1071: p_count => x_msg_count
1072: ,p_data => x_msg_data
1073: );
1074:
1133: ) then
1134: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1135: end if;
1136:
1137: -- Initialize Message Stack on FND_MSG_PUB
1138: if (FND_API.To_Boolean(p_init_msg_list)) then
1139: FND_MSG_PUB.Initialize;
1140: end if;
1141:
1135: end if;
1136:
1137: -- Initialize Message Stack on FND_MSG_PUB
1138: if (FND_API.To_Boolean(p_init_msg_list)) then
1139: FND_MSG_PUB.Initialize;
1140: end if;
1141:
1142: FEM_ENGINES_PKG.Tech_Message (
1143: p_severity => G_LOG_LEVEL_2
1154: -- Check that the approval status is NOT_APPROVED
1155: l_approval_status_code := GetApprovalStatus(p_obj_def_id);
1156: if (l_approval_status_code <> G_NOT_APPROVED_STATUS) then
1157: FND_MESSAGE.set_name('FEM', 'FEM_BR_RVRT_NOT_APPROVED_ERR');
1158: FND_MSG_PUB.Add;
1159: raise FND_API.G_EXC_ERROR;
1160: end if;
1161:
1162: -- Check that object definitions has an old approved copy
1162: -- Check that object definitions has an old approved copy
1163: l_old_approved_obj_def_id := GetOldApprovedObjDefId(p_obj_def_id);
1164: if (l_old_approved_obj_def_id is null) then
1165: FND_MESSAGE.set_name('FEM', 'FEM_BR_RVRT_OLD_APPR_CPY_ERR');
1166: FND_MSG_PUB.Add;
1167: raise FND_API.G_EXC_ERROR;
1168: end if;
1169:
1170: -- Check for any Data Locks
1174: );
1175:
1176: if (FND_API.To_Boolean(l_data_edit_lock_exists)) then
1177: FND_MESSAGE.set_name('FEM', 'FEM_BR_RVRT_DATA_EDIT_LOCK_ERR');
1178: FND_MSG_PUB.Add;
1179: raise FND_API.G_EXC_ERROR;
1180: end if;
1181:
1182: -- Get effective dates of old approved copy
1228: commit work;
1229: end if;
1230:
1231: -- Standard call to get message count and if count is 1, get message info
1232: FND_MSG_PUB.Count_And_Get (
1233: p_count => x_msg_count
1234: ,p_data => x_msg_data
1235: );
1236:
1244:
1245: when FND_API.G_EXC_ERROR then
1246: rollback to RevertObjectDefinition_PVT;
1247: x_return_status := FND_API.G_RET_STS_ERROR;
1248: FND_MSG_PUB.Count_And_Get(
1249: p_count => x_msg_count
1250: ,p_data => x_msg_data
1251: );
1252:
1252:
1253: when FND_API.G_EXC_UNEXPECTED_ERROR then
1254: rollback to RevertObjectDefinition_PVT;
1255: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1256: FND_MSG_PUB.Count_And_Get(
1257: p_count => x_msg_count
1258: ,p_data => x_msg_data
1259: );
1260:
1260:
1261: when others then
1262: rollback to RevertObjectDefinition_PVT;
1263: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1264: if (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) then
1265: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1266: end if;
1267: FND_MSG_PUB.Count_And_Get(
1268: p_count => x_msg_count
1261: when others then
1262: rollback to RevertObjectDefinition_PVT;
1263: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1264: if (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) then
1265: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1266: end if;
1267: FND_MSG_PUB.Count_And_Get(
1268: p_count => x_msg_count
1269: ,p_data => x_msg_data
1263: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1264: if (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) then
1265: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1266: end if;
1267: FND_MSG_PUB.Count_And_Get(
1268: p_count => x_msg_count
1269: ,p_data => x_msg_data
1270: );
1271:
1345: ) then
1346: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1347: end if;
1348:
1349: -- Initialize Message Stack on FND_MSG_PUB
1350: if (FND_API.To_Boolean(p_init_msg_list)) then
1351: FND_MSG_PUB.Initialize;
1352: end if;
1353:
1347: end if;
1348:
1349: -- Initialize Message Stack on FND_MSG_PUB
1350: if (FND_API.To_Boolean(p_init_msg_list)) then
1351: FND_MSG_PUB.Initialize;
1352: end if;
1353:
1354: FEM_ENGINES_PKG.Tech_Message (
1355: p_severity => G_LOG_LEVEL_3
1466: commit work;
1467: end if;
1468:
1469: -- Standard call to get message count and if count is 1, get message info
1470: FND_MSG_PUB.Count_And_Get (
1471: p_count => x_msg_count
1472: ,p_data => x_msg_data
1473: );
1474:
1486: EXCEPTION
1487: WHEN OTHERS THEN rollback;
1488: END;
1489: x_return_status := FND_API.G_RET_STS_ERROR;
1490: FND_MSG_PUB.Count_And_Get(
1491: p_count => x_msg_count
1492: ,p_data => x_msg_data
1493: );
1494:
1498: EXCEPTION
1499: WHEN OTHERS THEN rollback;
1500: END;
1501: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1502: FND_MSG_PUB.Count_And_Get(
1503: p_count => x_msg_count
1504: ,p_data => x_msg_data
1505: );
1506:
1510: EXCEPTION
1511: WHEN OTHERS THEN rollback;
1512: END;
1513: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1514: if (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) then
1515: FND_MSG_PUB.Add_Exc_Msg (
1516: p_pkg_name => G_PKG_NAME
1517: ,p_procedure_name => l_api_name
1518: );
1511: WHEN OTHERS THEN rollback;
1512: END;
1513: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1514: if (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) then
1515: FND_MSG_PUB.Add_Exc_Msg (
1516: p_pkg_name => G_PKG_NAME
1517: ,p_procedure_name => l_api_name
1518: );
1519: end if;
1516: p_pkg_name => G_PKG_NAME
1517: ,p_procedure_name => l_api_name
1518: );
1519: end if;
1520: FND_MSG_PUB.Count_And_Get(
1521: p_count => x_msg_count
1522: ,p_data => x_msg_data
1523: );
1524:
1626: ) then
1627: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1628: end if;
1629:
1630: -- Initialize Message Stack on FND_MSG_PUB
1631: if (FND_API.To_Boolean(p_init_msg_list)) then
1632: FND_MSG_PUB.Initialize;
1633: end if;
1634:
1628: end if;
1629:
1630: -- Initialize Message Stack on FND_MSG_PUB
1631: if (FND_API.To_Boolean(p_init_msg_list)) then
1632: FND_MSG_PUB.Initialize;
1633: end if;
1634:
1635: FEM_ENGINES_PKG.Tech_Message (
1636: p_severity => G_LOG_LEVEL_2
1780: commit work;
1781: end if;
1782:
1783: -- Standard call to get message count and if count is 1, get message info
1784: FND_MSG_PUB.Count_And_Get (
1785: p_count => x_msg_count
1786: ,p_data => x_msg_data
1787: );
1788:
1796:
1797: when FND_API.G_EXC_ERROR then
1798: rollback to DuplicateObject_PVT;
1799: x_return_status := FND_API.G_RET_STS_ERROR;
1800: FND_MSG_PUB.Count_And_Get(
1801: p_count => x_msg_count
1802: ,p_data => x_msg_data
1803: );
1804:
1804:
1805: when FND_API.G_EXC_UNEXPECTED_ERROR then
1806: rollback to DuplicateObject_PVT;
1807: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1808: FND_MSG_PUB.Count_And_Get(
1809: p_count => x_msg_count
1810: ,p_data => x_msg_data
1811: );
1812:
1812:
1813: when others then
1814: rollback to DuplicateObject_PVT;
1815: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1816: if (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) then
1817: FND_MSG_PUB.Add_Exc_Msg (
1818: p_pkg_name => G_PKG_NAME
1819: ,p_procedure_name => l_api_name
1820: );
1813: when others then
1814: rollback to DuplicateObject_PVT;
1815: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1816: if (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) then
1817: FND_MSG_PUB.Add_Exc_Msg (
1818: p_pkg_name => G_PKG_NAME
1819: ,p_procedure_name => l_api_name
1820: );
1821: end if;
1818: p_pkg_name => G_PKG_NAME
1819: ,p_procedure_name => l_api_name
1820: );
1821: end if;
1822: FND_MSG_PUB.Count_And_Get(
1823: p_count => x_msg_count
1824: ,p_data => x_msg_data
1825: );
1826:
1883: ) then
1884: raise FND_API.G_EXC_UNEXPECTED_ERROR;
1885: end if;
1886:
1887: -- Initialize Message Stack on FND_MSG_PUB
1888: if (FND_API.To_Boolean(p_init_msg_list)) then
1889: FND_MSG_PUB.Initialize;
1890: end if;
1891:
1885: end if;
1886:
1887: -- Initialize Message Stack on FND_MSG_PUB
1888: if (FND_API.To_Boolean(p_init_msg_list)) then
1889: FND_MSG_PUB.Initialize;
1890: end if;
1891:
1892: FEM_ENGINES_PKG.Tech_Message (
1893: p_severity => G_LOG_LEVEL_2
1916: commit work;
1917: end if;
1918:
1919: -- Standard call to get message count and if count is 1, get message info
1920: FND_MSG_PUB.Count_And_Get (
1921: p_count => x_msg_count
1922: ,p_data => x_msg_data
1923: );
1924:
1932:
1933: when FND_API.G_EXC_ERROR then
1934: rollback to DuplicateObjectDetails_PVT;
1935: x_return_status := FND_API.G_RET_STS_ERROR;
1936: FND_MSG_PUB.Count_And_Get(
1937: p_count => x_msg_count
1938: ,p_data => x_msg_data
1939: );
1940:
1940:
1941: when FND_API.G_EXC_UNEXPECTED_ERROR then
1942: rollback to DuplicateObjectDetails_PVT;
1943: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1944: FND_MSG_PUB.Count_And_Get(
1945: p_count => x_msg_count
1946: ,p_data => x_msg_data
1947: );
1948:
1948:
1949: when others then
1950: rollback to DuplicateObjectDetails_PVT;
1951: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1952: if (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) then
1953: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1954: end if;
1955: FND_MSG_PUB.Count_And_Get(
1956: p_count => x_msg_count
1949: when others then
1950: rollback to DuplicateObjectDetails_PVT;
1951: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1952: if (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) then
1953: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1954: end if;
1955: FND_MSG_PUB.Count_And_Get(
1956: p_count => x_msg_count
1957: ,p_data => x_msg_data
1951: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1952: if (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) then
1953: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1954: end if;
1955: FND_MSG_PUB.Count_And_Get(
1956: p_count => x_msg_count
1957: ,p_data => x_msg_data
1958: );
1959:
2012: ) then
2013: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2014: end if;
2015:
2016: -- Initialize Message Stack on FND_MSG_PUB
2017: if (FND_API.To_Boolean(p_init_msg_list)) then
2018: FND_MSG_PUB.Initialize;
2019: end if;
2020:
2014: end if;
2015:
2016: -- Initialize Message Stack on FND_MSG_PUB
2017: if (FND_API.To_Boolean(p_init_msg_list)) then
2018: FND_MSG_PUB.Initialize;
2019: end if;
2020:
2021: FEM_ENGINES_PKG.Tech_Message (
2022: p_severity => G_LOG_LEVEL_2
2041: -----------------------
2042: -- Finalize API Call --
2043: -----------------------
2044: -- Standard call to get message count and if count is 1, get message info
2045: FND_MSG_PUB.Count_And_Get (
2046: p_count => x_msg_count
2047: ,p_data => x_msg_data
2048: );
2049:
2056: EXCEPTION
2057:
2058: when FND_API.G_EXC_ERROR then
2059: x_return_status := FND_API.G_RET_STS_ERROR;
2060: FND_MSG_PUB.Count_And_Get(
2061: p_count => x_msg_count
2062: ,p_data => x_msg_data
2063: );
2064:
2063: );
2064:
2065: when FND_API.G_EXC_UNEXPECTED_ERROR then
2066: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2067: FND_MSG_PUB.Count_And_Get(
2068: p_count => x_msg_count
2069: ,p_data => x_msg_data
2070: );
2071:
2070: );
2071:
2072: when others then
2073: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2074: if (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) then
2075: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2076: end if;
2077: FND_MSG_PUB.Count_And_Get(
2078: p_count => x_msg_count
2071:
2072: when others then
2073: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2074: if (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) then
2075: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2076: end if;
2077: FND_MSG_PUB.Count_And_Get(
2078: p_count => x_msg_count
2079: ,p_data => x_msg_data
2073: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2074: if (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) then
2075: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2076: end if;
2077: FND_MSG_PUB.Count_And_Get(
2078: p_count => x_msg_count
2079: ,p_data => x_msg_data
2080: );
2081:
2205: ) then
2206: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2207: end if;
2208:
2209: -- Initialize Message Stack on FND_MSG_PUB
2210: if (FND_API.To_Boolean(p_init_msg_list)) then
2211: FND_MSG_PUB.Initialize;
2212: end if;
2213:
2207: end if;
2208:
2209: -- Initialize Message Stack on FND_MSG_PUB
2210: if (FND_API.To_Boolean(p_init_msg_list)) then
2211: FND_MSG_PUB.Initialize;
2212: end if;
2213:
2214: FEM_ENGINES_PKG.Tech_Message (
2215: p_severity => G_LOG_LEVEL_2
2230: FND_MESSAGE.set_name('FEM', 'FEM_BR_OBJ_NAME_ERR');
2231: FND_MESSAGE.set_token('OBJECT_TYPE_MEANING', l_check_obj_name_rec.object_type_name);
2232: FND_MESSAGE.set_token('FOLDER_NAME', l_check_obj_name_rec.folder_name);
2233: FND_MESSAGE.set_token('OBJECT_NAME', l_check_obj_name_rec.object_name);
2234: FND_MSG_PUB.Add;
2235:
2236: raise FND_API.G_EXC_ERROR;
2237:
2238: end loop;
2240: -----------------------
2241: -- Finalize API Call --
2242: -----------------------
2243: -- Standard call to get message count and if count is 1, get message info
2244: FND_MSG_PUB.Count_And_Get (
2245: p_count => x_msg_count
2246: ,p_data => x_msg_data
2247: );
2248:
2255: EXCEPTION
2256:
2257: when FND_API.G_EXC_ERROR then
2258: x_return_status := FND_API.G_RET_STS_ERROR;
2259: FND_MSG_PUB.Count_And_Get(
2260: p_count => x_msg_count
2261: ,p_data => x_msg_data
2262: );
2263:
2262: );
2263:
2264: when FND_API.G_EXC_UNEXPECTED_ERROR then
2265: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2266: FND_MSG_PUB.Count_And_Get(
2267: p_count => x_msg_count
2268: ,p_data => x_msg_data
2269: );
2270:
2269: );
2270:
2271: when others then
2272: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2273: if (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) then
2274: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2275: end if;
2276: FND_MSG_PUB.Count_And_Get(
2277: p_count => x_msg_count
2270:
2271: when others then
2272: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2273: if (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) then
2274: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2275: end if;
2276: FND_MSG_PUB.Count_And_Get(
2277: p_count => x_msg_count
2278: ,p_data => x_msg_data
2272: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2273: if (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) then
2274: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2275: end if;
2276: FND_MSG_PUB.Count_And_Get(
2277: p_count => x_msg_count
2278: ,p_data => x_msg_data
2279: );
2280:
2343: ) then
2344: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2345: end if;
2346:
2347: -- Initialize Message Stack on FND_MSG_PUB
2348: if (FND_API.To_Boolean(p_init_msg_list)) then
2349: FND_MSG_PUB.Initialize;
2350: end if;
2351:
2345: end if;
2346:
2347: -- Initialize Message Stack on FND_MSG_PUB
2348: if (FND_API.To_Boolean(p_init_msg_list)) then
2349: FND_MSG_PUB.Initialize;
2350: end if;
2351:
2352: FEM_ENGINES_PKG.Tech_Message (
2353: p_severity => G_LOG_LEVEL_2
2366: -- If a record is returned in the l_check_obj_def_name_cur, then another
2367: -- object definition exists with the same name.
2368: FND_MESSAGE.set_name('FEM', 'FEM_BR_OBJ_DEF_NAME_ERR');
2369: FND_MESSAGE.set_token('OBJECT_DEFINITION_NAME', l_check_obj_def_name_rec.obj_def_name);
2370: FND_MSG_PUB.Add;
2371:
2372: raise FND_API.G_EXC_ERROR;
2373:
2374: end loop;
2376: -----------------------
2377: -- Finalize API Call --
2378: -----------------------
2379: -- Standard call to get message count and if count is 1, get message info
2380: FND_MSG_PUB.Count_And_Get (
2381: p_count => x_msg_count
2382: ,p_data => x_msg_data
2383: );
2384:
2391: EXCEPTION
2392:
2393: when FND_API.G_EXC_ERROR then
2394: x_return_status := FND_API.G_RET_STS_ERROR;
2395: FND_MSG_PUB.Count_And_Get(
2396: p_count => x_msg_count
2397: ,p_data => x_msg_data
2398: );
2399:
2398: );
2399:
2400: when FND_API.G_EXC_UNEXPECTED_ERROR then
2401: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2402: FND_MSG_PUB.Count_And_Get(
2403: p_count => x_msg_count
2404: ,p_data => x_msg_data
2405: );
2406:
2405: );
2406:
2407: when others then
2408: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2409: if (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) then
2410: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2411: end if;
2412: FND_MSG_PUB.Count_And_Get(
2413: p_count => x_msg_count
2406:
2407: when others then
2408: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2409: if (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) then
2410: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2411: end if;
2412: FND_MSG_PUB.Count_And_Get(
2413: p_count => x_msg_count
2414: ,p_data => x_msg_data
2408: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2409: if (FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)) then
2410: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2411: end if;
2412: FND_MSG_PUB.Count_And_Get(
2413: p_count => x_msg_count
2414: ,p_data => x_msg_data
2415: );
2416:
2715: l_approval_status_code := G_SUBMIT_DELETE_STATUS;
2716:
2717: else
2718:
2719: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name,
2720: 'Invalid Approval Request Type: '||l_request_type_code);
2721: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2722:
2723: end if;
2832: end loop;
2833:
2834: else
2835:
2836: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name,
2837: 'Invalid Approval Request Type: '||l_request_type_code);
2838: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2839:
2840: end if;
2898: end loop;
2899:
2900: else
2901:
2902: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name,
2903: 'Invalid Approval Request Type: '||l_request_type_code);
2904: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2905:
2906: end if;
2969: end if;
2970:
2971: else
2972:
2973: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name,
2974: 'Invalid Approval Request Type: '||l_request_type_code);
2975: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2976:
2977: end if;
3123: end loop;
3124:
3125: else
3126:
3127: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name,
3128: 'Invalid Approval Request Type: '||l_request_type_code);
3129: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3130:
3131: end if;
3944: );
3945:
3946: else
3947:
3948: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name,
3949: 'Invalid Old Approved Copy Flag: '||p_target_copy_flag);
3950: raise FND_API.G_EXC_UNEXPECTED_ERROR;
3951:
3952: end if;
4448:
4449: FND_MESSAGE.set_name('FEM', 'FEM_BR_END_LT_START_DATE_ERR');
4450: FND_MESSAGE.set_token('START_DATE',FND_DATE.date_to_chardate(p_effective_start_date));
4451: FND_MESSAGE.set_token('END_DATE',FND_DATE.date_to_chardate(p_effective_end_date));
4452: FND_MSG_PUB.Add;
4453: raise FND_API.G_EXC_ERROR;
4454:
4455: end if;
4456:
4473:
4474: FND_MESSAGE.set_token('VERSION_NAME', overlapping_obj_def_rec.object_definition_name);
4475: FND_MESSAGE.set_token('START_DATE',FND_DATE.date_to_chardate(overlapping_obj_def_rec.effective_start_date));
4476: FND_MESSAGE.set_token('END_DATE',FND_DATE.date_to_chardate(overlapping_obj_def_rec.effective_end_date));
4477: FND_MSG_PUB.Add;
4478:
4479: raise FND_API.G_EXC_ERROR;
4480:
4481: end loop;