

Accessing Main Storage: CORE › Display Main Storage › Display Qualified, Variable Length, Indexed, or Subscripted COBOL Data Names
Display Qualified, Variable Length, Indexed, or Subscripted COBOL Data Names
Specify qualified, variable length, indexed, and subscripted COBOL data names as follows:
- To display non-uniquely defined COBOL data names, enter:
CORE='NAME-1 OF NAME-2'
- Specify up to seven levels of indexing or subscripting.
- To display a variable length COBOL data item, such as a data item declared with an 'OCCURS X to Y times depending on Z' clause, enter:
CORE='DATA-NAME'
- To display an indexed or subscripted COBOL data item defined in arrays, enter:
CORE='NAME(X1, X2, X3)'
- Follow these syntax rules:
- The data name must be enclosed in quotes.
- Specify up to seven levels of indexing or subscripting for a data item.
- Parentheses, ( ... ), indicate the beginning and end of indexing and subscripting.
- X1, X2, X3 are index names, subscript names or numeric subscript values. If more than one item is specified, a comma and a blank must precede the next item.
- Do not mix indexing and subscripting in the same command.
Example
To display a specific entry within a table, enter:
CORE='TABLE(1, SUB-2)'
To display the CUSTOMER-NUMBER as found in CUSTOMER-FILE-C, enter:
CORE='CUSTOMER-NUMBER OF CUSTOMER-FILE-C'
To display the ZIP-CODE in a specific CITY for a specific CUSTOMER, enter:
CORE='ZIP-CODE(NAME-IDX, CITY-IDX, ZIP-IDX)'
Copyright © 2014 CA Technologies.
All rights reserved.
 
|
|