EXTERNALROUTINE  TEACHER(STRING (255)S)
SYSTEMROUTINESPEC  ZVIEW(STRING (255)S)
      S = "ERCC04.TEACHER" IF  S = ""
      ZVIEW(S)
END 
ENDOFFILE