
  TYPE
    fst$goi_cycle_information = record
      creation_date_time: ost$date_time,
      damage_symptoms: fst$cycle_damage_symptoms,
      data_modification_date_time: ost$date_time,
      expiration_date_time: ost$date_time,
      last_access_date_time: ost$date_time,
      last_modification_date_time: ost$date_time,
      lifetime_attachment_count: ost$non_negative_integers,
      mainframe_usage_concurrency: fst$mainframe_usage_concurrency,
      mainframe_write_concurrency: fst$mainframe_write_concurrency,
      outstanding_access_modes: pft$usage_selections,
      prevented_access_modes: pft$usage_selections,
      retrieve_option: pft$retrieve_option,
      site_backup_option: pft$site_backup_option,
      site_archive_option: pft$site_archive_option,
      site_release_option: pft$site_release_option,
      attachment_status: pft$attach_status,
    recend;

*copyc fst$cycle_damage_symptoms
*copyc fst$mainframe_usage_concurrency
*copyc fst$mainframe_write_concurrency
*copyc ost$date_time
*copyc ost$non_negative_integers
*copyc pft$attach_status
*copyc pft$retrieve_option
*copyc pft$site_archive_option
*copyc pft$site_backup_option
*copyc pft$site_release_option
*copyc pft$usage_selections
