FoxPro/Visual FoxPro - HELP !! Con índices en pageframe y combobox

 
Vista:

HELP !! Con índices en pageframe y combobox

Publicado por Ernesto Rodríguez (61 intervenciones) el 22/03/2002 14:25:26
" LA TABLA NO TIENE NINGUN ORDEN ESTABLECIDO "
Porque VFP lanza este mensaje si en la DBC he creado los índices ?
El mensaje aparece en código de LOSTFOCUS de txtcodprod de PAGEFRAME.

*Verifica que no exista el código en la bodega
SET MULTILOCKS ON
CURSORSETPROP("BUFFERING",5,ALIAS())
SELECT viproduc
SET ORDER TO codprod && AQUI aparece el mensaje
bodegauso=THISFORM.combo1.VALUE
produso=THISFORM.Pageframe1.Page1.txtcodprod.VALUE
KEY=bodegauso+produso
inreg=RECNO()
SEEK KEY && AQUI También
IF FOUND() AND RECNO() <>inreg
WAIT WINDOW 'El producto ya existe en la Bodega ' NOWAIT
....
ELSE
THISFORM.pageframe1.page1.txtnombre.SETFOCUS
ENDIF

Por eso intenté esto en el evento INIT :

SET MULTILOCKS ON
CURSORSETPROP("BUFFERING",5,alias())
OPEN DATA existe
IF !USED('productos')
USE productos EXCLUSIVE IN 0 ALIAS viproduc
ENDIF
IF !USED('bodegas')
USE bodegas EXCLUSIVE IN 0 ALIAS vibode
ENDIF
*SELECT productos
INDEX ON codbod+codprod TAG codprod && Esta es la combinación de campos
GO BOTTOM &&que he formado en "EXPRESION" de índice de la DBC.
THISFORM.opc_inic

Pero ahora arroja este mensaje :

&& No se puede ejecutar este comando en una tabla cuyos objetos cursor
esten en modo de almacenamiento de bufer.

QUE PUEDO HACER ??
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

Reindexa tu pensamiento....

Publicado por Fox Wiseman (40 intervenciones) el 25/03/2002 18:38:47
Bueno mi pana, la solucion exacta no la tengo, pero tengo varias alternativas:
Cierra el programa
Metete en vfox
Abre la base de datos en modo exclusivo
y escribe: Validate DataBase Recover - en la ventana de comandos
esto te ayudara a regenerar los indices

Elimina ese codigo loco que crease. Aprovecha el entorno de datos y usa la opcion Order en el curso de viproduc - y fumale un tabaco rezando a Yemayá :P
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