When using TBISPL to display table data under ISPF, a bottom-of-data message is displayed after the last displayed table row. Below are two snippets exhibiting different bottom-of-data messages:
-------------------------- Employee Serial Listing ---------------------------- OPTION ===> SCROLL ===> PAGE Panel: PEMPL8D PF3-End PF7-Scroll Up PF8-Scroll Down Table: EMPLTBL0 EMPSER Last Name First Name Address 1 Phone ------ --------------- --------------- ------------------------- ------ 852 852852 E FIRST 852 123 MAIN ST 800 555-1212 853 LASTNAME FIRST 853U 123 MAIN ST 800 555-1212 854 LASTNAME FIRST 854 188 MOD ADDRS 800 555-1212 855 855TNAME FIRST 855 123 MAIN ST 800 555-1212 856 LASTNAME FIRST 856 123 MAIN ST 800 555-1212 857 LASTNAME FIRST 857 123 MAIN ST 800 555-1212 858 LASTNAME FIRST 858 123 MAIN ST 800 555-1212 57 LASTNAME FIRST 57 123 ADDED AFTER 555 555-3333 ******************************* BOTTOM OF DATA *******************************
-------------------------- Employee Serial Listing ---------------------------- OPTION ===> SCROLL ===> PAGE Panel: PEMPL8D PF3-End PF7-Scroll Up PF8-Scroll Down Table: EMPLTBL0 EMPSER Last Name First Name Address 1 Phone ------ --------------- --------------- ------------------------- ------ 852 852852 E FIRST 852 123 MAIN ST 800 555-1212 853 LASTNAME FIRST 853U 123 MAIN ST 800 555-1212 854 LASTNAME FIRST 854 188 MOD ADDRS 800 555-1212 855 855TNAME FIRST 855 123 MAIN ST 800 555-1212 856 LASTNAME FIRST 856 123 MAIN ST 800 555-1212 857 LASTNAME FIRST 857 123 MAIN ST 800 555-1212 858 LASTNAME FIRST 858 123 MAIN ST 800 555-1212 57 LASTNAME FIRST 57 123 ADDED AFTER 555 555-3333 ************************** End of Employee Listing ***************************
The ISPF TBDISPL service offers several system variables to assist in table processing. The system variable ZTDMARK can be used to declare a different bottom-of-data marker.
By default, ISPF 2.2 (ISPF-like product from Wally Mclaughlin) uses the bottom-of-data marker –
******************** BOTTOM OF DATA *********************
when ZTDMARK is not declared.
Examples of using ZTDMARK:
Example 1: Use new marker ‘**** End of Employee Listing ****’
In the model panel definition under the )INIT section, set ZTDMARK to new value as shown below:
)INIT . . &ZTDMARK = ' ************************** End of Employee Listing + ***************************'
Example 2: Use no bottom of data marker
In the model panel definition under the )INIT section, set ZTDMARK to a blank value as shown below:
)INIT . . &ZTDMARK = ' '
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.