FoxPro/Visual FoxPro - ERROR EN TRIGGER

 
Vista:

ERROR EN TRIGGER

Publicado por webness (12 intervenciones) el 06/05/2005 22:12:03
HOLA, TEngo este codigo ejecutado al dar clik en el boton eliminar, ya lo ensaye en otro fommulario y me sirvio pero aqui no me deja, el primer formulario no tiene clave principal en su tabla, este segundo SI, sera por eso??, miren el codiguito haber, me sale diske trigger failed

rec=RECNO()
SET DELETED ON
SET EXCLUSIVE ON
USE jalado!clientes IN cClientes ALIAS cClientes EXCLUSIVE

pressed=MESSAGEBOX("ESTA SEGURO QUE DESEAS BORRAR ESTE REGISTRO?",4,"BORRAR CLIENTE")

IF pressed=6
DELETE RECORD rec IN cClientes
PACK IN cClientes

IF rec>1
destiny=rec-1
GOTO destiny IN cCLientes
ENDIF

THISFORM.txtNombres.Value=cClientes.nombres
THISFORM.txtApellidos.Value=cClientes.apellidos
THISFORM.txtIden.Value=cClientes.cedula
THISFORM.txtId.Value=cClientes.idCliente
THISFORM.txtDir.Value=cClientes.direccion
THISFORM.txtTelefono.Value=cClientes.telefono

IF RECCOUNT()=0 OR RECCOUNT()=1
THISFORM.btnAtraz.Enabled= .F.
THISFORM.btnSig.Enabled= .F.
THISFORM.btnBus.Enabled= .F.
ENDIF
ENDIF
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

RE:ERROR EN TRIGGER

Publicado por Plinio (7841 intervenciones) el 07/05/2005 17:21:54
Posiblemente estes en un ambiente multiusuario donde el comando Pack no se puede utilizar o no puedes abrir tablas de modo exlucisvo.
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