PD 실용 요약

4654 단어 총결산
1. PowerDesigner의 mysql PDM에 대한 COMMENT 주석
 
2. PD님이 중국어 주석을 받은 표명과 열명.
일부 PD는 위에서 링크한 방법으로 작업을 완료하지 못하면 문제가 발생할 수 있으므로 VB 스크립트를 통해 다음 명령을 수행합니다.
pd에서 다음 코드를 실행합니다
 
 
'******************************************************************************   
  '*   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:            name  comment      
  '*   Version:     1.0   
  '*   Author:wangnc   
  '*       :PD11   --   Open   PDM   --   Tools   --     Execute   Commands   --   Run   Script   
  '******************************************************************************   
    
  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   code   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 
                  if    tab.comment ="" then
                           
                   else 
                          tab.name=tab.comment
                           on error resume  next
                    end if
                       Dim   col   '   running   column   
                    for   each   col   in   tab.columns   
                       if col.comment="" then
                        ' MsgBox   " "+tab.name+" "+col.name +"  comment" 
                       else 
                          col.name=col.comment
                          on error resume  next
                       end if
                    next   
              end   if   
              
        next   
    
        Dim   view   'running   view   
        for   each   view   in   folder.Views   
              if   not   view.isShortcut   then   
                   if view.comment="" then
                    MsgBox   "  "+view.name +"  comment" 
                   else 
                   view.name=view.comment
                    on error resume  next
                   end if
              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 

  3.기타 일부 조작은 데이터 사전 생성 기능이 그래도 괜찮은 것 같다
http://qingfeng825.iteye.com/blog/1144750
 
ReportTemplates..자신의 템플릿을 편집하고 새로 만들 수 있습니다.
Reports..자체 리포트 편집 및 새로 만들기
GenerateReports.. 템플릿을 선택하고 생성할 수 있습니다.
 

좋은 웹페이지 즐겨찾기