|
Estimado wurangoc:
Si trabajas en multiusuario NUNCA debes abrir las bases de datos en forma EXCLUSIVA ni usar las tablas en forma EXCLUSIVA. Siempre SHARED.
Simpre debes tener seteado el SET DELETE en ON.
En el .PRG que inicia tu programa debes poner el siguiente código:
SET RESOURCE off
SET DEFA TO C:\RPI
SET PATH TO C:\RPI\DATOS;C:\RPI\FONDOS;C:\RPI\FORMULARIOS;C:\RPICLASES;C:\RPI\GRAFICOS;C:\RPI\ICONOS;C:\RPI\INCLUSIONES;C:\RPI\MENUS;C:\RPI\PROGRAMAS;C:\RPI\REPORTES
PUBLIC _FONDO0,_FONDO1,_FONDO2,_FONDO3,_FONDO4,_FONDO5
_FONDO0='C:\RPI\GRAFICOS\WALL.JPG'
_FONDO1='C:\RPI\GRAFICOS\WALL.JPG'
_FONDO2='C:\RPI\GRAFICOS\BK.JPG'
_FONDO3='C:\RPI\GRAFICOS\BACKGRD1.GIF'
_FONDO4='C:\RPI\GRAFICOS\TRAMA19.GIF'
_FONDO5='C:\RPI\GRAFICOS\F_FONTBACK.JPG'
SET PROCEDURE TO SUBRUTINAS.PRG
SET EXCLUSIVE OFF
SET AUTOSAVE ON
SET OPTIMIZE ON
SET REPRO TO AUTOMATIC
SET MULTILOCKS ON
Periodicamente debes correr un procedimiento con un código parecido a este.
OPEN DATABASE Mi_BDD EXCLUSIVE
USE TABLA1 EXCLUSIVE
PACK
USE TABLA2 EXCLUSIVE
PACK
USE TABLA3 EXCLUSIVE
PACK
.
.
.
.
.
USE TABLAn EXCLUSIVE
PACK
CLOSE DATABASE
Pero este proceso se debe ejecutar teniendo la seguridad de que no hay otro usuario en el sistema.
Puedes ejecutarlo al principio del día, al fin del día o cuando haces la copia de seguridad (que tambien es un proceso de uso exclusivo de tablas).
Espero te haya sido de utilidad.
SUERTE. SALU2
|
