powerdesignerz中批量根据对象的name生成comment的脚本
来源:互联网 发布:中文安卓编程王者荣耀 编辑:程序博客网 时间:2024/06/06 04:54
'------------------------------------------------------------
'
'脚本功能:
' PowerDesigner中批量根据对象的name生成comment的脚本
'执行方法:
' 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 folde
'------------------------------------------------------------
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
'------------------------------------------------------------
'
'脚本功能:
' PowerDesigner中批量根据对象的name生成comment的脚本
'执行方法:
' 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 folde
'------------------------------------------------------------
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
'------------------------------------------------------------
0 0
- powerdesignerz中批量根据对象的name生成comment的脚本
- PowerDesigner11中批量根据对象的name生成comment的脚本
- PowerDesigner11中批量根据对象的name生成comment的脚本
- PowerDesigner11中批量根据对象的name生成comment的脚本
- PowerDesigner11中批量根据对象的name生成comment的脚本
- PowerDesigner中批量根据对象的name生成comment的脚本(转)
- PowerDesigner中批量根据对象的name生成comment的脚本
- PowerDesigner11中批量根据对象的name生成comment的脚本
- PowerDesigner 中 根据对象的name和comment 生成注释的办法
- PowerDesigner中显示name, code,comment的解决方法 修正脚本,执行不会重复添加comment
- PowerDesigner,根据name自动生成commnet的脚本
- PowerDesigner,根据name自动生成commnet的脚本
- PowerDesigner,根据name自动生成commnet的脚本
- PowerDesigner,根据name自动生成commnet的脚本
- PowerDesigner中逆向工程将数据库中comment脚本赋值到PDM的name
- powerdesigner中name自动转换到comment和comment2name的vbs脚本
- 将PowerDesigner中列的name生成到注释comment中去.vbs
- excel中批量生成图表的脚本
- GPU performance tune on tile-based architecture
- Android个性的ViewPager切换动画
- 2小时玩转python基础(下)
- java生成随机数方法大全(可指定范围、分布方式、类型、种子)
- 用指针修改const变量问题
- powerdesignerz中批量根据对象的name生成comment的脚本
- Java算法-1.连通性问题
- tomcat 部署方式
- Codeforces 347C Alice and Bob
- VC: MBCS字符集转换成UTF-8
- 抽象类
- hdu3555(数位dp)
- hibernate4.0以上的hibernateUtil工具类
- Linux学习笔记一 ---- Linux基础知识认知以及初识Linux下C编程入门