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

  Sx_PTOD():

  Syntax:   Sx_PTOD( <cPackedDate> )

            <cPackedDate> = A 3-byte packed date value, as returned from the
                            Sx_DTOP() function.
  Returns:  A Clipper DATE value.

  Description:  Reverse of the Sx_DTOP() function.  To be used in converting
                3-byte packed date value back into standard Clipper DATE
                values.

    NOTE: This function is NOT required for simply retrieving a packed
          date value from a strongly-type "V" date field.  That is done
          automatically through the RDD.  However, this might be used in
          converting a packed date value retrieved with Sx_KeyData() from
          an index file created with Sx_DTOP().  See the example below.

  Example:  USE test EXCL
            INDEX ON Sx_DTOP( test->HIREDATE ) TO SALEDATE

            GO TOP
            ? test->HIREDATE     // Returns a DATE value (ie, 01/31/95)
            x := Sx_KeyData()    // Returns a 3-byte packed date key value
            ? Sx_PTOD( x )       // Returns the full DATE value (01/31/95)