点击此处---> 群内免费提供SAP练习系统(在群公告中)
加入QQ群:457200227(SAP S4 HANA技术交流) 群内免费提供SAP练习系统(在群公告中)
嗨,
Am尝试使用vbs在PD中创建扩展属性
它在网上失败了:
设置属性= Createobject(model.cls_ExtendedAttribute)
不支持对象-有人知道如何在数据项中创建新的扩展属性吗?
谢谢
代码看起来像
ValidationMode = True'强制PowerDesigner进行验证 的行为,并在发生禁止行为时返回错误 InteractiveMode = im_Batch'禁止PowerDesigner对话框 ' 主功能 '使用类图创建OOM模型 昏暗模型 设置模型= CreateModel(PdCDM.cls_Model," | Diagram = ClassDiagram") model.Name ="客户管理" model.Code ="客户管理" '获取类图 昏暗图 点心 设置cls = model.dataitems.CreateNew() cls.Name ="客户" cls.Code ="客户" cls.Comment ="客户类别" cls.Description ="客户类定义客户的属性和行为。" '创建属性 CreateAttributes cls '创建方法 CreateOperations cls '为班级创建符号 昏暗的象征 设置sym = diagram.AttachObject(cls) CreateClasses = True '创建属性功能 函数CreateAttributes(cls) 昏暗的属性 设置属性= Createobject(model.cls_ExtendedAttribute) '(PdOOM.cls_Attribute) attr.Name =" ID" attr.Code =" ID" attr.DataType =" int" attr.Persistent = True attr.PersistentCode =" ID" attr.PersistentDataType =" I" attr.PrimaryIdentifier =真 设置attr = cls.CreateObject(PdOOM.cls_Attribute) attr.Name ="名称" attr.Code ="名称" attr.DataType ="字符串" attr.Persistent = True attr.PersistentCode =" NAME" attr.PersistentDataType =" A30" 设置attr = cls.CreateObject(PdOOM.cls_Attribute) attr.Name ="电话" attr.Code ="电话" attr.DataType ="字符串" attr.Persistent = True attr.PersistentCode =" PHONE" attr.PersistentDataType =" A20" 设置attr = cls.CreateObject(PdOOM.cls_Attribute) attr.Name ="电子邮件" attr.Code ="电子邮件" attr.DataType ="字符串" attr.Persistent = True attr.PersistentCode =" EMAIL" attr.PersistentDataType =" A30" CreateAttributes = True 结束功能
感谢链接Phillip。 在我的机器上,整个脚本的运行时间不到2秒,令人印象深刻:)
"帮助"中列出的脚本存在一些小问题:
在上面的页面中,单击
创建和访问扩展(脚本)
一周热门 更多>