Array based lookup function
──────────────────────────────────────────────────────────────────────────────

 Syntax

        H_ALookup( cInit , aValue , apDesc , ;
                   trow , tcol , brow , bcol , drow , dcol , ;
                   bReturn , bFunction , aKeyDesc , aGetExitKeys )
  
 Arguments:

      cInit     - Inital value of lookup code
      aValue    - Array of lookup codes
      apDesc    - Array of descriptions
      trow      - Top row of browse
      tcol      - Top column of browse
      brow      - Bottom row of browse
      bcol      - Bottom col of browse
      drow      - Row of display area
      dcol      - Column of display area
      bReturn   - Block to return value
      bFunction - Block to EVAL before return - Optional
      aKeyDesc  - Keys Descriptions
      aGetExitKeys - Keys that can abort the GET

 Returns:

      If nType is H_NORMAL, returns the lookup code
      Otherwise returns .F.

 Description:

      A function to allow the browsing of array based lookup tables within
      a GET object.  The array apDesc is browsed; when the user makes a
      selection the corresponding element in aValue is returned to the GET,
      and the value selected is output at drow, dcol.  If drow, dcol are
      not passed, they default to trow, tcol.

 Examples:



 Header File: H_LIB52.CH

 Source: ALOOKUP.PRG

 Author:  Martin Colloby