443: END IF;
444:
445: -- Check p_init_msg_list
446: IF FND_API.to_boolean(p_init_msg_list) THEN
447: FND_MSG_PUB.initialize;
448: END IF;
449:
450: -- initialize API return status to success
451: x_return_status := FND_API.G_RET_STS_SUCCESS;
1654: END IF;
1655: --
1656:
1657: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1658: IF FND_MSG_PUB.check_msg_level
1659: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1660: THEN
1661: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1662: END IF;
1655: --
1656:
1657: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1658: IF FND_MSG_PUB.check_msg_level
1659: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1660: THEN
1661: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1662: END IF;
1663: FND_MSG_PUB.count_and_get ( p_count => x_msg_count, p_data => x_msg_data);
1657: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1658: IF FND_MSG_PUB.check_msg_level
1659: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1660: THEN
1661: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1662: END IF;
1663: FND_MSG_PUB.count_and_get ( p_count => x_msg_count, p_data => x_msg_data);
1664:
1665:
1659: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1660: THEN
1661: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1662: END IF;
1663: FND_MSG_PUB.count_and_get ( p_count => x_msg_count, p_data => x_msg_data);
1664:
1665:
1666: --
1667: -- Debug Statements
1673: --
1674: WHEN OTHERS THEN
1675: ROLLBACK TO Log_Exception_PUB ;
1676: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1677: IF FND_MSG_PUB.check_msg_level
1678: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1679: THEN
1680: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1681: END IF;
1674: WHEN OTHERS THEN
1675: ROLLBACK TO Log_Exception_PUB ;
1676: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1677: IF FND_MSG_PUB.check_msg_level
1678: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1679: THEN
1680: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1681: END IF;
1682: FND_MSG_PUB.count_and_get ( p_count => x_msg_count, p_data => x_msg_data);
1676: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1677: IF FND_MSG_PUB.check_msg_level
1678: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1679: THEN
1680: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1681: END IF;
1682: FND_MSG_PUB.count_and_get ( p_count => x_msg_count, p_data => x_msg_data);
1683:
1684: --
1678: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1679: THEN
1680: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1681: END IF;
1682: FND_MSG_PUB.count_and_get ( p_count => x_msg_count, p_data => x_msg_data);
1683:
1684: --
1685: -- Debug Statements
1686: --
1821: END IF;
1822:
1823: -- Check p_init_msg_list
1824: IF FND_API.to_boolean(p_init_msg_list) THEN
1825: FND_MSG_PUB.initialize;
1826: END IF;
1827:
1828: -- initialize API return status to success
1829: x_return_status := FND_API.G_RET_STS_SUCCESS;
2058: --
2059: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2060: ROLLBACK TO Change_Status_PUB ;
2061: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2062: IF FND_MSG_PUB.check_msg_level
2063: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2064: THEN
2065: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2066: END IF;
2059: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2060: ROLLBACK TO Change_Status_PUB ;
2061: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2062: IF FND_MSG_PUB.check_msg_level
2063: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2064: THEN
2065: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2066: END IF;
2067: FND_MSG_PUB.count_and_get ( p_count => x_msg_count, p_data => x_msg_data);
2061: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2062: IF FND_MSG_PUB.check_msg_level
2063: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2064: THEN
2065: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2066: END IF;
2067: FND_MSG_PUB.count_and_get ( p_count => x_msg_count, p_data => x_msg_data);
2068:
2069:
2063: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2064: THEN
2065: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2066: END IF;
2067: FND_MSG_PUB.count_and_get ( p_count => x_msg_count, p_data => x_msg_data);
2068:
2069:
2070: --
2071: -- Debug Statements
2097:
2098: WHEN OTHERS THEN
2099: ROLLBACK TO Change_Status_PUB ;
2100: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2101: IF FND_MSG_PUB.check_msg_level
2102: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2103: THEN
2104: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2105: END IF;
2098: WHEN OTHERS THEN
2099: ROLLBACK TO Change_Status_PUB ;
2100: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2101: IF FND_MSG_PUB.check_msg_level
2102: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2103: THEN
2104: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2105: END IF;
2106: FND_MSG_PUB.count_and_get ( p_count => x_msg_count, p_data => x_msg_data);
2100: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2101: IF FND_MSG_PUB.check_msg_level
2102: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2103: THEN
2104: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2105: END IF;
2106: FND_MSG_PUB.count_and_get ( p_count => x_msg_count, p_data => x_msg_data);
2107:
2108: --
2102: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2103: THEN
2104: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2105: END IF;
2106: FND_MSG_PUB.count_and_get ( p_count => x_msg_count, p_data => x_msg_data);
2107:
2108: --
2109: -- Debug Statements
2110: --
3380: l_api_name ,
3381: G_PKG_NAME )
3382: THEN
3383: FND_MESSAGE.SET_NAME('WSH', 'WSH_INCOMPATIBLE_API_CALL');
3384: FND_MSG_PUB.ADD;
3385: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3386: END IF;
3387: -- Initialize message list if p_init_msg_list is set to TRUE.
3388: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3385: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3386: END IF;
3387: -- Initialize message list if p_init_msg_list is set to TRUE.
3388: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3389: FND_MSG_PUB.initialize;
3390: END IF;
3391: -- Initialize API return status to success
3392: x_return_status := FND_API.G_RET_STS_SUCCESS;
3393:
3767:
3768: --IF (l_count > 0) THEN
3769: IF SQL%NOTFOUND THEN
3770: FND_MESSAGE.SET_NAME('WSH', 'WSH_PURGE_FAILED');
3771: FND_MSG_PUB.ADD;
3772: RAISE WSH_PURGE_FAILED;
3773: END IF;
3774:
3775: --END IF;
4058: END IF;
4059:
4060: -- Check p_init_msg_list
4061: IF FND_API.to_boolean(p_init_msg_list) THEN
4062: FND_MSG_PUB.initialize;
4063: END IF;
4064:
4065: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4066:
4316: EXCEPTION
4317: WHEN WSH_CHECK_EXCEPTIONS_FAILED THEN
4318: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4319: wsh_util_core.add_message(x_return_status);
4320: FND_MSG_PUB.Count_And_Get(
4321: p_count => x_msg_count,
4322: p_data => x_msg_data,
4323: p_encoded => FND_API.G_FALSE
4324: );
4334: WHEN WSH_INVALID_LOGGING_ENTITY THEN
4335: FND_MESSAGE.Set_Name('FND', 'WSH_XC_INVALID_LOGGING_ENTITY');
4336: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4337: wsh_util_core.add_message(x_return_status);
4338: FND_MSG_PUB.Count_And_Get(
4339: p_count => x_msg_count,
4340: p_data => x_msg_data,
4341: p_encoded => FND_API.G_FALSE
4342: );
4515: END IF;
4516:
4517: -- Check p_init_msg_list
4518: IF FND_API.to_boolean(p_init_msg_list) THEN
4519: FND_MSG_PUB.initialize;
4520: END IF;
4521:
4522: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4523:
4679: EXCEPTION
4680: WHEN WSH_CLOSE_EXCEPTIONS_FAILED THEN
4681: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4682: wsh_util_core.add_message(x_return_status);
4683: FND_MSG_PUB.Count_And_Get(
4684: p_count => x_msg_count,
4685: p_data => x_msg_data,
4686: p_encoded => FND_API.G_FALSE
4687: );
4697:
4698: WHEN WSH_PURGE_FAILED THEN
4699: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4700: wsh_util_core.add_message(x_return_status);
4701: FND_MSG_PUB.Count_And_Get(
4702: p_count => x_msg_count,
4703: p_data => x_msg_data,
4704: p_encoded => FND_API.G_FALSE
4705: );
4716: WHEN WSH_INVALID_LOGGING_ENTITY THEN
4717: FND_MESSAGE.Set_Name('FND', 'WSH_XC_INVALID_LOGGING_ENTITY');
4718: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4719: wsh_util_core.add_message(x_return_status);
4720: FND_MSG_PUB.Count_And_Get(
4721: p_count => x_msg_count,
4722: p_data => x_msg_data,
4723: p_encoded => FND_API.G_FALSE
4724: );