HP3000-L Archives

August 2004, Week 2

HP3000-L@RAVEN.UTC.EDU

Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
From:
Larry Barnes <[log in to unmask]>
Reply To:
Larry Barnes <[log in to unmask]>
Date:
Wed, 11 Aug 2004 11:00:41 -0700
Content-Type:
text/plain
Parts/Attachments:
text/plain (44 lines)
Instead of saying "Run Main.pub.Vesoft"  say  "Xeq Main.pub.Vesoft"

That should take care of it

-----Original Message-----
From: Eben Yong [mailto:[log in to unmask]] 
Sent: Wednesday, August 11, 2004 10:58 AM
To: [log in to unmask]
Subject: [HP3000-L] how to prevent the END OF PROGRAM message?


Greetings All,

I vaguely recall seeing this post some time ago but did not locate it in
various searches.  In any event, please look at the code below.  In my
exploration of command file entry points, I found in this scenario that
if I ran the command file from the MPE prompt it performed correctly and
at the end it displayed the message, END OF PROGRAM.  From within MPEX,
however, the message was not displayed.  Is there a way keep the END OF
PROGRAM message from displaying?

--- code begin ---
parm entry=MAIN

if '!entry' = 'MAIN'
 setjcw INSIDEMPEX=0
 if INSIDEMPEX<>1
  run MAIN.PUB.VESOFT; info='!hpfile entry="MPEX"'
 else
  !hpfile entry="MPEX"
 endif
else
 comment -- MPEX script begins here
 setlvar a 123
 echo !a
endif
--- code end ---

* 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 *

ATOM RSS1 RSS2