cal_encode_time()

CAL_$ENCODE_TIME                  Domain/OS                   CAL_$ENCODE_TIME


NAME
     cal_$encode_time - encode a date and time

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

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

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

     procedure cal_$encode_time(
          in date_time: cal_$timedate_rec_t ;
          out clock_value: time_$clock_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_$encode_time(date_time, clock_value)

DESCRIPTION
     Cal_$encode_time encodes the Coordinated Universal Time (UTC) date and
     time specified by date_time into the equivalent system clock value, and
     supplies the result in clock_value.

     date_time
          A UTC date and time.

     clock_value
          The system clock value equivalent to date_time.
Museum
