! Set up JT open/extend/delete daemon
DEFINE VERB JTDMN
   IMAGE gcy$sys:jtdmn.exe
     parameter p1,prompt="JTn:",value(required,type=$device),label=UNIT
     parameter p2,label=FNAM,prompt="file",value(type=$infile)
     qualifier ASSIGN
     qualifier DEASSIGN
     qualifier VIRTUAL
     qualifier EXACT
     Qualifier KEY,value(required,type=$quoted_string)
     Qualifier CLEAR
     qualifier MODE,value(required,type=$number)
     qualifier FCNMSK,value(required,type=$number)
     qualifier CBT,value(required,type=$number)
     qualifier FRACTION,value(required,type=$number)
     qualifier MODIFY
     qualifier FILENUM,value(required,type=$infile)
     qualifier EXEMPT,value(required,type=$infile)
     qualifier SHARE,value(required,type=$infile)
     qualifier MINIMUM,value(type=$number)
     qualifier MAXIMUM,value(type=$number)
     qualifier ALDEFONLY
     qualifier LICENSE
     qualifier INSTALL,value(required,type=$quoted_string)
! p1 is jt: device to assign/deassign. JTdriver assignment is tested
! p2 is the host device
! assign/deassign specify whether to assign or deassign a host storage
! to a jt: unit.
! modify qualifier causes jtdmn NOT to loop regardless of other switches