Reporting › Merged Versus Dumped Data Displays › Merged Display

Merged Display

The following list describes the merging options:

MERGEDB ON|OFF

Merges symbolic names onto database reports.

MRGAUTO ON|OFF

Merges symbolic names onto PL/I automatic storage.

MRGBASED ON|OFF

Merges symbolic names onto PL/I based variable storage.

MRGCNTLD ON|OFF

Merges symbolic names onto PL/I controlled storage.

MRGDATA ON|OFF

Merges symbolic names onto all data areas.

MRGDSECT ON|OFF

Merges symbolic names onto Assembler DSECT storage.

MRGFILES ON|OFF

Merges symbolic names onto file section for COBOL.

MRGLINK ON|OFF

Merges symbolic names onto linkage section for COBOL.

MRGLOCAL ON|OFF

Merges symbolic names onto local storage for COBOL.

MRGPARMS ON|OFF

Merges symbolic names onto PL/I parameter storage.

MRGSTAT ON|OFF

Merges symbolic names onto PL/I static storage.

MRGWORK ON|OFF

Merges symbolic names onto working storage for COBOL.

The following example shows a merged data display for the WORKING-STORAGE section of a COBOL program.

***************************
* WORKING-STORAGE SECTION *
***************************
A                                                                           	D   E
 LINE#    LEVEL/FIELD NAME            	VALUE/LOCATION                		DEFINITION                                        
 ------  -----------------------------	--------------------------------------	----------------------------------------
000136  77 FILLER                           G 	*THIS PROGRAM IS PROPRIETARY PROP*  	X(80)
B         C                          	(+000032) 	*ERTY OF COMPUTER ASSOCIATES INTE*
                                      	(+000064) 	*RNATIONAL, INC. *
000139  77 FILLER                            	*COPYRIGHT (C) 1986-1999 BY COMP*  	X(80)
                                   H 	(+000032)	*UTER ASSOCIATES INTERNATIONAL, I*
                                      	(+000064) 	*NC.             *
000142  77 ERROR-FLAG                            ZEROS                              		X(1)
000143  77 DATA-PICX10                      	  ALL '&'                            		X(10)
000144  77 ROW-3D                             	  1                                  		99 BINARY
000145  77 COLUMN-3D                          	  1                                  		99 BINARY
000146  77 RANGE-3D                           	  1                                  		99 BINARY
000148  01 PARAMETER-ONE                        BLW=0000+0000D0  (0E77A528) F
000149  03 FILLER                            	*PARAMETERONE*                      		X(12)
000154  01 PARM-PASSED-BY-JCL                 BLW=0000+0000E0  (0E77A538)
000155  03 PARM-MSG                          	*WSINIT  *                          		X(8)
000156  03 PARM-FLAG                         	*WSINIT  *                          		X(8)
000157  03 PARM-MODE                         	*DTE*                               		X(3)
000159  01 TABLE-1                            	  BLW=0000+0000F8  (0E77A550)
000160  05 ARRAY(1)                           	  BLW=0000+0000F8  (0E77A550)        	OCCURS 5
000161  10 DATA-NAME1(1)                        ALL '&'                            		XXX
000162  10 DATA-NAME2(1) I                     ALL '&'                            		XXX
          <UNMERGED DATA FOR ARRAY> J    X	'50505050505050505050505050505050'  	LENGTH  24
                                  (+000016)    X	'5050505050505050'

    :     :
    :     :

000315  01 LIST-1M                            	 BLW=0001+003860  (0E77ECB8)        	PACKED-DECIMAL
000316  03 LIST-1(1)                      ? X	'50505050'                          		S9(6) PACKED-DECIMAL OCCURS 100
           <UNMERGED DATA FOR LIST-1>     X	'50505050505050505050505050505050'  	LENGTH  396
                                             LINES	  000016-000368 SAME AS ABOVE
                                     (+000384) X' 505050505050505050505050'
            INX                                	 473380382                          		INDEX=0001 K

A merged data display for the WORKING-STORAGE section of a COBOL program contains the following information:

A

Displays the header describing the report columns.

B

Displays the source line number where the data item was defined.

C

Displays the level number and name of the data item.

D

Displays the definition for the field. For COBOL, this includes the PICTURE and USAGE clauses and any REDEFINES or OCCURS clauses for the field.

E

For some fields, indicates one of the following USAGE types of the data item:

• COMP and COMP-4 items are identified as BINARY.
• COMP-1 items are identified as FLOATING-POINT.
• COMP-2 items are identified as LONG FLOATING-POINT.
• COMP-3 items are identified as PACKED-DECIMAL.
• DISPLAY-1 items are identified as DBCS.

F

Displays the base locator and displacement of the item for group items. The address of the item is also identified, in parentheses. (The base locator prints as BL, BLL, or SBL for OS/VS COBOL and as BLF, BLW, BLL, BLK, BLV, or BLX for COBOL II and above. For COBOL II and above, the displacement may exceed 4 KB.) If the GRPADDR option is set to OFF, this information is suppressed.

G

Displays the value of the item for elementary items. The value is displayed in a format determined by the USAGE of the data item and the validity of the data.

For example:

• DISPLAY data is shown in display format
• PACKED-DECIMAL, BINARY, and INDEX data are shown in decimal display format (DEC) or hexadecimal format (HEX), depending on the value of the BINFRMT option.
• POINTER, PROCEDURE-POINTER, FLOATING-POINT and DBCS data are shown in hexadecimal format (for example, X'nnnnnnnn').

If the value of a data item is invalid, a question mark(?) precedes the data value and the data is displayed in hexadecimal format.

If the address of a data item is invalid, a question mark(?) precedes the data value column. The words 'INVALID ADDRESS' are displayed in the value column, followed by the address, in parentheses.

H

Displays the offset of the continued data (from the beginning of the data item) in decimal, on each successive line. If the data is too long to fit on the current line (32 bytes for display format, 16 bytes for hexadecimal format) it is continued on the next line.

I

Displays the first n occurrences of the table in merged format (where n is the OCCURS option value) if the value specified in the OCCURS option is less than the number of occurrences defined to the table. The rest of the table is identified as '<UNMERGED DATA FOR tablename>'. The length is displayed in the DEFINITION column and the data is displayed in hexadecimal format.

The OCCURS option was set to the default value of 1 for this report. The maximum value for the OCCURS option is 16777215.

J

Indicates the mapping status of the data in COBOL programs. If the COBOL program contains data that does not map to a data item (such as slack bytes or unmerged data items from a COPY... SUPPRESS statement), the data is identified as '<UNMERGED DATA>'. The length is displayed in the DEFINITION column and the data is displayed in hexadecimal format.

K

Displays the index name, cell number, and current value on the line following the OCCURS data item if an INDEXED clause is specified on an OCCURS data item. If the current index value cannot be determined, 'N/A' is displayed in the value column.

When displaying a variable length table, if the size of the table has not yet been defined or cannot be determined, the maximum table size is used.