                                                                               
  TYPE                                                                         
    pft$release_data_info = record                                             
      perform_changes: {input} boolean,                                        
      release_attached_cycle_data: {input} boolean,                            
      update_last_release_date_time: {input} boolean,                          
      valid_archive_entry_required: {input} boolean,                           
      cycle_attached: {output} boolean,                                        
      case valid_archive_entry_found: {output} boolean of                      
      = TRUE =                                                                 
        ,                                                                      
      = FALSE =                                                                
        old_data_modification_date_time: ost$date_time,                        
        new_data_modification_date_time: ost$date_time,                        
      casend,                                                                  
  recend;                                                                      
                                                                               
*copyc ost$date_time                                                           
