Procedure QIOATT(LUN:Integer; 
		EFN:Event_flag
		);EXTERNAL;

{*USER*
 Pascal-3 Procedure to execute QIO WAL function.

This procedure will use Executive Queue I/O Request and Wait (QIOW$C) Call.  

LUN is the logical unit number to be assigned to the appropriate device.  

EFN is the event flag to be set when the I/O is completed. f0 may 
not be specified. 

Directive status is available in $DSW on return.

}