CBL_READ_SCR_CHATTRS

The CBL_READ_SCR_CHATTRS routine is one of a set of library routines that facilitate reading and writing attributes on the screen. This routine reads a string of characters and their corresponding attributes from the screen.

Usage

CALL "CBL_READ_SCR_CHATTRS" 
    USING SCREEN-POSITION, CHARACTER-BUFFER, ATTRIBUTE-BUFFER,
        STRING-LENGTH 
    RETURNING STATUS-CODE

Parameters

SCREEN-POSITION Group item Group item is defined as follows:
01  SCREEN-POSITION.
    03  ROW-NUMBER      PIC X COMP-X.
    03  COLUMN-NUMBER   PIC X COMP-X.

On entry, contains the screen position at which to start reading (the top left corner is row 0, column 0)

CHARACTER-BUFFER PIC X(N).    On exit, this data item contains the characters read from the screen. It must be at least the length specified by STRING-LENGTH. Positions in it beyond that length are unchanged.
ATTRIBUTE-BUFFER PIC X(N). On exit, this data item contains the attributes read from the screen. It must be at least the length specified by STRING-LENGTH. Positions in the data item beyond that length are unchanged.
STRING-LENGTH PIC XX COMP-X. On entry, contains the length of the string to read

On exit, contains the length of the string read when the end of the screen is reached

STATUS-CODE Any numeric type Returns 1 if successful, or 0 if not successful

Description

This library routine uses SCREEN-POSITION (in row and column coordinates) to determine the location to start the read operation. STRING-LENGTH specifies the length of the string to be read, starting from SCREEN-POSITION. When the routine exits, CHARACTER-BUFFER contains the string of characters read, and ATTRIBUTE-BUFFER contains those characters' attributes.

Note: This routine is not supported with Thin Client.