如何在Powerdesigner中访问扩展集合的子记录

Question

请帮帮我！

我创建了：

• 抽象数据类型_1
• 抽象数据类型_2
• 表_1
• 目标类型为"的本地扩展(Profile\Table\extended Collections\collection_1(中的表的扩展集合；AbstractDataType">

我将Collection_1链接到Table_1。

并将AbstractDataType_1和AbstractDataType_2添加到该关系中。

如何在VB脚本中读取AbstractDataType_1.code？

什么应该代替"？？？？"在下面

应该是某种东西而不是"；[？？？？.]"？

Dim object, coll
Set object = ActiveModel.FindChildByName("Table_1",cls_Table)
Set coll = object.GetExtendedCollection("Collection_1")
for each coll_member in coll.??????
output coll_member.[??????.]Code
next

Answer 1

你真的很接近。

option explicit
Dim object, coll, coll_member
Set object = ActiveModel.FindChildByName("Table_1",cls_Table)
Set coll = object.GetExtendedCollection("Collection_1")
for each coll_member in coll
output coll_member.Code
next
VB Script started on 5/10/2021 at 3:18:03 PM
TYPE_1
TYPE_2
VB Script terminated on 5/10/2021 at 3:18:03 PM.