Space announcement This documentation space provides the same content as before, but the organization of the content has changed. The content is now organized based on logical branches instead of legacy book titles. We hope that the new structure will help you quickly find the content that you need.

Edit CICS Tables and Control Blocks

Related Topics

Implementing the Memory Update Security Exit

Memory Display (2.2)

Reference Manual

Advanced Configuration Guide

This section discusses how to use the XPSP transaction to perform the following functions:

  • Access and modify CICS table entries, storage, and control blocks defined to a CICS region.
  • Use Code Debug CICS to modify CICS tables online without taking the region down.

Important

The demonstrations in this section should be performed in Code Debug’s standard operating mode — not one of the three restricted modes. For more information, see the Code Debug CICS Reference Manual.

Editing a CICS Table Entry

The following scenario demonstrates how to edit a CICS table entry on either the Memory Display screen (9.2) or the DSECTs screen (9.D).

Important

• This scenario applies to VTAM terminals only.

• Because the example removes upper case translation by overtyping a field in the TCT, causing CICS not to recognize a lower case transaction name, you may want to just read the example without actually replacing the value.

Editing from the Memory Display Screen

Use the Memory Display screen (9.2) to update tables in hexadecimal dump format:

  1. From a blank CICS screen, type XPSP 9.2 and press Enter. The Memory Display screen (9.2) is displayed (following figure).

Changing the TCT on the Memory Display Screen (9.2)

 ----------------------------- MEMORY DISPLAY (9.2) -----------------------C024
 COMMAND ===>                                                   SCROLL ===> CSR
 MODULE:          CSECT:
TABLE/AREA: TCT                                  TABLE ENTRY ID: 0751
 ADDRESS:    383704D0          HEX OFFSET: +0000006B______________________
 USE CONTENTS: _               ADD OFFSET: _____                       ECDSA

                                                  CCSID TYPE: EBCDIC
0000006B 000 013835C5 703817E0 30000000 00381777 * ...E...\........ * 3837053B
0000007B 010 D8000000 00384B50 00000000 00000000 * Q......&........ * 3837054B
0000008B 020 00000000 00000000 00000000 00000000 * ................ * 3837055B
0000009B 030 00381720 30000205 00010000 00000000 * ................ * 3837056B
000000AB 040 00000000 00000000 00000000 00008400 * ..............d. * 3837057B
000000BB 050 00000000 05000000 06000000 00000400 * ................ * 3837058B
000000CB 060 00000000 00800000 00000000 0000C000 * ..............{. * 3837059B
000000DB 070 00000000 00000000 0C010000 00000000 * ................ * 383705AB
000000EB 080 00000000 00000000 00000000 00000000 * ................ * 383705BB
000000FB 090 00000000 00010000 00000000 00000000 * ................ * 383705CB
0000010B 0A0 00000000 00000000 00000000 00000000 * ................ * 383705DB
0000011B 0B0 00000000 00000084 00000500 08000000 * .......d........ * 383705EB
0000012B 0C0 00000000 00000000 00FFFF00 00000000 * ................ * 383705FB
0000013B 0D0 00000000 00C05E1F CAB91F9E 84000000 * .....{;.....d... * 3837060B
0000014B 0E0 00000000 00000000 00000000 00000000 * ................ * 3837061B
0000015B 0F0 00000000 00000000 00000000 00000000 * ................ * 3837062B

2. Type TCT in the TABLE/AREA field.

3. Type TCTEUCTB in the HEX OFFSET field and press Enter.

4. Look at the data display area. The upper case translation byte value is 01. To turn off upper case translation, position the cursor to the first position displayed, change the 01 to 00, and press Enter.

Important

You may want to change the value back to 01 before ending your session.

The table has been updated, and you can now continue your test without recycling the CICS region.

Editing from the DSECTs Screen

You can also edit table entries using the DSECTs screen (9.D). This screen provides a way for you to display and update DSECTs online as shown in the following example:

  1. Type XPSP 9.D from a blank CICS screen and press Enter.
  2. Type TCT in the TABLE/AREA field.
  3. Type TCTEUCTB in the LABEL field and press Enter. The TCTEUCTB field is displayed (following figure).

DSECTs Screen (9.D)

 ---------------------------------- DSECTS (9.D) --------------------------C024
 COMMAND ===>                                                   SCROLL ===> CSR
 MODULE:          CSECT:
 TABLE/AREA: TCT                                TABLE ENTRY ID: 0751
  LABEL: TCTEUCTB

3837053B 06B TCTEUCTB             DS    XL1      01                * .        *
3837053C 06C TCTENIBA             DS    0C
3837053C 06C TCTTEGU              DS    0C
3837053C 06C TCTTERLA             DS    0C
3837053C 06C TCTTETA              DS    XL4      3835C570          * ..E.     *
38370540 070 TCTTESKA             DS    0C
38370540 070 TCTERPLA             DS    0C
38370540 070 TCTTELEA             DS    XL4      3817E030          * ..\.     *
38370544 074 TCTTERST             DS    XL4      00000000          * ....     *
38370548 078 TCTTETEA             DS    XL4      381777D8          * ...Q     *
3837054C 07C TCTTETC              DS    XL4      00000000          * ....     *
38370550 080 TCTEEILR             DS    XL4      384B5000          * ..&.     *
38370554 084 TCTTESUA             DS    0C
38370554 084 TCTEEIEX             DS    XL4      00000000          * ....     *
38370558 088 TCTTEEIA             DS    XL4      00000000          * ....     *
3837055C 08C TCTTECTK             DS    XL4      00000000          * ....     *
38370560 090 TCTTECHN             DS    XL1      00                * .        *
              TCTECHAN             EQU   X'80'

You can change this field (01) by keying over the existing data in either hexadecimal or character format.

This same technique can be used to update any table, control block, or area defined to the CICS region.


 

Tip: For faster searching, add an asterisk to the end of your partial query. Example: cert*