SUBROUTINE PEEK   
      CALL SSBUF
      CALL PEEKA
      RETURN
      END