  TYPE
    ost$spi_sampling_interval = 0 .. 100000,
    ost$number_of_spi_samples = 0 .. 100000000,
    ost$spi_identifier = 0 .. 0ff(16),
    ost$spi_environment = boolean,
    ost$spi_collection_header = record
      spi_identifier: ost$spi_identifier,
      date_time: ost$date_time,
      spi_sampling_interval: ost$spi_sampling_interval,
      data_string: string (32),
    recend;

?? PUSH (LISTEXT := ON) ??
*copyc ost$date_time
?? POP ??
