Click above to get retro games delivered to your door ever month!

   ISCENT()

       Purpose

   Determine status of the SET CENTURY ON/OFF command.

       Parameters 

   None.   

       Return Value

   .T. if SET CENTURY ON, otherwise .F.

       Comments

   Query Clipper's SET CENTURY command and change it if necessary.

       Example

   .
   .
   .
   xdate = ctod('01/01/2000')
   if ! ISCENT()                  && is 'century' on ?
        set century on
        @ 0,0 get xdate           && displays '01/01/2000'
        clear gets
   endif
   .
   .
   .