Oracle通过PowerDesigner****的方式导出pdm

时间:2024-03-29 16:02:13

安装好powerDesigner后,点击"文件",选择"****",选择"Database"

Oracle通过PowerDesigner****的方式导出pdm

显示如下界面:

Oracle通过PowerDesigner****的方式导出pdm

Model name:可以自定义输入;

DBMS:选择"数据库";

点击"确定"

Oracle通过PowerDesigner****的方式导出pdm

从数据导出pdm文件,选择"Using a data source",点击"Connect to a Data Souce"图标,会弹出"Connect to a Data Source"窗口,

Oracle通过PowerDesigner****的方式导出pdm

然后点击"Configure"弹出"Configure Data Connections"

Oracle通过PowerDesigner****的方式导出pdm

点击图标,新增数据源,

Oracle通过PowerDesigner****的方式导出pdm

系统管理员账户可以选择"系统数据源",没有系统管理员权限的用户,可以选择"用户数据源"

点击"下一步"

Oracle通过PowerDesigner****的方式导出pdm

选择自己要用的数据源,点击"下一步"

Oracle通过PowerDesigner****的方式导出pdm

点击"完成".

Oracle通过PowerDesigner****的方式导出pdm

Oracle通过PowerDesigner****的方式导出pdm

选择需要的数据源,点击"确定"

Oracle通过PowerDesigner****的方式导出pdm

点击"Connect",点击"确定"

Oracle通过PowerDesigner****的方式导出pdm

点击"ok"就开始导出pdm了.

导出后发现name项没有显示中文备注,看起来不方便.

 补充:PowerDesigner中****将数据库中comment脚本赋值到PDM的name 

执行方法:Open PDM -- Tools -- Execute Commands -- Run Script 


Vb 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 
next 
end if 
next 
end sub