882: LogMessage(FND_LOG.LEVEL_STATEMENT, 'l_return_status: ' || l_return_status);
883: LogMessage(FND_LOG.LEVEL_STATEMENT, 'l_msg_data: ' || l_msg_data);
884:
885: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
886: l_error := FND_MSG_PUB.Get(p_encoded => 'F');
887: end if;
888:
889: EXCEPTION
890: WHEN OTHERS THEN
1383:
1384: if P_SEARCH_RECEIPTS_REC.LOAN_ID is null then
1385:
1386: FND_MESSAGE.SET_NAME('LNS', 'LNS_NO_LOAN');
1387: FND_MSG_PUB.Add;
1388: LogMessage(FND_LOG.LEVEL_UNEXPECTED, FND_MSG_PUB.Get(p_encoded => 'F'));
1389: RAISE FND_API.G_EXC_ERROR;
1390:
1391: end if;
1384: if P_SEARCH_RECEIPTS_REC.LOAN_ID is null then
1385:
1386: FND_MESSAGE.SET_NAME('LNS', 'LNS_NO_LOAN');
1387: FND_MSG_PUB.Add;
1388: LogMessage(FND_LOG.LEVEL_UNEXPECTED, FND_MSG_PUB.Get(p_encoded => 'F'));
1389: RAISE FND_API.G_EXC_ERROR;
1390:
1391: end if;
1392:
1603:
1604: if P_LOAN_ID is null then
1605:
1606: FND_MESSAGE.SET_NAME('LNS', 'LNS_NO_LOAN');
1607: FND_MSG_PUB.Add;
1608: LogMessage(FND_LOG.LEVEL_UNEXPECTED, FND_MSG_PUB.Get(p_encoded => 'F'));
1609: RAISE FND_API.G_EXC_ERROR;
1610:
1611: end if;
1604: if P_LOAN_ID is null then
1605:
1606: FND_MESSAGE.SET_NAME('LNS', 'LNS_NO_LOAN');
1607: FND_MSG_PUB.Add;
1608: LogMessage(FND_LOG.LEVEL_UNEXPECTED, FND_MSG_PUB.Get(p_encoded => 'F'));
1609: RAISE FND_API.G_EXC_ERROR;
1610:
1611: end if;
1612:
1898: END IF;
1899:
1900: -- Initialize message list if p_init_msg_list is set to TRUE
1901: IF FND_API.To_Boolean(p_init_msg_list) THEN
1902: FND_MSG_PUB.initialize;
1903: END IF;
1904:
1905: -- Initialize API return status to success
1906: l_return_status := FND_API.G_RET_STS_SUCCESS;
2033: -- END OF BODY OF API
2034: x_return_status := FND_API.G_RET_STS_SUCCESS;
2035:
2036: -- Standard call to get message count and if count is 1, get message info
2037: FND_MSG_PUB.Count_And_Get(
2038: p_encoded => FND_API.G_FALSE,
2039: p_count => x_msg_count,
2040: p_data => x_msg_data);
2041:
2044: EXCEPTION
2045: WHEN FND_API.G_EXC_ERROR THEN
2046: ROLLBACK TO SEARCH_AND_APPLY;
2047: x_return_status := FND_API.G_RET_STS_ERROR;
2048: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
2049: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked loans');
2050: g_cr_return_status := 'ERROR';
2051: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2052: ROLLBACK TO SEARCH_AND_APPLY;
2050: g_cr_return_status := 'ERROR';
2051: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2052: ROLLBACK TO SEARCH_AND_APPLY;
2053: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2054: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
2055: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked loans');
2056: g_cr_return_status := 'ERROR';
2057: WHEN OTHERS THEN
2058: ROLLBACK TO SEARCH_AND_APPLY;
2056: g_cr_return_status := 'ERROR';
2057: WHEN OTHERS THEN
2058: ROLLBACK TO SEARCH_AND_APPLY;
2059: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2060: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)THEN
2061: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2062: END IF;
2063: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
2064: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked loans');
2057: WHEN OTHERS THEN
2058: ROLLBACK TO SEARCH_AND_APPLY;
2059: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2060: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)THEN
2061: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2062: END IF;
2063: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
2064: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked loans');
2065: g_cr_return_status := 'ERROR';
2059: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2060: IF FND_MSG_PUB.Check_Msg_Level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)THEN
2061: FND_MSG_PUB.Add_Exc_Msg(G_PKG_NAME, l_api_name);
2062: END IF;
2063: FND_MSG_PUB.Count_And_Get(p_count => x_msg_count, p_data => x_msg_data);
2064: LogMessage(FND_LOG.LEVEL_UNEXPECTED, 'Rollbacked loans');
2065: g_cr_return_status := 'ERROR';
2066: END;
2067: