Renames - Control Data Corporation 3300 Reference Manual

Computer systems usasi cobol/ master
Table of Contents

Advertisement

3.5.12
RENAMES
3-36
The RENAMES clause permits alternate, possibly overlapping, groupings
of elementary items.
66
data-name-1, RENAMES data-name-2 [THRU data-name-3]
All RENAMES entries associated with a given entry must immediately follow
the last data item description in the entry. One or more RENAMES entries
may be written for a given record description.
Data-name-2 and data-name-3 must
be
names of elementary items or groups
of elementary items in the associated record description entry; they must not
be the same data name. Data-name-2 must precede data-name-3 in the
record description. Data-name-3 must not be subordinate to data-name-2.
A level
66
entry cannot rename another level
66
entry nor can it rename a
level 77, level 88, or level 01 entry.
Data-name-1 must not be used as a qualifier and may be qualified only by the
names of level 01 or FD entries. Data-name-2 and data-name-3 may be
qualified. Neither data-name-2 nor data-name-3 may have an OCCURS
clause in its data description entry nor be subordinate to an item that has an
OCCURS clause in its data description entry.
When the THRU option is specified, data-name-1 is a group item which
includes all elementary items starting with data-name-2 if data-name-2 is
an elementary item, or the first elementary item in data -name-2 if data-
name-2 is a group item, and concluding with data-name-3
if
data-name-3 is
an elementary item, or the last elementary item in data-name-3 if data-
name-3 is a group item.
When the THRU option is not specified, data-name-2 can be either a group
or an elementary item.
If
data-name-2 is a group item, data-name-1 is
treated as a group item; if data-name-2 is an elementary item, data-name-1
is treated as an elem entary item.
Examples:
1.
01 DATE-WORD.
02 YEAR-1 PICTURE
99.
66
YEAR-2 RENAMES YEAR-I.
02 MONTH-1 PICTURE
99.
66
MONTH-2 RENAMES MONTH-I.
02 DAY -1 PICTURE
99.
66
DAY-2 RENAMES DAY-I.
66
DAY -3 RENAMES DAY-I.
60229400

Advertisement

Table of Contents
loading
Need help?

Need help?

Do you have a question about the 3300 and is the answer not in the manual?

Subscribe to Our Youtube Channel

This manual is also suitable for:

3500

Table of Contents