159: THEN
160: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
161: END IF;
162:
163: --Call the procedure AHL_UTIL_PKG.Get_Appln_Usage
164: AHL_UTIL_PKG.Get_Appln_Usage
165: (
166: x_appln_code => l_appln_code,
167: x_return_status => l_return_status
160: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
161: END IF;
162:
163: --Call the procedure AHL_UTIL_PKG.Get_Appln_Usage
164: AHL_UTIL_PKG.Get_Appln_Usage
165: (
166: x_appln_code => l_appln_code,
167: x_return_status => l_return_status
168: );
173: RAISE FND_API.G_EXC_ERROR;
174: END IF;
175:
176: IF (G_DEBUG_STMT >= G_DEBUG_LEVEL ) THEN
177: FND_LOG.STRING(G_DEBUG_STMT, L_DEBUG_MODULE , ' After Calling AHL_UTIL_PKG.Get_Appln_Usage successfully' );
178: FND_LOG.STRING(G_DEBUG_STMT, L_DEBUG_MODULE , ' l_appln_code: ' || l_appln_code);
179: FND_LOG.STRING(G_DEBUG_STMT, L_DEBUG_MODULE , ' l_return_status: ' || l_return_status);
180: END IF;
181:
820: -- API body starts here
821: -- Initialize API return status to success
822: x_return_status := FND_API.G_RET_STS_SUCCESS;
823:
824: --Call the procedure AHL_UTIL_PKG.Get_Appln_Usage
825: AHL_UTIL_PKG.Get_Appln_Usage
826: (
827: x_appln_code => l_appln_code,
828: x_return_status => l_return_status
821: -- Initialize API return status to success
822: x_return_status := FND_API.G_RET_STS_SUCCESS;
823:
824: --Call the procedure AHL_UTIL_PKG.Get_Appln_Usage
825: AHL_UTIL_PKG.Get_Appln_Usage
826: (
827: x_appln_code => l_appln_code,
828: x_return_status => l_return_status
829: );