FoxPro/Visual FoxPro - No graba bien

   
Vista:

No graba bien

Publicado por Gabriela (2 intervenciones) el 02/11/2011 01:30:07
Hola, les agradecería si alguien me pudiera ayudar con esto....
Tengo un problema serio, que ocurre eventualmente.
Programe un sistema en visual fox pro 7, que esta funcionando hace 4 años y hace unos meses empezó el problema. Hice un historico por si el problema era de tamaño de la BD, pero sigue igual.

El sistema trabaja con contenedores de BD de visual, y vistas locales. Para actualizar los datos, por ejemplo un comprobante (factura), que son varias tablas (encabezado, items, impuestos, vencimientos o fondos), utilizo transacciones y tableupdate (con buffering de tablas = 5).

El sistema graba bien, pero por algun motivo que desconozco ¿?, y en algun
momento deja de grabar en unas de las tablas y el tableupdate NO LARGA
AVISOS DE ERROR. Entonces se me graban,varias facturas en las
tablas secundarias y NO en la de encabezado y despues sigue grabando bien. Cuando detecto el problema, es un caos.

O a veces duplica en las tablas secundarias los registros. Cosa que tambien se detecta despues, por que por ejemplo al hacer una OP se graba, se imprime y sale bien y si uno la vuelve a consultar aparecen 2 registros en las tablas secundarias o alguna de ellas.

Las tablas no se corrompen, la BD esta ok. ¿No se que pasa?. Para solucionar
el problema hago reindex en la tabla, agrego un registro a "mano", ..., y
luego el sistema vuelve a grabar en esa tabla.
¿Que pasa?, ¿Cual es el motivo por el que deja de grabar?. ¿Como puedo
detectar el problema y que no me origine desfasaje?

Gracias, espero ayuda URGENTE
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

No graba bien

Publicado por santiago (376 intervenciones) el 02/11/2011 14:41:17
Hola, te aconsejo que primero descartes problemas externos al sistema, llevalo a otros equipos o a otra red y pruebalo alli, de esa forma descartaras problemas de hardware , de sistemas operativos, de conectividad, virus, malware, etc.

Si el problema persiste, entonces a revizar el sistema de punta a punta.

Santiago.
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

No graba bien

Publicado por GABRIELA (25 intervenciones) el 09/11/2011 15:29:30
Por favor alguien sabe que puede pasar. Por que despues de 2 años empieza con estos problemas. Lo que me dicen de la Red, que problema puede tener la red?

POF FAVOR que alguien me conteste

Gracias
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

No graba bien

Publicado por juan (533 intervenciones) el 16/11/2011 21:53:04
Verifico si el comando Set Delete está grabado en el evento Load del formulario y sacarlo
del Init de este ..
chequeo los set path a búscar
trabaja con cursores ?
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

No graba bien

Publicado por Gabriela (2 intervenciones) el 17/11/2011 23:13:58
Los comandos

SET TALK OFF
SET SAFETY OFF
SET EXACT ON
SET DELETED ON
SET DATE TO DMY
SET MULTILOCKS ON

estan en el before open table del entorno de datos del formulario.

Trabjo con cursoree todas las tablas secundarias,, salvo la tabla principal que es donde se graba la cabecera y pie de FC, NC RC, etc

Y con respecto a los path lo tengo en un prg. que es lo primero que ejecuta al entrar al sistemas con este codigo:


*!* Programa principal de ingreso al sistema de gestion contable

DIRHOME=CURDIR()
CD &dirhome
SET EXCLUSIVE OFF
OPEN DATABASE .\gestion SHARED

*!* Ingreso de la clave de usuario del sistema
DO FORM .\FORMS\REGISTRO
READ EVENTS
IF !REGISTROOK
CLEAR EVENTS
QUIT
ENDIF
*!* Verifica que la configuracion del monitor sea como minimo 800*600
IF SYSMETRIC(1)<800 .AND. SYSMETRIC(2)<600
=MESSAGEBOX("SISTEMA CONFIGURADO PARA RESOLUCION 800 * 600","ATENCIÓN")
CLEAR EVENTS
QUIT
ENDIF


*!* Seteo pantalla principal sistema
LOCAL LCMAINCLASSLIB
LOCAL LCLASTSETTALK,LCLASTSETPATH,LCLASTSETCLASSLIB,LCONSHUTDOWN

SET PATH TO ;DATA;CLASES;FORMS;GRAPHICS;MENUS;PROGS;REPORTS;VARIOS;LIBS
PUSH MENU _MSYSMENU
LCLASTSETCLASSLIB=SET("CLASSLIB")
LCMAINCLASSLIB="LIBS\OS2"
SET CLASSLIB TO (LCMAINCLASSLIB) ADDITIVE

SET STATUS BAR OFF
SET BELL OFF
SET EXACT ON
SET SYSMENU OFF
SET TALK OFF
SET ECHO OFF
SET DATE TO DMY
SET MULTILOCKS ON
SET SAFETY OFF
SET DELETED ON
SET SCOREBOARD OFF
CLOSE DATABASES


_SCREEN.WINDOWSTATE=2
_SCREEN.VISIBLE=.T.
_screen.closable=.f. && no aparece la crucecita a la derecha
_screen.picture=' '

IF REGISTROOK
RELEASE GOAPP
PUBLIC GOAPP
GOAPP=CREATEOBJECT("CAPPLICATION")

GOAPP.SETCAPTION("Sistema Gestion y Logística")
GOAPP.CSTARTUPMENU=".\MENUS\mppal"

GOAPP.SHOW

RELEASE GOAPP

ENDIF

CLEAR ALL
ON ERROR
ON SHUTDOWN
RETURN


Yo busco el problema por el codigo de los forms, pero no existe posibilidad que haya algun problema de la red, que en determinados momentos se generen estos problemas al grabar? Por que lo que no entiendo es que esto es aleatorio. No pasa siempre. A lo mejor de cada 20 facturas cargadas solo 2 generan este problema.

Agradezco mucho a todos su interes en ayudarme. La verdad estoy muy preocupada. Ya no se que decirle al cliente y lo peor es que se presta para que cualquier problema en la gestion que surja se le heche la culpa al sistema antes que a nada. O sea que hay desconfianza hacia el sistema.

Gracias y por favor denme una mano......
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