Function:    UnPackDate()

               UnpackDate() restores the date of a previously
               packed date using PackDate(). This can be handy
               when one wants to work with the date again, after
               having written it to the database or whatever.

  Syntax:      UnPackDate(<cPackedDate>) --> dVar

  Arguments:   The 2 byte string that was returned by
               PackDate().

  Returns:     The original Date variable.

  Usage:       if Date() <> UnPackDate(PackDate(Date()))
                    Do This_is_a_bug_ && !!!
               Else
                    Do OkiDokee
               endif