
{* ZCYTCFP  cyt$current_file_position *}

  TYPE
    cyt$current_file_position = (cyc$beginning_of_information,
      cyc$middle_of_record, cyc$end_of_record, cyc$end_of_block,
      cyc$end_of_partition, cyc$end_of_information);
