TBDISPL allows the user to scroll the data up and down and enter information in the input fields in the scrollable or fixed portions.

TBDISPL operation depends on whether a )REINIT or )PROC section is included in the panel definition. When a )REINIT or )PROC section is included, and if the user makes no modification to the screen and presses the Enter key, TBDISPL returns control to the dialog function. On the other hand, if neither a )REINIT nor a )PROC section is included and if the user makes no modification to the screen and presses the Enter key, TBDISPL treats this as a "no operation" and control does not return to the dialog function. This is for compatibility with the previous version of the product.

After display of a panel using TBDISPL, and before control returns to the dialog function:

1. The contents of all input fields in the fixed portion are stored in the dialog variable specified in the panel definition.
2. If there were no selected rows to process, the CRP is set to TOP (zero). If scroll return to function is defined and rows are needed to satisfy the scroll request, the scroll return system variables are set in the function pool.
3. If there were any selected rows, the CRP is positioned to the first of these, and the row is retrieved from the table. The values of all variables from that row are stored into the corresponding dialog variables. All input fields in the selected model set on the display are then stored in the corresponding dialog variables. The input fields can or cannot correspond to variables in the table.

   Variable ZTDSELS contains the number of rows that were selected. The value of ZTDSELS can be checked in the )PROC section of the panel definition, or it can be checked by the dialog function.

4. The row number that corresponds to the first model set currently displayed on the screen is stored in the system variable ZTDTOP. If, in a dialog, you want to reposition the scrollable data as the user last saw it, you must reposition the CRP to the row number stored in ZTDTOP before reinvoking the TBDISPL service with the panel name specified. This is not necessary if the panel name is not specified.

>>-ISPEXEC--TBDISPL--table-name--+-------------------+---------->
                                 '-PANEL(panel-name)-'   

>--+-----------------+--+--------------------+------------------>
   '-MSG(message-id)-'  '-CURSOR(field-name)-'   

>--+--------------------------+--+-------------------------+---->
   '-CSRROW(table-row-number)-'  '-CSRPOS(cursor-position)-'   

>--+--------------------+--+--------------------+--------------->
   |          .-YES-.   |  '-POSITION(crp-name)-'   
   '-AUTOSEL(-+-NO--+-)-'                           

>--+-------------------+--+----------------------------+-------><
   '-ROWID(rowid-name)-'  '-MSGLOC(message-field-name)-'   

>>-CALL--ISPEXEC--(buf-len,--buffer);--------------------------><

or

>>-CALL--ISPLINK--('TBDISPLb'--,--table-name-------------------->

>--,-+-panel-name-+--,-+-message-id-+--,-+-field-name-+--------->
     '-'b'--------'    '-'b'--------'    '-'b'--------'   

>--,-+-table-row-number-+--,-+-cursor-position-+---------------->
     '-'b'--------------'    '-'b'-------------'   

     .-'YESbbbbb'-.                                     
>--,-+-'b'--------+--,-+-crp-name-+--,-+-rowid-name-+----------->
     '-'NObbbbbb'-'    '-'b'------'    '-'b'--------'   

>--,-+-message-field-name-+-);---------------------------------><
     '-'b'----------------'      

table-name

Specifies the name of the table to be displayed.

panel-name

Specifies the name of the panel to be displayed.

message-id

Specifies the identification of a message to be displayed on the panel.

field-name

Specifies the name of the field where the cursor is to be placed on the display. Any setting of the .CURSOR control variable done in the panel definition takes precedence over this parameter.

table-row-number

Specifies the table row number (CRP number) corresponding to the model set on the display where the cursor is to be placed. For a call, this parameter must be a fullword fixed binary number.

Specifying the CSRROW parameter without specifying AUTOSEL(NO) results in the row being retrieved, even if the user did not explicitly select the row. This is called auto-selection.

If the specified row does not have a corresponding model set in the logical table display (the logical table display includes model sets not displayed because of split-screen, PFSHOW, or floating command line), the cursor is placed at the command field. No auto-selection is performed.

Any setting of the .CSRROW control variable done in the panel definition takes precedence over this parameter.

cursor-position

Specifies the position within the field where the cursor is to be placed. This position applies regardless of whether the initial cursor placement was specified in the CURSOR calling sequence parameter, the .CURSOR control variable in the )INIT or )REINIT section of the panel, or is the result of default cursor placement. If cursor-position is not specified or is not within the field, the default is 1.

