Ver Mensaje Individual
  #3  
Antiguo 20-10-2005
Johnny Q Johnny Q is offline
Miembro
 
Registrado: may 2005
Ubicación: Colombia
Posts: 172
Reputación: 19
Johnny Q Va por buen camino
justamente eso es lo que estoy haciendo, antes de guardar verifico cual es el consecutivo mayor y lo incremento en 1, y cuando ya lo tengo intento asignarlo a los detalles editandolos con un While pero algo raro sucede y solo me reasigna algunos y otros me los guarda con el consecutivo sin incremento

El codigo para modificar los detalles es el siguiente:
Código:
 	ClientDataSet2.first;
 	while not ClientDataSet2.eof do
 	begin
 	  ClientDataSet2.Edit;
 	  ClientDataSet2.FieldValues['codigo'] := qryMaximomaximo.Value + 1;
 	  ClientDataSet2.Post;
 	  ClientDataSet2.Next;
 	end;
Responder Con Cita