/PROC ,(&TERMFILE,&HOSTFILE,&FILETYPE,&BLKSIZE),SUBDTA=&
/ERASE &HOSTFILE
/STEP
/SETSW ON=(0,1)
/SETSW OFF=(2)
/SYSFILE SYSDTA=(SYSCMD)
/EXEC LOGICS.P.FTTHB
&TERMFILE
&HOSTFILE
&FILETYPE
&BLKSIZE
/STEP
/SETSW OFF=(0,1,2)
/ENDP

/SYSFILE SYS