Any setting of the .CSRPOS control variable done in the panel definition takes precedence over this parameter.

AUTOSEL( YES |NO)

YES specifies that if the CSRROW(table-row-number) parameter is specified or if .CSRROW is set within the )INIT or )REINIT section, the row is to be retrieved, even if the user did not explicitly select the row. This is known as auto-selection.

NO specifies that even if the CSRROW(table-row-number) parameter is specified or if .CSRROW is set within the )INIT or )REINIT section, the row is to be retrieved only if the user explicitly selects the row by entering data into the corresponding model set.

If the CSRROW parameter or the .CSRROW control variable is not specified, the AUTOSEL parameter is ignored.

Any setting of the .AUTOSEL control variable done in the panel definition takes precedence over this parameter.

crp-name

Specifies the name of a variable in which the row number pointed to by the CRP is to be stored. If the CRP is positioned to TOP, the row number returned is zero.

rowid-name

Specifies the name of a variable in which a number that uniquely identifies the row being accessed is to be stored. Later, this identifier can be specified in the ROW parameter of TBSKIP to cause the CRP to be positioned to the row. This identifier is not saved on permanent storage by TBSAVE or TBCLOSE. The variable must be an 8-byte character field.

message-field-name

Used to position the message pop-up window. If the application specifies this parameter, the Dialog Manager positions the message pop-up relative to the named field.

If this parameter is omitted and a message is displayed in a message pop-up window, the window is displayed at the bottom of the logical screen or below the active ADDPOP pop-up window if one exists.

For compatibility with later versions, this parameter should be specified only when the message will display in a pop-up window.

Note: When running in GUI mode, this parameter is ignored.

buf-len

Specifies a fullword fixed binary integer containing the length of "buffer".

buffer

Specifies a buffer containing the name of the service and its parameters in the same form as they would appear in an ISPEXEC call for a command procedure.

If a program function uses the VCOPY service to access a variable, the value will be in character string format. It will not be in fixed binary format.

System variables used with TBDISPL processing are:

ZTDMARK

Specifies an alternate bottom-of-data marker. ZTDMARK is created by the dialog and can reside in any variable pool. It is an input variable, whose length can be equal to or less than the screen width. If ZTDMARK exists, its value is used as the marker. If ZTDMARK does not exist, the default marker of "BOTTOM OF DATA" with asterisks on each side is used.

For example, this assignment could be made in the )INIT section of a table display panel:

&ZTDMARK = '----> End of Data <----'

ZTDMARK can be blank. That is, this assignment is valid:

&ZTDMARK = ' '

In this case a bottom-of-data marker would not appear on the screen.

ZTDMSG

Specifies the ID of a message to be used as an alternate top-row-displayed indicator. ZTDMSG is created by the dialog and can reside in any variable pool. It is an input variable whose length is 8.

If ZTDMSG exists, TBDISPL invokes the GETMSG service to get the short message and long message text. If the short message exists and is nonblank, it is used as the top-row-displayed indicator. If the short message does not exist, the long message text is used as the top-row-displayed indicator. In both cases, the current values of any variables in the message are placed in the message and the text is placed right-justified on the top line of the display.

If ZTDMSG does not exist, the long form of message ISPZZ100 is used.

The text used for the top-row-displayed indicator is summarized in the z/OS ISPF Dialog Developer's Guide and Reference.

A message ID whose short and long message text is blank (' ') or the null variable (&Z) can be assigned to ZTDMSG. In this case, the table display would not have a top-row-displayed indicator.

No top row is displayed if the user attempts to:

• Display an empty table
• Scroll past the bottom row
• Specify no rows matching the TBSARG criteria and ROWS(SCAN) is specified on the )MODEL statement of the panel definition.

In this case, message ISPZZ101 is used for the top-row-displayed indicator. This has no short message text, and the long message text is '&Z'.

ZTDROWS

Created by TBDISPL to indicate the number of rows in the table most recently displayed. It resides in the function pool. It is an output variable whose length is 6. Unless it has been defined otherwise by a program function, ZTDROWS is 6 characters long and will have leading zeros, if necessary.

ZTDSELS

Created by TBDISPL to indicate the number of selected rows. It includes the current selected row, if one exists, and any pending selected rows. ZTDSELS resides in the function pool. It is an output variable whose length is 4. Unless it has been defined otherwise by a program function, ZTDSELS is 4 characters long and will have leading zeros if necessary.

