!  Author: 	G.D. Merritt, CSC
!    Date: 	05/20/85
! Purpose:	a CMS Library editor/menu.
define verb LIBED
       image disk$pg22:[uxmerritt.decus.papers.fall_86]libed.exe

       parameter P1,		! the allocated and mounted tape drive name.
	     label = ELEMENT,
	     prompt = "CMS Element Specification",
	     value (default="*.*", list)

	qualifier LIBRARY,
		placement = positional,
		value(default="CMS$LIB"),
		default

	qualifier GENERATION,
		placement = positional,
		value(default="1+"),
		default

	qualifier LOG,
		placement = global,
		default