oracle倒入dmp_oracle和oracle之间批量导数据

oracle倒入dmp_oracle和oracle之间批量导数据一、前置条件 已存在oracle数据库 已安装PowerDesigner数据库建模工具 二、在PowerDesigner中创建jdbc数据库连接 点击 “File>Reverse Engineer>…

Oracle数据反向导入到pdm

一、前置条件

  • 已存在oracle数据库
  • 已安装PowerDesigner数据库建模工具

二、在PowerDesigner中创建jdbc数据库连接

  • 点击 “File>Reverse Engineer>Database” oracle倒入dmp_oracle和oracle之间批量导数据

oracle倒入dmp_oracle和oracle之间批量导数据

  • 选择数据源,如果之前没有创建则点击”Configure”进行配置 oracle倒入dmp_oracle和oracle之间批量导数据

oracle倒入dmp_oracle和oracle之间批量导数据

oracle倒入dmp_oracle和oracle之间批量导数据

三、开始导入

  • 选择要导入的表

oracle倒入dmp_oracle和oracle之间批量导数据

oracle倒入dmp_oracle和oracle之间批量导数据

oracle倒入dmp_oracle和oracle之间批量导数据

四、设置

  • 使name显示中文名称,点击 “Tools>Excute Commands>Edit/Run Scripts “,执行以下脚本 oracle倒入dmp_oracle和oracle之间批量导数据
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  
  
Private   sub   ProcessFolder(folder)   
On Error Resume Next  
      Dim   Tab   "running     table   
      for   each   Tab   in   folder.tables   
            if   not   tab.isShortcut   then   
                  tab.name   =   tab.comment  
                  Dim   col   "   running   column   
                  for   each   col   in   tab.columns   
                  if col.comment="" then  
                  else  
                        col.name=   col.comment   
                  end if  
                  next   
            end   if   
      next  
  
      Dim   view   "running   view   
      for   each   view   in   folder.Views   
            if   not   view.isShortcut   then   
                  view.name   =   view.comment   
            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

代码100分

  • Physical Options(Common)设置,使Preview标签页没有表空间语句 oracle倒入dmp_oracle和oracle之间批量导数据

版权声明:本文内容由互联网用户自发贡献,该文观点仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 举报,一经查实,本站将立刻删除。
转载请注明出处: https://daima100.com/7697.html

(0)
上一篇 2023-03-15
下一篇 2023-03-16

相关推荐

发表回复

您的电子邮箱地址不会被公开。 必填项已用*标注