Efectivamente Al Gonzales
lo que estoy haciendo es crear dentro del formulario una tabla temporal, entonces le doy click al boton aceptar y me crea la tabla temporal y me genera el reporte, hasta ahi todo bien
pero cuando doy click nuevamente (para otro rango de fechas), me sale ese error
estoy haciendo esto
Código Delphi
[-]
CDSFacturacion.Close;
CDSFacturacion.FieldDefs.Clear;
CDSFacturacion.FieldDefs.Add('Cos', ftString, 10);
CDSFacturacion.FieldDefs.Add('Codigo', ftString, 10);
CDSFacturacion.FieldDefs.Add('Trabajador', ftString, 80);
for x:= 1 to 31 do
Begin
for y := 1 to 6 do
begin
if y = 1 then _campo1 := 'Desa';
if y = 2 then _campo1 := 'Almu';
if y = 3 then _campo1 := 'Sala';
if y = 4 then _campo1 := 'Lonc';
if y = 5 then _campo1 := 'Cena';
if y = 6 then _campo1 := 'Aman';
_Campo2 := _Campo1 + Llenar( IntToStr(x),2);
CDSFacturacion.FieldDefs.Add(_Campo2, ftFloat,0,False);
end;
End;
CDSFacturacion.FieldDefs.Add('tDesa', ftFloat, 0, False);
CDSFacturacion.FieldDefs.Add('tAlmu', ftFloat, 0, False);
CDSFacturacion.FieldDefs.Add('tSala', ftFloat, 0, False);
CDSFacturacion.FieldDefs.Add('tLonc', ftFloat, 0, False);
CDSFacturacion.FieldDefs.Add('tCena', ftFloat, 0, False);
CDSFacturacion.FieldDefs.Add('tAman', ftFloat, 0, False);
CDSFacturacion.IndexDefs.Add('Codigo','Codigo', []);
CDSFacturacion.CreateDataSet;
CDSFacturacion.Open;
CDSFacturacion.Edit;
al final hago mas o menos esto
Código Delphi
[-]
CDSFacturacion.EmptyDataSet;
CDSFacturacion.Close;
CDSFacturacion.Free;
podrias darme alguna sugerencia?
saludos