APPS.AHL_PRD_VISITS_PVT dependencies on AHL_DEBUG_PUB

Line 25: G_DEBUG VARCHAR2(1) := AHL_DEBUG_PUB.is_log_enabled;

21: -----------------------------------------------------------------
22: -- Define Global CONSTANTS --
23: -----------------------------------------------------------------
24: G_PKG_NAME CONSTANT VARCHAR2(30) := 'AHL_PRD_VISIT_PVT';
25: G_DEBUG VARCHAR2(1) := AHL_DEBUG_PUB.is_log_enabled;
26:
27: -- To find out Due_by_Date for the visit update screen.
28: PROCEDURE Get_Due_by_Date(
29: p_visit_id IN NUMBER,

Line 241: Ahl_Debug_Pub.enable_debug;

237: SAVEPOINT Get_Visit_Details;
238:
239: -- Check if API is called in debug mode. If yes, enable debug.
240: IF G_DEBUG='Y' THEN
241: Ahl_Debug_Pub.enable_debug;
242: END IF;
243:
244: -- Debug info.
245: IF G_DEBUG='Y' THEN

Line 246: AHL_DEBUG_PUB.Debug( 'Get Visit Details' ||': Start');

242: END IF;
243:
244: -- Debug info.
245: IF G_DEBUG='Y' THEN
246: AHL_DEBUG_PUB.Debug( 'Get Visit Details' ||': Start');
247: END IF;
248:
249: -- Initialize message list if p_init_msg_list is set to TRUE.
250: IF Fnd_Api.to_boolean(p_init_msg_list)

Line 279: AHL_DEBUG_PUB.Debug( 'Visit Id= ' || p_visit_id);

275:
276: ------------------------------------------ Start -----------------------------------
277: -- Debug info.
278: IF G_DEBUG='Y' THEN
279: AHL_DEBUG_PUB.Debug( 'Visit Id= ' || p_visit_id);
280: END IF;
281:
282: -- get workorder name and Id added in 11.5.10
283: OPEN c_workorder_csr(p_visit_id);

Line 305: AHL_DEBUG_PUB.Debug(L_FULL_NAME || 'UNIT NAME - item instance' || visit_rec.item_instance_id);

301: ----------------------------------- FOR VISITS --------------------------------------
302: --IF UPPER(c_visit_rec.template_flag) = 'N' THEN
303: -- To find Unit Name on basis of Instance Id
304: IF visit_rec.item_instance_id IS NOT NULL THEN
305: AHL_DEBUG_PUB.Debug(L_FULL_NAME || 'UNIT NAME - item instance' || visit_rec.item_instance_id);
306: -- Call Get_UnitName to get unit name for a particular instance_id
307: l_unit_name := Get_UnitName(visit_rec.item_instance_id);
308: AHL_DEBUG_PUB.Debug(L_FULL_NAME || 'UNIT NAME - l_unit_name' || l_unit_name);
309:

Line 308: AHL_DEBUG_PUB.Debug(L_FULL_NAME || 'UNIT NAME - l_unit_name' || l_unit_name);

304: IF visit_rec.item_instance_id IS NOT NULL THEN
305: AHL_DEBUG_PUB.Debug(L_FULL_NAME || 'UNIT NAME - item instance' || visit_rec.item_instance_id);
306: -- Call Get_UnitName to get unit name for a particular instance_id
307: l_unit_name := Get_UnitName(visit_rec.item_instance_id);
308: AHL_DEBUG_PUB.Debug(L_FULL_NAME || 'UNIT NAME - l_unit_name' || l_unit_name);
309:
310: -- Compare unit name entered from unit name derived
311: IF l_unit_name IS NOT NULL THEN
312: l_unit_name := l_unit_name;

Line 441: AHL_DEBUG_PUB.Debug( l_full_name ||': End of Get Visit Details**********************');

437: x_visit_rec := l_visit_rec;
438: END IF;
439:
440: IF G_DEBUG='Y' THEN
441: AHL_DEBUG_PUB.Debug( l_full_name ||': End of Get Visit Details**********************');
442: END IF;
443:
444: ------------------------End of API Body------------------------------------
445: -- Standard call to get message count and if count is 1, get message info

Line 453: Ahl_Debug_Pub.enable_debug;

449: p_encoded => Fnd_Api.g_false);
450:
451: -- Check if API is called in debug mode. If yes, enable debug.
452: IF G_DEBUG='Y' THEN
453: Ahl_Debug_Pub.enable_debug;
454: END IF;
455:
456: -- Debug info.
457: IF G_DEBUG='Y' THEN

Line 458: AHL_DEBUG_PUB.Debug( 'AHL_VWP_VISITS_PVT - End');

454: END IF;
455:
456: -- Debug info.
457: IF G_DEBUG='Y' THEN
458: AHL_DEBUG_PUB.Debug( 'AHL_VWP_VISITS_PVT - End');
459: END IF;
460:
461: -- Check if API is called in debug mode. If yes, disable debug.
462: IF G_DEBUG='Y' THEN

Line 463: Ahl_Debug_Pub.disable_debug;

459: END IF;
460:
461: -- Check if API is called in debug mode. If yes, disable debug.
462: IF G_DEBUG='Y' THEN
463: Ahl_Debug_Pub.disable_debug;
464: END IF;
465: RETURN;
466:
467: EXCEPTION