PARM FILEDES="@", JOBNAME="@", DEV="@", OWNER=!HPACCOUNT, PRI=11
##  ASEQ.XEQ - ALTER THE PRIORITY ON A SELECTED SET OF SPOOLFILES
##  TIM ERICSON
IF "!FILEDES"="@" AND "!JOBNAME"="@" AND "!DEV"="@" THEN
  ECHO YOU CANNOT ALTER ALL SPOOLFILES!
  RETURN
ENDIF
IF "!OWNER" <> "SYS" AND "!DEV" = "@" THEN
  ECHO YOU MUST SPECIFY A PRINTER DEVICE (:ASEQ !FILEDES,DEV=??)
  RETURN
ENDIF
IF "!OWNER" = "SYS" THEN
  SETVAR ACCT, "@"
ELSE
  SETVAR ACCT, "!OWNER"
ENDIF
SPOOLF O@;SHOW;PRI=!PRI;&
  SELEQ=[(FILEDES=!FILEDES) AND &
         (JOBNAME=!JOBNAME) AND &
         (OWNER=@.!ACCT) AND &
         (DEV=!DEV)]
DELETEVAR ACCT