module salvagecmd
ident "salvage 09-Sep-1985"

!
! Version:	'V04-000'
!
! Facility:  salvage
!
! Abstract:
!	This module contains the command language definitions for
!	the DCL SALVAGE command
!
!
! Author:  Keith Loepere, September 9, 1985
!
!--

define type rebuild_options
	keyword indexf, default
	keyword bitmap, default
	keyword badblk
	keyword mfd
	keyword corimg
	keyword volset
	keyword contin
	keyword backup
	keyword badlog

define verb salvage
	image salvage
	qualifier auto
	qualifier rebuild, value (list, type = rebuild_options), default
	qualifier rvn, value (type = $number)
	qualifier select
	qualifier setcount, value (type = $number)
	qualifier volset, value
	qualifier write, default
	disallow auto and select
	disallow volset and not rvn
	parameter p1, label=device, prompt="Device", value(required)
	parameter p2, label=label, prompt="Label", value(required)