FiveTech Software tech support forums

Estimados:
Necesito pasar unos parametros de una Función a otra, por ejemplo:

Aquí viene mi programa:

function main()
.
..
...
....
programa_1(var1,var2,var3)
....
...
..
return nil

function programa_1
parameters var1,var2,var3 //necesito recibirla así, porque estas variables siguen por varias funciones, (en el viejo clipper, me lo dejaba hacer así)
..
...
...
..
.
return nil

Pero cuando compilo, me da Ambiguous reference "var1","var2","var3"

Como puedo hacer para solucionar este tema?
Muchas gracias!
Roberto

Pude encontrar que haciendo:

function main()
static var1,var2,var3

programa_1(var1,var2,var3)

return nil

function programa_1
parameters var1,var2,var3..

return nil

pero cuando no son variables las que tengo que pasar, por ejemplo:
programa_1(.t.,"titulo",0)
se me complica....

Gracias!
Roberto

Porqué no utilizas

Horacio,
porque necesito pasarlo de funcion en funcion, y necesito para un caso especial dejarlo
de esa forma.
Gracias

Yo paso los parámetros de función en función utilizando esta notación, no sé cual es el impedimento.

Horacio
no es impedimento, necesito reutilizar unas rutinas que ya tenía desarrolladas en clipper, y como
estoy probando convertir mis aplicaciones, quería tocar lo menos posible unas rutinas complicadas de cálculos
que ya tengo desarrolladas.
Roberto

Roberto, que editor usas para enlazar tus programas?
Si es UEstudio debes colocar 0 en Warning level en Opciones de compilador.

o inicializar tus variables como PUBLIC en el primer programa.

Saludos,

Adhemar

Ok, no se entendía esa situación en tu post.

Saludos

Adhemar,
disculpa la molestia, como sería un pequeño ejemplo en un par de líneas.
Roberto

Si no usas UEstudio tenes que hacer asi:
Saludos,

Adhemar

Adhemar, eso está perfecto y entendido, el tema es cuando a la 2da funcion, no paso
las variables var1,var2,var3, sino, valores propiamente dicho:

#include "FiveWin.ch"
*
memvar Var1,Var2,Var3
Function Main()
Public Var1,Var2,Var3


progrma(.t.,"titulo",0) //no son las variables var1,var2,var3
...
Return

Se entiende?
Gracias!

En tu funcion colocas las variables:
Saludos,

Adhemar

si pasas variables a una funcion de la forma:

function (VAR1,VAR2,VAR3)

Las variables VAR1,VAR2,VAR3 en la funcion se manejan como locales


Si pasas las variables de la forma

function
parameters VAR1,VAR2,VAR3

las variables VAR1,VAR2,VAR3 se manejan como privates y por eso el compilador te manda el warning con el mensaje de ambiguos reference, pero es solo un warning y tu funcion trabaja perfectamente

Saludos.