topic-40673

Posts: 15

Joined: Wed Feb 08, 2006 12:32 AM

Asignar valores x puntero de variable
Posted: Mon Jul 26, 2021 06:15 PM

Buenos días foro. Se puede hacer esto?. El objetivo es pasar variables en forma de array a una función, y que los cambios en el array se reflejen en las variables. Ya Probé Proceso({@a,@b,@c}) y no funciona.

Se agradece cualquier ayuda

a:="Primero"
b:="Segundo"
c:="Tercero

Proceso({a,b,c})
? a,b,c, // first, second, third

Function Proceso (ar)
ar[1]:="First"
ar[2]:="Second"
ar[3]:="Third"
Return NIL

Carles

Posts: 1283

Joined: Fri Feb 10, 2006 02:34 PM

Re: Asignar valores x puntero de variable
Posted: Mon Jul 26, 2021 06:18 PM

Hola,

Function( @aData )

C.

Salutacions, saludos, regards

"...programar es fácil, hacer programas es difícil..."

UT Page -> https://carles9000.github.io/
Forum UT -> https://discord.gg/bq8a9yGMWh
HIX -> https://github.com/carles9000/hix

cladron

Posts: 15

Joined: Wed Feb 08, 2006 12:32 AM

Re: Asignar valores x puntero de variable
Posted: Tue Jul 27, 2021 02:46 AM

Carles wrote:Hola,

Function( @aData )

C.

Gracias Carles, pero funciona cuando quiero pasar un array como parámetro; a lo que me refiero es que el origen se trate de variables independientes como "cCodigo", "cNombre" ó "dFecha"; hablo de pasarlos en la forma de array {cCodigo,cNombre,dFecha} para poder pasar una cantidad variable e ilimitada de parámetros, de modo que dentro de la función los cambios en los elementos del array sean cambios en cada una de las variables independientes. Crees que se puede?

Gracias nuevamente

Verhoven

Posts: 563

Joined: Sun Oct 09, 2005 07:23 PM

Re: Asignar valores x puntero de variable
Posted: Tue Jul 27, 2021 05:49 AM

Has pensado en probar a usar un hash?

leandro

Posts: 1816

Joined: Wed Oct 26, 2005 02:49 PM

Re: Asignar valores x puntero de variable
Posted: Tue Jul 27, 2021 10:28 PM

Una idea

Code (fw): Select all Collapse

Local hLinea := hash()
hLinea["iditem"] := 0
hLinea["descripcion"] := "la descripción"
hLinea["valor"] := 150000
hLinea["estado"] := "N"
pasoa(hLinea)

Saludos
LEANDRO AREVALO
Bogotá (Colombia)
https://hymlyma.com
https://hymplus.com/
leandroalfonso111@gmail.com
leandroalfonso111@hotmail.com

[ Turbo Incremental Link64 6.98 Embarcadero 7.70 ] [ FiveWin 25.01 ] [ xHarbour 64 bits) ]

FiveTech Support Forums

Continue the discussion