PARM NEW_GROUP=""
##  C.XEQ - CHANGES CURRENT GROUP
##  TIM ERICSON
IF "!NEW_GROUP" = ""
  IF NOT BOUND(LAST_GROUP) &
  OR NOT BOUND(LAST_DIR)
    SETVAR LAST_GROUP, HPHGROUP
    SETVAR LAST_DIR, "/!HPACCOUNT/!HPHGROUP"
  ENDIF
  ECHO WAS: !HPGROUP, NOW: !LAST_GROUP
  CHGROUP !LAST_GROUP
  SETVAR LAST_GROUP, HPHGROUP
  SETVAR LAST_DIR, "/!HPACCOUNT/!HPHGROUP"
ELSE
  IF "!NEW_GROUP" <> "!HPGROUP"
    SETVAR LAST_GROUP, HPGROUP
    SETVAR LAST_DIR, HPCWD
    ECHO WAS: !LAST_GROUP, NOW: !NEW_GROUP
    CHGROUP !NEW_GROUP
  ELSE
    ECHO ALREADY IN !NEW_GROUP
  ENDIF
ENDIF