!   BEGA_RECORDS.CDO
!
DEFINE RECORD BEGA_CDD_PATH.RECORDS.BEGA_RECORD
    DESCRIPTION IS /*Record to show variant and timestamp*/.

    VARIANTS.
        VARIANT.
            CDD_FIELDS.MY_DATE.
        END VARIANT.

        VARIANT.
            CDD_FIELDS.MY_DATE_QUAD.
        END VARIANT.
    END VARIANTS.

    VARIANTS.
        VARIANT.
            CDD_FIELDS.INVOICE_DATE.
        END VARIANT.

        VARIANT.
            CDD_FIELDS.YYYY_STR.
            CDD_FIELDS.MM_STR.
            CDD_FIELDS.DD_STR.
        END VARIANT.

    END VARIANTS.

END BEGA_CDD_PATH.RECORDS.BEGA_RECORD RECORD.

COMMIT