Como procurar um valor numa matriz ???

[janio]

Pessoal,

Como procurar um valor numa matriz

Exemplo:

Código: Selecionar todos

   Local1 := {}
   aadd(Local1, { "1234", "FORTALEZA", "CE" })
   aadd(Local1, { "4343", "TEREZINA" , "PI" })
   aadd(Local1, { "8362", "SAO LUIS" , "MA" })
   aadd(Local1, { "1252", "RECIFE"   , "PE" })

Gostaria de procurar por SAO LUIS, retornando o valor do PRIMEIRO parâmetro "8362".

Jânio

[Maligno]

No caso de matrizes multidimensionais, a pesquisa só pode ser feita por meio de um bloco de código:

Código: Selecionar todos

#define _CIDADE 2
Nome := "SAO LUIS"
Pos  := AScan(Local1,{|a,i|a[_CIDADE] == Nome})

Acho que o código já explica o process. A variável Pos conterá a posição da matriz onde a cidade foi encontrada. Para obter o primeiro, valor, claro: Local1[Pos][1].

[janio]

Valeu,

Funcionou certinho!

Jânio