#*************************************************************************
# Copyright (c) 2002 The University of Chicago, as Operator of Argonne
#     National Laboratory.
# Copyright (c) 2002 The Regents of the University of California, as
#     Operator of Los Alamos National Laboratory.
# EPICS BASE is distributed subject to a Software License Agreement found
# in file LICENSE that is included with this distribution.
#*************************************************************************


recordtype(permissive) {
	include "dbCommon.dbd"


	field(VAL,DBF_USHORT) {
		prompt("Status")
		promptgroup("40 - Input")
		asl(ASL0)
		pp(TRUE)
	}
	field(WFLG,DBF_USHORT) {
		prompt("Wait Flag")
		pp(TRUE)
	}


	field(LABL,DBF_STRING) {
		prompt("Button Label")
		promptgroup("80 - Display")
		pp(TRUE)
		interest(1)
		size(20)
	}


	field(OVAL,DBF_USHORT) {
		prompt("Old Status")
		special(SPC_NOMOD)
		interest(3)
	}
	field(OFLG,DBF_USHORT) {
		prompt("Old Flag")
		special(SPC_NOMOD)
		interest(3)
	}


}
