# @(#)Form.chgcli         1.3

Form="Change Printer on `echo $ARG1 | tr -d ':'`"
begrow=12
begcol=39
altslks=TRUE
help=OPEN TEXT ${($LMPATHS)TEXT_CHGCLI_PATH}

done=`run ${($LMPATHS)MOD_CLIPR_PATH} -m $ARG1 $ARG2 $F1 $ARG4`update $ARG4

`${($LMPATHS)GET_TYPES_PATH} > /tmp/$VPID.ptypes`

name="Printer type: "
nrow=1
ncol=2
frow=1
fcol=16
rows=1
columns=20
value=`echo $ARG3 | tr -d ':' | tr -d ' '`
rmenu={ `readfile /tmp/$VPID.ptypes` }
fieldmsg=Press [CHOICES] to select a printer type. Hit [SAVE] when the form is complete.
valid=`${($LMPATHS)VALTYPE_PATH} "$F1"`
invalidmsg=`indicator -b 3 ""`Only printer types that are known to this system are allowed.
choicemsg=Move to an item with arrow keys and hit the RETURN key to select.
page=1

name="NOTE: After you hit [SAVE], hit [CANCEL] to close this form."
nrow=3
ncol=1
inactive

name=HELP
button=9
action=help
show=TRUE

name=CHOICES
button=10
action=choices
show=TRUE

name=SAVE
button=11
action=done
show=TRUE

name=""
button=12
action=nop

name=""
button=13
action=nop

name=CANCEL
button=14
action=close
show=TRUE

name=""
button=15
action=nop

name=""
button=16
action=nop
show=TRUE
#The end