PowerDesigner使用方法小结转
?
二、设置PowerDesigner设计表时,自动将name列值中的一部分复制到code列
1、把name/code自动复制功能打开。默认是打开的。
Tool-Genneral-Options Dialog-Name to Code mirroring
2、Tools->Model Options....->Naming Convention
3、选中Name,并勾选Enable name/code conversions.
4、选择Name To Code
粘贴脚本代码
???????????12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152'把pd中那么name想自动添加到comment里面
'如果comment为空,则填入name;如果不为空,则保留不变,这样可以避免已有的注释丢失.
?
?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 comment 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?
????
if trim(tab.comment)=
""
then
'如果有表的注释,则不改变它.如果没有表注释.则把name添加到注释里面.?
???????
tab.comment = tab.name?
????
end if??
?
Dim
col
' running column??
?
for each col in tab.columns?
??
if trim(col.comment)=
""
then
'如果col的comment为空,则填入name,如果已有注释,则不添加;这样可以避免已有注释丢失.
???
col.comment= col.name?
??
end if?
?
next??
??
end if??
?
next??
???
??
Dim
view
'running view??
?
for each view in folder.Views??
??
if not view.isShortcut and trim(view.comment)=
""
? 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
?
参考:
1、PowerDesigner中Table视图同时显示Code和Name http://blog.csdn.net/downmoon/article/details/8108968
2、PowerDesigner Name/Code自动调整(转) http://hi.baidu.com/jonik/item/7d39588c3dda708e4514cf76
3、在PowerDesigner的PDM图形窗口中显示数据列的中文注释 http://blog.csdn.net/zengzhe/article/details/974205
4、powerDesigner 把name项添加到注释(comment),完美方案! http://www.cnblogs.com/dukey/archive/2010/01/20/dukey.html
- by 博客园 afarmer -
?
链接地址:http://www.cnblogs.com/afarmer/archive/2012/11/05/2755327.html