iris-pex-embedded-python 3.1.5__py3-none-any.whl → 3.1.5b2__py3-none-any.whl

iop/_business_operation.py

@@ -36,7 +36,7 @@ class _BusinessOperation(_BusinessHost):
         """ For internal use only. """
         self.iris_handle = handle_current
         if type(handle_partner).__module__.find('iris') == 0:
-            if handle_partner._IsA("Grongier.PEX.OutboundAdapter") or handle_partner._IsA("IOP.OutboundAdapter"):
+            if handle_partner._IsA("Grongier.PEX.OutboundAdapter"):
                 module = importlib.import_module(handle_partner.GetModule())
                 handle_partner = getattr(module, handle_partner.GetClassname())()
             self.Adapter = self.adapter = handle_partner

iop/_business_service.py

@@ -30,7 +30,7 @@ class _BusinessService(_BusinessHost):
         """ For internal use only. """
         self.iris_handle = handle_current
         if type(handle_partner).__module__.find('iris') == 0:
-            if handle_partner._IsA("Grongier.PEX.InboundAdapter") or handle_partner._IsA("IOP.InboundAdapter"):
+            if handle_partner._IsA("Grongier.PEX.InboundAdapter"):
                 module = importlib.import_module(handle_partner.GetModule())
                 handle_partner = getattr(module, handle_partner.GetClassname())()
         self.Adapter = self.adapter = handle_partner

iop/_director.py

@@ -15,21 +15,6 @@ class _Director():
     Instead these business services are created by a custom application by calling the Director.CreateBusinessService() method.
     """
 
-    _bs = {}
-
-    def get_business_service(self,target,force_session_id=False):
-        """ get the business service
-        Parameters:
-        target: the name of the business service
-        force_session_id: if True, force the session id to be a new one
-        """
-        if target not in self._bs or self._bs[target] is None:
-            self._bs[target] = _Director.create_python_business_service(target)
-        if force_session_id:
-            self._bs[target].iris_handle._SessionId = ""
-            self._bs[target].iris_handle.ForceSessionId()
-        return self._bs[target]
-
     @staticmethod
     def CreateBusinessService(target):
         """ DEPRECATED : use create_business_service
@@ -55,7 +40,7 @@ class _Director():
         Returns:
             an object that contains an instance of IRISBusinessService
         """
-        iris_object = iris.cls("IOP.Director").dispatchCreateBusinessService(target)
+        iris_object = iris.cls("Grongier.PEX.Director").dispatchCreateBusinessService(target)
         return iris_object
 
     @staticmethod
@@ -69,7 +54,7 @@ class _Director():
         Returns:
             an object that contains an instance of IRISBusinessService
         """
-        iris_object = iris.cls("IOP.Director").dispatchCreateBusinessService(target)
+        iris_object = iris.cls("Grongier.PEX.Director").dispatchCreateBusinessService(target)
         return iris_object.GetClass()
     
     ### List of function to manage the production
@@ -127,12 +112,12 @@ class _Director():
     ### list production
     @staticmethod
     def list_productions():
-        return iris.cls('IOP.Director').dispatchListProductions()
+        return iris.cls('Grongier.PEX.Director').dispatchListProductions()
     
     ### status production
     @staticmethod
     def status_production():
-        dikt = iris.cls('IOP.Director').StatusProduction()
+        dikt = iris.cls('Grongier.PEX.Director').StatusProduction()
         if dikt['Production'] is None or dikt['Production'] == '':
             dikt['Production'] = _Director.get_default_production()
         return dikt

iop/_private_session_duplex.py

@@ -31,8 +31,7 @@ class _PrivateSessionDuplex(_BusinessHost):
         """ For internal use only. """
         self.iris_handle = handle_current
         if type(handle_partner).__module__.find('iris') == 0:
