Read a keyed customer record.
Open a data file, retrieve a record by key, and use the values immediately in your program.
open (1)"CUSTOMER"
read (1,key="1001") NAME$,CITY$,BALANCE
print "Customer: ",NAME$
print "City: ",CITY$
print "Balance: ",BALANCE