Where:

data$	Data to be parsed into the varlist. String expression.
fileopt	Supported file options (see also, File Options): ERR=stmtref Error transfer REC=name$ Record prefix (REC=VIS(string$) can also be used where string$ contains the record prefix) SEP=char$ Default separator character to parse data. Hex or ASCII string value. Dynamic SEP=* separators are not supported.
	If the READ DATA statement also contains a REC= clause, the REC= clause must precede the SEP=clause.
stmtref	Program line number or statement label to which to transfer control.
varlist	List of variables to receive the values from the DATA statements. Comma-separated numeric and string variables are allowed.

READ DATA varlist,...[,ERR=stmtref]

Use this format to transfer the values/expressions from data statements in a program to the variables identified in varlist. When READ DATA is executed, ProvideX evaluates each expression in the data statements, in order, and places the values into the corresponding variables defined in your READ DATA directive.

ProvideX increments an internal pointer to the next data expression during the reading of data$. When the end of a data statement is reached, the next data statement in the program is used. Use a RESTORE directive to reset the pointer to the start of the first data statement.

Example 1:

Include the END= or ERR= option, to avoid an Error #2 when the pointer is at End-of-File.

0010 DATA "Dog","Cat","Pig"
0020 DATA "Pig","Cat","Dog"
0030 READ DATA X$, END=1000
0040 PRINT X$," | ",
0050 GOTO 0030
1000 RESTORE
1010 PRINT "DONE"; STOP
-:BEGIN
-:RUN
Dog | Cat | Pig | Pig | Cat | Dog | DONE

READ DATA FROM data$[,REC=string$][SEP=char$] TO varlist[,ERR=stmtref]

You can READ DATA FROM a string to initialize a list of variables or to parse a record into different IOLists.

Example 2. Initialize Variables:

You can READ DATA to an IOList to initialize all variables.

0010 ! Clear all variables in an IOLIST
0100 READ DATA FROM "" TO IOL=8000
8000 IOLIST ID$,NAME$,AMT

0010 READ DATA FROM "",REC=WORK$ TO IOL=IOL(WORK)

Example 3. Parse Record:

You can use READ DATA to parse a record into different IOLists.

0100 READ RECORD (1)R$
0200 IF R$(1,1)="T" THEN READ DATA FROM R$ TO IOL=8000
0200: ELSE READ DATA FROM R$ TO IOL=8010
8000 IOLIST TYPE$,TRN_DATE$,TRN_AMOUNT
8010 IOLIST TYPE$,PAY_DATE$,PAY_AMOUNT