PowerDesigner相关操作

来源:互联网 发布:博彦科技知乎 编辑:程序博客网 时间:2024/05/16 05:29

1.PowerDesigner设计表时把字段name添加到注释(comment)里面
PowerDesigner->Tools->Execute Commands->Edit/Run Scripts
这里写图片描述
执行如下脚本:

'如果comment为空,则填入name;如果不为空,则保留不变。Option Explicit ValidationMode = True InteractiveMode = im_BatchDim system, fileSet system = CreateObject("Scripting.FileSystemObject")Dim ForReading, ForWriting, ForAppending   '打开文件选项ForReading   = 1 ' 只读 ForWriting   = 2 ' 可写 ForAppending = 8 ' 可写并追加'打开文本文件Set file = system.OpenTextFile("C:\pdcomment.txt", ForWriting, true)'判断当前model是否物理数据模型Dim mdlSet mdl = ActiveModel If (mdl Is Nothing) Then    MsgBox "处理对象无模型" ElseIf Not mdl.IsKindOf(PdPDM.cls_Model) Then    MsgBox "当前模型不是物理数据模型" Else    ProcessFolder mdl,fileEnd If file.Close'******************************************************************************Private sub ProcessFolder(folder,file)    Dim tab 'running table   for each tab in folder.tables      if not tab.isShortcut then         if trim(tab.comment)="" then            tab.comment = tab.name         end if         Dim col         for each col in tab.columns            if trim(col.comment)="" then               col.comment = col.name            end if         next      end if   next   Dim view   for each view in folder.Views      if not view.isShortcut and trim(view.comment)="" then         view.comment = view.name      end if   nextend sub

2.修改数据库模型为Oracle数据库
Database —-> Change current DBMS
这里写图片描述

3.导出数据库SQL文件(.sql)
Database(或‘数据库’) —–>Generate Database ,确定即可。

1 0
原创粉丝点击