Subject: | |
From: | |
Reply To: | Genute, A Thomas |
Date: | Mon, 6 Mar 2000 15:55:26 -0500 |
Content-Type: | text/plain |
Parts/Attachments: |
|
|
Yes, I hate the end of program message. I haven't seen this documented
lately, but this is a solution.
SYSLOGON
OPTION NOLIST;LOGON;NOBREAK
SETJCW SECURITYANSWER = 0
CONTINUE
XEQ MAIN.PUB.VESOFT "SECLOGON",1
IF SECURITYANSWER = 1 OR CIERROR = 989 THEN
CONTINUE
BYE
EOJ
ENDIF
*****
Eucaristo,
Tom Genute
Phone: (212) 437-1744
Pager: (888) 778-7121
-----Original Message-----
From: Jerry Fochtman [mailto:[log in to unmask]]
Sent: Monday, March 06, 2000 3:43 PM
To: [log in to unmask]
Subject: Re: Vesoft exit message
At 11:46 AM 3/6/2000 -0800, Barry Lake wrote:
>At 11:35 AM -0800 3/6/00, [log in to unmask] wrote:
> >Does anybody know/remember how to disable the END OF
PROGRAM message when
> >exiting MPEX? I.e..
> >
> >SYS/PUB:mpex
> >MON, MAR 6, 2000, 11:20 AM
> >
> >MPEX/3000 27N81128 (c) VESOFT Inc, 1980 5.5 04:02791
For help type
> >'HELP'
> >
> >%exit
> >
> >END OF PROGRAM
> >SYS/PUB:
>
>
>This information applies to any MPE program, not just
VESoft's MPEX. If you
>explictly run the program, as in
>
> :run myprog.pub.myacct
>
>then you will see "END OF PROGRAM" when the program
terminates. However if
>you execute the program implicitly, as in
>
> :myprog.pub.myacct
>
>then you won't see "END OF PROGRAM".
You can also
SETVAR SAVEMSGFENCE HPMSGFENCE
SETVAR HPMSGFENCE 1
<run program>
SETVAR HPMSGFENCE SAVEMSGFENCE
/jf
_\\///_
(' o-o ')
___________________________ooOo_(
)_OOoo____________________________________
Wednesday, March 6th
Yesterday, in 1770 - The 'Original' Boston Massacre
took
place.
Today in 1836 - Battle of the Alamo
1857 - Dred Scott Decision made by
the Supreme Court
___________________________________Oooo_____________________________________
oooO ( )
( ) ) /
\ ( (_/
\_)
|
|
|