The Sample "Good Night" Program, Dfh0Gnit; What The Sample Program Does - IBM SC34-6814-04 Customization Manual

GNTRAN_SCREEN_LENGTH
GNTRAN_CURSOR_POSITION
GNTRAN_SCREEN_WIDTH
GNTRAN_SCREEN_HEIGHT
GNTRAN_USER_FIELD
GNTRAN_SCREEN_BUFFER

The sample "good night" program, DFH0GNIT

The sample "good night" program is a pseudoconversational COBOL program
named DFH0GNIT. Copy books of the communications area passed to the "good
night" program are supplied in assembler language, COBOL, PL/I, and C. The
names of the supplied program, copy books, and mapset, and the CICSTS32.CICS
libraries in which they can be found, are summarized in Table 47.

What the sample program does

The DFH0GNIT sample program:
1. Checks that it has been invoked for a terminal timeout, by testing the
2. If a flag within GNTRAN_USER_FIELD shows that this is the first invocation for
pseudoconversational sequence. (If the terminal did not time out during a
pseudoconversational sequence, the value of this field is meaningless.)
The length of the screen buffer.
The cursor position.
The width of the screen in use when the terminal timed out.
The height of the screen in use when the terminal timed out.
You can use GNTRAN_SCREEN_WIDTH and GNTRAN_SCREEN_HEIGHT to
decide whether to use the ERASE DEFAULT or ERASE ALTERNATE option
when restoring the user's screen.
This field is available for use by your "good night" user program. It is initialized
to binary zeroes and is not changed by CICS. You can use it to help develop a
pseudoconversational "good night" transaction.
A variable length field containing the contents of the screen buffer.
Table 47. Sample "good night" program, copy books, and mapset
Language
Program source: COBOL
only
Copy books: Assembler
COBOL PL/I C
Mapset:
GNTRAN_START_TRANSID field of the communications area passed by CICS.
If this contains anything other than 'CEGN', it quits.
this timeout:
a. If GNTRAN_PSEUDO_CONV_FLAG indicates that the terminal timed out
during a pseudoconversation, issues EXEC CICS RECEIVE to retrieve the
communications area.
b. Saves the length of the communications area in another field within
GNTRAN_USER_FIELD.
Member name
DFH0GNIT
DFHSNGSD DFHSNGSO
DFHSNGSL DFHSNGSH
DFH$GMAP
Chapter 32. Writing a "good night" program
Library
SDFHSAMP
SDFHMAC SDFHCOB
SDFHPL1 SDFHC370
SDFHSAMP
803