Rev 8306 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed
!read adm/class/userdef classes,$wims_class,$getuser
!defread $userdef
!if $transfertype=show
ttype=show
transfertype=
!read adm/gateway/transfer $getuser test
!exit
!endif
!if $transfertype iswordof merge replace
!read adm/gateway/transfer $getuser $transfertype $transferclass
!endif
transfertype=
!if $error=$empty
!read adm/gateway/transfer $getuser test
!else
!exit
!endif
!if $transfer_test<1
job=getuser
!changeto var.proc.$job
!endif