aScan en un array multidimensional...?

[goosfancito]

Hola.
Tengo:
aLista[01] = { 1, 3, 2}
aLista[02] = { 7, 3, 2}
aLista[03] = { 8, 6, 2}
aLista[04] = {10,3,12}

y quiero utilizar el aScan para que me verifique si en la primer columna
tiene un numero...

intente:

Code: Select all  Expand view

nPos:= aScan(aLista, { | array | array[1] == 8} )

Pero no tuve suerte.

com lo hago?

[Carles]

Hola,

La asignacion hazla mejor con :=

Esto funciona bien

Code: Select all  Expand view

#include 'fivewin.ch'

function main()
    local aLista := array(4), npos

    aLista[1] := { 1, 3, 2}
    aLista[2] := { 7, 3, 2}
    aLista[3] := { 8, 6, 2}
    aLista[4] := {10,3,12}
   
    nPos:= aScan(aLista, { | array | array[1] == 8} )
    ? nPos
retu nil

[goosfancito]

Gracias!