Host Environment Commands › ADDRESS EPI Commands › EPI GETSCRN—Display Screen Image

EPI GETSCRN—Display Screen Image

The EPI GETSCRN command fetches the current screen image from a CA OPS/MVS-monitored VTAM session, and displays the image on the terminal. Optionally, GETSCRN can store the screen image in OPS/REXX variables that describe the contents and state of the screen.

EPI GETSCRN has the following format:

ADDRESS EPI "GETSCRN keywords"

{SESSION(sessid)}
[CMDRESP(dest)]
[PREFIX(prefix)]
[SUBSYS(ssid)]
[TRUNCATE(YES|NO)]

SESSION

Defines the session ID of the monitored session.

Value: 1 to 8 characters

CMDRESP

(Optional) Specifies the variables to store the fetched screen image.

Value: CLIST or REXX

Default: CLIST

PREFIX

(Optional) Specifies the prefix that you want to use when you create the CLIST or REXX variables.

Value: 1 to 6 characters

Note: For more details about these variables, see Use SESSCMD in a CLIST or REXX EXEC.

SUBSYS

(Optional) Addresses the command to a copy of CA OPS/MVS with a subsystem ID other than the default subsystem ID, which is OPSS.

TRUNCATE

(Optional) Specifies whether CA OPS/MVS truncates the screen image display when you enter GETSCRN from a TSO terminal.

Value: YES or NO

Default: YES

EPI GETSCRN Sample Coding Statements

The following sample coding statement fetches the current screen of the VTAM session with session ID CICS2 and displays it on the TSO terminal:

GETSCRN SESSION(CICS2)

This example shows the use of GETSCRN in a REXX program. This REXX program retrieves the current screen from a VTAM session and displays all the CLIST variables that CA OPS/MVS generates from the display.

SESSION = ARG(1)
ADDRESS EPI
'GETSCRN SESSION('SESSION') PREFIX(LINE)'
IF RC > 0 THEN EXIT
SAY 'THE FOLLOWING VARIABLES HAVE BEEN SET'
SAY 'CSRCOL =' CSRCOL
SAY 'CSRPOS =' CSRPOS
SAY 'CSRROW =' CSRROW
SAY 'SCREEN =' SCREEN
SAY 'SCRLEN =' SCRLEN
SAY 'SCRSIZE =' SCRSIZE
SAY 'SCRSTAT =' SCRSTAT
SAY 'SCRWDTH =' SCRWDTH
DO I=1 TO LINE.0
  SAY I ':' LINE.I
END
RETURN