FiveTech Support Forums

Willy, es estática la variable?

Willy, pues yo el codigo lo veo bien: no veo error y debe devolver "12" y "DOCENA". Seria bueno tener ese codigo mas sencillo para poder ejecutarlo incluso.
Me inclino porque el error lo tengas por otro sitio.

Cristóbal, creo que daría igual que fuera estatica, en la funcion, al ser parametro es una local y luego es devuelta.

Willi Quintana wrote:Hola amigos... en una función, lleno un array unidimensional con datos de un producto, luego modifico algunos registros con nuevos valores, dentro de la función el array esta modificado, pero al retornar a la función que lo llamo, el array aparece como si no se hubiera modificado... Estoy cometiendo algún error??

Code (fw): Select all Collapse

Function CargaDatos()
aDesPro := RelProductos(oMySQL, aDesPro, "QAZ123")

? aDesPro[ 2]                                                 // muestra  "01"      // los datos no cambiaron luego del AADD()
? aDesPro[12]                                                // muestra "UNIDAD"
...
..
.
Function RelProductos(oMySQL, aDesPro, cCodi)
aDesPro := {}
oDatos := DatosProducto(oMySQL, cCodi)          // aquí recabamos los datos de una tabla en MySQL
nLen := oDatos:RecCount()
FOR nCont := 1 TO nLen    // 77 campos
   AADD(aDesPro, oDatos:FieldGet(nCont)           // llenamos el array con los datos en forma unidimencional
NEXT nCont

? aDesPro[ 2]                                                 // muestra  "01"
? aDesPro[12]                                                // muestra "UNIDAD"

// realizo un cambio
aDesPro[ 2] := "12"
aDesPro[12] := "DOCENA"

? aDesPro[ 2]                                                 // muestra  "12"
? aDesPro[12]                                                // muestra "DOCENA"

Return(aDesPro)                                               // retorno el array con datos

aDesPro := RelProductos(oMySQL, @aDesPro, "QAZ123")

Hola Amigos,,, De verdad lo siento mucho,,, el error era mio,,, ese pedazo de código es de una app que tiene muchos años de trabajo,,, había una llamada de validación (media escondida) en la que no se procesaban los cambios... el manejo de los arrays en todos vuestros ejemplos y correcciones es correcto,,, mil disculpas..

Manuel,

El codigo es feo pero es correcto: hace lo que se espera que haga.
Se rompe la referencia pero da igual porque en la llamada recibe de nuevo el array.

Saludos

si es feo y muy poco optimizado.

Si se quiere se puede ir desde Sevilla a Malaga pasando por Cordoba pero si hay una autovía directa es mejor cogerla no?

Con array con dimensiones pequeñas no se notará mucho pero como le meta mucha caña se está duplicando el array en memoria ya que la referencia al array inicial no se rompe hasta que la segunda función devuelve el nuevo array y lo vuelve a asignar, y puede que aún así el "garbage collector" de Harbour tarde en liberarlo.
Eso y la optimización de crear el array ya dimensionado es mucho más rápido y efectivo usando la funcion array( n ) y luego asignar cada elemento a usar el AADD.

Yo tenía un profe de programación ( Java y PHP ) que decía que el código tenia que ser entendido por nosotros y otros programadores que lo leyeran, además de que fuera eficiente y compacto.
Y otro maestro como A. Linares al que he seguido desde hace muchisimos años ( mas de los que me gusta reconocer ) que también me enseñó algo parecido...

Gracias a todos,,, aquí siempre se aprende...(y bastante), gtracias por vuestros consejos....
Salu2