powerdesigner生成sql

PowerDesigner使用学习一


PowerDesigner



PowerDesigner最初由Xiao-Yun Wang（王晓昀）在SDP Technologies公司开发完成。

PowerDesigner是Sybase的企业建模和设计解决方案，采用模型驱动方法，将业务与IT结合起来，可帮助部署有效的企业体系架构，并为研发生命周期管理提供强大的分析与设计技术。



powerDesigner pdm转换成sql

一、选择菜单栏上Database



二、更改当前数据库类型>>Change Current DBMS 按钮



三、将当前的DBMS更改成需要的DBMS（如果用的就是当前的mysql5.0就无需更换）



四、选择Database菜单栏下 >>Generate Database



五、设置导出.sql名字和路劲 ，配置如图所示。



六、导出的sql是没有注释的，如果需要注释
Tools >>Excute Commands >> Edit/Run Script打开的窗口中添加以下信息
'******************************************************************************?
'*?? File:?????????? name2comment.vbs?
'*?? Purpose:???? Database?? generation?? cannot?? use?? object?? names?? anymore???
'???????????????????????? in?? version?? 7?? and?? above.?
'???????????????????????? It?? always?? uses?? the?? object?? codes.?
'
'???????????????????????? In?? case?? the?? object?? codes?? are?? not?? aligned?? with?? your???
'???????????????????????? object?? names?? in?? your?? model,?? this?? script?? will?? copy???
'???????????????????????? the?? object?? Name?? onto?? the?? object?? Comment?? for???
'???????????????????????? the?? Tables?? and?? Columns.?
'
'*?? Title:?????????
'*?? Version:???? 1.0?
'*?? Company:???? Sybase?? Inc.???
'******************************************************************************

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
'把列name和comment合并为comment
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


执行。再执行步骤一到步骤五