Tracy
Is the HPMSGFENCE set in the job? If so if it is set to two (2) that would
explain the missing lines.
If so, temporarily set it to zero (0) to see the missing lines.
Also has the job changed recently?
I know that you have probably checked these things, just wanted to make
sure.
Also - I assume there are statements prior to the excerpt you posted, is
there an unmatched IF statement
prior to this that might be causing the problem?
Just my thoughts - hope it helps a little
Bob Schlosser
Technical Consultant
the Support Group, inc.
Austin, TX
(512) 284-3733 cell
(512) 266-4400 office
(800) 798-9862 Support
CONFIDENTIAL: This message is intended only for the use of the individual
to whom it is addressed. It contains information which may be privileged,
confidential and exempt from disclosure under applicable law. Any views or
opinions presented are solely those of the sender and do not necessarily
represent those of Blanket Enterprises, Inc. or its subsidiaries unless
otherwise specifically stated. If the reader of this message is not the
intended recipient, the reader is hereby notified that any dissemination,
distribution or copying of this communication is strictly prohibited. If
you have received this communication in error, please inform the sender via
email or call us at (800) 798-9862.
-----Original Message-----
From: HP-3000 Systems Discussion [mailto:[log in to unmask]] On Behalf
Of Johnson, Tracy
Sent: Tuesday, September 29, 2009 9:44 AM
To: [log in to unmask]
Subject: [HP3000-L] Skipping Lines in a Streamed Job
I have a job with some "IF" statements that is apparently skipping some
of the IF/ENDIF constructs. In the job, it is quite lengthy, so I have
shortened it with the "... do some stuff ..." phrases.
It skips the FLODB construct and picks up at the TABDB construct. In
the $STDLIST the lines are simply missing, as if they weren't there. If
they were falling out of the "IF" statements, you at least expect the
see the "*** EXPRESSION FALSE *** output.
I won't say I haven't seen anything like it. After 25 on the HP3000
years I've seen a lot of things I don't remember. I suspect a corrupt
EDITOR job file, although I can tell just by looking at the file. Can
anyone express similar experiences?
IF FEXISTS("FLODB") THEN
IF VEFINFO("FLODB").OPENED=TRUE THEN
... do some stuff ...
ENDIF
IF VEFINFO("FLODB").OPENED=FALSE THEN
... do some other stuff ...
ENDIF
ENDIF
IF FEXISTS("ODETDB") THEN
IF VEFINFO("ODETDB").OPENED=TRUE THEN
... do some stuff ...
ENDIF
IF VEFINFO("ODETDB").OPENED=FALSE THEN
... do some other stuff ...
ENDIF
ENDIF
IF FEXISTS("OMEDB") THEN
IF VEFINFO("OMEDB").OPENED=TRUE THEN
... do some stuff ...
ENDIF
IF VEFINFO("OMEDB").OPENED=FALSE THEN
... do some other stuff ...
ENDIF
ENDIF
IF FEXISTS("QUODB") THEN
IF VEFINFO("QUODB").OPENED=TRUE THEN
... do some stuff ...
IF VEFINFO("QUODB").OPENED=FALSE THEN
... do some other stuff ...
ENDIF
ENDIF
IF FEXISTS("TABDB") THEN
IF VEFINFO("TABDB").OPENED=TRUE THEN
... do some stuff ...
ENDIF
... do some other stuff ...
ENDIF
Tracy Johnson
Business Analyst
Measurement Specialties, Inc.
1000 Lucas Way
Hampton, VA 23666
Office 1-757-766-4318
[log in to unmask]
www.meas-spec.com
* 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 *
|
