EJECT 01000000 GTMCB DSECT 02000000 GTMNXGTM DS F ADDRESS OF THE NEXT GTMCB 03000000 GTMGSPCB DS F ADDRESS OF THE GSPCB 04000000 GTMVALID DS X BYTE TO SAY THIS IS A CONTROL BLK 05000000 * X'F2' SETTING 06000000 GTMTERID DS X ID TO SAY THIS IS A GTMCB 07000000 * X'02' SETTING 08000000 GTMGTMCB DS F ADDRESS OF THIS GTMCB 09000000 GTMGRDCB DS F ADDRESS OF DCB 10000000 GTMGDSCB DS F ADDRESS OF FIRST GDSCB ON TRM 11000000 GTMLATBL DS F ADDRESS OF ACTIVE ATTN LEVEL 12000000 GTMGACBA DS F ADDRESS OF GACB 13000000 GTMSYGDS DS F ADDRESS OF SYSTEM GDSCB 14000000 GTMBCTBL DS F ADDRESS OF BUFFER CTL TABLE 15000000 GTMFCTBL DS F ADDRESS OF FLOW CTL TABLE 16000000 GTMPFKSS DS F PROGRAM FUNCTION KEY STATUS 17000000 GTMFEATS DS H CHARACTERISTICS OF THE DEVICE 18000000 * BYTE 0 19000000 * X'01' MODEL 1 2250 20000000 * X'02' MODEL 2 2250 21000000 * X'03' MODEL 3 2250 22000000 * BYTE 1 23000000 * X'10' PROGRAM FUNCTION KEYBOARD 24000000 * X'20' LIGHT PEN 25000000 * X'40' ALPHAMERIC KEYBOARD 26000000 * X'80' ABSOLUTE VECTORS 27000000 * X'08' CHARACTER GENERATOR 28000000 * X'04' GRAPHIC DESIGN FEATURE 29000000 GTMREPOS DS H LOCATION OF REPOS VECT IN TRKG 30000000 GTMDECB1 DS F ADDRESS OF THE SYSTEM DECB 31000000 GTMGDOAL DS H GDOA LENGTH FOR GDS'S ON TERMINAL 32000000 * MAY BE OVERRIDEN AT GDS LEVEL 33000000 GTMDVADR DS H DEVICE ADDRESS (2E0,1D0,ETC.) 34000000 GTMATTNO DS H ATTENTION OPTIONS 35000000 GTMCRLOC DS H POINTER TO BUFFER LOCATION 36000000 * TO CONTAIN CURSOR 37000000 GTMBCTSM DS X INDEX TO UNIQUE NUMBER FOR 38000000 * BUFFER MANAGEMENT 39000000 GTMBCTLG DS X INDEX TO UNIQUE NUMBER FOR 40000000 * BUFFER MANAGEMENT 41000000 GTMFLAGS DS X ASSORTED FLAGS 42000000 * X'08' 1=TRACKING IN / 0=NOT 43000000 * X'04' 1=DE IN PROG / 0=DE NOT IN PROG 44000000 * X'02' 1=DIRECT ENTRY PEND / 0=NOT 45000000 * X'01' 1=CURSOR IN TRML / 0=NOT 46000000 GTMLIGHT DS X LIGHT OPTION BYTE 47000000 * X'02' LIGHT PFK ZERO (DEFAULT) 48000000 * X'03' LIGHT ENABLED KEYS 49000000 * X'04' LIGHT AS PER LIGHT MASK(GTMPFKSS) 50000000