pdm文件name與comment互相同步

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

點擊Tools->Execute Commands->Edit/Run Scripts

輸入腳本：

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
                                                if col.comment="" then
                                                    col.comment=col.name  
                                                end if
                    next  
              end   if            
        next
end   sub

 

 點擊Run即可。

 

 

 

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

點擊Tools->Execute Commands->Edit/Run Scripts

輸入腳本：

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進行互相同步轉換了。