eval encadenados...?

[goosfancito]

Hola.

Tengo dos array:

Code: Select all  Expand view  RUN

a[1]:= "A"
a[2]:= "x"

b[1]:= "d"
b[2]:= "a"
b[3]:="x"
b[4]:= "A"

necesito saber en que posicion se encuentra cada item de "a" en "b"

Intente esto:

Code: Select all  Expand view  RUN

AEval( ::aListaUsuarios, { | a | IIf( AEval( ::oGets[ 10 ]:aselections(), { | b | b == a[ 2 ] } ) != 0, MsgInfo( a[ 2 ] ) , ) } )

pero... esta mal, me dice que la variable "a" esta fuera del alcance en el segundo bloque.

[nageswaragunupudi]

Code: Select all  Expand view  RUN

aresult := { 0, 0 }
AEval( a, { |c,i| aResult[ i ] := AScan( b, c ) } )
? aresult // --> {4,3}