powerDesigner 把name项添加到注释

‘使用方法使用方法
‘PowerDesigner->Tools->Execute Commands->Edit/Run Scripts

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

        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

时间: 2024-10-11 06:28:39

powerDesigner 把name项添加到注释的相关文章

每日学习心得:SharePoint 2013 自定义列表项添加Callout菜单项、文档关注、SharePoint服务端对象模型查询

前言: 前一段时间一直都比较忙,没有什么时间进行总结,刚好节前项目上线,同时趁着放假可以好好的对之前遇到的一些问题进行总结.主要内容有使用SharePoint服务端对象模型进行查询.为SharePoint 自定义列表项添加callout菜单.希望能够给大家带来一些帮助. 1.  在aspx页引用可视化Web部件 有时候会需要在页面中引用项目中创建的可视化Web部件,具体步骤有以下这几步: 1) 在aspx页面顶部注册该可视化Web部件 示例如下: <%@ Register Tagprefix=&qu

大开测试:性能-如何在Analysis图表中添加分析注释(连载26)

7.26  如何在Analysis图表中添加分析注释 1.问题提出 Analysis提供了十分丰富的图表,我们可以借助这些图表分析系统的性能,为了使图表更加直观,方便专业及其非专业人事的阅读,提供分析注释是十分必要的,那么LoadRunner的Analysis提供这种功能了吗? 2.问题解答 LoadRunner提供了丰富的图表,通过这些图表可以供性能分析人员分析系统瓶颈,为了使自己和他人方便阅读分析结果,LoadRunner提供了在图表上添加注释信息的功能,下面以"Throughput - R

C#实现为类和函数代码自动添加版权注释信息的方法

本文实例讲述了C#实现为类和函数代码自动添加版权注释信息的方法,分享给大家供大家参考之用.具体方法如下: 以web项目为例: 一:给类加注释 1.在visual studio 的安装路径下 如:[盘符]:/Program files/Microsoft Visual Studio 8/Common7/IDE/ItemTemplates/web/cshare/2052/class.zip ,将里面的class.cs改为: /*------------------------------------

ExtJS4为form表单必填项添加红色*标识

通常情况下,ExtJS4的form表单必填项在输入状态下会有特殊提示,非输入状态下,显示却和其他项没有任何区别.为使必填项更加容易区分,我们需要根据allowBlank的属性值,为form表单中的必填项添加红色*标识 在ExtJS4的form表单中,常用组件的继承关系图1-1: //为form表单中必填项添加红色*号标志 Ext.override(Ext.form.field.Base,{ //针对form中的基本组件 initComponent:function(){ if(this.allo

为类和函数代码自动添加版权注释信息

以web项目为例: 一:给类加注释 1.在visual studio 的安装路径下 如:[盘符]:/Program files/Microsoft Visual Studio 8/Common7/IDE/ItemTemplates/web/cshare/2052/class.zip ,将里面的class.cs改为: C#代码  /*---------------------------------------------------------------- // Copyright (C) 2

绑定网关IP和MAC地址时显示“ARP项添加失败:拒绝访问”的处理方法

绑定网关IP和MAC地址时显示"ARP项添加失败:拒绝访问" Win7系统,用arp -s命令在绑定网关IP和MAC地址时,总是提示 ARP 项添加失败: 拒绝访问.( 用管理员身份运行cmd也无效.)未找到原因. 后来google找到了另一个命令,搞定! 具体操作如下: 1.CMD中输入: netsh i i show in 然后找到本地连接对应 我的是Win7系统,今天用arp -s命令在绑定网关IP和MAC地址时,总是提示"ARP 项添加失败: 拒绝访问."(

nagios下给监控项添加监控数据,导致无法画图

前两天给nagios下某个监控项添加监控数据后,发现监控数据是有了,但是后来才发现,图形数据没有了,一下子还不知道是哪的问题 以下是我排查问题的步骤: 登录nagios服务器上,查看/home/data/nagios/var/nagios.log是否有报错,我这边没有查到相关报错信息 然后再到/home/data/nagios/share/perfdata/查看相关的rrd文件有没有更新 查到这步我发现我下边的xml文件实时更新,但是rrd文件没有更新,很奇怪不知道是什么原因 后来查到rrdto

powerdesigner 生成mysql PDM 的COMMENT注释

powerdesigner 生成mysql PDM 的COMMENT注释 默认的pd没有生成注释,针对mysql5.0可以如下修改.在Database-->edit Current DBMS... 设置dbms的属性,找到mysql5.0-->script-->objects-->column-->add 把原来的内容: %20:COLUMN% [%National%?national ]%DATATYPE%[%Unsigned%? unsigned][%ZeroFill%?

Python 中添加中文注释以及中文输出解释器报错的解决办法

终于知道如果文件里有非ASCII字符,需要在第一行或第二行指定编码声明.把ChineseTest.py文件的编码重新改为ANSI,并加上编码声明. 在代码的第一行 或者 第二行添加指定文件的编码类型 #-*- coding:utf-8 -*-           //添加代码类型1 #coding=utf-8         //添加代码类型2 上面两种方法随便哪一种都可以,别忘记了前面的 # . 这样代码中就可以添加中文注释 和 中文输出了. 另外提醒一句:vim 查看文件的编码类型是在命令模