When using TBISPL to display table data under ISPF, a top-row indicator is displayed showing table row information. Below are two sample snippets exhibiting table top-row:
-------------------------- Employee Serial Listing -- ROW 1 OF 25 OPTION ===> SCROLL ===> PAGE
-------------------------- Employee Serial Listing -- ROW 1 TO 10 OF 25 OPTION ===> SCROLL ===> PAGE
By default, ISPF 2.2 (ISPF-like product from Wally Mclaughlin) uses the format in the first snippet-
ROW 1 OF 25.
The ISPF TBDISPL service offers several system variables to assist in table processing. Some of the more commonly used are ZTDSELS (number of selected rows to be processed, pending rows) and ZTDTOP (table row number of the top row displayed).
Regarding top-row indication, variable ZTDMSG can be used to declare a message ID to display top-row context. If ZTDMSG does not exist, message ID ISPZZ100 is used by default.
However, ZTDMSG can be set to any message ID.
Below is a sample message file ISPZZ10 containing the default message (ISPZZ100) and other optional messages that would require setting ZTDMSG before invoking the TBDISPL service:
1 10 20 30 40 50 60 70 80
+---+----+----+----+----+----+----+----+----+----+----+----+----+----+----+----+
ISPZZ100 'Row &ZTDDTOP of &ZTDDROW' .ALARM = NO
' '
ISPZZ101 'Top Row &ZTDDTOP' .ALARM = NO
' '
ISPZZ102 ' ' .ALARM = NO
'Row &ZTDDTOP to &ZTDDBOT of &ZTDDROW'
ISPZZ103 ' ' .ALARM = NO
'Row &ZTDDTOP from &ZTDDROW'
As an addition educational and learning resource for ISPF Table Services titled Using ISPF Table Services in MVS 3.8J, jump to this link for more information.
One additional resource focusing on TBDISPL titled ISPF TBDISPL Updates in MVS 3.8J is at this link.