iris-pex-embedded-python 3.4.3b2__tar.gz → 3.4.3b3__tar.gz

{iris_pex_embedded_python-3.4.3b2 → iris_pex_embedded_python-3.4.3b3}/PKG-INFO

@@ -1,6 +1,6 @@
 Metadata-Version: 2.4
 Name: iris_pex_embedded_python
-Version: 3.4.3b2
+Version: 3.4.3b3
 Summary: Iris Interoperability based on Embedded Python
 Author-email: grongier <guillaume.rongier@intersystems.com>
 License: MIT License

{iris_pex_embedded_python-3.4.3b2 → iris_pex_embedded_python-3.4.3b3}/pyproject.toml

@@ -3,7 +3,7 @@ requires = ["setuptools", "wheel"]
 
 [project]
 name = "iris_pex_embedded_python"
-version = "3.4.3b2"
+version = "3.4.3b3"
 description = "Iris Interoperability based on Embedded Python"
 readme = "README.md"
 authors = [

{iris_pex_embedded_python-3.4.3b2 → iris_pex_embedded_python-3.4.3b3}/src/iop/cls/IOP/BusinessOperation.cls

@@ -15,7 +15,7 @@ Method OnMessage(
 	try {
 		set response = ..%class."_dispatch_on_message"(request)
 	} catch ex {
-		set tSC = ex.AsStatus()
+		set tSC = ..DisplayTraceback(ex)
 	}
 	quit tSC
 }
@@ -27,7 +27,7 @@ Method OnKeepalive(pStatus As %Status = {$$$OK}) As %Status
 		$$$ThrowOnError(##super(pStatus))
 		do ..%class."on_keepalive"()
 	} catch ex {
-		set tSC = ex.AsStatus()
+		set tSC = ..DisplayTraceback(ex)
 	}
 	quit tSC
 }

{iris_pex_embedded_python-3.4.3b2 → iris_pex_embedded_python-3.4.3b3}/src/iop/cls/IOP/BusinessProcess.cls

@@ -32,8 +32,13 @@ Method dispatchSendRequestAsync(
 	completionKey,
 	description)
 {
-    set tSC = ..SendRequestAsync(target,request,responseRequired,completionKey,description)
-    if $$$ISERR(tSC) throw ##class(%Exception.StatusException).CreateFromStatus(tSC)
+	Try {
+		$$$ThrowOnError(..SendRequestAsync(target,request,responseRequired,completionKey,description))
+	}
+	Catch ex {
+		set tSC = ..DisplayTraceback(ex)
+	}
+
     quit
 }
 
@@ -45,7 +50,7 @@ Method OnRequest(
 	try {
 		set response = ..%class."_dispatch_on_request"($this,request)
 	} catch ex {
-		set tSC = ex.AsStatus()
+		set tSC = ..DisplayTraceback(ex)
 	}
 	quit tSC
 }
@@ -62,7 +67,7 @@ Method OnResponse(
 	try {
 		set response = ..%class."_dispatch_on_response"($this,request,response,callRequest,callResponse,pCompletionKey)
 	} catch ex {
-		set tSC = ex.AsStatus()
+		set tSC = ..DisplayTraceback(ex)
 	}
 	quit tSC
 }
@@ -75,7 +80,7 @@ Method OnComplete(
 	try {
 		set response = ..%class."_dispatch_on_complete"($this,request,response)
 	} catch ex {
-		set tSC = ex.AsStatus()
+		set tSC = ..DisplayTraceback(ex)
 	}
 	quit tSC
 }
@@ -111,6 +116,21 @@ Storage Default
 <Value name="5">
 <Value>%class</Value>
 </Value>
+<Value name="6">
+<Value>%enable</Value>
+</Value>
+<Value name="7">
+<Value>%timeout</Value>
+</Value>
+<Value name="8">
+<Value>%port</Value>
+</Value>
+<Value name="9">
+<Value>%PythonInterpreterPath</Value>
+</Value>
+<Value name="10">
+<Value>%traceback</Value>
+</Value>
 </Data>
 <Data name="persistentProperties">
 <Attribute>persistentProperties</Attribute>

{iris_pex_embedded_python-3.4.3b2 → iris_pex_embedded_python-3.4.3b3}/src/iop/cls/IOP/BusinessService.cls

@@ -9,8 +9,13 @@ Parameter SETTINGS = "%classname:Python BusinessService,%module:Python BusinessS
 
 Method dispatchProcessInput(pInput As %RegisteredObject) As %RegisteredObject
 {
-	
-	quit ..%class."on_process_input"(pInput)
+	try {
+		set response = ..%class."_dispatch_on_process_input"(pInput)
+	} catch ex {
+		set tSC = ..DisplayTraceback(ex)
+		throw ##class(%Exception.StatusException).CreateFromStatus(tSC)
+	}
+	quit response
 }
 
 Method OnProcessInput(
@@ -27,7 +32,7 @@ Method OnProcessInput(
 			set ..%WaitForNextCallInterval = ..%class."_wait_for_next_call_interval"
 		} catch {}
 	} catch ex {
-		set tSC = ex.AsStatus()
+		set tSC = ..DisplayTraceback(ex)
 	}
 	quit tSC
 }

{iris_pex_embedded_python-3.4.3b2 → iris_pex_embedded_python-3.4.3b3}/src/iop/cls/IOP/Common.cls

@@ -27,6 +27,8 @@ Property %port As %Numeric [ InitialExpression = 0 ];
 
 Property %PythonInterpreterPath As %String(MAXLEN = 255);
 
