Ver Mensaje Individual
  #4  
Antiguo 19-03-2018
andres_89 andres_89 is offline
Miembro
 
Registrado: dic 2013
Posts: 46
Reputación: 0
andres_89 Va por buen camino
Cita:
Empezado por ecfisa Ver Mensaje
Hola.

No manejo MySQL pero, por el mensaje de error, el nuevo registro que estas ingresando tiene un campo (que es una clave primaria o única) con el mismo valor que otro registro existente. Tal vez haya algún problema con el atributo AUTO_INCREMENT...

Sería bueno que publicaras la declaración SQL de la creación de la tabla, hay muchos compañeros que manejan ese gestor de DB y el dato les servirá para ayudarte.

Saludos
Hola ecfisa,

Ya encontre la solución, de hecho 2 soluciones, 1 lo encontre probando código de casualidad y el otro por google.
Ambos te solucionan el problema, y el error se debe exactamente a lo que mencionaste por el campo con el "AUTO_INCREMENT..", estuve buscando y vi que ClientDataSet hace que tus peticiones se guarden en memoria y manda a la BD el resultado final acomodandolo automaticamente a la tabla real , el asunto es que si se insertan mas de un registro sin un campo, este acepta el segundo registro en esa mismo posición, ocasionando el problema del Id repetido.

Mi solución fue agregar "ClientDataSet1->Refresh();" antes de insertar el registro, así este obtiene el nuevo "AUTO_INCREMENT.." a insertar y funciona correctamente:

Código:
ClientDataSet1->Refresh();
ClientDataSet1->Insert();
ClientDataSet1->FieldByName("ruc_cliente")->AsString = Edit1->Text;
ClientDataSet1->FieldByName("razonsocial_cliente")->AsString = "2";
ClientDataSet1->FieldByName("direccionfiscal_cliente")->AsString = "2";
ClientDataSet1->Post();
ClientDataSet1->ApplyUpdates(0);
Y la solución que encontre en google (cierra y vuelve a abrir el "ClientDataSet1" para obtener los nuevos valores a asignar):

Código:
ClientDataSet1->Insert();
ClientDataSet1->FieldByName("ruc_cliente")->AsString = Edit1->Text;
ClientDataSet1->FieldByName("razonsocial_cliente")->AsString = "2";
ClientDataSet1->FieldByName("direccionfiscal_cliente")->AsString = "2";
ClientDataSet1->Post();
ClientDataSet1->ApplyUpdates(0);
ClientDataSet1->Close();
ClientDataSet1->Open();
Son las soluciones que encontre al error, pero no sé si sean las soluciones ideales, si alguien del foro tiene una solución mejor o ve que estas soluciones no son las recomendables, le agradeceria lo comente para mejorar siempre el código.

Saludos.
Responder Con Cita