如何在PowerDesigner存储库中使用VB脚本获取扩展属性值

2020-08-27 00:41发布

点击此处---> 群内免费提供SAP练习系统(在群公告中)加入QQ群:457200227(SAP S4 HANA技术交流) 群内免费提供SAP练习系统(在群公告中)我正在尝试编写一个脚本,该脚本将...

         点击此处--->   EasySAP.com群内免费提供SAP练习系统(在群公告中)

加入QQ群:457200227(SAP S4 HANA技术交流) 群内免费提供SAP练习系统(在群公告中)


我正在尝试编写一个脚本,该脚本将扫描PowerDesigner信息库中的逻辑数据模型并使用GetExtendedAttribute检索特定扩展属性的值而没有成功,变量始终为空。

我正在使用以下功能:

 Sub GetAttributes(curEntity)',其中curEntity是当前正在扫描的实体
    ExtAttr =" PMI LDM Formatting.LOV"'LOV是布尔类型
    对于curEntity.ChildObjects中的每个curAttr
       如果curAttr.ClassName ="实体属性",则
          输出curAttr.name&"-"&curAttr.ClassName
          x = curAttr.GetExtendedAttribute(ExtAttr,1)
          输出x
       万一
    下一个
 结束

我花了一些时间尝试查找有关如何从PowerDesigner存储库检索扩展属性值的示例,但没有成功。

使用的版本是16.6 SP04。

欢迎任何提示

帕斯卡

4条回答
Tong__Ming
2020-08-27 01:41

Bonjour Pascal:)

模型在存储库中的事实对您的脚本没有任何影响。 我认为您的问题是使用ChildObjects; 请使用"属性"集合。 这个对我有用:

 dim mdl,ent,curAttr
 对于activemodel.entities中的每个实体
    如果ent.name ="存款帐户",则
       GetAttributes ent
    万一
 下一个

 Sub GetAttributes(curEntity)'其中,curEntity是当前正在扫描的实体
 'ExtAttr =" PMI LDM Formatting.LOV"'LOV是布尔类型
    Dim ExtAttr'George添加了此
    ExtAttr =" tryit.LOV"'LOV是布尔类型
 '对于curEntity.ChildObjects中的每个curAttr
    对于curEntity.Attributes中的每个curAttr
       如果curAttr.ClassName ="实体属性",则
          输出curAttr.name&"-"&curAttr.ClassName
          x = curAttr.GetExtendedAttribute(ExtAttr,1)
          输出x
       万一
    下一个
 结束子
 

一周热门 更多>