国产成人久久精品亚洲小说,亚洲不卡1卡2卡三卡2021麻豆,亚洲男人天堂av

PowerDesigner中name和comment互換

1 PowerDesigner中批量根據(jù)對(duì)象的name生成comment的腳本

執(zhí)行方法：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

end if

Dim view 'running view

for each view in folder.Views

if not view.isShortcut then

view.comment = view.name

end if

'go into the sub-packages

Dim f 'running folder

For Each f In folder.Packages

if not f.IsShortcut then

ProcessFolder f

end if

end sub

2 PowerDesigner中逆向工程將數(shù)據(jù)庫中comment腳本賦值到PDM的name

執(zhí)行方法：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

if len(tab.comment) <> 0 then

tab.name = tab.comment

end if

On Error Resume Next

Dim col 'running column

for each col in tab.columns

if len(col.comment) <>0 then

col.name =col.comment

end if

On Error Resume Next

end if

end sub

眼鏡蛇

posted on 2009-01-10 10:17 眼鏡蛇閱讀(1660) 評(píng)論(1) 編輯收藏所屬分類: PowerDesigner

評(píng)論

# re: PowerDesigner中name和comment互換 2013-03-11 15:24 alex.yao

very good 回復(fù) 更多評(píng)論

新用戶注冊(cè) 刷新評(píng)論列表


只有注冊(cè)用戶登錄后才能發(fā)表評(píng)論。




網(wǎng)站導(dǎo)航: 博客園 IT新聞 Chat2DB C++博客博問管理
相關(guān)文章: 解決在PowerDesigner中使用oracle時(shí)字段長度超過15個(gè)就報(bào)錯(cuò) PowerDesigner導(dǎo)入oracle的表不能使用(ORA-00942) PowerDesigner中name和comment互換 Powerdesigner逆向工程從現(xiàn)有數(shù)據(jù)庫生成PDM 解決PowerDesigner中Name與Code同步的問題

# re: PowerDesigner中name和comment互換 2013-03-11 15:24 alex.yao

PowerDesigner中name和comment互換

評(píng)論

導(dǎo)航

統(tǒng)計(jì)

常用鏈接

留言簿(6)

隨筆分類

隨筆檔案

文章分類

文章檔案

搜索

最新評(píng)論

閱讀排行榜

評(píng)論排行榜