49: PROCEDURE LogMsg (p_module_name IN VARCHAR2,
50: p_text IN VARCHAR2) IS
51: BEGIN
52: IF l_debug_on THEN
53: WSH_DEBUG_SV.LogMsg(p_module_name, p_text);
54: END IF;
55: -- testpkg2.print_to_file(p_text);
56: END LogMsg;
57:
69: p_attribute IN VARCHAR2,
70: p_value IN VARCHAR2) IS
71: BEGIN
72: IF l_debug_on THEN
73: WSH_DEBUG_SV.Log(x_Module => p_module_name,
74: x_Text => p_attribute,
75: x_Value => p_value);
76: END IF;
77: -- testpkg2.print_to_file(p_attribute || '=> ' || p_value);
93: --SETUP DEBUGGING
94: IF (NOT g_debug_set) THEN
95: l_debug_on := WSH_DEBUG_INTERFACE.g_debug;
96: IF l_debug_on IS NULL THEN
97: l_debug_on := WSH_DEBUG_SV.is_debug_enabled;
98: END IF;
99: g_debug_set := TRUE;
100: END IF;
101:
99: g_debug_set := TRUE;
100: END IF;
101:
102: IF l_debug_on THEN
103: WSH_DEBUG_SV.push(p_module_name);
104: END IF;
105: END Init_Debug;
106:
107: -----------------------------------------------------------------------------
115: -----------------------------------------------------------------------------
116: PROCEDURE Exit_Debug(p_module_name IN VARCHAR2) IS
117: BEGIN
118: IF l_debug_on THEN
119: WSH_DEBUG_SV.pop(p_module_name);
120: END IF;
121: END Exit_Debug;
122:
123:
743: CLOSE get_uom_class;
744: END IF;
745:
746: IF l_debug_on THEN
747: WSH_DEBUG_SV.Log(l_module_name, 'l_pall_loading_rate', l_pall_loading_rate);
748: WSH_DEBUG_SV.Log(l_module_name, 'l_pall_unloading_rate', l_pall_unloading_rate);
749: WSH_DEBUG_SV.Log(l_module_name, 'l_pall_handling_uom', l_pall_handling_uom);
750: WSH_DEBUG_SV.Log(l_module_name, 'l_NPall_loading_rate', l_NPall_loading_rate);
751: WSH_DEBUG_SV.Log(l_module_name, 'l_NPall_unloading_rate', l_NPall_unloading_rate);
744: END IF;
745:
746: IF l_debug_on THEN
747: WSH_DEBUG_SV.Log(l_module_name, 'l_pall_loading_rate', l_pall_loading_rate);
748: WSH_DEBUG_SV.Log(l_module_name, 'l_pall_unloading_rate', l_pall_unloading_rate);
749: WSH_DEBUG_SV.Log(l_module_name, 'l_pall_handling_uom', l_pall_handling_uom);
750: WSH_DEBUG_SV.Log(l_module_name, 'l_NPall_loading_rate', l_NPall_loading_rate);
751: WSH_DEBUG_SV.Log(l_module_name, 'l_NPall_unloading_rate', l_NPall_unloading_rate);
752: WSH_DEBUG_SV.Log(l_module_name, 'l_NPall_handling_uom', l_NPall_handling_uom);
745:
746: IF l_debug_on THEN
747: WSH_DEBUG_SV.Log(l_module_name, 'l_pall_loading_rate', l_pall_loading_rate);
748: WSH_DEBUG_SV.Log(l_module_name, 'l_pall_unloading_rate', l_pall_unloading_rate);
749: WSH_DEBUG_SV.Log(l_module_name, 'l_pall_handling_uom', l_pall_handling_uom);
750: WSH_DEBUG_SV.Log(l_module_name, 'l_NPall_loading_rate', l_NPall_loading_rate);
751: WSH_DEBUG_SV.Log(l_module_name, 'l_NPall_unloading_rate', l_NPall_unloading_rate);
752: WSH_DEBUG_SV.Log(l_module_name, 'l_NPall_handling_uom', l_NPall_handling_uom);
753: WSH_DEBUG_SV.Log(l_module_name, 'l_Pall_Handling_type', l_Pall_Handling_type);
746: IF l_debug_on THEN
747: WSH_DEBUG_SV.Log(l_module_name, 'l_pall_loading_rate', l_pall_loading_rate);
748: WSH_DEBUG_SV.Log(l_module_name, 'l_pall_unloading_rate', l_pall_unloading_rate);
749: WSH_DEBUG_SV.Log(l_module_name, 'l_pall_handling_uom', l_pall_handling_uom);
750: WSH_DEBUG_SV.Log(l_module_name, 'l_NPall_loading_rate', l_NPall_loading_rate);
751: WSH_DEBUG_SV.Log(l_module_name, 'l_NPall_unloading_rate', l_NPall_unloading_rate);
752: WSH_DEBUG_SV.Log(l_module_name, 'l_NPall_handling_uom', l_NPall_handling_uom);
753: WSH_DEBUG_SV.Log(l_module_name, 'l_Pall_Handling_type', l_Pall_Handling_type);
754: WSH_DEBUG_SV.Log(l_module_name, 'l_NPall_Handling_type', l_NPall_Handling_type);
747: WSH_DEBUG_SV.Log(l_module_name, 'l_pall_loading_rate', l_pall_loading_rate);
748: WSH_DEBUG_SV.Log(l_module_name, 'l_pall_unloading_rate', l_pall_unloading_rate);
749: WSH_DEBUG_SV.Log(l_module_name, 'l_pall_handling_uom', l_pall_handling_uom);
750: WSH_DEBUG_SV.Log(l_module_name, 'l_NPall_loading_rate', l_NPall_loading_rate);
751: WSH_DEBUG_SV.Log(l_module_name, 'l_NPall_unloading_rate', l_NPall_unloading_rate);
752: WSH_DEBUG_SV.Log(l_module_name, 'l_NPall_handling_uom', l_NPall_handling_uom);
753: WSH_DEBUG_SV.Log(l_module_name, 'l_Pall_Handling_type', l_Pall_Handling_type);
754: WSH_DEBUG_SV.Log(l_module_name, 'l_NPall_Handling_type', l_NPall_Handling_type);
755: END IF;
748: WSH_DEBUG_SV.Log(l_module_name, 'l_pall_unloading_rate', l_pall_unloading_rate);
749: WSH_DEBUG_SV.Log(l_module_name, 'l_pall_handling_uom', l_pall_handling_uom);
750: WSH_DEBUG_SV.Log(l_module_name, 'l_NPall_loading_rate', l_NPall_loading_rate);
751: WSH_DEBUG_SV.Log(l_module_name, 'l_NPall_unloading_rate', l_NPall_unloading_rate);
752: WSH_DEBUG_SV.Log(l_module_name, 'l_NPall_handling_uom', l_NPall_handling_uom);
753: WSH_DEBUG_SV.Log(l_module_name, 'l_Pall_Handling_type', l_Pall_Handling_type);
754: WSH_DEBUG_SV.Log(l_module_name, 'l_NPall_Handling_type', l_NPall_Handling_type);
755: END IF;
756:
749: WSH_DEBUG_SV.Log(l_module_name, 'l_pall_handling_uom', l_pall_handling_uom);
750: WSH_DEBUG_SV.Log(l_module_name, 'l_NPall_loading_rate', l_NPall_loading_rate);
751: WSH_DEBUG_SV.Log(l_module_name, 'l_NPall_unloading_rate', l_NPall_unloading_rate);
752: WSH_DEBUG_SV.Log(l_module_name, 'l_NPall_handling_uom', l_NPall_handling_uom);
753: WSH_DEBUG_SV.Log(l_module_name, 'l_Pall_Handling_type', l_Pall_Handling_type);
754: WSH_DEBUG_SV.Log(l_module_name, 'l_NPall_Handling_type', l_NPall_Handling_type);
755: END IF;
756:
757: EXCEPTION
750: WSH_DEBUG_SV.Log(l_module_name, 'l_NPall_loading_rate', l_NPall_loading_rate);
751: WSH_DEBUG_SV.Log(l_module_name, 'l_NPall_unloading_rate', l_NPall_unloading_rate);
752: WSH_DEBUG_SV.Log(l_module_name, 'l_NPall_handling_uom', l_NPall_handling_uom);
753: WSH_DEBUG_SV.Log(l_module_name, 'l_Pall_Handling_type', l_Pall_Handling_type);
754: WSH_DEBUG_SV.Log(l_module_name, 'l_NPall_Handling_type', l_NPall_Handling_type);
755: END IF;
756:
757: EXCEPTION
758: WHEN OTHERS THEN
1026:
1027: Reset_All;
1028: IF l_debug_on THEN
1029: IF x_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
1030: WSH_DEBUG_SV.pop(x_Module => l_module_name,
1031: x_Context => 'EXCEPTION:OTHERS');
1032: ELSE
1033: Exit_Debug(l_module_name);
1034: END IF;
1039: x_return_status := WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR;
1040: LogMsg(l_module_name, x_error_msg);
1041:
1042: IF l_debug_on THEN
1043: WSH_DEBUG_SV.pop(x_Module => l_module_name,
1044: x_Context => 'EXCEPTION:OTHERS');
1045: END IF;
1046: END Create_Facilities;
1047:
1118: END IF;
1119:
1120: IF l_debug_on THEN
1121: IF x_return_status = WSH_UTIL_CORE.G_RET_STS_UNEXP_ERROR THEN
1122: WSH_DEBUG_SV.pop(x_Module => l_module_name,
1123: x_Context => 'EXCEPTION:OTHERS');
1124: ELSE
1125: Exit_Debug(l_module_name);
1126: END IF;
1130: WHEN OTHERS THEN
1131: LogMsg(l_module_name, 'UNEXPECTED ERROR: ' || sqlerrm);
1132:
1133: IF l_debug_on THEN
1134: WSH_DEBUG_SV.pop(x_Module => l_module_name,
1135: x_Context => 'EXCEPTION:OTHERS');
1136: END IF;
1137: END Create_Facility;
1138: