Programming Interface Information: This information is NOT intended to be
used as Programming Interfaces of z/VM.

TSOBLKS

Prolog  

Control Block Contents  
   TSOBLKS DSECT

Storage Layout  

Cross Reference (Contains links to field and bit definitions)  


TSOBLKS Prolog

 Name       : TSOBLKS
 Description: TSO Control Blocks
 DSECT      : TSOBLKS
 Function   : The TSOBLKS macro contains two DSECTS: TSOBLKS
              and CMSTAXE. Information on both DSECTs is
              included in this section. TSOBLKS - TSO Control
              Blocks The TSOBLKS DSECT describes the entries
              in the TSOBLKS block which contains OS control
              information used by CMS, that is, the command
              program parameters list (CPPL), user profile
              table (UPT), protected step control block
              (PSCB), and the environment control table
              (ECT). The ATSOCPPL field in NUCON points to
              TSOBLKS block.

 

TSOBLKS Control Block Content


TSOBLKS DSECT

Hex   Dec Type/Val   Lng Label (dup)    Comments
---- ---- --------- ---- -------------- --------
0000    0 Structure      TSOBLKS        TSO Control Blocks
0000    0 Signed       4 CPPL (0)       - TMP PLIST TO CP PROGRAMS
0000    0 Address      4 CPPLOBUF       - ADDRESS OF COMMAND LINE
0004    4 Address      4 CPPLUPT        - ADDR OF DUMMY UPT
0008    8 Address      4 CPPLPSCB       - ADDR OF DUMMY PSCB
000C   12 Address      4 CPPLECT        - ADDR OF DUMMY ECT
     THE FOLLOWING ARE FACSIMILE TSO CONTROL BLOCKS
     USER PROFILE TABLE (UPT)
0010   16 Signed       4 UPT (0)
0010   16 Bitstring    2 *              RESERVED
0012   18 Bitstring   10 UPTUSER        RESERVED FOR INSTALLATION USE
001C   28 Bitstring    1 UPTSWS         - USER
          .1.. ....      UPTNPRM        X'40' - NO PROMPTING IS TO BE
                                        DONE
          ..1. ....      UPTMID         X'20' - PRINT MESSAGE IDENTIFIERS
          ...1 ....      UPTNCOM        X'10' - NO USER COMMUNICATION
                                        ALLOWED VIA SEND
          .... 1...      UPTPAUS        X'08' - PAUSE FOR '?'WHEN IN
                                        NON-INTERFACE MODE
          .... .1..      UPTALD         X'04' - ATTN HAS BEEN SPECIFIED
                                        AS LINE DELETE
001D   29 Bitstring    1 UPTCDEL        - CHAR DELETE CHARACTER
001E   30 Bitstring    1 UPTDEL         - LINE DELETE CHARACTER
001F   31 Bitstring    1 *              RESERVED
     PROTECTED STEP CONTROL BLOCK (PSCB)
0020   32 Signed       4 PSCB (0)
0020   32 Character    7 PSCBUSER       - USER ID PADDED WITH BLANKS
0027   39 Bitstring    1 PSCBUSRL       - LENGTH OF USER ID
0028   40 Character    8 PSCBGPNM       ESOTERIC GROUP NAME INIT BY LOGON
0030   48 Bitstring    1 PSCBATR1       15 BIT STRING OF USER ATTRIBUTES
          1... ....      PSCBCTRL       X'80' - OPERATOR COMMAND USER
          .1.. ....      PSCBACCT       X'40' - ACCOUNT COMMAND USER
          ..1. ....      PSCBJCL        X'20' - SUBMIT COMMAND USER BITS
                                        3 -15 RESERVED FOR IBM USE
0031   49 Bitstring    1 *              RESERVED
0032   50 Bitstring    1 PSCBATR2       15 BIT STRING RESERVED FOR INST.
0033   51 Bitstring    1 *              THE FOLLOWING 6 FULL WORDS ARE
                                        USED IN TSO FOR ACCOUNTING THEY
                                        WILL BE LEFT INIT TO ZERO
0034   52 Signed       4 * (6)
004C   76 Signed       4 PSCBTCOL
0050   80 Address      4 PSCBRLGB       -
0054   84 Address      4 PSCBUPT        - PTR TO THE USER PROFILE TABLE
0058   88 Address      2 PSCBUPTL       - LENGTH OF THE UPT
005A   90 Bitstring    2 *              - RESERVED
005C   92 Address      4 PSCBRSZ        REGION SIZE REQUESTED IN 2K UNITS
0060   96 Bitstring    8 PSCBU          RESERVED FOR INSTALLATION USE
     ENVIRONMENT CONTROL TABLE (ECT)
0068  104 Signed       4 ECT (0)
0068  104 Address      1 ECTRCDF        - HIGH ORDER BIT INDICATES CP
                                        ABENDED
0069  105 Address      3 ECTRTCD        - RETURN CODE FROM LAST CP
006C  108 Address      4 ECTIOWA        - ADDR OF I/O SERVICE ROUTINE
                                        WORK AREA THIS FIELD MUST BE
                                        INITIALIZED BY USER AT START OF
                                        HIS PGM.
