#	@(#)Form.modify	13.2 (RC International) 91/08/23

form='Modify the Membership of a Class'

help=OPEN TEXT $INTFBASE/Text.itemhelp $LININFO

done=`if [ "$F2" = "add" ];
      then
	set -l CMD="OPEN FORM $OBJ_DIR/Form.mod_addpr $F1";
      else
	set -l CMD="OPEN FORM $OBJ_DIR/Form.mod_rempr $F1";
      fi`$CMD

#F1
name='Class Name:'
lininfo="modify:F1"
nrow=1
ncol=1
frow=1
fcol=14
rows=1
columns=14
fieldmsg='Enter class to be modified then press [ENTER]'
rmenu={ `lpdata -c | /usr/bin/sort` } 
menuonly=true
invalidmsg="Invalid Class - Press [CHOICES] to make selection"
choicemsg="Select class then press [ENTER]"

#F2
name=Add or remove printers:
lininfo="modify:F2"
nrow=2
ncol=1
frow=2
fcol=24
rows=1
columns=6
value=add
rmenu={ add remove }
menuonly=true
fieldmsg="Select add or remove then press [SAVE]"
choicemsg="Select add or remove then press [SAVE]"
invalidmsg="ERROR: Choices are add or remove."

name=RESET
button=8
action=RESET