  TYPE
    pmt$mainframe_attributes = array [1 .. * ] of pmt$mainframe_attribute;

*copyc pmt$mainframe_attribute