ZTDTOP

Created by TBDISPL to indicate the table row number of the top row displayed. ZTDTOP resides in the function pool. It is an output variable whose length is 6. Unless it has been defined otherwise by a program function, ZTDTOP is 6 characters long and will have leading zeros if necessary.

ZTDVROWS

Returns the number of visible rows available from the most recent table display. Only complete model sets are counted, so if a model set spans multiple lines and not all of the lines are visible, it is not counted. ZTDVROWS is set to zero if no complete model sets are visible. ZTDVROWS resides in the function pool. It is a six character output pool variable and will have leading zeros if necessary.

System variables ZTDRET, ZTDADD, ZTDSCRP, ZTDLTOP, ZTDLROWS, ZTDSRID, ZTDAMT, and ZTDSIZE are used exclusively when dynamically building the table being displayed.

Table display service system variables, ZTD*, are not saved as part of the CONTROL DISPLAY SAVE/RESTORE information. The values of these variables may be saved by the dialog developer and restored before resuming the processing of the initial table display. Also, the ZVERB is not saved.

Consider these items when using TBDISPL with other services:

1. CONTROL DISPLAY LOCK

   This service specifies that the next display output is to leave the user's keyboard locked as the panel is displayed, and ISPF is to simulate an ENTER. This facility can be used to generate crude animation or display an "in process" message during a long-running operation.

   Table displays done in conjunction with this service should display panels that have a )REINIT or )PROC section. Otherwise, the simulated ENTER is treated as a no-operation, as described under TBDISPL summary.

2. CONTROL DISPLAY SAVE and CONTROL DISPLAY RESTORE

   If the dialog wants to invoke a display service (BROWSE, EDIT, DISPLAY, another TBDISPL) before processing pending selected rows, it must invoke the CONTROL DISPLAY service to save and restore the current TBDISPL series environment.

   The dialog should invoke CONTROL DISPLAY SAVE before the non-TBDISPL series display service and CONTROL DISPLAY RESTORE after the non-TBDISPL series display service. For example:

   Service

   Description

   TBOPEN TAB1

   Open the table

   TBDISPL TAB1 PANEL(PAN1)

   Display the table and panel

   CONTROL DISPLAY SAVE

   Save control information about PAN1

   DISPLAY PANEL(PAN2)

   Display a second panel

   DISPLAY PANEL(PAN3)

   Display a third panel

   CONTROL DISPLAY RESTORE

   Restore control information about PAN1

   TBDISPL TAB1

   Reinvoke TBDISPL to process the next selection or redisplay the table and panel

   CONTROL DISPLAY SAVE

   Again save control information about PAN1

   DISPLAY PANEL(PAN2)

   Display the second panel again

   DISPLAY PANEL(PAN3)

   Display the third panel again

   CONTROL DISPLAY RESTORE

   Again restore control information about PAN1

   TBDISPL TAB1

   Reinvoke TBDISPL to process the next selection or redisplay the table and panel

3. BROWSE, EDIT, and DISPLAY

   See item 2.

4. Command Tables

   Do not attempt to use TBDISPL to display a command table currently in use. The results would not be predictable.

5. TBSARG

   When only certain rows from a table are to be displayed, the TBSARG service must be invoked before issuing TBDISPL to establish the search criteria. The search criteria should specify a forward scan through the table. In this case, ROWS(SCAN) must be specified on the )MODEL statement in the panel definition.

6. TBSORT

   The TBSORT service can be used freely with the TBDISPL service, even during a TBDISPL series. Note, however, that the pending selected rows will be processed in their original order; that is, in the order they would have been processed had the dialog not invoked the TBSORT service.

These techniques can be applied in programs and command procedures using the TBDISPL service.

1. Displaying Only Certain Rows

   When only certain rows from a table are to be displayed, the TBSARG service must be invoked before issuing TBDISPL to establish a search criteria. The search criteria should specify a forward scan through the table. In this case, ROWS(SCAN) must be specified on the )MODEL statement in the panel definition.

2. Displaying Table Extension Variables

   As TBDISPL creates the scrollable portion of the display, it reads rows from the table and fills in fields in the model sets with their current values. If a field in a model line is an "extension" variable in the table and does not exist in all rows, TBDISPL repeats its value in model sets to which it does not apply. To prevent this, use the CLEAR(var-name, var-name, ...) keyword on the )MODEL statement. This keyword sets to blank the specified variables before each row is read from the table to fill the scrollable portion.

3. Clearing Already-Processed Select Fields

   As the TBDISPL service is reinvoked to process pending selected rows, the dialog may set to blank the select field for successfully processed rows. This is useful in case there is a redisplay with an error message. The already processed select fields will be blank and the not-yet-processed select fields will still have the user-entered data in them.

   Having these statements in the )REINIT section of the panel definition could achieve this:

   If (.msg=' ')
     &Select=' '
     Refresh(Select)

   where "Select" represents the name of any field in the panel that the dialog wants to clear. The previous three statements shown could be on one line. For example:

   If (.msg=' ')  &Select=' '   Refresh(Select)

4. Using Auto-Selection
   Consider this situation:

   • The user has entered invalid data in the select field.
   • The panel is redisplayed with an error message.
   • The user does not change the invalid data but performs some action that results in control returning to the dialog function.

   The model set with the invalid data was not user-selected. If the dialog wants to ensure that the user corrects the invalid data, it should use auto-selection in this situation. That is, the CSRROW parameter or control variable should be specified, and the AUTOSEL parameter or control variable should be blank or YES. This will result in the specified row being selected even if the user did not explicitly select it by modifying the corresponding model set on the display.

   The auto-selection feature is normally used when the cursor is placed at invalid data in the scrollable portion and there is an error message displayed. It is not used when the cursor is placed in the scrollable portion for informational purposes.

   If the auto-selected row is not displayed on the logical screen because of split screen, PFSHOW, or a floating command line, the cursor is placed at the command field. The dialog should ensure that the user is aware of the auto-selected row by issuing a message when specifying table-row-number.

5. Controlling the Top Row Displayed

   As discussed previously, the user can issue the UP or DOWN command to scroll during a TBDISPL display. Scrolling changes the row that is displayed at the top of the scrollable portion. This topic discusses how the dialog function controls the top row displayed.

   In a typical table display dialog, the TBDISPL service is invoked repeatedly in a loop. The first call results in a display ("the first display"). Subsequent calls can produce a display ("subsequent displays") or can process pending selected rows ("no display").

   Controlling the Top Row Displayed in a "First Display"

   The TBDISPL service must be invoked with the PANEL parameter specified to obtain a "first display". In this case, the current row is the top row displayed. For convenience, a table with its CRP at TOP is treated as though the current row was row 1. The dialog can use any of the services that move the CRP, such as TBSKIP or TBTOP, to make the desired table row the current row.

   Controlling the Top Row Displayed in a "Subsequent Display"

   There are three ways to produce a "subsequent display":

   1. Invoke TBDISPL with the PANEL parameter specified.
   2. Invoke TBDISPL without the PANEL parameter specified, but with the MSG parameter or .MSG control variable specified.
   3. Invoke TBDISPL without the PANEL parameter specified and without the MSG parameter, or .MSG control variable, specified when there are no pending selected rows.
   In the first case, the current row is the top row displayed. The system variable ZTDTOP contains the row number of the top row displayed on the previous TBDISPL display. This technique can be useful to control the top row displayed:

   TBTOP  table                     /* Set CRP to TOP        */
   TBSKIP table NUMBER(&ZTDTOP)     /* Set CRP to previous   */
                                    /*  top row displayed    */
   VGET (ZVERB ZSCROLLN)            /* Retrieve variables    */
   Select                           /* Determine Case        */
    When &ZVERB = 'UP' Then         /* - When scroll UP req  */
     TBSKIP table NUMBER(-&ZSCROLLN)/*  skip back toward top */
    When &ZVERB = 'DOWN' Then       /* - When scroll DOWN req*/
     TBSKIP table NUMBER(&ZSCROLLN) /*  skip forward         */
    Otherwise                       /* - Otherwise, not a    */
   End                              /*  scroll request       */
                                    /*                       */
   TBDISPL table PANEL(panel)       /* Disp the table and pnl*/

   In the second case, the top row displayed is the same as that displayed on the previous display. That is, the previous image is "redisplayed" as the user last saw it, except that the specified message is also shown. Certain fields can have been refreshed and the cursor can be in a different place.

   In the third case, any pending scroll request is honored. That is, if the user had entered any data and issued a scroll request on a previous TBDISPL display, that scroll request is now honored. If no scroll request was pending, the top row displayed is whatever it was on the previous display.

6. Using Variable Model Lines

   Model lines can be specified dynamically through the use of variable model lines. That is, the attribute characters and field names are not specified in the model section. Instead, a variable whose value contains the attribute characters and field names is specified in column one of the model line.

Here are some rules that apply to variable model lines:

• The variable must begin in column 1.
• The variable must be the only data on the model line.
• The length of the value of the variable must not be greater than the screen width.
• The variable must be initialized before the panel is displayed. It is not acceptable to initialize the variable in the )INIT section of the panel definition.
• The variable is retrieved from the function pool only once for each TBDISPL with a nonblank panel name. This means that the same model line, including attribute settings, will be in effect for all rows displayed by the TBDISPL.
• Changes to the variable that occur within the panel or dialog function are not honored until TBDISPL is invoked again with a nonblank panel name.
• A variable whose value is blank is acceptable.
• If the variable contains the character string "OMIT" in uppercase, lowercase, or in mixed case, starting in column one, then that variable model line will not be used.
• There can be from one to eight model lines. Some can be variable model lines and others can be explicitly specified.
• "Z" variables used as name placeholders are acceptable in variable model lines. Be sure to assign an appropriate value to .ZVARS in the )INIT section.
• If the SFIHDR keyword is specified on the )MODEL header statement, the first variable model line is assumed to define scroll indicator fields for scrollable fields that are defined on subsequent variable model lines.

This topic describes the use of the TBDISPL and TBPUT services in a dialog that displays rows of a table for possible modification by a user.

This dialog invokes the TBDISPL service to display a table named TAB1 with a panel named PAN1. The )BODY section of the panel definition corresponds to the fixed (non-scrollable) portion of the display. The )MODEL section of the panel definition corresponds to the scrollable portion of the display. This is where the table rows are displayed. The "model lines" in the )MODEL section are replicated enough times to fill the screen. Each of these replications is known as a model set, and corresponds to a row of the table. The fields in the model sets correspond to table columns.

Changes the user wishes to make in TAB1 are entered on the display directly into fields in the model sets. When the user enters data into a model set, the corresponding table row is said to be selected for processing.

After the user selects one or more rows, the TBDISPL service locates the first selected row and retrieves it. To retrieve a row means to position the CRP to that row, read it, and then store the row values into the function pool. Next, values from the changed model set are stored in the function pool.

The dialog function then invokes the TBPUT service to write the updated function pool variables to the table row. A user can also enter data, such as function commands, into the fixed portion of the display.

The user ends the dialog by entering the END or RETURN command.

What follows is first a listing of the complete function, followed by each statement repeated, with supporting text and figures.

1. Floating command line

   If the command line for a table display panel has been moved to the bottom position, and if no alternate placement has been specified for the long message line, the line directly above the repositioned command line is reserved (left blank) for the display of long messages. Otherwise, if a user entered erroneous data on that line, a long message could overlay that data.

   ISPF adjusts display scrolling to account for the line reserved for long messages.

2. TBDISPL does not modify the table

   TBDISPL itself does not modify the table. The dialog function can use the information entered by the user to determine what processing is to be performed and can modify the table accordingly.

3. Displaying an empty table

   It is acceptable to invoke TBDISPL to display a table with no rows. The scrollable portion will consist only of the bottom-of-data marker. In previous versions, this resulted in a severe error, return code = 20, message = ISPT051.

4. CSRROW and auto-selection

   Specifying the CSRROW parameter or control variable without setting the AUTOSEL parameter or control variable to "NO" results in the row being selected, even if the user did not explicitly select the row. This is called auto-selection.

5. Dual defaults for CAPS and JUST

   In the )BODY section of a table display panel, input and output fields default to CAPS(ON) and JUST(LEFT). In the )MODEL section, they default to CAPS(OFF) and JUST(ASIS). These dual defaults exist to allow both new capability in this version and compatibility with previous versions of the product.

6. Effect of having a )REINIT or )PROC section

   TBDISPL behavior is affected by whether a )REINIT or )PROC section is included in the panel definition. When a )REINIT or )PROC section is included, and the user makes no modification to the screen and presses the Enter key, TBDISPL returns control to the dialog function. On the other hand, if neither a )REINIT nor a )PROC section is included, and the user makes no modification to the screen and presses the Enter key, TBDISPL treats this as a "no operation", and control does not return to the dialog function. This is to allow both new capability in this version and compatibility with previous versions of the product.

