Gather()

         Initializes a register with the information of an array

    Syntax:

         Gather( aArray ) -> Nil

         aArray : An array with the information

    Description:

         Initializes a register with the information of an array that
         previously could have been generated with the Scatter function.
         The table the data comes from is the one that is in the default
         work area. This table must be opened.

    Return:

         Nothing.

    Example:

         use sold new
         dbGoBotton()
         aArray := Scatter ()
         aArray [ 1 ] := "matthew"
         Gather ( aArray )