1 %INCLUDE %FROM %CDD "CDD$TOP.BASIC.VARIANT_EXAMPLE"
              C1 ! test simple variant
              C1 RECORD VARIANT_EXAMPLE ! UNSPECIFIED
              C1 STRING MY_STRING = 9 ! TEXT
              C1 VARIANT
              C1 CASE
              C1 SINGLE MY_S_REAL ! F_FLOATING
              C1 DOUBLE MY_D_REAL ! D_FLOATING
              C1 CASE
              C1 GFLOAT MY_G_REAL ! G_FLOATING
              C1 HFLOAT MY_H_REAL ! H_FLOATING
              C1 END VARIANT
              C1 BYTE MY_BYTE ! SIGNED BYTE
              C1 END RECORD