7. Search arguments in conjunction with TBDISPL

   Only search arguments specifying a forward scan through the table should be used in conjunction with TBDISPL. Otherwise, TBDISPL does not support scrolling through the display.

8. TBDISPL parameters and their categories:

              Required    Optional
    Service   Parameter   Parameters                  Categories
   
    TBDISPL   table-name                              in  name
                          [PANEL(panel-name)]         in  name
                          [MSG(message-id)]           in  name
                          [CURSOR(field-name)]        in  name
                          [CSRROW(table-row-number)]  in  number
                          [CSRPOS(cursor-position)]   in  number
                          [AUTOSEL(YES|NO)]           in  key
                          [POSITION(crp-name)]        out number
                          [ROWID(rowid-name)]         out number

   in

   Indicates that the parameter is used to pass information from the dialog to ISPF.

   out

   Indicates that the parameter is used to enable ISPF to pass information to the dialog. ISPF will create a variable with the indicated name.

   key

   Indicates it is a keyword parameter.

   name

   Indicates the value specified in the parameter is a name.

   number

   Indicates the value specified in the parameter is a number.

9. These items can appear in the )BODY section of a table display panel definition:
   • Text
   • Variables within text, such as "&XYZ"
   • Input fields
   • Output fields
   • Dynamic areas that are not scrollable or extendable
   • A graphic area that is not extendable.
10. These items cannot appear in the )BODY section of a table display panel definition:
    • Dynamic areas that are scrollable or extendable
    • More than one graphic area. This is true for any panel
    • A graphic area that is extendable. Graphic areas are never scrollable.
11. These items can appear in the )MODEL section of a table display panel definition:
    • Text
    • Variable model lines
    • Input fields
    • Output fields.
12. These items cannot appear in the )MODEL section of a table display panel definition:
    • Variables within text
    • Dynamic areas
    • Graphic areas.
13. During TBDISPL display, these user actions return control to the dialog function:
    • Pressing the Enter key. See item 6 in TBDISPL summary for an exception.
    • Entering the END or RETURN command
    • Entering the UP or DOWN scroll command when data has been typed into the fixed or scrollable portion of the screen
    • Entering the UP or DOWN scroll command when using dynamic table expansion and more rows are needed to satisfy the scroll request.
14. During TBDISPL display, these user actions do not return control to the dialog function:
    • Pressing the Enter key when no data has been typed into the fixed or scrollable portion of the screen and the panel definition has neither a )REINIT nor a )PROC section
    • Entering the UP or DOWN scroll command without typing data into the fixed or scrollable portion of the screen. Also, control does not return to the dialog function in either of these two cases:
      • Dynamic table expansion is not defined
      • Dynamic table expansion is defined and the table already contains enough rows to satisfy the scroll.
    • Entering a system command other than UP, DOWN, END, or RETURN. For example: HELP, SPLIT, PRINT, or CURSOR.
    • Entering an application command that selects another dialog.
15. These return codes are possible from TBDISPL:

     0

    There were zero or one selected rows. A scroll may be pending.

     4

    There were two or more selected rows.

     8

    The END or RETURN command was entered. Any number of rows, including zero, may have been selected.

    12

    The specified panel or message could not be found or the specified table was not open.

    20

    Severe error.

16. Levels of commands:

    System commands

    Provided by ISPF and always available to a user, unless explicitly overridden by an application. For example: END, UP, HELP, PRINT.

    Application commands

    Available to a user throughout operation of an application. For example: a command defined in the active command table that SELECTs another dialog.

    Function commands

    Meaningful only while operating a particular function within an application. For example, the dialog function can be designed so that TBSORT is invoked when the user enters "SORT" in the command field.

17. Commands can be entered by:
    • Typing information into the command field and pressing the Enter key
    • Pressing a function key
    • Selecting an ATTENTION FIELD using the light pen or cursor select key.
18. TBDISPL does not rebuild the display until all selected rows have been successfully processed. Therefore, the CRPs of the displayed table will not match those of the actual table if the order or structure of the table is changed within a TBDISPL series. This can affect correct cursor row placement for a redisplay with message while in the series.

    It is recommended that any verification of selected rows be done for all selected rows before performing operations that change the order or structure of the table. This requires that selected row IDs be saved until all selected rows have been retrieved and validated. This affects only the cursor placement as just described. The value passes back in the name specified with the POSITION keyword contains the CRP of the row in the actual table.