Formatted I/O

Example: Direct access, formatted:

	OPEN( 2, FILE='inven.db', ACCESS='DIRECT', RECL=20, 
& 			FORM='FORMATTED', ERR=90 ) 
	READ( 2, FMT='(I10,F10.3)', REC=13, ERR=30 ) A, B 

This code opens a file for direct-access, formatted I/O, with a record length of 20 characters, then reads the thirteenth record and converts it according to the (I10,F10.3) format.