Museum

Home

Lab Overview

Retrotechnology Articles

⇒ Online Manual

Media Vault

Software Library

Restoration Projects

Artifacts Sought

CAL_$DECODE_LOCAL_TIME            Domain/OS             CAL_$DECODE_LOCAL_TIME


NAME
     cal_$decode_local_time - get the local date and time

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

     void cal_$decode_local_time(
          cal_$timedate_rec_t *local_date_time)

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

     procedure cal_$decode_local_time(
          out local_date_time: cal_$timedate_rec_t);

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

           integer*2 local_date_time(6), year, month, day, hour, minute, second

           equivalence (year, local_date_time(1)), (month, local_date_time(2))
           equivalence (day, local_date_time(3)), (hour, local_date_time(4))
           equivalence (minute, local_date_time(5)), (second, local_date_time(2))

           call cal_$decode_local_time(local_date_time)

DESCRIPTION
     Cal_$decode_local_time supplies integers values for the local date and
     time in local_date_time.

     local_date_time
          The local date and time.

Typewritten Software • bear@typewritten.org • Edmonds, WA 98026