159: END IF;
160:
161: -- Initialize message list if L_init_msg_list is set to TRUE.
162: IF FND_API.to_Boolean(L_init_msg_list) THEN
163: FND_MSG_PUB.initialize;
164: END IF;
165:
166: -- Initialize API return status to success.
167: x_return_status := FND_API.G_RET_STS_SUCCESS;
182: IF (IBE_UTIL.G_DEBUGON = FND_API.G_TRUE) THEN
183: IBE_UTIL.debug('IBE_CATALOG_PVT.Error p_sect_id_tbl is NULL');
184: END IF;
185: FND_MESSAGE.Set_Name('IBE', 'IBE_CT_INVALID_ID_OR_NAME');
186: FND_MSG_PUB.Add;
187: RAISE FND_API.G_EXC_ERROR;
188: ELSE
189: l_sectid_tbl := p_sectid_tbl;
190: END IF;
427: IBE_UTIL.debug('IBE_CATALOG_PVT.Load_Sections(-)');
428: END IF;
429:
430: -- standard call to get message count and if count is 1, get message info.
431: FND_MSG_PUB.Count_And_Get
432: ( p_encoded => FND_API.G_FALSE,
433: p_count => x_msg_count,
434: p_data => x_msg_data
435: );
435: );
436: EXCEPTION
437: WHEN FND_API.G_EXC_ERROR THEN
438: x_return_status := FND_API.G_RET_STS_ERROR;
439: FND_MSG_PUB.Count_And_Get
440: ( p_encoded => FND_API.G_FALSE,
441: p_count => x_msg_count,
442: p_data => x_msg_data
443: );
444: --gzhang 08/08/2002, bug#2488246
445: --ibe_util.disable_debug;
446: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
447: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
448: FND_MSG_PUB.Count_And_Get
449: ( p_encoded => FND_API.G_FALSE,
450: p_count => x_msg_count,
451: p_data => x_msg_data
452: );
457: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
458: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
459: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
460: FND_MESSAGE.Set_Token('REASON', SQLERRM);
461: FND_MSG_PUB.Add;
462: IF FND_MSG_PUB.Check_Msg_Level
463: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
464: THEN FND_MSG_PUB.Add_Exc_Msg
465: ( G_PKG_NAME,
458: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
459: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
460: FND_MESSAGE.Set_Token('REASON', SQLERRM);
461: FND_MSG_PUB.Add;
462: IF FND_MSG_PUB.Check_Msg_Level
463: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
464: THEN FND_MSG_PUB.Add_Exc_Msg
465: ( G_PKG_NAME,
466: l_api_name
459: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
460: FND_MESSAGE.Set_Token('REASON', SQLERRM);
461: FND_MSG_PUB.Add;
462: IF FND_MSG_PUB.Check_Msg_Level
463: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
464: THEN FND_MSG_PUB.Add_Exc_Msg
465: ( G_PKG_NAME,
466: l_api_name
467: );
460: FND_MESSAGE.Set_Token('REASON', SQLERRM);
461: FND_MSG_PUB.Add;
462: IF FND_MSG_PUB.Check_Msg_Level
463: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
464: THEN FND_MSG_PUB.Add_Exc_Msg
465: ( G_PKG_NAME,
466: l_api_name
467: );
468: END IF;
465: ( G_PKG_NAME,
466: l_api_name
467: );
468: END IF;
469: FND_MSG_PUB.Count_And_Get
470: ( p_encoded => FND_API.G_FALSE,
471: p_count => x_msg_count,
472: p_data => x_msg_data
473: );
554:
555:
556: -- initialize message list if l_init_msg_list is set to TRUE
557: IF FND_API.to_Boolean(l_init_msg_list) THEN
558: FND_MSG_PUB.initialize;
559: END IF;
560:
561: -- initialize API return status to success
562: x_return_status := FND_API.G_RET_STS_SUCCESS;
621: IF (IBE_UTIL.G_DEBUGON = FND_API.G_TRUE) THEN
622: IBE_UTIL.debug('IBE_CATALOG_PVT.GetLeafSubSectIDs(-)');
623: END IF;
624: -- standard call to get message count and if count is 1, get message info.
625: FND_MSG_PUB.Count_And_Get
626: ( p_encoded => FND_API.G_FALSE,
627: p_count => x_msg_count,
628: p_data => x_msg_data
629: );
631: --ibe_util.disable_debug;
632: EXCEPTION
633: WHEN FND_API.G_EXC_ERROR THEN
634: x_return_status := FND_API.G_RET_STS_ERROR;
635: FND_MSG_PUB.Count_And_Get
636: ( p_encoded => FND_API.G_FALSE,
637: p_count => x_msg_count,
638: p_data => x_msg_data
639: );
640: --gzhang 08/08/2002, bug#2488246
641: --ibe_util.disable_debug;
642: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
643: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
644: FND_MSG_PUB.Count_And_Get
645: ( p_encoded => FND_API.G_FALSE,
646: p_count => x_msg_count,
647: p_data => x_msg_data
648: );
649: --gzhang 08/08/2002, bug#2488246
650: --ibe_util.disable_debug;
651: WHEN OTHERS THEN
652: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
653: IF FND_MSG_PUB.Check_Msg_Level
654: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
655: THEN FND_MSG_PUB.Add_Exc_Msg
656: ( G_PKG_NAME,
657: l_api_name
650: --ibe_util.disable_debug;
651: WHEN OTHERS THEN
652: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
653: IF FND_MSG_PUB.Check_Msg_Level
654: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
655: THEN FND_MSG_PUB.Add_Exc_Msg
656: ( G_PKG_NAME,
657: l_api_name
658: );
651: WHEN OTHERS THEN
652: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
653: IF FND_MSG_PUB.Check_Msg_Level
654: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
655: THEN FND_MSG_PUB.Add_Exc_Msg
656: ( G_PKG_NAME,
657: l_api_name
658: );
659: END IF;
656: ( G_PKG_NAME,
657: l_api_name
658: );
659: END IF;
660: FND_MSG_PUB.Count_And_Get
661: ( p_encoded => FND_API.G_FALSE,
662: p_count => x_msg_count,
663: p_data => x_msg_data
664: );
736: END IF;
737:
738: -- Initialize message list if l_init_msg_list is set to TRUE.
739: IF FND_API.to_Boolean(l_init_msg_list) THEN
740: FND_MSG_PUB.initialize;
741: END IF;
742:
743: -- Initialize API return status to success.
744: x_return_status := FND_API.G_RET_STS_SUCCESS;
770: IBE_UTIL.debug('IBE_CATALOG_PVT.GetSuperSectIDs(-)');
771: END IF;
772:
773: -- standard call to get message count and if count is 1, get message info.
774: FND_MSG_PUB.Count_And_Get
775: ( p_encoded => FND_API.G_FALSE,
776: p_count => x_msg_count,
777: p_data => x_msg_data
778: );
778: );
779: EXCEPTION
780: WHEN FND_API.G_EXC_ERROR THEN
781: x_return_status := FND_API.G_RET_STS_ERROR;
782: FND_MSG_PUB.Count_And_Get
783: ( p_encoded => FND_API.G_FALSE,
784: p_count => x_msg_count,
785: p_data => x_msg_data
786: );
785: p_data => x_msg_data
786: );
787: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
788: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
789: FND_MSG_PUB.Count_And_Get
790: ( p_encoded => FND_API.G_FALSE,
791: p_count => x_msg_count,
792: p_data => x_msg_data
793: );
792: p_data => x_msg_data
793: );
794: WHEN OTHERS THEN
795: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
796: IF FND_MSG_PUB.Check_Msg_Level
797: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
798: THEN FND_MSG_PUB.Add_Exc_Msg
799: ( G_PKG_NAME,
800: l_api_name
793: );
794: WHEN OTHERS THEN
795: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
796: IF FND_MSG_PUB.Check_Msg_Level
797: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
798: THEN FND_MSG_PUB.Add_Exc_Msg
799: ( G_PKG_NAME,
800: l_api_name
801: );
794: WHEN OTHERS THEN
795: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
796: IF FND_MSG_PUB.Check_Msg_Level
797: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
798: THEN FND_MSG_PUB.Add_Exc_Msg
799: ( G_PKG_NAME,
800: l_api_name
801: );
802: END IF;
799: ( G_PKG_NAME,
800: l_api_name
801: );
802: END IF;
803: FND_MSG_PUB.Count_And_Get
804: ( p_encoded => FND_API.G_FALSE,
805: p_count => x_msg_count,
806: p_data => x_msg_data
807: );
972: END IF;
973:
974: ROLLBACK TO AVAILABLE_SERVICES_PUB;
975: x_return_status := FND_API.G_RET_STS_ERROR;
976: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
977: p_count => x_msg_count,
978: p_data => x_msg_data);
979: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
980: IF (IBE_UTIL.G_DEBUGON = FND_API.G_TRUE) THEN
982: END IF;
983:
984: ROLLBACK TO AVAILABLE_SERVICES_PUB;
985: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
986: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
987: p_count => x_msg_count,
988: p_data => x_msg_data);
989: WHEN OTHERS THEN
990: IF (IBE_UTIL.G_DEBUGON = FND_API.G_TRUE) THEN
993:
994: ROLLBACK TO AVAILABLE_SERVICES_PUB;
995: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
996:
997: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
998: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
999: l_api_name);
1000: END IF;
1001:
994: ROLLBACK TO AVAILABLE_SERVICES_PUB;
995: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
996:
997: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
998: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
999: l_api_name);
1000: END IF;
1001:
1002: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
998: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME,
999: l_api_name);
1000: END IF;
1001:
1002: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE,
1003: p_count => x_msg_count,
1004: p_data => x_msg_data);
1005:
1006: END GetAvailableServices;
1103: END IF;
1104:
1105: -- initialize message list if l_init_msg_list is set to TRUE
1106: IF FND_API.to_Boolean(l_init_msg_list) THEN
1107: FND_MSG_PUB.initialize;
1108: END IF;
1109:
1110: -- initialize API return status to success
1111: x_return_status := FND_API.G_RET_STS_SUCCESS;
1124: IF l_reltype_csr%NOTFOUND THEN
1125: CLOSE l_reltype_csr;
1126: FND_MESSAGE.Set_Name('IBE', 'IBE_CT_REL_NOT_EXIST');
1127: FND_MESSAGE.Set_Token('RELATIONSHIP_TYPE', p_reltype_code);
1128: FND_MSG_PUB.Add;
1129: RAISE FND_API.G_EXC_ERROR;
1130: END IF;
1131: CLOSE l_reltype_csr;
1132:
1201: IBE_UTIL.debug('IBE_CATALOG_PVT.GETRELATEDCATORSECTIDS(-)');
1202: END IF ;
1203:
1204: -- standard call to get messgae count and if count is 1, get message info.
1205: FND_MSG_PUB.Count_And_Get
1206: ( p_encoded => FND_API.G_FALSE,
1207: p_count => x_msg_count,
1208: p_data => x_msg_data
1209: );
1211: --ibe_util.disable_debug;
1212: EXCEPTION
1213: WHEN FND_API.G_EXC_ERROR THEN
1214: x_return_status := FND_API.G_RET_STS_ERROR;
1215: FND_MSG_PUB.Count_And_Get
1216: ( p_encoded => FND_API.G_FALSE,
1217: p_count => x_msg_count,
1218: p_data => x_msg_data
1219: );
1220: --gzhang 08/08/2002, bug#2488246
1221: --ibe_util.disable_debug;
1222: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1223: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1224: FND_MSG_PUB.Count_And_Get
1225: ( p_encoded => FND_API.G_FALSE,
1226: p_count => x_msg_count,
1227: p_data => x_msg_data
1228: );
1229: --gzhang 08/08/2002, bug#2488246
1230: --ibe_util.disable_debug;
1231: WHEN OTHERS THEN
1232: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1233: IF FND_MSG_PUB.Check_Msg_Level
1234: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1235: THEN FND_MSG_PUB.Add_Exc_Msg
1236: ( G_PKG_NAME,
1237: l_api_name
1230: --ibe_util.disable_debug;
1231: WHEN OTHERS THEN
1232: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1233: IF FND_MSG_PUB.Check_Msg_Level
1234: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1235: THEN FND_MSG_PUB.Add_Exc_Msg
1236: ( G_PKG_NAME,
1237: l_api_name
1238: );
1231: WHEN OTHERS THEN
1232: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1233: IF FND_MSG_PUB.Check_Msg_Level
1234: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1235: THEN FND_MSG_PUB.Add_Exc_Msg
1236: ( G_PKG_NAME,
1237: l_api_name
1238: );
1239: END IF;
1236: ( G_PKG_NAME,
1237: l_api_name
1238: );
1239: END IF;
1240: FND_MSG_PUB.Count_And_Get
1241: ( p_encoded => FND_API.G_FALSE,
1242: p_count => x_msg_count,
1243: p_data => x_msg_data
1244: );
1468: END IF;
1469:
1470: -- initialize message list if l_init_msg_list is set to TRUE
1471: IF FND_API.to_Boolean(l_init_msg_list) THEN
1472: FND_MSG_PUB.initialize;
1473: END IF;
1474:
1475: -- initialize API return status to success
1476: x_return_status := FND_API.G_RET_STS_SUCCESS;
1496: IF (IBE_UTIL.G_DEBUGON = FND_API.G_TRUE) THEN
1497: IBE_UTIL.debug('IBE_CATALOG_PVT.Get_Format_Mask_and_Symbol(-)');
1498: END IF;
1499: -- standard call to get message count and if count is 1, get message info.
1500: FND_MSG_PUB.Count_And_Get
1501: ( p_encoded => FND_API.G_FALSE,
1502: p_count => x_msg_count,
1503: p_data => x_msg_data
1504: );
1506: --ibe_util.disable_debug;
1507: EXCEPTION
1508: WHEN FND_API.G_EXC_ERROR THEN
1509: x_return_status := FND_API.G_RET_STS_ERROR;
1510: FND_MSG_PUB.Count_And_Get
1511: ( p_encoded => FND_API.G_FALSE,
1512: p_count => x_msg_count,
1513: p_data => x_msg_data
1514: );
1515: --gzhang 08/08/2002, bug#2488246
1516: --ibe_util.disable_debug;
1517: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1518: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1519: FND_MSG_PUB.Count_And_Get
1520: ( p_encoded => FND_API.G_FALSE,
1521: p_count => x_msg_count,
1522: p_data => x_msg_data
1523: );
1528: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1529: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1530: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1531: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1532: FND_MSG_PUB.Add;
1533: IF FND_MSG_PUB.Check_Msg_Level
1534: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1535: THEN FND_MSG_PUB.Add_Exc_Msg
1536: ( G_PKG_NAME,
1529: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1530: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1531: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1532: FND_MSG_PUB.Add;
1533: IF FND_MSG_PUB.Check_Msg_Level
1534: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1535: THEN FND_MSG_PUB.Add_Exc_Msg
1536: ( G_PKG_NAME,
1537: l_api_name
1530: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1531: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1532: FND_MSG_PUB.Add;
1533: IF FND_MSG_PUB.Check_Msg_Level
1534: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1535: THEN FND_MSG_PUB.Add_Exc_Msg
1536: ( G_PKG_NAME,
1537: l_api_name
1538: );
1531: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1532: FND_MSG_PUB.Add;
1533: IF FND_MSG_PUB.Check_Msg_Level
1534: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1535: THEN FND_MSG_PUB.Add_Exc_Msg
1536: ( G_PKG_NAME,
1537: l_api_name
1538: );
1539: END IF;
1536: ( G_PKG_NAME,
1537: l_api_name
1538: );
1539: END IF;
1540: FND_MSG_PUB.Count_And_Get
1541: ( p_encoded => FND_API.G_FALSE,
1542: p_count => x_msg_count,
1543: p_data => x_msg_data
1544: );
1584: END IF;
1585:
1586: -- initialize message list if L_init_msg_list is set to TRUE
1587: IF FND_API.to_Boolean(l_init_msg_list) THEN
1588: FND_MSG_PUB.initialize;
1589: END IF;
1590:
1591: -- initialize API return status to success
1592: x_return_status := FND_API.G_RET_STS_SUCCESS;
1616: IBE_UTIL.debug('IBE_CATALOG_PVT.validate_quantity(-)');
1617: END IF;
1618:
1619: -- standard call to get message count and if count is 1, get message info.
1620: FND_MSG_PUB.Count_And_Get
1621: ( p_encoded => FND_API.G_FALSE,
1622: p_count => x_msg_count,
1623: p_data => x_msg_data
1624: );
1626: --ibe_util.disable_debug;
1627: EXCEPTION
1628: WHEN FND_API.G_EXC_ERROR THEN
1629: x_return_status := FND_API.G_RET_STS_ERROR;
1630: FND_MSG_PUB.Count_And_Get
1631: ( p_encoded => FND_API.G_FALSE,
1632: p_count => x_msg_count,
1633: p_data => x_msg_data
1634: );
1635: --gzhang 08/08/2002, bug#2488246
1636: --ibe_util.disable_debug;
1637: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1638: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1639: FND_MSG_PUB.Count_And_Get
1640: ( p_encoded => FND_API.G_FALSE,
1641: p_count => x_msg_count,
1642: p_data => x_msg_data
1643: );
1648: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1649: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1650: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1651: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1652: FND_MSG_PUB.Add;
1653: IF FND_MSG_PUB.Check_Msg_Level
1654: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1655: THEN FND_MSG_PUB.Add_Exc_Msg
1656: (G_PKG_NAME,
1649: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1650: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1651: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1652: FND_MSG_PUB.Add;
1653: IF FND_MSG_PUB.Check_Msg_Level
1654: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1655: THEN FND_MSG_PUB.Add_Exc_Msg
1656: (G_PKG_NAME,
1657: l_api_name
1650: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1651: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1652: FND_MSG_PUB.Add;
1653: IF FND_MSG_PUB.Check_Msg_Level
1654: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1655: THEN FND_MSG_PUB.Add_Exc_Msg
1656: (G_PKG_NAME,
1657: l_api_name
1658: );
1651: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1652: FND_MSG_PUB.Add;
1653: IF FND_MSG_PUB.Check_Msg_Level
1654: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1655: THEN FND_MSG_PUB.Add_Exc_Msg
1656: (G_PKG_NAME,
1657: l_api_name
1658: );
1659: END IF;
1656: (G_PKG_NAME,
1657: l_api_name
1658: );
1659: END IF;
1660: FND_MSG_PUB.Count_And_Get
1661: ( p_encoded => FND_API.G_FALSE,
1662: p_count => x_msg_count,
1663: p_data => x_msg_data
1664: );
1707: END IF;
1708:
1709: -- initialize message list if L_init_msg_list is set to TRUE
1710: IF FND_API.to_Boolean(l_init_msg_list) THEN
1711: FND_MSG_PUB.initialize;
1712: END IF;
1713:
1714: -- initialize API return status to success
1715: x_return_status := FND_API.G_RET_STS_SUCCESS;
1751: end if;
1752: end loop;
1753:
1754: -- standard call to get message count and if count is 1, get message info.
1755: FND_MSG_PUB.Count_And_Get
1756: ( p_encoded => FND_API.G_FALSE,
1757: p_count => x_msg_count,
1758: p_data => x_msg_data
1759: );
1787: END LOOP;
1788: EXCEPTION
1789: WHEN FND_API.G_EXC_ERROR THEN
1790: x_return_status := FND_API.G_RET_STS_ERROR;
1791: FND_MSG_PUB.Count_And_Get
1792: ( p_encoded => FND_API.G_FALSE,
1793: p_count => x_msg_count,
1794: p_data => x_msg_data
1795: );
1796: --gzhang 08/08/2002, bug#2488246
1797: --ibe_util.disable_debug;
1798: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1799: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1800: FND_MSG_PUB.Count_And_Get
1801: ( p_encoded => FND_API.G_FALSE,
1802: p_count => x_msg_count,
1803: p_data => x_msg_data
1804: );
1809: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
1810: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1811: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1812: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1813: FND_MSG_PUB.Add;
1814: IF FND_MSG_PUB.Check_Msg_Level
1815: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1816: THEN FND_MSG_PUB.Add_Exc_Msg
1817: (G_PKG_NAME,
1810: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
1811: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1812: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1813: FND_MSG_PUB.Add;
1814: IF FND_MSG_PUB.Check_Msg_Level
1815: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1816: THEN FND_MSG_PUB.Add_Exc_Msg
1817: (G_PKG_NAME,
1818: l_api_name
1811: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
1812: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1813: FND_MSG_PUB.Add;
1814: IF FND_MSG_PUB.Check_Msg_Level
1815: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1816: THEN FND_MSG_PUB.Add_Exc_Msg
1817: (G_PKG_NAME,
1818: l_api_name
1819: );
1812: FND_MESSAGE.Set_Token('REASON', SQLERRM);
1813: FND_MSG_PUB.Add;
1814: IF FND_MSG_PUB.Check_Msg_Level
1815: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1816: THEN FND_MSG_PUB.Add_Exc_Msg
1817: (G_PKG_NAME,
1818: l_api_name
1819: );
1820: END IF;
1817: (G_PKG_NAME,
1818: l_api_name
1819: );
1820: END IF;
1821: FND_MSG_PUB.Count_And_Get
1822: ( p_encoded => FND_API.G_FALSE,
1823: p_count => x_msg_count,
1824: p_data => x_msg_data
1825: );
2002: END IF;
2003:
2004: -- initialize message list if L_init_msg_list is set to TRUE
2005: IF FND_API.to_Boolean(l_init_msg_list) THEN
2006: FND_MSG_PUB.initialize;
2007: END IF;
2008:
2009: -- initialize API return status to success
2010: x_return_status := FND_API.G_RET_STS_SUCCESS;
2024: IBE_UTIL.debug('Error: p_itm_id and p_accessname are both NULL');
2025: END IF;
2026: FND_MESSAGE.Set_Name('IBE', 'IBE_CT_INVALID_ID_OR_NAME');
2027: FND_MESSAGE.Set_Token('ID_NAME', p_partnum);
2028: FND_MSG_PUB.Add;
2029: RAISE FND_API.G_EXC_ERROR;
2030: ELSE
2031: --loading by part number
2032:
2118: END IF;
2119: --end API body
2120:
2121: -- standard call to get message count and if count is 1, get message info.
2122: FND_MSG_PUB.Count_And_Get
2123: ( p_encoded => FND_API.G_FALSE,
2124: p_count => x_msg_count,
2125: p_data => x_msg_data
2126: );
2126: );
2127: EXCEPTION
2128: WHEN FND_API.G_EXC_ERROR THEN
2129: x_return_status := FND_API.G_RET_STS_ERROR;
2130: FND_MSG_PUB.Count_And_Get
2131: ( p_encoded => FND_API.G_FALSE,
2132: p_count => x_msg_count,
2133: p_data => x_msg_data
2134: );
2135: --gzhang 08/08/2002, bug#2488246
2136: --ibe_util.disable_debug;
2137: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2138: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2139: FND_MSG_PUB.Count_And_Get
2140: ( p_encoded => FND_API.G_FALSE,
2141: p_count => x_msg_count,
2142: p_data => x_msg_data
2143: );
2148: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
2149: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
2150: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
2151: FND_MESSAGE.Set_Token('REASON', SQLERRM);
2152: FND_MSG_PUB.Add;
2153: IF FND_MSG_PUB.Check_Msg_Level
2154: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2155: THEN FND_MSG_PUB.Add_Exc_Msg
2156: ( G_PKG_NAME,
2149: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
2150: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
2151: FND_MESSAGE.Set_Token('REASON', SQLERRM);
2152: FND_MSG_PUB.Add;
2153: IF FND_MSG_PUB.Check_Msg_Level
2154: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2155: THEN FND_MSG_PUB.Add_Exc_Msg
2156: ( G_PKG_NAME,
2157: l_api_name
2150: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
2151: FND_MESSAGE.Set_Token('REASON', SQLERRM);
2152: FND_MSG_PUB.Add;
2153: IF FND_MSG_PUB.Check_Msg_Level
2154: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2155: THEN FND_MSG_PUB.Add_Exc_Msg
2156: ( G_PKG_NAME,
2157: l_api_name
2158: );
2151: FND_MESSAGE.Set_Token('REASON', SQLERRM);
2152: FND_MSG_PUB.Add;
2153: IF FND_MSG_PUB.Check_Msg_Level
2154: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2155: THEN FND_MSG_PUB.Add_Exc_Msg
2156: ( G_PKG_NAME,
2157: l_api_name
2158: );
2159: END IF;
2156: ( G_PKG_NAME,
2157: l_api_name
2158: );
2159: END IF;
2160: FND_MSG_PUB.Count_And_Get
2161: ( p_encoded => FND_API.G_FALSE,
2162: p_count => x_msg_count,
2163: p_data => x_msg_data
2164: );
2393: END IF;
2394:
2395: -- initialize message list if p_init_msg_list is set to TRUE
2396: IF FND_API.to_Boolean(p_init_msg_list) THEN
2397: FND_MSG_PUB.initialize;
2398: END IF;
2399:
2400: -- initialize API return status to success
2401: x_return_status := FND_API.G_RET_STS_SUCCESS;
2450: END IF;
2451: --end API body
2452:
2453: -- standard call to get message count and if count is 1, get message info.
2454: FND_MSG_PUB.Count_And_Get
2455: ( p_encoded => FND_API.G_FALSE,
2456: p_count => x_msg_count,
2457: p_data => x_msg_data
2458: );
2458: );
2459: EXCEPTION
2460: WHEN FND_API.G_EXC_ERROR THEN
2461: x_return_status := FND_API.G_RET_STS_ERROR;
2462: FND_MSG_PUB.Count_And_Get
2463: ( p_encoded => FND_API.G_FALSE,
2464: p_count => x_msg_count,
2465: p_data => x_msg_data
2466: );
2465: p_data => x_msg_data
2466: );
2467: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2468: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2469: FND_MSG_PUB.Count_And_Get
2470: ( p_encoded => FND_API.G_FALSE,
2471: p_count => x_msg_count,
2472: p_data => x_msg_data
2473: );
2476: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
2477: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
2478: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
2479: FND_MESSAGE.Set_Token('REASON', SQLERRM);
2480: FND_MSG_PUB.Add;
2481: IF FND_MSG_PUB.Check_Msg_Level
2482: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2483: THEN FND_MSG_PUB.Add_Exc_Msg
2484: ( G_PKG_NAME,
2477: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
2478: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
2479: FND_MESSAGE.Set_Token('REASON', SQLERRM);
2480: FND_MSG_PUB.Add;
2481: IF FND_MSG_PUB.Check_Msg_Level
2482: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2483: THEN FND_MSG_PUB.Add_Exc_Msg
2484: ( G_PKG_NAME,
2485: l_api_name
2478: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
2479: FND_MESSAGE.Set_Token('REASON', SQLERRM);
2480: FND_MSG_PUB.Add;
2481: IF FND_MSG_PUB.Check_Msg_Level
2482: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2483: THEN FND_MSG_PUB.Add_Exc_Msg
2484: ( G_PKG_NAME,
2485: l_api_name
2486: );
2479: FND_MESSAGE.Set_Token('REASON', SQLERRM);
2480: FND_MSG_PUB.Add;
2481: IF FND_MSG_PUB.Check_Msg_Level
2482: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2483: THEN FND_MSG_PUB.Add_Exc_Msg
2484: ( G_PKG_NAME,
2485: l_api_name
2486: );
2487: END IF;
2484: ( G_PKG_NAME,
2485: l_api_name
2486: );
2487: END IF;
2488: FND_MSG_PUB.Count_And_Get
2489: ( p_encoded => FND_API.G_FALSE,
2490: p_count => x_msg_count,
2491: p_data => x_msg_data
2492: );
2559: IBE_UTIL.debug('Error: p_itmid_tbl and p_partnum_tbl are both NULL');
2560: END IF;
2561: FND_MESSAGE.Set_Name('IBE', 'IBE_CT_INVALID_ID_OR_NAME');
2562: FND_MESSAGE.Set_Token('ID_NAME', 'NULL');
2563: FND_MSG_PUB.Add;
2564: RAISE FND_API.G_EXC_ERROR;
2565: RETURN;
2566: ELSE
2567: --loading by part number
2909: l_init_msg_list := FND_API.G_FALSE;
2910: END IF;
2911: -- initialize message list if L_init_msg_list is set to TRUE
2912: IF FND_API.to_Boolean(l_init_msg_list) THEN
2913: FND_MSG_PUB.initialize;
2914: END IF;
2915:
2916: -- initialize API return status to success
2917: x_return_status := FND_API.G_RET_STS_SUCCESS;
2958: END IF;
2959: --end API body
2960:
2961: -- standard call to get message count and if count is 1, get message info.
2962: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE, p_count => x_msg_count, p_data => x_msg_data);
2963: l_end_time := DBMS_UTILITY.GET_TIME;
2964: IF (IBE_UTIL.G_DEBUGON = FND_API.G_TRUE) THEN
2965: IBE_UTIL.debug(G_PKG_NAME||'.'||l_api_name||':END, elapsed time (s) ='||(l_end_time-l_start_time)/100);
2966: END IF;
2967:
2968: EXCEPTION
2969: WHEN FND_API.G_EXC_ERROR THEN
2970: x_return_status := FND_API.G_RET_STS_ERROR;
2971: FND_MSG_PUB.Count_And_Get
2972: ( p_encoded => FND_API.G_FALSE,
2973: p_count => x_msg_count,
2974: p_data => x_msg_data
2975: );
2976: --gzhang 08/08/2002, bug#2488246
2977: --ibe_util.disable_debug;
2978: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2979: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2980: FND_MSG_PUB.Count_And_Get
2981: ( p_encoded => FND_API.G_FALSE,
2982: p_count => x_msg_count,
2983: p_data => x_msg_data
2984: );
2989: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
2990: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
2991: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
2992: FND_MESSAGE.Set_Token('REASON', SQLERRM);
2993: FND_MSG_PUB.Add;
2994: IF FND_MSG_PUB.Check_Msg_Level
2995: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2996: THEN FND_MSG_PUB.Add_Exc_Msg
2997: ( G_PKG_NAME,
2990: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
2991: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
2992: FND_MESSAGE.Set_Token('REASON', SQLERRM);
2993: FND_MSG_PUB.Add;
2994: IF FND_MSG_PUB.Check_Msg_Level
2995: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2996: THEN FND_MSG_PUB.Add_Exc_Msg
2997: ( G_PKG_NAME,
2998: l_api_name
2991: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
2992: FND_MESSAGE.Set_Token('REASON', SQLERRM);
2993: FND_MSG_PUB.Add;
2994: IF FND_MSG_PUB.Check_Msg_Level
2995: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2996: THEN FND_MSG_PUB.Add_Exc_Msg
2997: ( G_PKG_NAME,
2998: l_api_name
2999: );
2992: FND_MESSAGE.Set_Token('REASON', SQLERRM);
2993: FND_MSG_PUB.Add;
2994: IF FND_MSG_PUB.Check_Msg_Level
2995: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2996: THEN FND_MSG_PUB.Add_Exc_Msg
2997: ( G_PKG_NAME,
2998: l_api_name
2999: );
3000: END IF;
2997: ( G_PKG_NAME,
2998: l_api_name
2999: );
3000: END IF;
3001: FND_MSG_PUB.Count_And_Get
3002: ( p_encoded => FND_API.G_FALSE,
3003: p_count => x_msg_count,
3004: p_data => x_msg_data
3005: );
3050: l_init_msg_list := FND_API.G_FALSE;
3051: END IF;
3052: -- initialize message list if p_init_msg_list is set to TRUE
3053: IF FND_API.to_Boolean(p_init_msg_list) THEN
3054: FND_MSG_PUB.initialize;
3055: END IF;
3056:
3057: -- initialize API return status to success
3058: x_return_status := FND_API.G_RET_STS_SUCCESS;
3123: CLOSE l_itm_attr_csr;
3124: EXCEPTION
3125: WHEN FND_API.G_EXC_ERROR THEN
3126: x_return_status := FND_API.G_RET_STS_ERROR;
3127: FND_MSG_PUB.Count_And_Get
3128: ( p_encoded => FND_API.G_FALSE,
3129: p_count => x_msg_count,
3130: p_data => x_msg_data
3131: );
3132: --gzhang 08/08/2002, bug#2488246
3133: --ibe_util.disable_debug;
3134: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3135: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3136: FND_MSG_PUB.Count_And_Get
3137: ( p_encoded => FND_API.G_FALSE,
3138: p_count => x_msg_count,
3139: p_data => x_msg_data
3140: );
3145: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
3146: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
3147: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
3148: FND_MESSAGE.Set_Token('REASON', SQLERRM);
3149: FND_MSG_PUB.Add;
3150: IF FND_MSG_PUB.Check_Msg_Level
3151: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3152: THEN FND_MSG_PUB.Add_Exc_Msg
3153: ( G_PKG_NAME,
3146: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
3147: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
3148: FND_MESSAGE.Set_Token('REASON', SQLERRM);
3149: FND_MSG_PUB.Add;
3150: IF FND_MSG_PUB.Check_Msg_Level
3151: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3152: THEN FND_MSG_PUB.Add_Exc_Msg
3153: ( G_PKG_NAME,
3154: l_api_name
3147: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
3148: FND_MESSAGE.Set_Token('REASON', SQLERRM);
3149: FND_MSG_PUB.Add;
3150: IF FND_MSG_PUB.Check_Msg_Level
3151: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3152: THEN FND_MSG_PUB.Add_Exc_Msg
3153: ( G_PKG_NAME,
3154: l_api_name
3155: );
3148: FND_MESSAGE.Set_Token('REASON', SQLERRM);
3149: FND_MSG_PUB.Add;
3150: IF FND_MSG_PUB.Check_Msg_Level
3151: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3152: THEN FND_MSG_PUB.Add_Exc_Msg
3153: ( G_PKG_NAME,
3154: l_api_name
3155: );
3156: END IF;
3153: ( G_PKG_NAME,
3154: l_api_name
3155: );
3156: END IF;
3157: FND_MSG_PUB.Count_And_Get
3158: ( p_encoded => FND_API.G_FALSE,
3159: p_count => x_msg_count,
3160: p_data => x_msg_data
3161: );
3199: l_init_msg_list := FND_API.G_FALSE;
3200: END IF;
3201: -- initialize message list if l_init_msg_list is set to TRUE
3202: IF FND_API.to_Boolean(l_init_msg_list) THEN
3203: FND_MSG_PUB.initialize;
3204: END IF;
3205:
3206: -- initialize API return status to success
3207: x_return_status := FND_API.G_RET_STS_SUCCESS;
3230: CLOSE l_itms_msite_csr;
3231: EXCEPTION
3232: WHEN FND_API.G_EXC_ERROR THEN
3233: x_return_status := FND_API.G_RET_STS_ERROR;
3234: FND_MSG_PUB.Count_And_Get
3235: ( p_encoded => FND_API.G_FALSE,
3236: p_count => x_msg_count,
3237: p_data => x_msg_data
3238: );
3237: p_data => x_msg_data
3238: );
3239: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3240: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3241: FND_MSG_PUB.Count_And_Get
3242: ( p_encoded => FND_API.G_FALSE,
3243: p_count => x_msg_count,
3244: p_data => x_msg_data
3245: );
3248: FND_MESSAGE.Set_Name('FND', 'SQL_PLSQL_ERROR');
3249: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
3250: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
3251: FND_MESSAGE.Set_Token('REASON', SQLERRM);
3252: FND_MSG_PUB.Add;
3253: IF FND_MSG_PUB.Check_Msg_Level
3254: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3255: THEN FND_MSG_PUB.Add_Exc_Msg
3256: ( G_PKG_NAME,
3249: FND_MESSAGE.Set_Token('ROUTINE', l_api_name);
3250: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
3251: FND_MESSAGE.Set_Token('REASON', SQLERRM);
3252: FND_MSG_PUB.Add;
3253: IF FND_MSG_PUB.Check_Msg_Level
3254: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3255: THEN FND_MSG_PUB.Add_Exc_Msg
3256: ( G_PKG_NAME,
3257: l_api_name
3250: FND_MESSAGE.Set_Token('ERRNO', SQLCODE);
3251: FND_MESSAGE.Set_Token('REASON', SQLERRM);
3252: FND_MSG_PUB.Add;
3253: IF FND_MSG_PUB.Check_Msg_Level
3254: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3255: THEN FND_MSG_PUB.Add_Exc_Msg
3256: ( G_PKG_NAME,
3257: l_api_name
3258: );
3251: FND_MESSAGE.Set_Token('REASON', SQLERRM);
3252: FND_MSG_PUB.Add;
3253: IF FND_MSG_PUB.Check_Msg_Level
3254: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3255: THEN FND_MSG_PUB.Add_Exc_Msg
3256: ( G_PKG_NAME,
3257: l_api_name
3258: );
3259: END IF;
3256: ( G_PKG_NAME,
3257: l_api_name
3258: );
3259: END IF;
3260: FND_MSG_PUB.Count_And_Get
3261: ( p_encoded => FND_API.G_FALSE,
3262: p_count => x_msg_count,
3263: p_data => x_msg_data
3264: );