X-Hacker.org- Force 4.0 Reference - setcentury() set the century flag

Click above to get retro games delivered to your door ever month! X-Hacker.org- Force 4.0 Reference - setcentury() set the century flag

[<<Previous Entry] [^^Up^^] [Next Entry>>] [Menu] [About The Guide]

 setcentury()        Set the century flag
------------------------------------------------------------------------------
 Declaration
   getset.hdr

 Syntax
   proc setcentury extern
   param value logical lOn

 Arguments
   lOn is the new setting for the flag.

 Return
   None.

 Description
   The setcentury() function sets the century flag according to the
   passed parameter.

 Example
   #define EXAMPLE_DATE
   #include example.hdr

   proc Test_setcentury
   ? today()              // default is 2 digits
   setcentury( .t. )      // switch on 4-digit century
   ? today()
   setcentury( .f. )      // switch century to 2 digits
   ? today()
   endproc

   proc main
   Test_setcentury()
   endproc

See Also: getsetcentury()

Online resources provided by: http://www.X-Hacker.org --- NG 2 HTML conversion by Dave Pearson