XPfdate()
   Get and/or Set file's date
------------------------------------------------------------------------------

   Function:   XPfdate()

               Using XPfdate(), one can change the date of a file
               that was previously opened using Extend's fopen().
               XPfdate() also returns the current date of the file.

   Syntax:     XPfdate(<h>[,dStamp]) --> dStamp

   Arguments:  <h> is the handle that was previously returned
               by Extend's fopen()/fcreate() or XPfcreateNew(), <dStamp>
               is the date you evt. wi to stamp the File with.

   Returns:    the Date the file was last written to.

   Usage:      * - 'Touch' a file.
               if (Handle := fopen(cFileName)) <> -1
                    XPfdate(handle,date())
                    XPftime(handle,time())
               end