
  CONST
    pfc$master_catalog_name_index = pfc$family_name_index + 1;

*copyc pfc$family_name_index
