[<<Previous Entry]
[^^Up^^]
[Next Entry>>]
[Menu]
[About The Guide]
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
This page created by ng2html v1.05, the Norton guide to HTML conversion utility.
Written by Dave Pearson