SPOOLWRITE

1 SPOOLWRITE  TOKEN(data-area)  FROM(data-area)
2? FLENGTH(data-value)
3! LINE
3?
3 PAGE
4+ 
4 NOHANDLE
4 RESP
4.1? RESP2