PowerDesigner中批量根据对象的name生成comment的脚本

最新推荐文章于 2021-04-26 15:00:27 发布

原创最新推荐文章于 2021-04-26 15:00:27 发布 · 190 阅读

0 ·

CC 4.0 BY-SA版权

文章标签：

#java

本文详细解析了使用OpenPDM进行操作的方法，包括执行命令、运行脚本等关键步骤，确保用户能够正确地操作物理数据模型，解决模型相关问题。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

执行方法：Open PDM -- Tools -- Execute Commands -- Run Script

Option Explicit
ValidationMode = True
InteractiveMode = im_Batch

Dim mdl 'the current model

'get the current active model
Set mdl = ActiveModel
If (mdl Is Nothing) Then
MsgBox "There is no current Model"
ElseIf Not mdl.IsKindOf(PdPDM.cls_Model) Then
MsgBox "The current model is not an Physical Data model."
Else
ProcessFolder mdl
End If

'This routine copy name into code for each table, each column and each view
'of the current folder
Private sub ProcessFolder(folder)
Dim Tab 'running table
for each Tab in folder.tables
if not tab.isShortcut then
tab.comment = tab.name
Dim col 'running column
for each col in tab.columns
col.comment= col.name
next
end if
next

Dim view 'running view
for each view in folder.Views
if not view.isShortcut then
view.comment = view.name
end if
next

'go into the sub-packages
Dim f 'running folder
For Each f In folder.Packages
if not f.IsShortcut then
ProcessFolder f
end if
Next
end sub