pdm-name和comment的互相同步

博客介绍了使用Powerdesigner工具实现pdm文件中name与comment互相同步转换的方法。将name同步至comment,以及将comment同步至name,均是通过点击Tools->Execute Commands->Edit/Run Scripts,输入脚本后点击Run来完成。

摘要生成于 C知道 ,由 DeepSeek-R1 满血版支持, 前往体验 >

1.使用Powerdesigner工具将pdm文件的name同步至comment。

点击Tools->Execute Commands->Edit/Run Scripts

输入脚本:

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

Option   Explicit  

ValidationMode   =   True  

InteractiveMode   =   im_Batch  

Dim   mdl     

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  

Private   sub   ProcessFolder(folder)  

        Dim   Tab  

        for   each   Tab   in   folder.tables  

              if   not   tab.isShortcut   then

                    tab.comment=tab.name

                    Dim   col 

                    for   each   col   in   tab.columns

                        col.comment=col.name  

                    next  

              end   if            

        next

end   sub

 点击Run即可。

 

 

 

2.使用Powerdesigner工具将pdm文件的comment同步至name。

点击Tools->Execute Commands->Edit/Run Scripts

输入脚本:

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

Option   Explicit  

ValidationMode   =   True  

InteractiveMode   =   im_Batch  

Dim   mdl     

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  

Private   sub   ProcessFolder(folder)  

        Dim   Tab  

        for   each   Tab   in   folder.tables  

              if   not   tab.isShortcut   then

                    tab.name=tab.comment

                    Dim   col 

                    for   each   col   in   tab.columns

                        col.name=col.comment  

                    next  

              end   if            

        next

end   sub

 点击Run即可。

上述两个脚本就可以将pdm里面的name和comment进行互相同步转换了。

转载:https://www.cnblogs.com/wangpeng00700/p/10240220.html

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值