Data Definition Language (DDL) Reference Manual

Definition Attributes
Data Definition Language (DDL) Reference Manual—529431-004
6-80
66 RENAMES
66 RENAMES
For DDL and COBOL source code, the level-66 RENAMES clause renames a
previously defined field or group or set of fields or groups.
For other languages:
Example 6-65. National-Literal Values in VALUE Clauses
DEF sample-type PIC NN.
DEF language-info.
02 language TYPE sample-type VALUE N"ab".
END.
Example 6-66. SQL-Literal Values in VALUE Clauses
DEF birthday TYPE SQL DATETIME year to day.
DEF family-birthday.
02 father TYPE birthday VALUE "1945-12-12".
02 mother TYPE birthday VALUE "1948-08-14".
02 sister TYPE birthday VALUE "1980-01-13".
END.
DEF job-schedule.
02 task1 TYPE SQL INTERVAL day 2 VALUE "12".
! An interval of 12 days
02 task2 TYPE SQL INTERVAL minute TO second VALUE "5:30".
! An interval of 5 minutes and 30 seconds
END.
Note. The DDL compiler ignores this clause when generating source code for languages other
than DDL and COBOL.
Language DDL compiler ...
C Translates a field with a RENAMES clause to a comment
FORTRAN Ignores the RENAMES clause
Pascal (on D-series systems) Ignores the RENAMES clause
TACL Ignores the RENAMES clause
66 renames-name RENAMES
{ field-name [ { THROUGH } field-name ] }
{ [ { THRU } ] }
{ }
{ group-name [ { THROUGH } group-name ] }
{ [ { THRU } ] }