Porque las tablas se dañan tanto?
Publicado por Giler Moreno (16 intervenciones) el 23/02/2008 14:17:15
Buen dia!
Alguien me podria decir porque las tablas de VFP se dañan tanto.?
Yo trabajo con bufer, es decir que al momento de guardar debo ejecutar tableupdate( ) y lo hago de la siguiente forma:
**************************************************************
begin transaction
aux_g=tableupdate(.t.,.t.,'nm_categoria')
aux_g=reversar_rollback(aux_g,'nm_categoria')
end transaction
Procedure Reversar_Rollback
Parameter Aux_Guardar,Aux_Tabla
If Aux_Guardar=.F.
Messagebox('Ocurrio Un Error Durante La Actualización De Archivos: '+Aux_Tabla+Chr(13)+'Los Cambios No Tendran Efecto',32 , 'Mensaje')
Reversar_Rollback=.f.
Rollback
Else
Reversar_Rollback=.T.
Endif
Return Reversar_Rollback
**************************************************************
No se si estoy haciendo algo mal, pero es que se me dañan mucho las tablas cuando se va la luz o trabajando con una RED inalambrica. Gracias
Alguien me podria decir porque las tablas de VFP se dañan tanto.?
Yo trabajo con bufer, es decir que al momento de guardar debo ejecutar tableupdate( ) y lo hago de la siguiente forma:
**************************************************************
begin transaction
aux_g=tableupdate(.t.,.t.,'nm_categoria')
aux_g=reversar_rollback(aux_g,'nm_categoria')
end transaction
Procedure Reversar_Rollback
Parameter Aux_Guardar,Aux_Tabla
If Aux_Guardar=.F.
Messagebox('Ocurrio Un Error Durante La Actualización De Archivos: '+Aux_Tabla+Chr(13)+'Los Cambios No Tendran Efecto',32 , 'Mensaje')
Reversar_Rollback=.f.
Rollback
Else
Reversar_Rollback=.T.
Endif
Return Reversar_Rollback
**************************************************************
No se si estoy haciendo algo mal, pero es que se me dañan mucho las tablas cuando se va la luz o trabajando con una RED inalambrica. Gracias
Valora esta pregunta
0