WRNAM

LIST

LAST

DIM

20

FIRST

DIM

15

MIDDLE

DIM

15

LISTEND

.

FILE

FILE

SEQ

FORM

"-1"

.

WRITE

FILE,SEQ;WRNAM

COUNT

BYTES,WRNAM

DISPLAY

*P01:24,WRNAM:

" consists of ",BYTES," bytes of non-blank data"