Todd Burch wrote on 12/24/2005 11:04:08 AM:

> The first 5 lines that come out in my print file are empty (all blank).
> I've read further after your reply but it's not apparent which service I
can
> use to cause ANY title lines (mine - not that I've defined any, or IPCS's
> title lines) to come out.  I did find one sentence in IPCS Customization
> that referenced being able to use the Table of Contents Service to supply
> title lines in a verbexit routine (my routine is a verbexit routine), but
> nothing is jumping out at me for how to do this.
>
> When using REXX to build a print file with the NOTE facility, my output
> lines start on line 1, just like I expect.  So, I figure there's a way to
do
> this from assembler.
>
> I've even tried setting ADPLLNRM (lines remaining on page) to the value
in
> ADPLLCNT (line count per page) and that didn't do it either.   On entry
to
> my routine, ADPLLCNT is X'3C' and ADPLLNRM is X'39'; a difference of 3,
...
> I think I must be printing a blank line or two myself (thus the 5 blank
> lines at the top) on entry.

I tried "VERBEXIT SUMDUMP PRINT NOTERM" to a test file, and I didn't see
the symptom of 5 blank lines at the beginning of the report.  I think that
bug is on your side of the API rather than the IPCS side.

The Table of Contents service is normally associated with an IPCSTOC
ddname, and it was designed to contain a brief set of entries that point
you to places in the print file.  If you want to use it in your code, put
out the first line of text that you want referenced to the print file.
Then put out a table of contents entry, usually with text very similar to
what was just written to the print file.  If you're writing code for a verb
exit, the VERBEXIT subcommand will have produced a level 1 table of
contents entry pertaining to the output from the exit unless NOTOC told it
not to do that.  You'd normally use level 2 entries to point to the
beginning of significant portions of the report(s) produced by the verb
exit.

The table of contents service has been sparsely exploited by the programs
that generate IPCS reports.  If your exit supports it well, it will not
have a lot of company.  It's a shame in a way.  We thought of trapping
table of contents entries written when you send a report to the terminal
via the IPCS dialog.  You'd enter some primary command like "CONTENTS" and
get a selection list that allowed you to jump to important places in report
output. Oh well...

The BLSABDPL fields that you mention are all fields that the host-supplied
print service uses to inform exits about print file status.  They should
not be modified by anything other than that service.

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