The GETCHR information table is defined in an application program as a working storage area and is initialized by executing the GETCHR function.

The information returned from the GETCHR function is terminal environment information.

Label	Length	Format	Contents
TMGETTID	2	Binary	TID.
TMGETLLN	2	Binary	Maximum line length.
TMGETMDL	2	Binary	Maximum device buffer length.
TMGETMLN	2	Binary	Maximum number of lines.
		0	hard copy device
TMGETDEV	8	Character	Device type.
			See device type table in Terminal Device Type Codes
TMGETNAM	8	Character	Last called by terminal or fetch.
TMGETLDT	8	Character	Last load or fetched program.*
	2	Binary	Undefined.
TMGETOB	1	Character	Online/batch switch:*
			O Online B Batch
TMGETCTL	1	Character	TID status:
			C Control U Non-control TID
	4	Binary	Undefined.
TMGETCAT	4	Binary	Program catalog size.*
TMGETTRU	4	Binary	Program size.*
TMGETREG	4	Binary	Region size.*
TMGETLPT	4	Binary	Program load point address.*
TMGETIID	8	Character	Installation ID.
	2	Binary	Undefined.
TMGETSCH	2	Binary	Default SCHC TID.
TMGETDTE	4	Packed	Julian date of ULOG ON.
TMGETNOD	2	Character	Access Node.
TMGETTNM	8	Character	TIBNAME.
TMGETUID	8	Character	User ID.
TMGETACC	12	Character	User ID account number.
TMGETAUT	2	Binary	User ID authorization code.
	3	Binary	Undefined.
TMGETLVL	1	Character	Current COM-PASS level number 1-9; 0, if not a COMPASS user.*
TMGETTIM	4	Binary	Time of ULOG ON in 100ths of seconds.
TMGETDTA	4	Binary	Amount of data sent and received by terminal since ULOG ON.
TMGETMSG	4	Binary	Amount of data sent via message switching and printout spooling since ULOG ON.
TMGETUSR	4	Binary	User field set by ULOGX1 and ULSRPSFS.
TMGETEXC	4	Binary	Number of EXCPs issued since ULOG ON on non-z/OS systems. For z/OS, number of SIOs issued since ULOG ON.
TMGETTRN	4	Binary	Number of transactions since ULOG ON.
TMGETTIL	4	Binary	Start time of current transactions, in 100ths of seconds.
TMGETCPU	4	Binary	Total CPU time elapsed since ULOG ON, in 100ths of seconds.
TMGETTHT	4	Binary	Total thread occupancy time since ULOG ON, in 100ths of seconds.
TMGETTID	2	Binary	Attaching TID.
TMGETNMP	2	Binary	Number of messages or printouts queued to terminal.
TMGETENT	4	Binary	Number of enters.
TMGETADC	4	Binary	Total Adabas calls.
TMGETADE	4	Binary	Total Adabas elapsed time.
TMGETADD	4	Binary	Total Adabas duration.
TMGETHNC	8	Character	Hardcopy device name.
TMGETIPA	4	Binary	TCPIP address.
TMGETIPP	4	Binary	TCPIP port.

* These fields apply only to the terminal executing the GETCHR function.

Copy code for the GETCHR area is provided in the Com-plete source; TMGETCHR for Assembler, PL1GCTBL for PL/1; COBGCTBL for COBOL.