SILENCE KILL USERX DEFINE ^$USERX CONN USERX LOG F-S FOO F-S ENA ^X NO SILENCE W USERX CONN USERX MOUNT STRUCTURE USERX: TAKE PS:<UETP.LIB>USERX.CMD ! ENA TERM WIDTH 132 CONN <UETP.RUN> DEL *.LOG EXPUNGE ! TAKE PS:<UETP.LIB>CLEAN-UP.CMD TAKE PS:<UETP.LIB>SET-UP.CMD ! DEFINE DSK: <UETP.RUN>,PS:<UETP.LIB> RUN UETP TAKE <UETP.LIB>USER.CMD ENA USERX BEGIN STAT ^X