!
!		Custom DCL command that reads the UAF and lists the 
!	USERNAME and OWNER FIELDS out.  It allows printouts on the line
!	printer or terminal and acceptes a user specified string to be
!	searched for.
!

	DEFINE VERB	USERS

		IMAGE	SYS$SYSDEVICE:[ARIPROGS.USERS]USERS

		PARAMETER P1,LABEL=SEARCH_NAME,VALUE(DEFAULT=" ")

		QUALIFIER PRINTER