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

  SxDTOP():

  Syntax:   Sx_DTOP( <dVal> )

            <dVal> = Clipper DATE value

  Returns:  A 3-byte 'packed' date value.

  Description:  To be used in creating indexes on DATE values.  Reduces the
                size of the keys being stored from 8 bytes to 3 bytes.  This
                function is independant of the SIx Driver's RDD level and
                thus can even be used with DBFNTX.  Note that any SEEKs into
                an index created with Sx_DTOP() would need to be passed
                through Sx_DTOP(), unless you're already SEEK'ing using the
                packed value.

  Example:  USE test EXCL
            INDEX ON Sx_DTOP( test->HIREDATE ) TO SALEDATE
            IF !dbSeek( Sx_DTOP( CTOD( "01/31/95" )))
              ? "Not Found!"
            ENDIF