embedded python methods in objectscript

Author: evshvarov

module.xml

@@ -3,7 +3,7 @@
   <Document name="iris-python-template.ZPM">
     <Module>
       <Name>iris-python-template</Name>
-      <Version>1.0.4</Version>
+      <Version>2.0.1</Version>
       <Description>The simplest template to run embedded python</Description>
       <Packaging>module</Packaging>
       <SourcesRoot>src</SourcesRoot>

src/dc/python/PersistentClass.cls

@@ -4,25 +4,42 @@ Class dc.python.PersistentClass Extends %Persistent
 /// Description
 Property Test As %VarString;
 
-ClassMethod CreateRecord(ByRef id As %Integer) As %Status
+ClassMethod CreateRecord(propValue As %VarString = "TestString", ByRef id As %Integer) As %Status
 {
     set sc=$$$OK
-    set objPC=..%New()
-    set objPC.Test="Test string"
-    set sc=objPC.%Save()
-    set id=objPC.%Id()
+    set obj=..%New()
+    set obj.Test=propValue
+    set sc=obj.%Save()
+    set id=obj.%Id()
+    return sc
+}
+
+ClassMethod CreateRecordPython(propValue As %VarString, ByRef id As %Integer) [ Language = python ]
+{
+    import iris
+    obj=iris.cls(__name__)._New()
+    obj.Test=propValue
+    sc=obj._Save()
+    id=obj._Id()
     return sc
 }
 
 /// opens the record by id and reads its property
-ClassMethod ReadProperty(id As %Integer) As %Status
+ClassMethod PrintProperty(id As %Integer) As %Status
 {
     Set sc = $$$OK
     set obj=..%OpenId(id,,.sc)
     if $ISOBJECT(obj) write obj.Test
     Return sc
 }
 
+ClassMethod PrintPropertyPython(id As %Integer) [ Language = python ]
+{
+    import iris
+    obj=iris.cls(__name__)._OpenId(id)
+    print(obj.Test)
+}
+
 Storage Default
 {
 <Data name="PersistentClassDefaultData">