iris-pex-embedded-python 3.2.0b2__tar.gz → 3.2.0b4__tar.gz

{iris_pex_embedded_python-3.2.0b2 → iris_pex_embedded_python-3.2.0b4}/PKG-INFO

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

{iris_pex_embedded_python-3.2.0b2 → iris_pex_embedded_python-3.2.0b4}/pyproject.toml

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

{iris_pex_embedded_python-3.2.0b2 → iris_pex_embedded_python-3.2.0b4}/src/iop/cls/IOP/Message.cls

@@ -1,4 +1,4 @@
-Class IOP.Message Extends (Ens.MessageBody, %CSP.Page, %XML.Adaptor, Ens.VDoc.Interface)
+Class IOP.Message Extends (Ens.MessageBody, %CSP.Page, Ens.VDoc.Interface)
 {
 
 Parameter DOCCLASSNAME = "JSON Document";
@@ -27,6 +27,20 @@ Property jstr As %Stream.GlobalCharacter [ Internal, Private ];
 
 Property type As %String(MAXLEN = 6) [ ReadOnly ];
 
+/// Gets the next index in an array
+Method GetNextIndex(
+	pPath As %String,
+	pIndex As %String,
+	ByRef pStatus As %Status = {$$$OK}) As %String
+{
+    Set f=$F(pPath,"()")  If 'f Set pStatus=$$$ERROR($$$EnsErrGeneral,"Can't iterate on no-array type '"_pPath_"'") Quit ""
+    if pIndex="" Set pIndex=0
+    Set tValue = ..GetValueAt($EXTRACT(pPath, 1, $LENGTH(pPath)-2))
+    Set builtins = ##class(%SYS.Python).Builtins()
+    if pIndex>=builtins.len(tValue) Quit ""
+    Quit pIndex+1
+}
+
 Method GetValueAt(
 	pPropertyPath As %String = "",
 	pFormat As %String,
@@ -152,6 +166,12 @@ Method SetValueAt(
     Set tSC = $$$OK
     // if pAction is set, use jsonpath to set the value
     Try {
+        if pAction = "append" {
+            // trinm () from the end of the path
+            if $EXTRACT(pPropertyPath, *) = ")" {
+                Set pPropertyPath = $EXTRACT(pPropertyPath, 1, $LENGTH(pPropertyPath)-2)
+            }
+        }
         // Convert pPropertyPath to a a jsonpath
         Set tPath = ..ConvertPath(pPropertyPath)
 
@@ -159,6 +179,7 @@ Method SetValueAt(
         Set jp = ##class(%SYS.Python).Import("jsonpath_ng")
         Set builtins = ##class(%SYS.Python).Builtins()
 
+        // By default, if json is empty, set it to an empty object
         if ..json = "" {
             Set ..json = "{}"
         }
@@ -168,6 +189,18 @@ Method SetValueAt(
         if pAction = "set" {
             Set tJSON = parser."update_or_create"(tJSON, pValue)
         }
+        ElseIf pAction = "append" {
+            Set tFindValue = parser."find"(tJSON)
+            if tFindValue."__len__"() = 0 {
+                Set tList = builtins.list()
+                Do tList.append(pValue)
+                Set tJSON = parser."update_or_create"(tJSON,tList)
+            }
+            Else {
+                Do tFindValue."__getitem__"(0)."value".append(pValue)
+                Set tJSON = parser."update"(tJSON, tFindValue."__getitem__"(0)."value")
+            }
+        }
 
         Set tResult = pyjson.dumps(tJSON)
         Set ..json = tResult
@@ -327,7 +360,7 @@ ClassMethod GetContentArray(
         If $$$ISERR(tSC) Return tSC
         set schema = {}.%FromJSON(json)
 
-        $$$ThrowOnError(##class(IOP.Message.Document).SchemaToContents(schema, .tContents))
+        $$$ThrowOnError(##class(IOP.Message).SchemaToContents(schema, .tContents))
 
         Merge @pContents = tContents
     }

{iris_pex_embedded_python-3.2.0b2 → iris_pex_embedded_python-3.2.0b4}/src/iris_pex_embedded_python.egg-info/PKG-INFO

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