cal_decode_time(A)

CAL_$DECODE_TIME                  Domain/OS                   CAL_$DECODE_TIME


NAME
     cal_$decode_time - decode a clock value

SYNOPSIS (C)
     #include <apollo/base.h>
     #include <apollo/cal.h>

     void cal_$decode_time(
          time_$clock_t &clock_value,
          cal_$timedate_rec_t *date_time)

SYNOPSIS (Pascal)
     %include '/sys/ins/base.ins.pas';
     %include '/sys/ins/cal.ins.pas';

     procedure cal_$decode_time(
          in clock_value: time_$clock_t;
          out date_time: cal_$timedate_rec_t);

SYNOPSIS (FORTRAN)
     %include '/sys/ins/base.ins.ftn'
     %include '/sys/ins/cal.ins.ftn'

           integer*2 date_time(6), clock_value(3), clockh
           integer*2 year, month, day, hour, minute, second
           integer*4 clockl

           equivalence (clockl, clock_value(2)), (clockh, clock_value(1))
           equivalence (year, date_time(1)), (month, date_time(2))
           equivalence (day, date_time(3)), (hour, date_time(4))
           equivalence (minute, date_time(5)), (second, date_time(2))

           call cal_$decode_time(clock_value, date_time)

DESCRIPTION
     Cal_$decode_time decodes the Coordinated Universal Time (UTC) clock value
     in clock_value into integers representing the year, month, day, hour,
     minute, and second, and suplies the result in date_time.

     clock_value
          The clock value to be decoded.

     date_time
          The date and time represented by clock_value.
Museum
