$	Verify_at_start='F$VERIFY(0)
$	INQUIRE ERROR "Error number"
$	ERR:=%X'ERROR'
$	WRITE SYS$OUTPUT "''F$MESSAGE(ERR)'"
$	IF Verify_at_start THEN SET VERIFY
$	EXIT
$!	
$!
$!  File Name:	ERRORDSP.COM
$!  Author:	James G. Downward
$!  Date:	29-April-1982
$!  Function:	
$!		Displays the error message associated with a given error
$!		number.  Useful for debugging RMS assembly language
$!		programs.
$!
$!  Modified:
$!