DBA Data[Home] [Help]

APPS.AHL_APPR_SPACE_UNAVL_PUB dependencies on AHL_APPR_SPACE_UNAVL_PUB

Line 1: PACKAGE BODY AHL_APPR_SPACE_UNAVL_PUB AS

1: PACKAGE BODY AHL_APPR_SPACE_UNAVL_PUB AS
2: /* $Header: AHLPSUAB.pls 115.6 2003/11/04 10:43:12 rroy noship $ */
3:
4: G_PKG_NAME VARCHAR2(30) := 'AHL_APPR_SPACE_UNAVL_PUB';
5: G_DEBUG VARCHAR2(1) := AHL_DEBUG_PUB.is_log_enabled;

Line 4: G_PKG_NAME VARCHAR2(30) := 'AHL_APPR_SPACE_UNAVL_PUB';

1: PACKAGE BODY AHL_APPR_SPACE_UNAVL_PUB AS
2: /* $Header: AHLPSUAB.pls 115.6 2003/11/04 10:43:12 rroy noship $ */
3:
4: G_PKG_NAME VARCHAR2(30) := 'AHL_APPR_SPACE_UNAVL_PUB';
5: G_DEBUG VARCHAR2(1) := AHL_DEBUG_PUB.is_log_enabled;
6: --
7: -----------------------------------------------------------
8: -- PACKAGE

Line 9: -- AHL_APPR_SPACE_UNAVL_PUB

5: G_DEBUG VARCHAR2(1) := AHL_DEBUG_PUB.is_log_enabled;
6: --
7: -----------------------------------------------------------
8: -- PACKAGE
9: -- AHL_APPR_SPACE_UNAVL_PUB
10: --
11: -- PURPOSE
12: -- This package is a Public API for managing Space Unavailable information in
13: -- Advanced Services Online. It contains specification for pl/sql records and tables

Line 66: AHL_DEBUG_PUB.debug( 'enter ahl_appr_space_unavl_pub.Process Space Restriction','+SUAVL+');

62: AHL_DEBUG_PUB.enable_debug;
63: END IF;
64: -- Debug info.
65: IF G_DEBUG='Y' THEN
66: AHL_DEBUG_PUB.debug( 'enter ahl_appr_space_unavl_pub.Process Space Restriction','+SUAVL+');
67: END IF;
68: -- Standard call to check for call compatibility.
69: IF FND_API.to_boolean(p_init_msg_list)
70: THEN

Line 162: AHL_DEBUG_PUB.debug( 'ahl_appr_space_unavl_pub.Process Space Restriction','+SUAVL+');

158:
159: IF G_DEBUG='Y' THEN
160: AHL_DEBUG_PUB.log_app_messages (
161: x_msg_count, x_msg_data, 'ERROR' );
162: AHL_DEBUG_PUB.debug( 'ahl_appr_space_unavl_pub.Process Space Restriction','+SUAVL+');
163: END IF;
164: -- Check if API is called in debug mode. If yes, disable debug.
165: AHL_DEBUG_PUB.disable_debug;
166:

Line 177: AHL_DEBUG_PUB.debug( 'ahl_appr_space_unavl_pub.Process Space Restriction','+SUAVL+');

173: -- Debug info.
174: IF G_DEBUG='Y' THEN
175: AHL_DEBUG_PUB.log_app_messages (
176: x_msg_count, x_msg_data, 'UNEXPECTED ERROR' );
177: AHL_DEBUG_PUB.debug( 'ahl_appr_space_unavl_pub.Process Space Restriction','+SUAVL+');
178: END IF;
179: -- Check if API is called in debug mode. If yes, disable debug.
180: AHL_DEBUG_PUB.disable_debug;
181:

Line 187: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_APPR_SPACE_UNAVL_PUB',

183: ROLLBACK TO process_space_restriction;
184: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
185: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
186: THEN
187: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_APPR_SPACE_UNAVL_PUB',
188: p_procedure_name => 'PROCESS_SPACE_RESTRICTION',
189: p_error_text => SUBSTR(SQLERRM,1,240));
190: END IF;
191: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

Line 199: AHL_DEBUG_PUB.debug( 'ahl_appr_space_unavl_pub.Process Space Restriction','+SUAVL+');

195: -- Debug info.
196: IF G_DEBUG='Y' THEN
197: AHL_DEBUG_PUB.log_app_messages (
198: x_msg_count, x_msg_data, 'SQL ERROR' );
199: AHL_DEBUG_PUB.debug( 'ahl_appr_space_unavl_pub.Process Space Restriction','+SUAVL+');
200: END IF;
201: -- Check if API is called in debug mode. If yes, disable debug.
202: AHL_DEBUG_PUB.disable_debug;
203:

Line 206: END AHL_APPR_SPACE_UNAVL_PUB;

202: AHL_DEBUG_PUB.disable_debug;
203:
204: END Process_Space_Restriction;
205:
206: END AHL_APPR_SPACE_UNAVL_PUB;