  CONST
    dfc$max_esms_defined = 8;

  TYPE
    dft$esms_defined_count = 0 .. dfc$max_esms_defined,
    dft$esms_defined = array [1 .. * ] of cmt$element_name;

*copyc cmt$element_name
