The cleardata statement clears the data stack.
cleardata
The following program is invoked from a macro. A list of filenames and record IDs is passed to it from the macro with DATA statements.
5 * input filename if filename = "end" then stop open filename to file else print "can’t open file ":filename print "please enter new filename " cleardata goto 5 end