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;
1655: END IF;
1656: --
1657:
1658: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1659: IF FND_MSG_PUB.check_msg_level
1660: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1661: THEN
1662: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1663: END IF;
1656: --
1657:
1658: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1659: IF FND_MSG_PUB.check_msg_level
1660: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1661: THEN
1662: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1663: END IF;
1664: FND_MSG_PUB.count_and_get ( p_count => x_msg_count, p_data => x_msg_data);
1658: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1659: IF FND_MSG_PUB.check_msg_level
1660: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1661: THEN
1662: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1663: END IF;
1664: FND_MSG_PUB.count_and_get ( p_count => x_msg_count, p_data => x_msg_data);
1665:
1666:
1660: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1661: THEN
1662: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1663: END IF;
1664: FND_MSG_PUB.count_and_get ( p_count => x_msg_count, p_data => x_msg_data);
1665:
1666:
1667: --
1668: -- Debug Statements
1674: --
1675: WHEN OTHERS THEN
1676: ROLLBACK TO Log_Exception_PUB ;
1677: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1678: IF FND_MSG_PUB.check_msg_level
1679: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1680: THEN
1681: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1682: END IF;
1675: WHEN OTHERS THEN
1676: ROLLBACK TO Log_Exception_PUB ;
1677: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1678: IF FND_MSG_PUB.check_msg_level
1679: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1680: THEN
1681: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1682: END IF;
1683: FND_MSG_PUB.count_and_get ( p_count => x_msg_count, p_data => x_msg_data);
1677: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1678: IF FND_MSG_PUB.check_msg_level
1679: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1680: THEN
1681: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1682: END IF;
1683: FND_MSG_PUB.count_and_get ( p_count => x_msg_count, p_data => x_msg_data);
1684:
1685: --
1679: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1680: THEN
1681: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
1682: END IF;
1683: FND_MSG_PUB.count_and_get ( p_count => x_msg_count, p_data => x_msg_data);
1684:
1685: --
1686: -- Debug Statements
1687: --
1822: END IF;
1823:
1824: -- Check p_init_msg_list
1825: IF FND_API.to_boolean(p_init_msg_list) THEN
1826: FND_MSG_PUB.initialize;
1827: END IF;
1828:
1829: -- initialize API return status to success
1830: x_return_status := FND_API.G_RET_STS_SUCCESS;
2059: --
2060: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2061: ROLLBACK TO Change_Status_PUB ;
2062: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2063: IF FND_MSG_PUB.check_msg_level
2064: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2065: THEN
2066: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2067: END IF;
2060: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2061: ROLLBACK TO Change_Status_PUB ;
2062: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2063: IF FND_MSG_PUB.check_msg_level
2064: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2065: THEN
2066: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2067: END IF;
2068: FND_MSG_PUB.count_and_get ( p_count => x_msg_count, p_data => x_msg_data);
2062: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2063: IF FND_MSG_PUB.check_msg_level
2064: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2065: THEN
2066: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2067: END IF;
2068: FND_MSG_PUB.count_and_get ( p_count => x_msg_count, p_data => x_msg_data);
2069:
2070:
2064: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2065: THEN
2066: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2067: END IF;
2068: FND_MSG_PUB.count_and_get ( p_count => x_msg_count, p_data => x_msg_data);
2069:
2070:
2071: --
2072: -- Debug Statements
2098:
2099: WHEN OTHERS THEN
2100: ROLLBACK TO Change_Status_PUB ;
2101: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2102: IF FND_MSG_PUB.check_msg_level
2103: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2104: THEN
2105: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2106: END IF;
2099: WHEN OTHERS THEN
2100: ROLLBACK TO Change_Status_PUB ;
2101: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2102: IF FND_MSG_PUB.check_msg_level
2103: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2104: THEN
2105: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2106: END IF;
2107: FND_MSG_PUB.count_and_get ( p_count => x_msg_count, p_data => x_msg_data);
2101: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2102: IF FND_MSG_PUB.check_msg_level
2103: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2104: THEN
2105: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2106: END IF;
2107: FND_MSG_PUB.count_and_get ( p_count => x_msg_count, p_data => x_msg_data);
2108:
2109: --
2103: (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2104: THEN
2105: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2106: END IF;
2107: FND_MSG_PUB.count_and_get ( p_count => x_msg_count, p_data => x_msg_data);
2108:
2109: --
2110: -- Debug Statements
2111: --
3388: l_api_name ,
3389: G_PKG_NAME )
3390: THEN
3391: FND_MESSAGE.SET_NAME('WSH', 'WSH_INCOMPATIBLE_API_CALL');
3392: FND_MSG_PUB.ADD;
3393: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3394: END IF;
3395: -- Initialize message list if p_init_msg_list is set to TRUE.
3396: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3393: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3394: END IF;
3395: -- Initialize message list if p_init_msg_list is set to TRUE.
3396: IF FND_API.to_Boolean( p_init_msg_list ) THEN
3397: FND_MSG_PUB.initialize;
3398: END IF;
3399: -- Initialize API return status to success
3400: x_return_status := FND_API.G_RET_STS_SUCCESS;
3401:
3775:
3776: --IF (l_count > 0) THEN
3777: IF SQL%NOTFOUND THEN
3778: FND_MESSAGE.SET_NAME('WSH', 'WSH_PURGE_FAILED');
3779: FND_MSG_PUB.ADD;
3780: RAISE WSH_PURGE_FAILED;
3781: END IF;
3782:
3783: --END IF;
4066: END IF;
4067:
4068: -- Check p_init_msg_list
4069: IF FND_API.to_boolean(p_init_msg_list) THEN
4070: FND_MSG_PUB.initialize;
4071: END IF;
4072:
4073: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4074:
4324: EXCEPTION
4325: WHEN WSH_CHECK_EXCEPTIONS_FAILED THEN
4326: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4327: wsh_util_core.add_message(x_return_status);
4328: FND_MSG_PUB.Count_And_Get(
4329: p_count => x_msg_count,
4330: p_data => x_msg_data,
4331: p_encoded => FND_API.G_FALSE
4332: );
4342: WHEN WSH_INVALID_LOGGING_ENTITY THEN
4343: FND_MESSAGE.Set_Name('FND', 'WSH_XC_INVALID_LOGGING_ENTITY');
4344: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4345: wsh_util_core.add_message(x_return_status);
4346: FND_MSG_PUB.Count_And_Get(
4347: p_count => x_msg_count,
4348: p_data => x_msg_data,
4349: p_encoded => FND_API.G_FALSE
4350: );
4523: END IF;
4524:
4525: -- Check p_init_msg_list
4526: IF FND_API.to_boolean(p_init_msg_list) THEN
4527: FND_MSG_PUB.initialize;
4528: END IF;
4529:
4530: x_return_status := WSH_UTIL_CORE.G_RET_STS_SUCCESS;
4531:
4687: EXCEPTION
4688: WHEN WSH_CLOSE_EXCEPTIONS_FAILED THEN
4689: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4690: wsh_util_core.add_message(x_return_status);
4691: FND_MSG_PUB.Count_And_Get(
4692: p_count => x_msg_count,
4693: p_data => x_msg_data,
4694: p_encoded => FND_API.G_FALSE
4695: );
4705:
4706: WHEN WSH_PURGE_FAILED THEN
4707: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4708: wsh_util_core.add_message(x_return_status);
4709: FND_MSG_PUB.Count_And_Get(
4710: p_count => x_msg_count,
4711: p_data => x_msg_data,
4712: p_encoded => FND_API.G_FALSE
4713: );
4724: WHEN WSH_INVALID_LOGGING_ENTITY THEN
4725: FND_MESSAGE.Set_Name('FND', 'WSH_XC_INVALID_LOGGING_ENTITY');
4726: x_return_status := WSH_UTIL_CORE.G_RET_STS_ERROR;
4727: wsh_util_core.add_message(x_return_status);
4728: FND_MSG_PUB.Count_And_Get(
4729: p_count => x_msg_count,
4730: p_data => x_msg_data,
4731: p_encoded => FND_API.G_FALSE
4732: );