TCBEXIT subcommand — run a TCB exit routine

Use the TCBEXIT subcommand to run an IBM-supplied or an installation-supplied exit routine.
  • Syntax
      { TCBEXIT }  { pgmname | * }
      { TCBX    }
                     data-descr
                   [ AMASK(mask) ]

    -------- SETDEF-Defined Parameters -------------------------
    Note: You can override the following SETDEF parameters.
    See SETDEF subcommand — set defaults.

                   [ FLAG(severity) ]
                   [ PRINT | NOPRINT ]
                   [ TERMINAL | NOTERMINAL ]
                   [ TEST | NOTEST ]
  • Parameters
    pgmname or *
    Specifies an IBM-supplied or installation-supplied exit routine, which processes system control blocks. The pgmname specifies the name of a routine. * specifies the following IBM-supplied TCB exit routines; these exit routines are specified by parmlib members embedded in the BLSCECT parmlib member.
    Exit Routine
    Data Processed
    IECDAFMT
    Data management control blocks
    IECIOFMT
    Input/output supervisor (IOS) and execute channel program (EXCP) control blocks
    IEAVTFMT
    Recovery termination management (RTM) control blocks
    IEAVSSA1
    Vector Facility data file.IEAVSSA1 exit routine
    IEAVXD01
    Access registers
    IEAVD30
    Linkage stack
    An installation-supplied TCB exit routine that you can specify must:
    • Be named with a maximum of 8 characters. The first character must be alphabetic.
    • Reside in a library available to IPCS, such as a step library, job library, or link library.

    For more information about writing installation TCB exit routines, see z/OS MVS IPCS Customization.

    data-descr
    Specifies the address of the TCB to be passed to the exit routine. The data description parameter consists of five parts:
    • An address (required)
    • Address processing parameters (optional)
    • An attribute parameter (optional)
    • Array parameters (optional)
    • A remark parameter (optional)

    Data description parameter explains the use and syntax of the data description parameter.

    AMASK(mask)
    Specifies an integer mask that TCBEXIT is to AND to the dump addresses passed by the exit to the storage access and format service routines. The values of the mask can be only X'00FFFFFF' or X'7FFFFFFF' or the corresponding decimal or binary values.
  • Return Codes
    Code Explanation
    12 Severe error, an error condition or user request forced early end to the subcommand processing.
    16 Ending error, an error condition from a called service routine forced an early end to the subcommand processing.
    other An exit generated return code.
  • Example 1: Invoke an IBM-supplied TCB exit to display RTM-related control blocks.
    • Action
      COMMAND ===>  tcbexit ieavtfmt 21C.%
    • Result

      This example invokes the IBM-supplied TCB exit routine (IEAVTFMT) that processes recovery termination management (RTM) control blocks. Using the indirect addressing notation (21C.%), addressability is established to the current TCB.

       *** NOT ALL EED'S AVAILABLE COULD BE ACCESSED ***
       INVALID EED TYPE ENCOUNTERED AT LOCATION 009FF750
      
        EED1: 009FF750
           +0000  E2E3D2C5  009FEA68  00000000  00000000  | STKE.þ.......... |
           +0010  0000001B  00000000  00000000  00000000  | ................ |
           +0020  00000000  00000000  00000000  00000000  | ................ |
           +0030  00000000  00000000  00AA0400  00000000  | ................ |
           +0040  009FBE00  009FAFB0  00000000  00006EF4  | .--..---......>4 |
           +0050  00000000  00006F40  00000000  00000000  | ......? ........ |
           +0060  00000000  00000000  00000000  00000000  | ................ |
           +0070  00000000  00000000  00000000  00000000  | ................ |
           +0080  00000000  00000000  00000000  00000000  | ................ |
           +0090  00000000  00000000  00000000  00000000  | ................ |
           +00A0  00000000  00000000  00000000  00000000  | ................ |
           +00B0  00000000  00000000  00000000  00000000  | ................ |
           +00C0  00000000  00000000  00000000  00000000  | ................ |
           +00D0  00000000  00000000  00000000  00000000  | ................ |
           +00E0  00000000  00000000  D4E2E3D9  40404040  | ........MSTR     |
           +00F0  D3D3C140  40404040  40404040  40404040  | LLA              |
           +0190  00000000  00000000  00000000  00000000  | ................ |
  • Example 2: Invoke all IBM-supplied TCB exits.
    • Action
      COMMAND ===>  tcbexit * 21C.%
    • Result

      This example invokes all of the IBM-supplied TCB exit routines to process TCBs and related control blocks. Using the indirect addressing notation (21C.%), addressability is established to the current TCB.

  • Example 3: Invoke an installation-supplied TCB exit.
    • Action
      COMMAND ===>  tcbexit testtcb 715b0.
    • Result

      This example invokes an installation-supplied routine TESTTCB, passing it the TCB address X'715B0'.