+Property %traceback As %Boolean;
+
 /// Get Class
 Method GetClass() As %SYS.Python
 {
@@ -45,15 +47,45 @@ Method GetModule() As %String
     Return ..%module
 }
 
+Method DisplayTraceback(ex) As %Status
+{
+    set tSC = ex.AsStatus()
+    // Check if traceback is enabled
+    if ..%traceback {
+        // Import Modules
+        set sys = ##class(%SYS.Python).Import("sys")
+        set tracebackModule = ##class(%SYS.Python).Import("traceback")
+        set builtins = ##class(%SYS.Python).Import("builtins")
+        // Get the last traceback
+        set traceback = sys."last_traceback"
+        set exType = sys."last_type"."__name__"
+        set exValue = sys."last_value"."__str__"()
+        // Check if traceback is an object
+        if $isObject(traceback) {
+            // Format the traceback
+            set tb = tracebackModule."format_exception"(sys."last_type", sys."last_value", traceback)
+            set tbString = ""
+            for i=0:1:(tb."__len__"()-1) {
+                set tbString = tbString _ $c(10)_$c(13) _ tb."__getitem__"(i)
+            }
+            $$$LOGERROR(tbString)
+            set tSC = $$$ERROR($$$EnsErrGeneral,"Exception in Python class: "_..%classname_" - "_exType_" - "_exValue)
+        }
+    }
+    return tSC
+}
+
 Method OnInit() As %Status
 {
     set tSC = $$$OK
     try {
+        do $system.Python.Debugging(..%traceback)
         $$$ThrowOnError(..Connect())
         do ..%class."_debugpy"($this)
         do ..%class."_dispatch_on_init"($this)
     } catch ex {
-        set tSC = ex.AsStatus()
+
+        set tSC = ..DisplayTraceback(ex)
     }
     quit tSC
 }
@@ -154,13 +186,14 @@ Method SetPropertyValues()
     // First list all the properties of the current class
     set class = $CLASSNAME()
     set tSQL = "SELECT * FROM %Dictionary.PropertyDefinition WHERE parent = ?"
-    set tSQL = tSQL _ " AND name <> 'timeout'"
-    set tSQL = tSQL _ " and name <> 'enable'"
+    set tSQL = tSQL _ " AND name <> '%timeout'"
+    set tSQL = tSQL _ " and name <> '%enable'"
     set tSQL = tSQL _ " and name <> '%classpaths'"
     set tSQL = tSQL _ " and name <> '%classname'"
     set tSQL = tSQL _ " and name <> '%module'"
-    set tSQL = tSQL _ " and name <> 'port'"
-    set tSQL = tSQL _ " and name <> 'PythonInterpreterPath'"
+    set tSQL = tSQL _ " and name <> '%port'"
+    set tSQL = tSQL _ " and name <> '%PythonInterpreterPath'"
+    set tSQL = tSQL _ " and name <> '%traceback'"
 
     set tStmt = ##class(%SQL.Statement).%New()
 

{iris_pex_embedded_python-3.4.3b2 → iris_pex_embedded_python-3.4.3b3}/src/iop/cls/IOP/InboundAdapter.cls

@@ -14,7 +14,7 @@ Method OnTask() As %Status
 		$$$ThrowOnError(..Connect())
 		do ..%class."on_task"()
 	} catch ex {
-		set tSC = ex.AsStatus()
+		set tSC = ..DisplayTraceback(ex)
 	}
 	quit tSC
 }

{iris_pex_embedded_python-3.4.3b2 → iris_pex_embedded_python-3.4.3b3}/src/iop/cls/IOP/OutboundAdapter.cls

@@ -28,7 +28,7 @@ Method OnKeepalive(pStatus As %Status = {$$$OK}) As %Status
 		$$$ThrowOnError(##super(pStatus))
 		do ..%class."on_keepalive"()
 	} catch ex {
-		set tSC = ex.AsStatus()
+		set tSC = ..DisplayTraceback(ex)
 	}
 	quit tSC
 }

{iris_pex_embedded_python-3.4.3b2 → iris_pex_embedded_python-3.4.3b3}/src/iop/cls/IOP/Utils.cls

@@ -226,7 +226,7 @@ ClassMethod GenerateProxyClass(
 		}
 		
 		#; Do not display any of the connection settings
-		#dim tSETTINGSParamValue As %String = "%classname:Python $type,%module:Python $type,%settings:Python $type,%classpaths:Python $type,%enable:Python Debug $type,%timeout:Python Debug $type,%port:Python Debug $type,%PythonInterpreterPath:Python Debug $type"
+		#dim tSETTINGSParamValue As %String = "%classname:Python $type,%module:Python $type,%settings:Python $type,%classpaths:Python $type,%enable:Python Debug $type,%timeout:Python Debug $type,%port:Python Debug $type,%PythonInterpreterPath:Python Debug $type,%traceback:Python Debug $type"
 		
 		#dim tPropClassname As %Dictionary.PropertyDefinition = ##class(%Dictionary.PropertyDefinition).%New()
 		Set tPropClassname.Name = "%classname"

{iris_pex_embedded_python-3.4.3b2 → iris_pex_embedded_python-3.4.3b3}/src/iris_pex_embedded_python.egg-info/PKG-INFO

@@ -1,6 +1,6 @@
 Metadata-Version: 2.4
 Name: iris_pex_embedded_python
-Version: 3.4.3b2
+Version: 3.4.3b3
 Summary: Iris Interoperability based on Embedded Python
 Author-email: grongier <guillaume.rongier@intersystems.com>
 License: MIT License