cal_get_info()

CAL_$GET_INFO                     Domain/OS                      CAL_$GET_INFO


NAME
     cal_$get_info - get the local time zone

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

     void cal_$get_info(
          cal_$timezone_rec_t *time_zone)

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

     procedure cal_$get_info(
          out time_zone: cal_$timezone_rec_t);

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

           integer*2 time_zone(6), utc_delta, drift(3), drifth
           integer*4 driftl
           character tz_name*4

           equivalence (utc_delta, time_zone(1))
           equivalence (tz_name, time_zone(2))
           equivalence (drift, time_zone(4))
           equivalence (driftl, drift(2)), (drifth, drift(1))

           call cal_$get_info(time_zone)

DESCRIPTION
     Cal_$get_info supplies the name of the local time zone and the difference
     between local time and Coordinated Universal Time (UTC) in time_zone.

     time_zone
          A record containing the name of the local time zone and its offset
          from UTC.
Museum
