Unformatted I/O

Example: Direct access, unformatted:

	OPEN( 2, FILE='data.db', ACCESS='DIRECT', RECL=20,
& 			FORM='UNFORMATTED', ERR=90 ) 
	READ( 2, REC=13, ERR=30 ) X, Y 
	READ( 2 ' 13, ERR=30 ) X, Y		   !  Alternate form 
@

This code opens a file for direct-access, unformatted I/O, with a record length of 20 characters, then reads the thirteenth record as is.