
  TYPE
    pft$catalog_alarm_table = array [1 .. * ] of pft$catalog_alarm_entry;

*copyc pft$catalog_alarm_entry
