在PowerDesigner中自動生成sqlserver欄位備註

xyzhuzhou發表於2014-12-27
SQLServer

在PowerDesigner中自動生成sqlserver欄位備註

PowerDesigner是資料庫設計人員常用的設計工具，但其自生預設生成的程式碼並不會生成sqlserver資料庫的欄位備註說明。在生成資料庫後還需要手工修改，比較麻煩。

先介紹一種辦法，直接由PowerDesigner自動生成sqlserver的備註欄位。

1、在PowerDesigner中建立好物理模型後

2、在PowerDesigner中選擇工具——>Execute Commends——>Edit/Run Script,開啟如下對話方塊：

 

3、在對話方塊中輸入如下程式碼：

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

                  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

 

 

4、點選“Run”執行程式碼，即可。這時通過預覽物理模型的sql程式碼，就可以看到PowerDesigner生成的資料庫欄位備註程式碼了。

相關文章