READ
Read a line of data from a text file or form.

Format
 READ target from TAG [/Qualifiers ...]
 targetVariable or array element to receive the line of text.
 TAGName tag of the file or form to read from.
 NOTE
 The READ statement can read from a form as well as from a text file. It returns the text from the current cursor position to the end of the line, but does not move the cursor.

Qualifiers
/Fail=LABELLabel to which to branch if the statement fails.
If LABEL is %EXIT, exit the routine or loop.
If in a loop, and LABEL is %CONTINUE, continue the loop. If not in a loop, and LABEL is %CONTINUE, an error message displays.
 /Succeed=LABELLabel to which to branch if the statement succeeds.
If LABEL is %EXIT, exit the routine or loop. If in a loop, and LABEL is %CONTINUE, continue the loop. If not in a loop, and LABEL is %CONTINUE, an error message displays.
 /NofailDo not signal an error. Instead, set the
internal variable %FAIL.
 /WriteOpen for write access. A new file will be created.

Example
 Open 'EMPLOYEE.LIS' as INPUT
 Loop
 Read a from INPUT /Fail:CLOSE
 Gosub PROCESSING
 End_loop
 CLOSE: Close INPUT