echo off
echo TRN PROCEDURE EXECUTING %2
echo %1
copy %1 %2
\pdl\pdlask delete pending. ( 3) 3=CANCEL
IF ERRORLEVEL 4 GOTO DFLT
IF ERRORLEVEL 3 GOTO END
:dflt
erase %1
echo del %1
:end