Find a lookup value in a lookup array
──────────────────────────────────────────────────────────────────────────────

 Syntax

        H_FindALookup( aCodes , aDesc , cValue )

 Arguments:

      aCodes - Array of codes
      aDesc  - Array of descriptions
      cValue - Value to find in aCodes

 Returns:

      If cValue is found, returns the corresponding code from aCodes
      Otherwise returns ""

 Description:

      Scans aDesc, looking for cValue.  If cValue is found, returns the
      value in aCodes with the same subscript

 Examples:



 Source: FALOOKUP.PRG

 Author:  Martin Colloby