0070  112 Bitstring    1 ECTMSGF        - HIGH ORD. BIT MEANS DEL. 2ND
                                        LEVEL MSGS.
0071  113 Address      3 ECTSMSG        ADDR OF SECOND LEVEL MSG CHAIN
0074  116 Character    8 ECTPCMD        - PRIMARY COMMAND NAME
007C  124 Character    8 ECTSCMD        SUBCOMMAND NAME
0084  132 Bitstring    1 ECTSWS         - ECT SW
          1... ....      ECTNOPD        X'80' - 0 BIT= ON, NO OPERANDS
                                        EXIST IN COMMAND B
          ..1. ....      ECTATRM        X'20' - CP TERMINATED BY TMP
                                        DETACH W/ STAE
          ...1 ....      ECTLOGF        X'10' - LOGON/OFF REQUESTED TMP
                                        TO LOG OFF
          .... 1...      ECTNMAL        X'08' - NO USER MESSAGES RECEIVED
                                        AT LOGON
          .... .1..      ECTNNOT        X'04' - NO BRDCST NOTICES TO BE
                                        RECEIVED
0085  133 Address      3 ECTDDNUM       - COUNTER FOR GEN TEMP DDNAMS
0088  136 Address      4 ECTUSER        RESERVED FOR INSTALL
008C  140 Address      4 *              RESERVED
     TERMINAL ATTENTION EXIT ELEMENT (TAXE)

 

TSOBLKS Storage Layout

          
*** TSOBLKS - TSO Control Blocks
*
*     +---------------------------+---------------------------+
*   0 |         CPPLOBUF          |         CPPLUPT           |
*     +---------------------------+---------------------------+
*   8 |         CPPLPSCB          |         CPPLECT           |
*     +-------------+-------------+---------------------------+
*  10 |/////////////|                UPTUSER                  |
*     +-------------+             +------+------+------+------+
*  18 |                           |UPTSWS|:CDEL |UPTDEL|//////|
*     +---------------------------+------+------+------+------+
*  20 |                   PSCBUSER                     |:BUSRL|
*     +------------------------------------------------+------+
*  28 |                       PSCBGPNM                        |
*     +------+------+------+------+---------------------------+
*  30 |:BATR1|//////|:BATR2|//////|///////////////////////////|
*     +------+------+------+------+///////////////////////////|
*  38 |///////////////////////////////////////////////////////|
*     =///////////////////////////////////////////////////////=
*     |///////////////////////////+---------------------------+
*  48 |///////////////////////////|         PSCBTCOL          |
*     +---------------------------+---------------------------+
*  50 |         PSCBRLGB          |         PSCBUPT           |
*     +-------------+-------------+---------------------------+
*  58 |  PSCBUPTL   |/////////////|         PSCBRSZ           |
*     +-------------+-------------+---------------------------+
*  60 |                        PSCBU                          |
*     +------+--------------------+---------------------------+
*  68 |:RCDF |      ECTRTCD       |         ECTIOWA           |
*     +------+--------------------+---------------------------+
*  70 |:MSGF |      ECTSMSG       |         ECTPCMD-          |
*     +------+--------------------+---------------------------+
*  78 |          -(074)           |         ECTSCMD-          |
*     +---------------------------+------+--------------------+
*  80 |          -(07C)           |ECTSWS|     ECTDDNUM       |
*     +---------------------------+------+--------------------+
*  88 |         ECTUSER           |///////////////////////////|
*     +---------------------------+---------------------------+
*  90
*
*** TSOBLKS - TSO Control Blocks

 

TSOBLKS Cross Reference

Symbol         Dspl Value
-------------- ---- -----
CPPL           0000
CPPLECT        000C
CPPLOBUF       0000
CPPLPSCB       0008
CPPLUPT        0004
ECT            0068
ECTATRM        0084 20
ECTDDNUM       0085
ECTIOWA        006C
ECTLOGF        0084 10
ECTMSGF        0070
ECTNMAL        0084 08
ECTNNOT        0084 04
ECTNOPD        0084 80
ECTPCMD        0074
ECTRCDF        0068
ECTRTCD        0069
ECTSCMD        007C
ECTSMSG        0071
ECTSWS         0084
ECTUSER        0088
PSCB           0020
PSCBACCT       0030 40
PSCBATR1       0030
PSCBATR2       0032
PSCBCTRL       0030 80
PSCBGPNM       0028
PSCBJCL        0030 20
PSCBRLGB       0050
PSCBRSZ        005C
PSCBTCOL       004C
PSCBU          0060
PSCBUPT        0054
PSCBUPTL       0058
PSCBUSER       0020
PSCBUSRL       0027
UPT            0010
UPTALD         001C 04
UPTCDEL        001D
UPTDEL         001E
UPTMID         001C 20
UPTNCOM        001C 10
UPTNPRM        001C 40
UPTPAUS        001C 08
UPTSWS         001C
UPTUSER        0012

This information is based on z/VM V4R1.0.
Last updated on 12 Jul 2001 at 14:05:10 EDT.
Copyright IBM Corporation, 1990, 2001