Todd Burch wrote on 01/16/2006 03:09:36 PM:

> Here is perhaps the smallest verb exit I've ever written to demonstrate
the
> blank lines at the top of the IPCS print dataset.  There are three blank
> lines at the top.  How do I access these?  When I write a REXX routine
that
> call the "NOTE" command, these blank lines do not exist in the print
> dataset.
>
> Assemble, linkedit, place in a library in your available TSO load libs,
and
> issue "verbx miniverb" from IPCS option 6.
>
> <snip>

I ran the requested experiment and got basically what I expected in the
RECFM=VBA data set.  The following was cut and pasted from ISPF browse
afterward - after turning on its display of control characters:

 1COMPON=REAL STORAGE MANAGEMENT,C
 +________________________________
 0WHY DOES THIS SHOW UP ON LINE 4?

The first line of output from MINIVERB should appear on line 3, following
an underscored title line on line 1 and a blank line 2.

You've been using the term "print dataset" which is what I've been
addressing, but your script would cause MINIVERB output to be sent to the
terminal as a destination unless you added "print noterm" as options like I
did.  There I do see 3 blank lines preceding the first one produced by
MINIVERB.  That's a consequence of PRDMP compatibility as well as some TSO
terminal output stream considerations.

o  PRDMP started the output from all verbs on a new page, but it didn't get
around to supporting ADPLEJEC until its final years.  ADPLEJEC is the bit
that says eject.  Old PRDMP exits put out between 60 and 90 blank lines to
cause the current page to overflow as a means to get to the top of the next
page.

o  The TSO output stream has no sense of pagination since it originally was
written to continuous forms fed through hardcopy terminals like 2741s.

IPCS's terminal support tries to make sense of all this by limiting the
number of consecutive blank lines that it actually honors and, conversely,
by slipping in some (3) blank lines when something nonblank shows up in the
output stream.
So the 3 blank lines that you see in your terminal output are the
consequence of the VERBEXIT subcommand putting out one blank line with a
page eject indication before giving control to the exit.

Now for some good news since you don't seem fond of the blank lines.  There
is a NOTOC option on VERBEXIT that suppresses several inherited behaviors
related to invoking verb exits, and one of those behaviors is forcing a new
page.  If you change your invocation to "verbx miniverb notoc", you'll have
your output start on the first line.  (If you say "note 'hi' page", you'll
get the 3 blank lines before HI.)

Bob Wright - MVS Service Aids

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to