record_type_definition ::=
TYPE type_name IS_RECORD 
 (field_declaration [, field_declaration]...);