BUG: SETTIM() Function Sets Date Back 1 Day Under Windows NT

MORE INFORMATION

To illustrate the problem, build a program using the following sample code. With the "Adjust for Daylight Savings Time" option selected in the Date/Time applet, run the program. Running the program prints the current date but causes the system date to be set back one day.

To check the system date, open the Date/Time applet in the Control Panel or from the MS-DOS command prompt, type date and press ENTER. Note the date displayed will be one day less than what was printed for the sample program execution.

Sample Code

C Compile options needed: none
      include 'flib.fi'
      include 'flib.fd'
      integer*2 nowyr,nowmonth,nowday,nowhr,nowmin,nowsec,nowhun
      logical lvar
      call getdat(nowyr,nowmonth,nowday)      ! get current date/time
      call gettim(nowhr,nowmin,nowsec,nowhun)
      write (*,*) nowyr,nowmonth,nowday
      lvar = setdat(int2(1980),int2(5),int2(31))  ! set new date/time
      lvar = settim(int2(0),int2(0),int2(0),int2(0))
      lvar = setdat(nowyr,nowmonth,nowday)        ! restore date/time
      lvar = settim(nowhr,nowmin,nowsec,nowhun)
      end