在PowerDesigner中生成SQL脚本时，如何生成备注信息？

在留言中，听棠.net提到了一个问题： 在Powerdesigner中生成 SQL时如何生成相关备注信息？ 这个问题以前也有很多朋友问过，现在在这里详细阐述一下。

不同版本的PowerDesigner在不同的数据库模型中，生成Sql脚本的方式是不一样的。在PD6.5生成
Oracle脚本时，会自动根据模型中的Comment生成数据库中相关的注释，但是在9.0以上版本好象就比较麻烦。
而不论什么样版本的PD,都不能自动生成Sql server的注释。

要想解决这个问题，也比较简单：直接利用Powerdesigner提供的OLE对象编程。 PD提供多种语言的开发例子，在Sybase\PowerDesigner 10\Ole Automation目录下，在这里就关键地方进行说明：

1、利用OLE打开模型：

private StreamWriter SW;

private PdCommon.Application pd;

private PdPDM.Model model;

private void cmdOpenModal_Click(object sender, System.EventArgs e)

{

pd = new PdCommon.Application();

if (pd != null)

{

// 打开一个模型

openFileDialog1.Title="选择模型文件";

openFileDialog1.Filter="模型文件(*.pdm)|*.pdm";

if
(openFileDialog1.ShowDialog()==DialogResult.Cancel)

{

return;

}

string strFileName=openFileDialog1.FileName;

model =
(PdPDM.Model)pd.OpenModel(strFileName,PdCommon.OpenModelFlags.omf_Default);

if (model == null)

{

MessageBox.Show("不能打开Powerdesigner模型！", "Powerdesigner",
MessageBoxButtons.OK, MessageBoxIcon.Error);

return;

}

foreach( Control c in
panel1.Controls
)

{

c.Enabled=true;

}

}

else

{

MessageBox.Show("不能创建Powerdesigner应用，请检查是否安装或者Powerdeisnger是否注册。 可以可使用
命令注册该对象: pdshell10.exe /RegServer",

"Powerdesigner",
MessageBoxButtons.OK, MessageBoxIcon.Error);

}

}

2、生成备注的SQL脚本

private void BuilderCommentSql()

{

openFileDialog1.Title="选择SQL文件文件";

openFileDialog1.Filter="脚本文件(*.sql)|*.sql";

openFileDialog1.CheckFileExists=false;

openFileDialog1.ShowDialog();

string strSqlFile=openFileDialog1.FileName;

if (strSqlFile==null || strSqlFile=="") return;

FileInfo FI=new FileInfo(strSqlFile);

if (!FI.Exists) //文件不存在

{

SW=FI.CreateText();

}

else

{

SW=new
StreamWriter(strSqlFile,false,System.Text.Encoding.GetEncoding("GB2312"));

}

//DialogResult dr =MessageBox.Show("要删除已经有的描述吗》？");

//处理包

foreach (PdPDM.Package p in model.Packages)

{

ProcessPakageToMSSQL(p);

}

SW.Close();

MessageBox.Show("成功生成备注文件");

}

3、核心处理函数 （SQL Server）

private void ProcessPakageToMSSQL(PdPDM.Package pk)

{

//处理包

foreach (PdPDM.Package p in pk.Packages)

{

ProcessPakageToMSSQL(p);

}

foreach (PdPDM.Table table in pk.Tables)

{

foreach(PdPDM.Column cl in table.Columns)

{

string strWriteLine;

strWriteLine="exec
sp_dropextendedproperty N'MS_Description',"+

"N'user', N'dbo', N'table', N'"+ table.Code +"', " +

"N'column',
N'" +cl.Code+"'";

SW.WriteLine(strWriteLine);

SW.WriteLine("go");

strWriteLine="exec
sp_addextendedproperty N'MS_Description',"+

"N'"+cl.Name+"', N'user', N'dbo', N'table', N'"+ table.Code +"', " +

"N'column',
N'" +cl.Code+"'";

SW.WriteLine(strWriteLine);

SW.WriteLine("go");

}

}

}

///ORACLE

private void ProcessPakageOracle(PdPDM.Package pk)

{

//处理包

foreach (PdPDM.Package p in pk.Packages)

{

ProcessPakageOracle(p);

}

foreach (PdPDM.Table table in pk.Tables)

{

string strWriteLine;

strWriteLine="COMMENT ON TABLE "+table.Code+" IS
'"+table.Comment+"';";

SW.WriteLine(strWriteLine);

foreach(PdPDM.Column cl in table.Columns)

{

strWriteLine="COMMENT ON COLUMN
"+table.Code+"."+cl.Code+" IS '"+cl.Comment+"';";

SW.WriteLine(strWriteLine);

}

}

}

}

以上的这种方案虽然能将问题解决，但不是很完美。以前在用PD生成NHibernate配置文件时，使用了PD OO模型中的Object
Language， 可以非常方便地在PD中实现Preview功能 。
但是在DBMS模型中，开放的对象和支持的语法都比较少，不能实现这种需求（感兴趣的话可以看一下 %Tabldefn%，它是系统变量，无法配置。）