Ver Mensaje Individual
  #3  
Antiguo 04-11-2008
Avatar de judit25
judit25 judit25 is offline
Miembro
 
Registrado: abr 2006
Ubicación: Bronx, NY
Posts: 122
Reputación: 19
judit25 Va por buen camino
Cita:
Empezado por marcoszorrilla Ver Mensaje
El error significa que tienes un valor duplicado en la clave primaria, por lo tanto antes de grabar el documento deberías comprobar que no existe otro con el mismu número.

Un Saludo.
Gracias por responder.

Actualmente cuando presiono el boton de agregar, este me trae el ultimo numero de la tabla en el que guardo las facturas y le agrego uno, es decir que el numero del documento aun no existe. Es por eso que no se que podria ser lo que me esta causando el error .

Lo calculo de la siguiente manera:

Código Delphi [-]
if DM.QDocumento.Fields[0].IsNull then
  begin
    numerof := 1;
  end
else
  begin
    numerof := DM.QDocumento.Fields[0].AsInteger;
    numerof := numerof + 1;
  end;

Alguna otra sugerencia?

Gracias anticipadas
__________________
El hombre feliz no es el hombre que rie, sino aquel cuya alma llena de alegría y confianza se sobrepone y es superior a los acontecimientos.
Séneca
Responder Con Cita