FT DOS/BIOS

 FT_CHDIR()       Change the current directory
 FT_DEFAULT()     Retrieve and optionally change the current default drive
 FT_DOSVER()      Return the current DOS major and minor version as a string
 FT_DSKFREE()     Return the amount of available disk space
 FT_DSKSIZE()     Return the maximum capacity of a fixed disk
 FT_FLOPTST()     Test diskette drive status
 FT_HANDCNT()     Count number of available DOS (not network) file handles
 FT_INP()         Retrieve a byte from a specified I/O port
 FT_INT86()       Execute a software interrupt
 FT_ISPRINT()     Check printer status
 FT_ISSHARE()     Determine if DOS "Share" is installed
 FT_MKDIR()       Create a subdirectory
 FT_OUTP()        Write a byte to a specified I/O port
 FT_PEEK()        Retrieve a byte from a specified memory location.
 FT_POKE()        Write a byte to a specified memory location
 FT_REBOOT()      Force a warm or cold boot
 FT_RMDIR()       Delete a subdirectory
 FT_SETDATE()     Set the DOS system date
 FT_SETTIME()     Set the DOS system time
 FT_SYSMEM()      Determine the amount of conventional memory installed
 FT_TEMPFIL()     Create a file with a unique name

FT_SETTIME

FT_SETTIME()
 Set the DOS system time
------------------------------------------------------------------------------

 Syntax

      FT_SETTIME( <cTime> ) -> <lResult>

 Arguments

     <cTime> is a string in the form <hh:mm:ss> that you want to set
     the current DOS system time to.

     Use 24-hour time.  It is up to you to send in a valid time.  If
     DOS doesn't think it is valid, it won't reset the time anyway.

 Returns

     <lResult> is simply the result of FT_INT86(), passed back
     to your program.

 Description

     FT_SETTIME() uses NANFOR.LIB's FT_INT86() function to invoke
     the DOS Set Time service (Interrupt 33, service 45).

 Examples

  The following program takes a time string from the command line and sets
  the DOS system time:

   FUNCTION main( cTime )

      cTime := iif( cTime == nil, time(), cTime )
      QOut( "Setting time to: " + cTime  + "... " )
      FT_SETTIME( cTime )
      Qout( "Time is now: " + time() )

   RETURN ( nil )

 Source: SETTIME.PRG

 Author: Glenn Scott

 

FT_SETDATE

FT_SETDATE()
 Set the DOS system date

 Syntax

      FT_SETDATE( <dDate> ) -> <lResult>

 Arguments

     <dDate> is a Clipper date variable that you want to set the current
     DOS system date to.

     It is up to you to send in a valid date.  The
     year must be within the range 1980 through 2099.  If DOS
     thinks the date is not valid, it won't change the date.

 Returns

     <lResult> is simply the result of FT_INT86(), passed back
     to your program.

 Description

     FT_SETDATE() uses NANFOR.LIB's FT_INT86() function to invoke
     the DOS Set Date service (Interrupt 33, service 43).

 Examples

  The following program takes a date from the command line and sets
  the DOS system date:

   FUNCTION main( cDate )

      cDate := iif( cDate == nil, dtoc( date() ), cDate )
      QOut( "Setting date to: " + cDate  + "... " )
      FT_SETDATE( ctod( cDate ) )
      Qout( "Today is now: " + dtoc( date() ) )

   RETURN ( nil )

 Source: SETDATE.PRG

 Author: Glenn Scott