
{ PURPOSE:
{   These types are used to define a SEQUENCE DESCRIPTOR.
{
{      The Sequence Descriptor record contains the following fields:
{
{        PROCESSOR_VERSION  - The version and creation date of the PACS/INSS
{                     used to build the sequence.
{
{        SEQUENCE_CREATION_DATE_TIME  - The creation date/time for the sequence.
{
{        SEQUENCE_LEVEL  - The level of the data structures contained in the
{                     sequence.  The level identifies changes in the type
{                     declarations used in creating the data structures.
{                     This field is important in understanding how to access
{                     the information within the sequence.
{
{        SEQUENCE_TYPE  - The type of sequence the descriptor is for
{                     (rac$subproduct_info_sequence,
{                     rac$packing_list_sequence,
{                     rac$idb_directory_sequence or
{                     rac$processing_summary_sequence).
{

  TYPE
    rat$processor_version = string (31);

  TYPE
    rat$sequence_descriptor = record
      processor_version: rat$processor_version,
      sequence_creation_date_time: rat$date_time,
      sequence_level: rat$sequence_level,
      sequence_type: rat$sequence_type,
    recend;

  TYPE
    rat$sequence_level = string (31);

  TYPE
    rat$sequence_type = (rac$subproduct_info_sequence,
          rac$packing_list_sequence, rac$idb_directory_sequence,
          rac$processing_summary_sequence);

*copyc rat$date_time
