Trying to modify a Read-Only Field (ClientDataSet)

[afunez2007]

Empezado por Dclase

Igual con post y sin post me da el mismo error..


Código Delphi [-]With ClientDataSet3 Do Begin Close; ClientDataSet1.Commantext := ' Select * from TablaA'; Open If Not Eof Then Begin First; While Not Eof Do Begin ClientDataSet2.Append; ClientDataSet2.FieldByName('Codigo').AsString := FieldByName('Codigo').AsString; ClientDataSet2.FieldByName('CAMPO1').AsFloat := 0; ClientDataSet2.Post; Next; End; End; End; With ClientDataSet1 Do Begin ClientDataSet1.Close; ClientDataSet1.Commantext := ' Select * from TablaB'; ClientDataSet1.Open If Not Eof Then Begin First; While Not Eof Do Begin IF ClientDataSet2.Locate('Codigo', FieldByName('Codigo').AsString, []) Then Begin ClientDataSet2.Edit; //Este Cds no esta conectado a ningun provider //Solo lo utilizo para actializar datos en memoria ClientDataSet2.FieldByName('CAMPO1').AsFloat := FieldByName('CAMPO1').AsFloat; ClientDataSet2.Post; End; Next; End; End; End;


(Aproposito, el codigo aqui no importa, solo puse este de prueba para k se entienda mejor lo que queria explicar, pero si es la misma sintaxis y logica de lo que busco hacer.)

veamos yo veo que hay un ciclo redundante el if para mi esta demas, prueba asi:

Código Delphi [-]
With ClientDataSet3 Do
Begin
   Close;
   ClientDataSet1.Commantext := ' Select * from TablaA';
   Open;
        First;
        While Not Eof Do
        Begin   
          ClientDataSet2.Append;
          ClientDataSet2.FieldByName('Codigo').AsString := FieldByName('Codigo').AsString;
           ClientDataSet2.FieldByName('CAMPO1').AsFloat := 0;
           ClientDataSet2.Post;
        Next;
        End;
End;


With ClientDataSet1 Do
Begin

ClientDataSet1.Close;
ClientDataSet1.Commantext := ' Select * from TablaB';
ClientDataSet1.Open;
     First;
     While Not Eof Do
     Begin
         IF ClientDataSet2.Locate('Codigo', FieldByName('Codigo').AsString, []) Then
         Begin
         ClientDataSet2.Edit;  //Este Cds no esta conectado a ningun provider 
                                      //Solo lo utilizo para actializar datos en memoria
         ClientDataSet2.FieldByName('CAMPO1').AsFloat := FieldByName('CAMPO1').AsFloat;
         ClientDataSet2.Post;
         End;
     Next; 
     End;
End;

a mi en lo personal, solo utilizaria el dataset para recoger el id del registro a modificar, y haria un Insert con un query o un update en el segundo ciclo, el tema de modificar directamente los datos del data set te suele provocar estos incomodos errorcillos

[Dclase]

Empezado por afunez2007

............................
a mi en lo personal, solo utilizaria el dataset para recoger el id del registro a modificar, y haria un Insert con un query o un update en el segundo ciclo, el tema de modificar directamente los datos del data set te suele provocar estos incomodos errorcillos

Un update es lo que intento hacer en el segundo siclo buscando el id si existe del campo que ya inserte arriba.

[afunez2007]

Empezado por Dclase

Un update es lo que intento hacer en el segundo siclo buscando el id si existe del campo que ya inserte arriba.

Cuando te hablo de hacer un UPDATE, es a traves de sql y no directamente con un edit del data set.

Saludos

[Dclase]

Empezado por afunez2007

Cuando te hablo de hacer un UPDATE, es a traves de sql y no directamente con un edit del data set.

Saludos

Hacer un Update mediante SQL, si es para aplicarlo directamente a una tabla MSSQL por ejemplo, si se como hacerlo, pero aqui no lo hago a una tabla, sino solo a un set de datos en memoria, ya que no me interesa salvar a una tabla el resultado, sino solo para fines de reporte.

Si hay una forma de hacerlo mediante Transac-SQL directamente al ClientDataSet en memoria les agradeceria me enseñen como..

[afunez2007]

Empezado por Dclase

Hacer un Update mediante SQL, si es para aplicarlo directamente a una tabla MSSQL por ejemplo, si se como hacerlo, pero aqui no lo hago a una tabla, sino solo a un set de datos en memoria, ya que no me interesa salvar a una tabla el resultado, sino solo para fines de reporte.

Si hay una forma de hacerlo mediante Transac-SQL directamente al ClientDataSet en memoria les agradeceria me enseñen como..

Comprendo, yo tuve unas complicaciones parecidas hace mucho tiempo con reportes, y tuve al final que buscar otras estrategias, lo solucione, creando tablas temporales directamente desde el codigo, Tempor_XX donde XX corresponde al numero de terminal, que esta lanzado el reporte y asi si que puedes realizar todas las sqls que quieras.

No digo que es lo que debas hacer tu, sin embargo si no lo solucionas con tu procedimiento actual no pierdas de vista la solucion que te he propuesto

Saludos