Rational Programming Patterns for System z

Segment call

To display the details of the Segment call section, you must select a Segment call in the list of called elements. For files and databases represented by Segments, you indicate sort key, occurs, and Redefines options in this section. You also access the Segment editor tabs.

Restriction: The Segment calls are not possible in a Table entity.
Note: Keep in mind that a Segment call is considered as an elementary Data Element.
Occurs
Enter a number of occurrences in this field to generate an OCCURS COBOL clause. The COBOL restrictions on the OCCURS clause also apply here. You can indicate a number of occurrences on an elementary or a group Data Element or a filler. The number is limited to 99; it is pure numeric field.
Sort key
This field identifies all the Data Elements that can be used as control break sort keys, or as access keys to a file, a database or a Pactables Table.

Note: It is advised to dedicate a Segment to only one type of use. Each Data Element that can belong to a sort key must be referenced by a unique alphabetic or numeric character. It is advised to reference the indicators by a series (1, 2, 3 ...). The actual sort sequence is selected at the Program level (on the -CD Lines tab).
You must not forget that the format of key group Data Elements must have been entered in the repository or at the Segment level.
Table 1. Possible values of the sort key for Pactables
Value Comments
U References the access key for a Table. This value must be indicated on the group Data Element if it is a group key.
S Indicates that the Data Element belongs to at least one subsystem.
Table 2. Possible values of the sort key for DL/1 databases
Values Comments
U References a unique key for a DL/1 database.
M References a multiple key for a DL/1 database.
1 - 9 Secondary index All other values designate a search field.
Table 3. Possible values of the sort key for AS400 and relational databases
Values Comments
0 - 9 AS400 physical file key. relational databases
V Variable length column
Blank Fixed-length column
W For DB2 SQL, SQL/DS and ORACLE, generation of a variable length column (VARCHAR).
L For DB2 SQL, SQL/DS and ORACLE, generation of a LONG VARCHAR.
Note: Sort keys are not authorized on Data Elements redefining other Data Elements.
Redefines
The Data Element containing this option redefines the Data Element of the same COBOL level which precedes it in the Segment description. If a Data Element which redefines another Data Element is contained in a group, it is considered to be an elementary Data Element. It must be taken into account in the calculation of the number of Data Elements contained in a group (except for DL/1 database Segments).

More

Click More... to open a dialog box in which you indicate the presence check values for the element called in the current Segment.

-G Lines

Click -G Lines... to optionally define -GC lines for the element called in the current Segment.

Clicking the buttons in the bottom part of the section, switches the editor of the element called, in the corresponding tabs.

Terms of use | Feedback

This information center is powered by Eclipse technology. (http://www.eclipse.org)