1.打开PowerDesigner ——文件——Reverse Engineer——DataBase

Power Designer****导入Oracle表,转为模型加注释

2.选择所要连接数据库版本,此处使用的是oracle version 11g。

Power Designer****导入Oracle表,转为模型加注释

3.点击红色区域,选择数据源

Power Designer****导入Oracle表,转为模型加注释

4.选择modify

Power Designer****导入Oracle表,转为模型加注释

5.在此填写你的数据库名称、连接地址、用户名。确定

Power Designer****导入Oracle表,转为模型加注释

6.选择你新建立的连接数据库

Power Designer****导入Oracle表,转为模型加注释

7.填写需要转换为模型的数据库的用户名和密码

Power Designer****导入Oracle表,转为模型加注释

8.确定即可导出为模型

Power Designer****导入Oracle表,转为模型加注释

9.如果数据库中对表或字段有注释,那么通过下面的操作,可以让这些注释反映在物理模型上,在查看pdm图时更容易理解。

选择工具——Execute Commands——Edit /Run Script

Power Designer****导入Oracle表,转为模型加注释

10.将11步骤中的代码粘贴到此处,然后执行。即成功加入注释

Power Designer****导入Oracle表,转为模型加注释

11.  需要执行的脚本语言(不需要做任何修改)

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

 

相关文章:

  • 2022-01-04
  • 2022-12-23
  • 2021-06-11
  • 2022-12-23
  • 2021-04-07
  • 2021-04-09
  • 2021-07-12
  • 2021-12-05
猜你喜欢
  • 2022-12-23
  • 2022-03-07
  • 2021-09-17
  • 2022-02-24
  • 2022-02-06
  • 2022-01-14
相关资源
相似解决方案