COBOL Debugging Programs › Inspect and Modify Auxiliary Storage › Display Auxiliary Storage in Structured Format

Display Auxiliary Storage in Structured Format

CA InterTest can display file, transient data, and temporary storage records or DL/I segments field‑by‑field in structured format using 01 level data names.

To display a record or segment in structured format, you must identify the program containing the structure. Symbolic information for this program must be saved in the CA InterTest Symbolic File. Follow these steps to display a record or segment in structured format:

1. If the FORMAT field does not contain S, press PF2 until FORMAT= S is displayed. The USE=field now appears after the FORMAT field.
2. Identify the program and structure in the USE= field. Specify the command as follows:

   USE=symbolic‑name.structure‑name
   

   symbolic‑name is the name of the program as defined in the CA InterTest Symbolic File

   structure‑name is the COBOL 01 level name

3. Press Enter. CA InterTest displays the record or segment in structured format. A sample VSAM record in structured format is shown next.

    DATATYPE= FC FILEID= INVNTRY  MODE=      LOG=OFF TODEST=        PASSWORD= 
    FUNC=      SUBFUNC=      RETMETH=        ARGTYP=    SRCHTYP= 
    MESSAGE= RECORD OBTAINED FOR VIEWING 
     RETNRCID=F1D7D9D6E3E2E8D440000000000000000000000000000000       CHGELEN= 
        RCID= C'1' 
        DATA=                                                        SIZE= 02D8 
    FORMAT= S USE= PRODUCT.PRODREC 
    LOC 0050           Name                      Hexadecimal           Character 
    ‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑ 
    01 PRODREC                           |                           |
     02 PRODUCT‑TYPE                     | D3                        | L
     02 PRODUCT‑CODE                     | C2D4D5C8 40404040         | BMNH 
     02 PRODUCT‑DESCRIPTION              | E6D9C5D5 C3C8             | WRENCH
     02 PRODUCT‑SITE                     | D1                        | J 
                                         |                           |
                                         |                           |
                                         |                           |
                                         |                           |
                                         |                           |
                                         |                           |
                                         |                           |
    ‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑‑ 
    1 Help       2 Format D   3 End        4 BEGB       5           6 DataType DL 
    7 Page bwd   8 Page fwd   9 Caps Off  10 Top      11 Bottom    12
   

   Structured format lists the contents of each data name in both hexadecimal and character format.

4. To modify the record or segment, overtype either the hexadecimal or character data and press Enter. To rewrite the modified record, type PUT in the FUNC= field and press Enter.

   When a program is stopped at a breakpoint, you can substitute an asterisk (*) for the symbolic‑name. For example, if program PAYROLL is stopped at a breakpoint and you type:

   USE=*.payrec
   

   CA InterTest uses the program named PAYROLL and the PAYREC structure.

   To begin the structure with a specific data name, specify the following command in the DATA field:

   FIND=data‑name
   

   where data‑name is the data name to be displayed.