Well in reviewing the script *after* mailing I see at least one bug...
FWIW, here's a new version...

> An equally nerdy CI script (also requiring 5.5) is:
>
> PARM except="MANAGER.SYS OPERATOR.SYS", entry=main
> if "!entry" = "main" then
>    showjob >sjout
>    xeq !hpfile !except, entry=abortjob <sjout
>    return
> elseif '!entry' = 'abortjob' then
>    setvar i 0
>    while setvar(i,i+1) <= finfo(hpstdin,'eof') do
>       if lft(setvar(buf,input()),1) = '#' and &
            pos(word(buf,,-1),"!except") = 0 then                  <--
>          continue
           abortjob ![word(buf)]                                   <--
>       endif
>    endwhile
>    return
> endif
>
> PLEASE NOTE: this has **not** been tested, but you get the idea...
>
> Jeff Vance, CSY
>


--