Purge()

         Purges the value of a variable

    Syntax:

         Purge ( xVar ) -> xNewVar

         xVar : The variable to purge

    Description:

         Returns a value of the purged parameter, I mean, if xVar is
         numeric returns 0, if character returns spaces, if date "  /  /  "
         if array {}.

    Return:

         The purged value.

    Example:

         cNew := Purge ( "Hello" )       // "    "
         cMax := Purge ( { "Hello" } )   // {}
         cMax := Purge ( 123 )           // 0
         cMax := Purge ( .T. )           // .F.