pxflocaltime(3F)

NAME
     PXFLOCALTIME - Converts to local time

SYNOPSIS
     SUBROUTINE PXFLOCALTIME (isecnds, iatime, ierror)
     INTEGER isecnds, iatime, ierror

STANDARDS
     IEEE standard interface for FORTRAN 77

DESCRIPTION
     This routine is in libfortran.so which is linked by default when
     compiling programs with the MIPSpro 7 Fortran 90 compiler or when
     compiling programs with the -craylibs option to the MIPSpro F77
     compiler.

     The PXFLOCALTIME routine uses the localtime function to convert
     seconds since 00:00:00 CTU (coordinated universal time), January 1,
     1970 (the Epoch), to broken-down time. Adjustments for time zone and
     daylight savings time are made according to the TZ environment
     variable.

     All arguments must be of default kind unless documented otherwise.  On
     IRIX systems, the default kind is KIND=4.

     The following is a list of valid arguments for this routine:

     isecnds   An input integer variable containing the number of seconds
               since 00:00:00 CTU, January 1, 1970.

     iatime    An output integer array with the elements:

               iatime(1) =
                         seconds (0-61, for leap seconds)

               iatime(2) =
                         minutes (0-59)

               iatime(3) =
                         hours (0-23)

               iatime(4) =
                         day of the month (1-31)

               iatime(5) =
                         month of the year (1-12)

               iatime(6) =
                         Gregorian year (e.g., 1995)

               iatime(7) =
                         Day of the week (0 = Sunday)

               iatime(8) =
                         Day of the year (1-366)

               iatime(9) =
                         Daylight savings flag (0 = standard, nonzero =
                         daylight savings)

     ierror    An output integer variable that contains zero if
               PXFLOCALTIME was successful or nonzero if PXFLOCALTIME was
               unsuccessful.

     This routine may return the EINVAL error value if the current value of
     the TZ environment variable is invalid. iatime is left unchanged if
     this error occurs.

NOTES
     The PXF_DEFINITIONS module can be used by Fortran 90 users to enable
     caller-callee interface checking.

EXAMPLES
     In this example, the current time, date, and time system are displayed
     if PXFLOCALTIME and PXFTIME are successful.

          program pxftest
          integer isecnds, iatime(9), ierror

          CALL PXFTIME(isecnds,ierror)
            if (ierror .eq. 0) then
               CALL PXFLOCALTIME(isecnds,iatime,ierror)
               if (ierror .eq. 0) then
                  print *,'Time: ',IATIME(3),':',IATIME(2),':',IATIME(1)
                  print *,'Date: ',IATIME(4),'.',IATIME(5),'.',IATIME(6)
                  if (IATIME(9) .eq. 0) then
                     print *,'standard time'
                  else
                     print *,'daylight savings'
                  endif
               else
                  print *,'PXFTIME error = ',ierror
               endif
            else
               print *,'PXFTIME error = ',ierror
            endif
          end

     This example may display:

          Time: 8:37:24
          Date: 11.7.1996
          daylight savings

SEE ALSO
     ctime(3C)