WRITE

1 WRITE  FILE(filename)
2? MASSINSERT
3 FROM(data-area)  RIDFLD(data-area)
4? KEYLENGTH(data-value)
5? 
5 SYSID(systemname)  LENGTH(data-value)
5 LENGTH(data-value)
6? 
6 RBA
6 RRN
7? NOSUSPEND