1: PACKAGE BODY hz_location_bo_pub AS
2: /*$Header: ARHBLCBB.pls 120.5 2006/05/18 22:25:40 acng noship $ */
3:
4: PROCEDURE do_create_location_bo(
5: p_init_msg_list IN VARCHAR2 := fnd_api.g_false,
1128: END IF;
1129:
1130: -- Debug info.
1131: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1132: hz_utility_v2pub.debug(p_message=>'hz_location_bo_pub.get_location_bo(+)',
1133: p_prefix=>l_debug_prefix,
1134: p_msg_level=>fnd_log.level_procedure);
1135: END IF;
1136:
1181: END IF;
1182:
1183: -- Debug info.
1184: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1185: hz_utility_v2pub.debug(p_message=>'hz_location_bo_pub.get_location_bo (-)',
1186: p_prefix=>l_debug_prefix,
1187: p_msg_level=>fnd_log.level_procedure);
1188: END IF;
1189: EXCEPTION
1200: p_msg_type=>'ERROR',
1201: p_msg_level=>fnd_log.level_error);
1202: END IF;
1203: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1204: hz_utility_v2pub.debug(p_message=>'hz_location_bo_pub.get_location_bo (-)',
1205: p_prefix=>l_debug_prefix,
1206: p_msg_level=>fnd_log.level_procedure);
1207: END IF;
1208: WHEN fnd_api.g_exc_unexpected_error THEN
1218: p_msg_type=>'UNEXPECTED ERROR',
1219: p_msg_level=>fnd_log.level_error);
1220: END IF;
1221: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1222: hz_utility_v2pub.debug(p_message=>'hz_location_bo_pub.get_location_bo (-)',
1223: p_prefix=>l_debug_prefix,
1224: p_msg_level=>fnd_log.level_procedure);
1225: END IF;
1226: WHEN OTHERS THEN
1240: p_msg_type=>'SQL ERROR',
1241: p_msg_level=>fnd_log.level_error);
1242: END IF;
1243: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
1244: hz_utility_v2pub.debug(p_message=>'hz_location_bo_pub.get_location_bo (-)',
1245: p_prefix=>l_debug_prefix,
1246: p_msg_level=>fnd_log.level_procedure);
1247: END IF;
1248: END get_location_bo;
1273: x_msg_count => l_msg_count,
1274: x_msg_data => l_msg_data);
1275: END get_location_bo;
1276:
1277: END hz_location_bo_pub;