Statement: Declares a record structure as an entity with a name.
Syntax
RECORD /structure-name/record-namelist
[, /structure-name/record-namelist]
. . .
[, /structure-name/record-namelist]
structure-name
Is the name of a previously declared structure.
record-namelist
Is a list of one or more variable names, array names, or array specifications, separated by commas. All of the records named in this list have the same structure and are allocated separately in memory.
Description
You can use record names in COMMON and DIMENSION statements, but not in DATA or NAMELIST statements.
Records initially have undefined values unless you have defined their values in structure declarations.
STRUCTURE and RECORD constructs have been replaced by derived types, which should be used in writing new code. See Derived Data Types.
See Also
TYPE, MAP...END MAP, STRUCTURE...END STRUCTURE, UNION...END UNION, Record Structures
Example
STRUCTURE /address/
LOGICAL*2 house_or_apt
INTEGER*2 apt
INTEGER*2 housenumber
CHARACTER*30 street
CHARACTER*20 city
CHARACTER*2 state
INTEGER*4 zip
END STRUCTURE
RECORD /address/ mailing_addr(20), shipping_addr(20)