Xcopy File With Time Stamp

TITLE Archive Debug File
COLOR F
@ECHO OFF
::
:: Purpose:Archive Debug File
:: Author: John Sharpe
:: Date: November 24th, 2008
:: Intent: Provide better customer service in less time.
::
cls
%systemdrive%
cd
cls
for /f "tokens=1,2 delims=: " %%a in ('time /t') do set systime=%%a%%b
for /f "tokens=2,3,4 delims=-/ " %%d in ('date /t') do set sysdate=%%d%%e%%f
set fileorig="C:\Program Files\SummitHealthcare\ScriptingToolkit\Debug_Script.txt"
set fpcopyto=C:\Downloads\CMAXX\Logs\Debug_Script
set fpcopyto=%fpcopyto%_%sysdate%_%systime%
set fpcopyto=%fpcopyto%.log
echo. f|xcopy %fileorig% %fpcopyto%
exit