FoxPro/Visual FoxPro - Remplazar datos de cursor a tabla origen?

 
Vista:

Remplazar datos de cursor a tabla origen?

Publicado por Kirik (5 intervenciones) el 10/01/2013 10:47:33
Hola a todos.
Estoy desarrollando un programa en visualfox y me surge un problema. Tengo un formulario en el que tengo un Grid y en ese grid quiero ser capaz de poder modificar los datos y que se me guarden.

Estoy usando un cursor y tablas DBF. Consigo pasar los datos de la tabla al cursor y modifcarlos pero despues no se como poder volver a pasar los datos del cursor ya modificados a la tabla remplazando los viejos.

Este es el codigo que estoy usando:

INIT:

SELECT * FROM facturaa AS alias2 WHERE nfactura=xx AND re1=SPACE(50) AND linea<9000 into cursor My_cursor READWRITE
Select My_cursor
thisform.grid1.recordsourcetype=0
thisform.grid1.recordsource=""
Thisform.griD1.RecordSourceType = 1
ThisForm.griD1.Recordsource = "My_cursor"
thisform.griD1.ColumnCount=5
thisform.griD1.Columns[1].controlsource="cod_mo"
THISFORM.GRID1.Columns[2].controlsource="rep1"
THISFORM.GRID1.Columns[3].controlsource="eprecio1"
THISFORM.GRID1.Columns[4].controlsource="tmo1"
THISFORM.GRID1.Columns[5].controlsource="seccion"
thisform.griD1.Columns[1].header1.caption="Cod_mo"
thisform.griD1.Columns[2].header1.caption="Concepto"
thisform.griD1.Columns[3].header1.caption="Precio"
thisform.griD1.Columns[4].header1.caption="T.M.O"
thisform.griD1.Columns[5].header1.caption="Sec."
thisform.grid1.Columns[1].width=80
thisform.grid1.Columns[2].width=400
thisform.grid1.Columns[3].width=80
thisform.grid1.Columns[4].width=40
thisform.grid1.Columns[5].width=20




Si me pudieran ayudar se lo agradeceria enormemente. Muchas gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
sin imagen de perfil

Remplazar datos de cursor a tabla origen?

Publicado por Carlos ACS (141 intervenciones) el 16/02/2013 18:39:23
Pues tan solo debes grabar desde el cursor a la tabla dbf. Utiliza un boton "Grabar".
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar