
  TYPE
    pmt$family_name_list = ARRAY [1 .. *] OF ost$name;

*copyc ost$name

