Robert, we use the following job since years, different releases:

::setquestion
::setbraces
!job catalogj,manager.sys,pub;outclass=,1
!
!setjcw glocalid 0
!xeq glocalid.xecmd.sys
!
!setvar sysname "??????"
!
!if glocalid = 1 then
!   setvar sysname "XENBH1"
!elseif glocalid = 2 then
!   setvar sysname "XENBH2"
!elseif glocalid = 4 then
!   setvar sysname "XENBH4"
!elseif glocalid = 5 then
!   setvar sysname "XENBH5"
!elseif glocalid = 7 then
!   setvar sysname "XENBH7"
!elseif glocalid = 8 then
!   setvar sysname "XENBH8"
!elseif glocalid = 21 then
!   setvar sysname "XEBHH1"
!elseif glocalid = 22 then
!   setvar sysname "XEBHH2"
!endif
!
!continue
!purge catwork
!build catwork;rec=-80,,f,ascii
!file cw=catwork,old
!
!echo T CATORIG >*cw
!echo F FIRST;F @ENTER GROUP (!) PASSWORD:@ >>*cw
!echo C @ENTER GROUP (!) PASSWORD:@ TO @???@ IN * >>*cw
!echo C @ENTER ACCOUNT (!) PASSWORD:@ TO @??@ IN *+1 >>*cw
!echo F FIRST;F @ENTER USER (!) PASSWORD:@ >>*cw
!echo C @ENTER USER (!) PASSWORD:@ TO @?@ IN * >>*cw
!echo F FIRST;F @CIERR 553@ >>*cw
!echo C 5/72 TO @*Invalid*@ IN * >>*cw
!echo F @CIERR 1402@ >>*cw
!echo C 6/72 TO @*Invalid*@ IN * >>*cw
!echo F @CIERR 1424@ >>*cw
!echo C 6/72 TO @*Invalid*@ IN * >>*cw
!echo F @CIERR 1426@ >>*cw
!echo C 6/72 TO @*Invalid*@ IN * >>*cw
!echo F @CIERR 1427@ >>*cw
!echo C 6/72 TO @*Invalid*@ IN * >>*cw
!echo F @CIERR 1436@ >>*cw
!echo C 6/72 TO @*Invalid*@ IN * >>*cw
!echo F @CIERR 1437@ >>*cw
!echo C 6/72 TO @*Invalid*@ IN * >>*cw
!echo F @CIERR 1438@ >>*cw
!echo C 6/72 TO @*Invalid*@ IN * >>*cw
!echo F @CIERR 1439@ >>*cw
!echo C 6/72 TO @*Invalid*@ IN * >>*cw
!echo F @CIERR 1441@ >>*cw
!echo C 6/72 TO @*Invalid*@ IN * >>*cw
!echo F @CIERR 1519@ >>*cw
!echo C 6/72 TO @*Invalid* &@ IN *-1 >>*cw
!echo F @CIERR 3084@ >>*cw
!echo C 6/72 TO @*Invalid*@ IN * >>*cw
!echo F @CIERR 6057@ >>*cw
!echo C 6/72 TO @*Invalid*@ IN * >>*cw
!echo F @CIERR 10130@ >>*cw
!echo C 7/72 TO @*Invalid*@ IN * >>*cw
!echo F FIRST;F @8 FROM OPERATOR: !@ >>*cw
!echo C @8 FROM OPERATOR: !@ TO @8 FROM OPERATOR (~sysnam~): !@ IN * >>*cw
!echo C @0 OPERATOR WARNING: !@ &
!TO @0 OPERATOR WARNING (~sysnam~): !@ IN *+1 >>*cw
!echo F @Enter group password:@ >>*cw
!echo C @Enter group password:@ TO @???@ IN * >>*cw
!echo C @Enter account password:@ TO @??@ IN *+1 >>*cw
!echo C @Enter user password:@ TO @?@ IN *+1 >>*cw
!
!echo F @3 FROM/!/!@ >>*cw
!echo C @3 FROM/!/!@ TO @3 FROM (~sysnam~)/!/!@ IN * >>*cw
!echo K CATNEW >>*cw
!echo E >>*cw
!
!continue
!purge catwork1
!setjcw cierror 0
!run tdp.pub;info='t catwork;c "~sysnam~" to "!sysname" in all;&
!k catwork1;e'
!copy catalog,catorig;yes
!continue
!purge catnew
!run editor.pub.sys <catwork1
!purge catwork
!purge catwork1
!file input=catnew
!run makecat.pub.sys,build
!
!eoj

It runs with STREAMX but I'm pretty sure it's not hard to figure out the
needed changes to run a pure STREAM.
I also let in the local changes we do to show the system name.

GLOCALID is an (old MPE/V) routine (still running) to get the system name
....
COMMENT GLOCALID
ECHO  The 'Local ID' for each cpu is determined by CTE NIB.
ECHO  System: XEBHH2
SETJCW GLOCALID=0022


I'm sure you get the idea!

Best regards, Andreas Schmidt, CSC, Germany





                    Robert Mills
                    <robert.mills          To:     [log in to unmask]
                    @WINDSONG-SERVI        cc:
                    CES.CO.UK>             Subject:     [HP3000-L] Replacing the 'helpful' logon error messages.
                    Sent by:
                    HP-3000 Systems
                    Discussion
                    <HP3000-L


                    09/06/02 05:12
                    PM
                    Please respond
                    to Robert Mills






You know the 'hacker helpful' messages that MPE gives you when you make a
mistake during logon, for example:

MPE/iX:hello
Expected [session name,] user.acct [,group]. (CIERR 1424)

and

MPE/iX:hello fred
Expected account name. (CIERR 10130)

Well, several years ago I found a job (on a CSL swap tape I think) that
would replace all this 'helpful' text in your message catalogue with
'*invalid*' and then rebuild it. I now find that I have a need for this and
have lost the original job (well it was over 10 years ago that I last used
it!).

Can anybody help?

regards,

Robert W.Mills
Systems Development Manager
Windsong Services
(01689) 870622 x3005

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *