 
COMMON /CSBUF/ SBP, SBUF(SBUFSIZE)
   INTEGER SBP      # NEXT AVAILABLE CHARACTER POSITION; INIT = 1
   CHARACTER SBUF   # SAVED FOR DATA STATEMENTS