-            if (handle_partner._IsA("Grongier.PEX.InboundAdapter") or handle_partner._IsA("Grongier.PEX.OutboundAdapter")
-                or handle_partner._IsA("IOP.InboundAdapter") or handle_partner._IsA("IOP.OutboundAdapter")):
+            if handle_partner._IsA("Grongier.PEX.InboundAdapter") or handle_partner._IsA("Grongier.PEX.OutboundAdapter"):
                 module = importlib.import_module(handle_partner.GetModule())
                 handle_partner = getattr(module, handle_partner.GetClassname())()
         self.Adapter = self.adapter = handle_partner

iop/cls/IOP/Common.cls

@@ -118,13 +118,7 @@ Method Connect() As %Status
 Method OnTearDown() As %Status
 {
     set tSC = $$$OK
-    if $isObject(..%class) {
-        try {
-            do ..%class."_dispatch_on_tear_down"()
-        } catch ex {
-            set tSC = ex.AsStatus()
-        }
-    }
+    do ..%class."_dispatch_on_tear_down"()
     quit tSC
 }
 

iop/cls/IOP/Director.cls

@@ -9,13 +9,10 @@ Class IOP.Director [ Inheritance = right, ProcedureBlock, System = 4 ]
 
 ClassMethod dispatchCreateBusinessService(pTargetDispatchName As %String) As Ens.BusinessService
 {
-	set tSC = ##class(Ens.Director).CreateBusinessService(pTargetDispatchName,.service)
-	
 	// Hack to prevent job to be registered in the production
 	do ##class(Ens.Job).UnRegister(pTargetDispatchName,$JOB)
-	
+	set tSC = ##class(Ens.Director).CreateBusinessService(pTargetDispatchName,.service)
 	if $$$ISERR(tSC) throw ##class(%Exception.StatusException).CreateFromStatus(tSC)
-	
 	quit service
 }
 

iop/cls/IOP/Message.cls

@@ -1,3 +1,7 @@
+/* Copyright (c) 2021 by InterSystems Corporation.
+   Cambridge, Massachusetts, U.S.A.  All rights reserved.
+   Confidential property of InterSystems Corporation. */
+
 Class IOP.Message Extends (Ens.MessageBody, %CSP.Page, %XML.Adaptor)
 {
 
@@ -75,16 +79,11 @@ Method jsonSet(pInput) As %Status
 				, "Stream":..jsonStream
 				, :$$$NULLOREF)
 	Quit:tOldStream=pInput $$$OK
-
-	If ..type'="" {
-		Set:(..type="String") i%jsonString="" 
-		Set:(..type="Stream") i%jsonStream=$$$NULLOREF 
-		Set i%type = ""
-	}
+	Do:..type'="" Clear()  Set i%type=""
 
 	If $ISOBJECT(pInput) {
 		if pInput.%Extends("%Stream.GlobalCharacter") { 
-			Set r%jsonStream=pInput, i%type="Stream"
+			Set ..jsonStream=pInput, i%type="Stream" 
 		}
 		else { 
 			Throw ##class(%Exception.General).%New("Invalid input type, must be a %Stream.GlobalCharacter or a %String")
@@ -95,15 +94,18 @@ Method jsonSet(pInput) As %Status
 			// write in a stream
 			Set stream = ##class(%Stream.GlobalCharacter).%New()
 			for i=1:..#BUFFER:$LENGTH(pInput) {
-				Set sc = stream.Write($EXTRACT(pInput,i,(i+..#BUFFER-1)))
+				Set sc = stream.Write($EXTRACT(pInput,i,(i+..#BUFFER)))
 				Quit:$$$ISERR(sc)
 			}
-			Set r%jsonStream=stream, i%type="Stream"
-		}
-		else {
-			Set i%jsonString=pInput, i%type="String"
+			Set ..jsonStream=stream, i%type="Stream"
 		}
+		Set i%jsonString=pInput, i%type="String" 
 	}
+	Quit $$$OK
+Clear()
+	If ..type="String"     { Set r%jsonString="" }
+	ElseIf ..type="Stream" { Set r%jsonStream=$$$NULLOREF }
+	Quit
 }
 
 Method GetObjectJson(ByRef atEnd)