This wizard enables you to obtain COBOL descriptions of Data Structures in a file. To do so, you must use this wizard to select one or more Data Structure, indicate a destination file, and valorize parameters such as the generation type, the COBOL location, format type.... Each description thus obtained is stored in a COBOL source library and can be incorporated into programs using the COPY clause.
You are free to check or clear the Data Structure(s) you want.
This file must have a .cpy extension. If you have launched the Copybook generation wizard from a selected Data Structure, the filename defaults to the name of this Data Structure. On the other hand, if you have launched the wizard from a location or the Data Structure entity level, the filename defaults to the first Data Structure of the location.
The destination file is created in the Navigator view. By default, it is created in the project and package which already holds the corresponding Data Structure(s).
Value | Meaning |
---|---|
DC1 | Generation of a Data Structure description without the recognition of assigned Text lines |
DC2 | Generation of Data Structure with the recognition of assigned Text lines |
DC3 | Besides the generation of Segment Cobol source, generation of the Data Element and Segment description lines in the form of comments which will be used by VAP Connector. |
The default value of this field is the Data Structure code entered in the Name field of the Definition tab.
This filename is 8-character long maximum.
Value | Meaning |
---|---|
W | WORKING-STORAGE SECTION or LINKAGE
SECTION. The different structures of a record are explicitly redefined. |
F | FILE SECTION The different structures of a record will not contain a REDEFINES clause, since VA Pac automatically generates all REDEFINES. |
V | Generation of a variable file. |
Value | Meaning |
---|---|
0 | Adaptation to IBM MVS ANSI COBOL |
1 | Adaptation to IBM DOS ANSI COBOL |
3 | Adaptation to PC/MICROFOCUS COBOL |
4 | Adaptation to GCOS7 COBOL |
5 | Adaptation to GCOS8 COBOL |
7 | Adaptation to HP-3000 COBOL |
8 | Adaptation to UNISYS A Series COBOL |
F | Adaptation to TANDEM COBOL |
I | Adaptation to DEC/VAX COBOL |
K | Adaptation to ICL 2900 ANSI COBOL |
M | Adaptation to GCOS6 COBOL |
O | Adaptation to AS 400 COBOL |
U | Adaptation to UNISYS 2200 Series COBOL |
X | Adaptation to IBM COBOL for OS/390 |
Value | Meaning |
---|---|
E | Description using input formats |
I | Description using internal formats with their associated 'usages' |
S | Description using output formats |
Value | Meaning |
---|---|
Implicit or explicit redefinition of records. | |
1 | Continuous sequence of records ('common part' Segment followed by the different 'specific part' Segments) without initial values or repetitions of records. If the Data Structure description appears in the COBOL FILE SECTION, the level number must be '2' |
2 | Continuous sequence of records that include the initial values entered on the Segments' -CE Lines, or, by default, initial values of blank or zero according to the format (this option is reserved for descriptions in the WORKING-STORAGE SECTION). |
3 | Continuous sequence of records taking into account the Table
size specified on the Segment Definition. If the Data Structure description appears in the COBOL FILE SECTION, the level number must be 2. This type of description can only be used for a Data Structure which has a Table size on the common part Segment. |
4 | Continuous sequence of records taking into account the Table
size specified on the Segment Definition.
The associated level number must be 3. The level 2 allows access to the table created by the occurs of a given record (FFEET). The level 1 consolidates all the information in the Data Structure (whether or not the common part and specific parts are occursed). This type of description can only be used for a Data Structure which has a Table size on the common part Segment. |
Value | Meaning |
---|---|
1 | Level 01 for Data Structures and records. If the Data Structure description appears in the COBOL FILE SECTION, the records must be redefined. If the Data Structure has no 'common part' with a Record type other than 'blank', the file level does not appear. |
2 | Level 01 for Data Structures and 02 for records. Level 01 does not appear if the Record type is 'blank'. |
3 | Level 02 for Data Structures and 03 for
records, when associated with a Record type set to 1, 2 or 3. Level 01 for Data Structures and 03 for records, when associated with a Record type set to 4. Level 03 for Data Structures and records when associated with a Record type set to 'blank'. |
The selection is constituted of the chosen record codes, which may or may not be sorted.
To select the common part of a multi-records file, you must specify it explicitly.