  TYPE
    oct$name_index_changes = array [0 .. * ] of ost$message_template_index;

*copyc ost$message_template_index
