ascan y tuplas

[goosfancito]

Hola.

TEngo un array

::aTree (A2)<Array>
::aTree[ 1] (A5)<Array>
::aTree[ 1][ 1] (N) => 0
::aTree[ 1][ 2] (C10) => "01/01/1993"
::aTree[ 1][ 3] (C1) => "a"
::aTree[ 1][ 4] (N) => 1
::aTree[ 1][ 5] (N) => 11024072
::aTree[ 2] (A5)<Array>
::aTree[ 2][ 1] (N) => 0
::aTree[ 2][ 2] (C10) => "01/01/1991"
::aTree[ 2][ 3] (C1) => "b"
::aTree[ 2][ 4] (N) => 1
::aTree[ 2][ 5] (N) => 11024216

Al hacer este codigo, me devuelve siempre cero

Code: Select all  Expand view

oItem:cargo["hitem"]:= 11024216
x := AScan( ::aTree, { | a | a[ 5 ] = oItem:cargo[ "hitem" ] } )

que estoy haciendo mal?

[karinha]

https://vivaclipper.wordpress.com/2014/01/07/ascan/

https://vivaclipper.wordpress.com/tag/ascan/

https://harbour.github.io/doc/clc53.html#ascan

Saludos.

[goosfancito]

karina lo que hice es lo que da error. esos ejemplos que me mostras ya lo vi.

[Antonio Linares]

Prueba asi:

x := AScan( ::aTree, { | a | a[ 5 ] == oItem:cargo[ "hitem" ] } )

[goosfancito]

ya lo he probado y tampoco.

[Antonio Linares]

Prueba a usar:

SET EXACT ON
y SET DECIMALS TO ... también

Y para salir de dudas:

x := AScan( ::aTree, { | a | MsgInfo( a[ 5 ], oItem:cargo[ "hitem" ] ), .F. } )

asegurate visualmente que tienes los datos que crees tener

[goosfancito]

Prueba a usar:

SET EXACT ON
y SET DECIMALS TO ... también

Y para salir de dudas:

x := AScan( ::aTree, { | a | MsgInfo( a[ 5 ], oItem:cargo[ "hitem" ] ), .F. } )

asegurate visualmente que tienes los datos que crees tener

https://drive.google.com/file/d/14baPwYLoK8De8CmGWw-z7Li4LzehZcfX/view?usp=sharing

[Antonio Linares]

Te aparece el que buscas ?

[goosfancito]

buen dia.
no lo encuentra. esta en el array pero no lo encuentra.
si hago un for next... lo encuetnro, pero con ascan no.