To display the contents of this section, you must select a Data Structure call in the tree or click Add Data Structure. You must give the Data Structure its code and location in the generated Program, and some physical characteristics. You must also select which of its Segments are to be taken into account. From here, you can access the Data Structure editor tabs.
Value | Meaning |
---|---|
For a batch program | |
AA to ZZ and 0A to 0Z | These values cause the lines entered in this
tab to be generated at the beginning of the WORKING-STORAGE
SECTION. These lines are generated:
|
00 to 09, 1A to 19... 9A to 99 | The lines entered in this tab will be generated in the WORKING-STORAGE SECTION, after all the Data Structures whose COBOL position is lower than this prefix |
For a transactional program | |
AA to 0Z | The description is generated in the WORKING-STORAGE SECTION. |
00 to 99 | The description is generated in the LINKAGE SECTION. |
AA and 00 | These values are used for automatically generated data. |
99 | With a Line number = 999, this value is used for the PROCEDURE DIVISION statement. Therefore, you can use it to create a line with a sequencing number 99999, which replaces the PROCEDURE DIVISION line automatically generated. |
$n | This value represents a parameterized value in a Macro. |
It sets the sequence in which the Data Structure or Report is processed in the program.
When the Data Structure or Report is used only once in a program, it is advised to indicate the code entered as the Data Structure or Report name. This name is entered upon creation. However if it is called more than once in a program, you can differentiate these calls.
You can parameterize this code in a Macro with $n.
Value | Meaning |
---|---|
Redefined records | No VALUE clause is generated |
1: Records without initial values | Records without initial values or occurs. These
records contain the Segment common part, followed by the different
specific parts. If the Data Structure description is included in the COBOL FILE SECTION, the COBOL record level field must be set to 2: COBOL 01 level for DS area and segments at 02 level. With this value, the specific Segments are described without redefines, at the COBOL level 02. Several Segment descriptions are grouped under the same I/O area. |
2: Records with initial values | Records with the specific initial values indicated in the Segment -CE Lines tab. These values can also default to blank or zero depending on the format. Initial values are also generated for the multiple occurrence fields if the Generated language of the Library is set to D: COBOL II, 85, LE. |
3: Records with occurs (used with level 2) | Records which incorporate the number of occurrences
indicated in the Table size field of the Segment
Definition tab. No VALUE clause is generated. If the Data Structure description is included in the COBOL FILE SECTION, the COBOL record level field must be set to 2: COBOL 01 level for DS area and segments at 02 level. This type of description cannot be used if the common part Segment of this Data Structure is assigned a value in the Table size field of the Segment Definition tab. In that case, set the Organization to W: File description in Working and the Usage to T: Table stored in memory. |
4: Records with occurs (used with level 3) | Records which incorporate the number of occurrences
indicated in the Table size field of the Segment
Definition tab. The associated 'Level' field must be set to 3.
The associated COBOL record level must be set to 3: COBOL level varying with records description type Comment specific to the OnLine Systems Development function: The index is not generated if the Generated description type set to 4: Records with occurs (used with level 3), and the COBOL record level is set to 3: COBOL level varying with records description type, A COBOL level 02 is used to access the table made up of occurs of the same record (ddssT). A COBOL level 01 is used to group the whole Data Structure (common or specific parts, whether occurred or not). A group level field that incorporates all instances is generated. This type of description cannot be used if the common part Segment of this Data Structure is assigned a value in the Table size field of the Segment Definition tab. In that case, set the Organization to W: File description in Working, and the Usage to T: Table stored in memory. |
Value | Meaning |
---|---|
1: COBOL 01 level for DS area and segments | If the Data Structure description is included
in the COBOL FILE SECTION, the Segments must be redefined. If a Data Structure has no common part with a non-redefined description, the D.S. Area is only included when the Generated description type is set to Redefined records. |
2: COBOL 01 level for DS area and segments at 02 level | If the Generated description type is set to Redefined records, the D.S. Area and Segments are described at level 02. Preferably set the Organization to L: Working with placement and define the higher levels through work areas. |
3: COBOL level varying with records description type | Level 02 for D.S. Area and level 03 for Segments
if the Generated description type is set to 1:
Records without initial values, 2: Records
with initial values or 3: Records with occurs
(used with level 2). Level 01 for D.S. Area and level 03 for Segments if the Generated description type is set to 4: Records with occurs (used with level 3). Level 03 for both the D.S. and Segments if the Generated description type is set to Redefined records. |
4: COBOL 02 level for Data Elements, DS Areas and Segment levels disappear | Reserved for the D.S. with an Organization set
to L: Working with placement and a Usage set
to D: Output file. Level 02 for the group Data Elements or elementary Data Elements that are not part of a group. The elementary Data Elements that are part of a group are displayed but the D.S. Area and Segment levels are not included. Level 01 is to be defined in the -W Lines tab. |
5: COBOL 01 level for Data Elements, DS Areas and Segment levels disappear | Organization set to L:
Working with placement or W: File description
in Working and a Usage set to D:
Output file. Level 01 for the group Data Elements or elementary Data Elements that are not part of a group. The Elementary Data Elements that are part of a group are displayed but the D.S. Area and Segment levels are not included. |
You can select whether the Data Structure must be generated in the WORKING-STORAGE SECTION, or as the description of a Pactables Table.
You can also use this field to specify database descriptions when the Database Description function is not used. These values are taken into account by application Programs.
Value | Comment |
---|---|
S: Sequential | Only authorized value for a Report, a sequential file or a sort file Data Structure. |
V: VSAM, UFAS | One of the two possible values for an indexed
file Data Structure This value generates the STATUS KEY IS clause. The corresponding field is declared in the File Status field of the -CD Line Definition of the -CD Lines tab (the part which can be viewed by clicking More). |
I: Indexed | The other possible value for an indexed file
Data Structure. This value corresponds to an indexed sequential organization (ISP for GCOS8 BCD). An ISP file coded LE is
generated in 3 work areas:
|
G: Table description | This value generates the communication area with the Pactables function. |
L: Working with placement | File descriptions are generated in the , in the location you indicate in the COBOL position field. |
W: File description in Working | File descriptions are generated in the , before the WSS-BEGIN' constant. |
Y: Pacbench C/S | Call of the COPY clause which corresponds to the communication area between the client and the server (Pacbench C/S Business Components only). |
X: Comment | Data Structure used as a comment, not used for generation. |
2: DB2 Segments or VAX/SQL | Generation and description of a DB2 or VAX/SQL Segment. Only the physical accesses are not generated. The structure of the variable indicators corresponding to the columns of the DB2 or VAX/SQL table is always generated. |
Q: DB2 or ALLBASE/SQL | Reserved for the description of SQL/DS, DB2/2 or DB2/6000 databases (IBM), or ALLBASE/SQL databases (HP3000), or DB2/2 or DB2/600 databases (MICRO FOCUS). |
D: DL/1, IDS I and II | Reserved for the description of Segments or records of the IMS (DL/1), IDS I or IDS II databases, in the generation of DBD, SYSGEN, schemas or application programs |
B: IDMS | |
A: ADABAS | |
T: 'TOTAL' files | |
O: ORACLE (< V6) | |
C: INTEREL RDBC or RFM | |
R: RDMS | |
4: DB2/400 | |
M: DATACOM DB | |
N: NONSTOP SQL | |
P: ORACLE V6 and V7 | |
9: INFORMIX, SYBASE, INGRES/SQL, or SQL SERVER | |
Z: Data Structure for SOCRATE/CLIO | |
F: Formal for SOCRATE/CLIO |
This field is used with the Pactables function, to indicate which subschema is to be described. It is numeric, from 0 to 9 (0 corresponds to subschema 10).