Posted on 2008-09-13 12:41
leekiang 閱讀(360)
評論(0) 編輯 收藏 所屬分類:
善用佳軟
1,
Name to Code mirroring設置在PowerDesigner定義對象屬性時，當輸入對象屬性名稱后，對應的代碼將自動輸入和名稱
一樣的值，這個使用起來很難受，在Tools→General Options→Dialog里對
Name to Code mirroring選項進行取消
2,將表的name轉成SQL中的注釋
Datebase菜單--》Datebase Generation-->format標簽頁-->generate name in empty comment
3,反向工程時將Comment中的字符COPY至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
Private???sub???ProcessFolder(folder)
On?Error?Resume?Next
??????Dim???Tab???'running?????table
??????for???each???Tab???in???folder.tables
????????????if???not???tab.isShortcut???then
??????????????????tab.name???=???tab.comment
??????????????????Dim???col???'???running???column
??????????????????for???each???col???in???tab.columns
??????????????????if?col.comment=""?then
??????????????????else
????????????????????????col.name=???col.comment
??????????????????end?if
??????????????????next
????????????end???if
??????next
??????Dim???view???'running???view
??????for???each???view???in???folder.Views
????????????if???not???view.isShortcut???then
??????????????????view.name???=???view.comment
????????????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
以上代碼是VB腳本，在PowerDesigner中使用方法為：
??? PowerDesigner->Tools->Execute Commands->Edit/Run Scripts
將代碼Copy進去執行就可以了，是對整個CDM或PDM進行操作
轉自http://www.cnblogs.com/cxd4321/archive/2009/03/07/1405475.html