是否可以编写 ObjectScript 方法,该方法将在命名空间中创建新类并编译它?我的意思是以编程方式创建新类并存储它。如果是这样,我可以稍后使用 ObjectScript 编辑这个类(并重新编译)吗?
原因:我在字符串变量中定义了类结构,我需要根据这个字符串将新类添加到命名空间。
是否可以编写 ObjectScript 方法,该方法将在命名空间中创建新类并编译它?我的意思是以编程方式创建新类并存储它。如果是这样,我可以稍后使用 ObjectScript 编辑这个类(并重新编译)吗?
原因:我在字符串变量中定义了类结构,我需要根据这个字符串将新类添加到命名空间。
没有什么是不可能的。Caché 中的所有内容都可以通过编程方式创建。而且,Classes 不是执行。至少有两种方法可以做到:
在其他类中定义的任何类的所有定义。您可以在包 %Dictionary 中找到它。
类本身在 %Dictionary 中定义。类定义。它有一些属性,用于定义类的任何部分。所以,这是一个简单的代码,它创建了一些具有一个属性的类。
set clsDef=##class(%Dictionary.ClassDefinition).%New()
set clsDef.Name="package.classname"
set clsDef.Super="%Persistent"
set propDef=##class(%Dictionary.PropertyDefinition).%New()
set propDef.Name="SomeProperty"
set propDef.Type="%String"
do clsDef.Properties.Insert(propDef)
do clsDef.%Save()
在最新版本中,还有另一种创建/更改类的方法。如果您有课程文本,您可以在 Studio 中看到它。然后,您可以使用类%Compiler.UDL.TextServices在 Caché 中加载它
是的。您可能希望使用%Dictionary.ClassDefinition
和相关的%Dictionary.*Definition
类(尤其是%Dictionary.PropertyDefinition
和%Dictionary.MethodDefinition
)%Dictionary.IndexDefinition
来创建和/或修改您的类。如果您的字符串包含一些合理的数据表示,您应该能够以这种方式创建类。
然后,您可以通过调用来编译该类$system.OBJ.Compile("YourPackage.YourClass","ck")
。
(注意:如果您的字符串包含该类的导出 XML 定义,您还可以将 XML 表示形式写入流,然后调用$system.OBJ.LoadStream()
以导入 XML 定义。我只建议您从导出的类定义开始。 )