[next] [previous] [contents]

  Example 22-2: Translated RECORD Statement
          1 %INCLUDE %FROM %CDD "CDD$TOP.BASIC.STRINGS"
              C1 ! test
              C1 RECORD BASICSTRINGS ! UNSPECIFIED
              C1 STRING ABC = 10 ! TEXT
              C1 GROUP XYZ ! VARYING STRING
              C1 WORD WORD_VALUE
              C1 STRING STRING_VALUE = 16
              C1 END GROUP
              C1 END RECORD
  ................1
  %BASIC-I-CDD/SUBGRO, 1: data type in CDD/Repository not supported,
                          substituted group for: BASICSTRINGS::XYZ.