如何用VB Vbscript列出扩展属性PowerDesigner?

2020-09-06 17:03发布

点击此处---> 群内免费提供SAP练习系统(在群公告中)加入QQ群:457200227(SAP S4 HANA技术交流) 群内免费提供SAP练习系统(在群公告中)你好 我尝试没有结果,而是在V...

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

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


你好

我尝试没有结果,而是在VBScript中列出PowerDesigner中任何对象(和特定性EnterpriseApplication对象)的所有扩展属性。

我使用PowerAMC V16.5(Power Designer的法语版本)进行EA建模。

如果我知道每个扩展属性的名称,则可以这样做,

对于M.EnterpriseApplications中的每个应用程序

     App.getExtendedAttribute(" DEf_etendu_Carto_URBA_PAMC_V16.5.ProjetAnneeDebut")
 下一个
其中:" DEf_etendu_Carto_URBA_PAMC_V16.5"是我的扩展文件;
 和" ProjetAnneeDebut"扩展属性之一
 

但是怎么知道所有扩展属性呢?

我尝试这样做:

对于M.EnterpriseApplications中的每个应用程序
     对于每个ExtAttrib输入...
       文字= ExtAttrib.name&" ="&App.getExtendedAttribute(" DEf_etendu_Carto_URBA_PAMC_V16.5。"&ExtAttrib)
     下一个
 下一个

感谢所有帮助...

安德烈

5条回答
打个大熊猫
2020-09-06 17:47
设置模型= ActiveModel
 '第一个循环查找模型中有多少个扩展
 对于模型中的每个ExtendedDefinition.ExtendedModelDefinitions
    '第二循环在ExtendedDefintion中查找所有文件夹。
           '代
           '设置
           '个人资料
    对于ExtendedDefinition.Categories中的每个文件夹名称
        '第三个循环遍历每个文件夹。 所有扩展属性都在
            '个人资料
           
        如果foldername.name ="个人资料",则
          对于foldername.Categories中的每个metaClass
              '第四循环遍历所有文件夹中的每个metaClass。
              '只有配置文件文件夹包含metaClass
              对于metaClass.Categories中的每个ExtendedAttributeFolder
                  '第5次循环遍历扩展属性文件夹
                  '查找所有扩展属性
                  如果ExtendedAttributeFolder.name ="扩展属性",则
                      对于ExtendedAttributeFolder.Categories中的每个extendedAttribute
                           输出ExtendedDefinition.name&" \"&extendedAttribute.itemPath&" \"&extendedAttribute.name
                      下一个
                  万一
              下一个
          下一个
       万一
    下一个
 下一个
  

一周热门 更多>