
  TYPE
    pft$fmd_size = 0 .. pfc$maximum_fmd_size;

*copyc pfc$maximum_fmd_size
