PARM FILE,FROM="",TO=""

##  MOVE.XEQ - MOVES FILE FROM "FROM" GROUP TO "TO" GROUP
##  TIM ERICSON

IF "!FROM" = "" AND "!TO" = "" THEN
  ECHO THE 'FROM' GROUP AND 'TO' GROUP ARE BOTH BLANK!
  RETURN
ENDIF
IF "!FROM" = "" THEN
  SETVAR FROMGROUP, HPGROUP
ELSE
  SETVAR FROMGROUP, "!FROM"
ENDIF
IF "!TO" = "" THEN
  SETVAR TOGROUP, HPGROUP
ELSE
  SETVAR TOGROUP, "!TO"
ENDIF
IF NOT FINFO("!FILE.!FROMGROUP",0) THEN
  ECHO FILE !FILE.!FROMGROUP NOT FOUND, NO MOVE DONE.
  RETURN
ENDIF
IF FINFO("!FILE.!TOGROUP",0) THEN
  ECHO FILE !FILE.!TOGROUP ALREADY EXISTS, NO MOVE DONE.
  RETURN
ENDIF
CONTINUE
RENAME !FILE.!FROMGROUP,!FILE.!TOGROUP
DELETEVAR FROMGROUP, TOGROUP