Problema con función vfp9.0

Buenas tardes de antemano gracias tengo un problema en una caja de texto en donde en esa caja de texto quiero jalar el valor de otra caja de texto y me sale el sig error.
El valor, tipo o numero de argumentos no es valido para la función
ya he intentado varias cosas pero no me sale te agradecería mucho tu ayuda
este es el código que uso en el gotfocus de la a caja de texto
if thisform.text9.value=" " then
if thisform.text23.value = thisform.text37.value then
thisform.text191.value= thisform.text23.value
st2= val(r33)+ val(r44)
thisform.text37.value=" "
r44=" "
else
if thisform.text23.value = thisform.text52.value then
thisform.text191.value= thisform.text23.value
st2= val(r33)+ val(r55)
thisform.text52.value=" "
r55=" "
else
if thisform.text23.value = thisform.text70.value then
thisform.text191.value= thisform.text23.value
st2= val(r33)+ val(r66)
thisform.text70.value=" "
r66=" "
else
if thisform.text23.value = thisform.text85.value then
thisform.text191.value= thisform.text23.value
st2= val(r33)+ val(r77)
thisform.text85.value=" "
r77=" "
else
if thisform.text23.value = thisform.text104.value then
thisform.text191.value= thisform.text23.value
st2= val(r33)+ val(r88)
thisform.text104.value=" "
r88=" "
else
if thisform.text23.value = thisform.text118.value then
thisform.text191.value= thisform.text23.value
st2= val(r33)+ val(r99)
thisform.text118.value=" "
r99=" "
else
if thisform.text23.value = thisform.text132.value then
thisform.text191.value= thisform.text23.value
st2= val(r33)+ val(r1010)
thisform.text132.value=" "
r1010=" "
else
if thisform.text23.value = thisform.text146.value then
thisform.text191.value= thisform.text23.value
st2= val(r33)+ val(r1111)
thisform.text146.value=" "
r1111=" "
else
if thisform.text23.value = thisform.text160.value then
thisform.text191.value= thisform.text23.value
st2= val(r33)+ val(r1212)
thisform.text160.value=" "
r1212=" "
else
if thisform.text23.value = thisform.text174.value then
thisform.text191.value= thisform.text23.value
st2= val(r33)+ val(r1313)
thisform.text174.value=" "
r1313=" "
else
thisform.text191.value= thisform.text23.value
st2= val (r33)
endif
endif
endif
endif
endif
endif
endif
endif
endif
endif
else
if thisform.text9.value = thisform.text23.value then
thisform.text191.value= thisform.text9.value
st2= val(r22)+ val(r33)
thisform.text23.value=" "
r33=" "
else
if thisform.text9.value = thisform.text37.value then
thisform.text191.value= thisform.text9.value
st2= val(r22)+ val(r44)
thisform.text37.value=" "
r44=" "
else
if thisform.text9.value = thisform.text52.value then
thisform.text191.value= thisform.text9.value
st2= val(r22)+ val(r55)
thisform.text52.value=" "
r55=" "
else
if thisform.text9.value = thisform.text70.value then
thisform.text191.value= thisform.text9.value
st2= val(r22)+ val(r66)
thisform.text70.value=" "
r66=" "
else
if thisform.text9.value = thisform.text85.value then
thisform.text191.value= thisform.text9.value
st2= val(r22)+ val(r77)
thisform.text85.value=" "
r77=" "
else
if thisform.text9.value = thisform.text104.value then
thisform.text191.value= thisform.text9.value
st2= val(r22)+ val(r88)
thisform.text104.value=" "
r88=" "
else
if thisform.text9.value = thisform.text118.value then
thisform.text191.value= thisform.text9.value
st2= val(r22)+ val(r99)
thisform.text118.value=" "
r99=" "
else
if thisform.text9.value = thisform.text132.value then
thisform.text191.value= thisform.text9.value
st2= val(r22)+ val(r1010)
thisform.text132.value=" "
r1010=" "
else
if thisform.text9.value = thisform.text146.value then
thisform.text191.value= thisform.text9.value
st2= val(r22)+ val(r1111)
thisform.text146.value=" "
r1111=" "
else
if thisform.text9.value = thisform.text160.value then
thisform.text191.value= thisform.text9.value
st2= val(r22)+ val(r1212)
thisform.text160.value=" "
r1212=" "
else
if thisform.text9.value = thisform.text174.value then
thisform.text191.value= thisform.text9.value
st2= val(r22)+ val(r1313)
thisform.text174.value=" "
r1313=" "
else
thisform.text191.value= thisform.text9.value
st2= val (r22)
endif
endif
endif
endif
endif
endif
endif
endif
endif
endif
endif
endif
thisform.refresh

1 Respuesta

Respuesta
1

Este error te puede aparecer en cualquier de las lineas en las que estás asignando valores a una variable.

¿Has usado el degug?, esta utilería te ayudaría a saber en cual de las variables tienes el problema.

Por lo que puedo ver en tu código, el problema puede estar en el valor inicial que tengas en las variables STx o Rxxxx que usas:

Recuerda que cuando declaras una variable siempre es sano inicializarla con un valor acorde con el tipo del será la variable, por ejemplo si una variable la vas a usar como numérica, inicialízala en cero, si va a ser texto, inicializa como vacía, o sea "" y si va a ser lógica inicializala a .f. o .t. Esto te va a dar la seguridad del tipo que tiene tu variable.

Muy seguramente una de las variables que usas se está inicializando a .f. y tu estás haciendo una operación numérica o de conversión con otro tipo de dato. Es decir:

La función VAL() te va a marcar este error con una variable con .f.; igual con una suma de una variable numérica con una variable con valor .f.

Asegúrate que tus variables tengan los tipos de valores correctos al momento de usar las funciones o efectuar una operación ellas.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas