1: PACKAGE BODY AHL_UMP_UF_PVT AS
2: /* $Header: AHLVUMFB.pls 120.2.12020000.2 2012/12/07 16:13:15 sareepar ship $ */
3:
4: --G_DEBUG varchar2(1) := FND_PROFILE.VALUE('AHL_API_FILE_DEBUG_ON');
5: G_DEBUG VARCHAR2(1) := AHL_DEBUG_PUB.is_log_enabled;
6: G_PKG_NAME CONSTANT VARCHAR2(30) := 'AHL_UMP_UF_PVT';
7: G_APP_NAME CONSTANT VARCHAR2(3) := 'AHL';
8:
9:
145: x_return_status := FND_API.G_RET_STS_SUCCESS;
146:
147: -- Enable Debug.
148: IF G_DEBUG = 'Y' THEN
149: AHL_DEBUG_PUB.enable_debug;
150: END IF;
151:
152: IF G_DEBUG = 'Y' THEN
153: AHL_DEBUG_PUB.debug('Started processing UF');
149: AHL_DEBUG_PUB.enable_debug;
150: END IF;
151:
152: IF G_DEBUG = 'Y' THEN
153: AHL_DEBUG_PUB.debug('Started processing UF');
154: END IF;
155: -------
156: process_uf_header(
157: p_validation_level => p_validation_level,
200: p_encoded => fnd_api.g_false
201: );
202:
203: IF G_DEBUG = 'Y' THEN
204: AHL_DEBUG_PUB.debug('Successfully ending processing UF');
205: END IF;
206:
207: -- Disable debug
208: IF G_DEBUG = 'Y' THEN
205: END IF;
206:
207: -- Disable debug
208: IF G_DEBUG = 'Y' THEN
209: AHL_DEBUG_PUB.disable_debug;
210: END IF;
211:
212: EXCEPTION
213: WHEN FND_API.G_EXC_ERROR THEN
217: p_data => x_msg_data,
218: p_encoded => fnd_api.g_false);
219: -- Disable debug
220: IF G_DEBUG = 'Y' THEN
221: AHL_DEBUG_PUB.disable_debug;
222: END IF;
223:
224:
225: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
229: p_data => x_msg_data,
230: p_encoded => fnd_api.g_false);
231: -- Disable debug
232: IF G_DEBUG = 'Y' THEN
233: AHL_DEBUG_PUB.disable_debug;
234: END IF;
235:
236: WHEN OTHERS THEN
237: Rollback to process_uf_pvt;
245: p_data => x_msg_data,
246: p_encoded => fnd_api.g_false);
247: -- Disable debug
248: IF G_DEBUG = 'Y' THEN
249: AHL_DEBUG_PUB.disable_debug;
250: END IF;
251:
252:
253: END process_utilization_forecast;