hisemr本机异地泵导双备份并自动压缩 新

::@echo off
set TDate=%DATE:~0,4%%DATE:~5,2%%DATE:~8,2%
set TTime=%time:~0,2%%time:~3,2%%time:~6,2%
if "%TTime:~0,1%"==" " set TTime=0%time:~1,1%%time:~3,2%%time:~6,2%

set afile=%TDate%%TTime%

::删除D:\dump 下的最新备份，D:\dump 为泵导的 directory=dump_dir 对应的文件夹
::此文件不删除，泵导时会提示文件已存在；
del f:\dump\fxfmyyhis.dp

::导出his库和病历库，泵导命令不支持客户端运行
expdp system/panku@orcl directory=dump_dir dumpfile=fxfmyyhis.dp schemas=smartmed,smartemr

::压缩备份出的文件，需要本机的C:\Program Files\ 下安装有winrar软件
"C:\Program Files\WinRAR\winRar.exe" a f:\数据备份\fxfmyyhis%afile%.rar D:\dump\fxfmyyhis.DP f:\dump\export.log

::复制最新的压缩包到192.168.0.251的共享文件夹里，需设置该文件夹的共享属性为可读写
:copy E:\数据备份(手动)\853hisemr%afile%.rar \\192.168.0.7\数据备份$\

::保证 \\192.168.0.251\数据备份$\ 里的 853hisemr.rar文件始终为最新备份，方便 hisemr泵导从异地复制备份并导入数据.bat 命令的执行
:copy /y \\192.168.0.251\数据备份$\853hisemr%afile%.rar \\192.168.0.251\数据备份$\853hisemr.rar

::保证 D:\dump\ 里的 sqjhbhisemr.rar文件始终为最新备份
:copy /y D:\数据备份(手动)\sqjhbhisemr%afile%.rar D:\dump\sqjhbhisemr.rar