
  TYPE
    pft$object_count = 0 .. pfc$maximum_object_count;

*copyc pfc$maximum_object_count
