$JOB 144001T36 BATCH1SUB 180
$SET DEF [270,32]
$ON ERROR GOTO DELETE
$@BATCH.ONE
$DELETE:
$EOJ