PARM ACCTPARM=NONE
# vtgrep.xeq - uses grep.hpbin.sys to show vt users
# Tim Ericson with inspiration from John Hornberger
IF "!ACCTPARM"="NONE" THEN
  LISTFILE /SYS/PUB/CI, 8 > LISTTEMP
  ECHO
  GREP.HPBIN.SYS "-i 'REM :'" < LISTTEMP
  ECHO
ELSE
  LISTFILE /!ACCTPARM, 8 > LISTTEMP
  ECHO
  GREP.HPBIN.SYS "-i 'REM :'" < LISTTEMP
  ECHO
ENDIF
PURGE LISTTEMP, TEMP