REWRITE

1 REWRITE  FILE(filename)
2? TOKEN(data-area)
3 FROM(data-area)
4? 
4 SYSID(systemname)  LENGTH(data-value)
4 LENGTH(data-value)
5? NOSUSPEND