@echo off
if "%1"=="hide" goto :ExecBat
start mshta vbscript:createobject("wscript.shell").run("""%~f0"" hide",0)(window.close) && exit /b
:ExecBat
setlocal enabledelayedexpansion
set "folder=D:\SCETC\dataXml\"
set timestamp_602=0
set timestamp_603=0
set /a m=0
set /a n=0

for /F %%a in ('dir /b /s /o-d %folder%*602.xml') do (
    set /a m+=1
    set "timestamp_602!m!=%%~ta"
)

for /F %%b in ('dir /b /s /o-d %folder%*603.xml') do  (
    set /a n+=1
    set "timestamp_603!n!=%%~tb"
)

set timestamp_602_hh=!timestamp_6021:~11,2!
set timestamp_602_nn=!timestamp_6021:~14,2!
set timestamp_602_formatted=!timestamp_602_hh!!timestamp_602_nn!

set timestamp_603_hh=!timestamp_6031:~11,2!
set timestamp_603_nn=!timestamp_6031:~14,2!
set timestamp_603_formatted=!timestamp_603_hh!!timestamp_603_nn!

set var602=!timestamp_602_formatted:~1!
set var603=!timestamp_603_formatted:~1!

set /a time_diff=%var603% - %var602%

if %time_diff% LSS 1 (
    echo Both *602.xml and *603.xml flow generated within 1 second.
) else (
    echo Only *603.xml flow generated within 1 second. Deleting latest *603.xml flow...
    for /F %%c in ('dir /b /o-d %folder%*603.xml') do (
      set latest_flow=%%c
      md D:\交易失败流水\%date:~0,4%%date:~5,2%%date:~8,2% 2>nul
      xcopy /y %folder%%%c D:\交易失败流水\%date:~0,4%%date:~5,2%%date:~8,2%\   
      call :end
    )
)

:end
choice /t 1 /d y /n>nul
goto ExecBat
复制代码

@echo off

set "folder=D:\SCETC\dataXml\"
set "str=.LastWriteTime; $epoch = Get-Date '1970-01-01'; $span = New-TimeSpan -Start $epoch -End $time; $milliseconds = [math]::Round($span.TotalMilliseconds); Write-Output $milliseconds"
:loop
setlocal
for %%x in (602 603) do (
	for /f "delims=" %%i in ('dir /b /s /a-d /od "%folder%\*%%x.xml"') do (
		set file_%%x=%%i
	)
	setlocal enabledelayedexpansion
	for /f "delims=" %%a in ('powershell -Command "$time=(Get-Item '!file_%%x!')%str%"') do (
		endlocal
		set "unix_%%x=%%a"
	)
)
if "%unix_602%" geq "%unix_603%" (
	set d=%unix_602%-%unix_603%
) else (
	set d=%unix_603%-%unix_602%
)
for /f %%a in ('powershell -c "%d%"') do (
	echo 毫秒差 %%a
	if %%a gtr 1000 (
		for /f %%a in ('powershell -c "'{0:yyyyMMdd}' -f (get-date)"') do (
			md "D:\交易失败流水\%%a" 2>nul
			copy "%file_603%" "D:\交易失败流水\%%a"
			del "%file_603%"
		)
	)
)
endlocal
timeout 1
goto :loop
复制代码

@echo off
set "folder=D:\SCETC\dataXml\"
cd /d "%folder%"
for /f "delims=" %%a in ('dir /b /s /a-d /od *602.xml') do (
    set "File602=%%a"
)
for /f "delims=" %%a in ('powershell –NoProfile –ExecutionPolicy Bypass "(Get-ChildItem '%File602%').LastWriteTime"') do (
    set "Time602=%%a"
)
for /f "delims=" %%a in ('dir /b /s /a-d /od *603.xml') do (
    set "File603=%%a"
)
for /f "delims=" %%a in ('powershell –NoProfile –ExecutionPolicy Bypass "(Get-ChildItem '%File603%').LastWriteTime"') do (
    set "Time603=%%a"
)
if "%Time602%" == "%Time603%" (
    echo copy %File603%
) else (
    echo not copy
)
pause
复制代码

	if not defined file_%%x (
		echo file_%%x 文件不存在\其它原因，返回重试
		endlocal
		timeout 1
		goto :loop
	)
复制代码

for /F %%a in ('dir /b /s /o-d %folder%*602.xml') do (
    set /a m+=1
    set "timestamp_602!m!=%%~ta"
)
复制代码

FORFILES /p "D:\SCETC\dataXml" /S /M *60?.xml /C "cmd /c echo  @path @fdate @ftime"
复制代码

@echo off &setlocal enabledelayedexpansion 
set "folder=D:\SCETC\dataXml\"
:[Loop]
(call :getSofF "%folder%*602.xml" f602 h602 s602)
(call :getSofF "%folder%*603.xml" f603 h603 s603)
if !s602! gtr !s603! set/a "s603+=(24+h603)*3600"
set/a "dt=!s603!-!s602!"
if !dt! gtr 1 (xcopy /y /i "!f603!" "D:\交易失败流水\%date:~0,4%%date:~5,2%%date:~8,2%\")
goto[Loop]
:getSofF
	for /f "tokens=1* delims=:" %%A in (' dir /b/o-d/tw "%~1"^|findstr /n ".*"^|findstr /lbc:"1:" ') do (
		for /f "delims=" %%t in (' powershell "(Get-ChildItem """%%B""").LastWriteTime" ') do (
			set "t=%%t" &for /f "tokens=1-3 delims=:" %%a in ("!t:~-8!") do for %%k in (%%a %%b %%c) do (
				set "k=%%k" &if "!k:~,1!"=="0" (set "ts=!ts!:!k:~-1!") else set "ts=!ts!:!k!"
			)
		)
		for /f "tokens=1-3 delims=:" %%a in ("!ts:~1!") do (set "%~3=%%a"&set/a "s=%%a*3600+%%b*60+%%c")
		set "%~2=%%B" &set "%~4=!s!"
	)
	exit/b
复制代码