FoxPro/Visual FoxPro - guardar TABLAS

Hola, alguien me podrian ayudar, lo que pasa es que tengo un formulario y en este utilizo varias variables, y una de ellas se tiene q guardar en otra tabla, mi codigo esta asi:

select pagos
SET ORDER TO matricula
reg=recno()
Locate For Allt(pagos.importe2) = impor2
REPLACE pagos.importe2 WITH impor2

tengo mi tabla abierta en el entorno de datos, pero no me guarda nada en el campo pagos.importe2, mi variable impor2 si contiene datos cuando entra al REPLACE.
alguien me podria ayudar.

Gracias
Saludos

Locate For Allt(pagos.importe2) = impor2
Mivar=impor2
REPLACE pagos.importe2 WITH MiVar

trata asignando impor2 a una variable y comprueba que en la variable exista el valor

Suerte

Ya lo hice pero tampoco me guarda ningun dato.

Gracias

mmm te esta guardando algun otro campo ? . el problema es especifico con ese campo ?

el problema es q no me guarda nada en ningun campo, como que no agarra el valor q tiene la valiable y no la copia en el campo

SELECT * FROM MiTabla WITH (BUFFERING=.T.)

Me gustaría ayudarte, me podrías mandar un ejemplo de lo que intentas hacer?? A lo mejor te digo con una rutina.

Saludos

Hola, si te envie a tu correo el codigo q tengo para guardar el dato enl a tabla.

Gracias

dejame revisar....saludos

En donde creas tu la variable "Impor2" y en qué codigo le ingresas el valor??

Pendiente

YA INICIALIZASTE TU VARIABLE IMPOR2 AL INICIO DEL PROGRAMA??
Y LA FORMA PARA VER SI CONTIENE DATOS ES MANDAR UN BROWSE DESPUES DEL LOCATE Y ANTES DEL REPLACE, AHI TE DAS CUENTA SI ESTA LOCALIZANDO LA VARIABLE.

SALUDOS

Miriam, creo que lo que te pasa es que ORDENAS la tabla por matricula y luego haces la busqueda por importe2; lo cual te debe llevar al fin del registro y cuando haces el replace no hace nada

proba lo sig para comprobarlo

select pagos
SET ORDER TO matricula
reg=recno()
Locate For Allt(pagos.importe2) = impor2
if eof()
wait wind "Encontro fin de archivo"
else
REPLACE pagos.importe2 WITH impor2

Miriam, creo que lo que te pasa es que ORDENAS la tabla por matricula y luego haces la busqueda por importe2; lo cual te debe llevar al fin del registro y cuando haces el replace no hace nada

proba lo sig para comprobarlo

select pagos
SET ORDER TO matricula
reg=recno()
Locate For Allt(pagos.importe2) = impor2
if eof()
wait wind "Encontro fin de archivo"
else
REPLACE pagos.importe2 WITH impor2

falto algo en el codigo.

select pagos
SET ORDER TO matricula
reg=recno()
Locate For Allt(pagos.importe2) = impor2
if eof()
wait wind "Encontro fin de archivo"
else
REPLACE pagos.importe2 WITH impor2
endif