/// esto es lo que tengo y no he podido conseguir el resultado ////
Código SQL
[-] qry_Encabezado_giros_dolares.Close;
qry_Encabezado_giros_dolares.Parameters.ParamByName('pfecha_inicial').Value := strtodate(fecha_inicial.Text);
qry_Encabezado_giros_dolares.Parameters.ParamByName('pfecha_final').Value := strtodate(fecha_final.Text);
qry_Encabezado_giros_dolares.Open;
While not qry_Encabezado_giros_dolares.eof do begin
ls_numero := qry_encabezado_giros_dolaresnumero_giros_dolares.Value;
ls_fecha := qry_encabezado_giros_dolaresfecha_giros_dolares.Value;
end;
////////////////////
qry_Encabezado.Close;
with qry_Encabezado do begin
with sql do begin
clear;
add ('select * from Encabezado');
add ('where numero_transacion ='+IntToStr(ls_numero));
open;
Tbl_Encabezado.Edit;
Tbl_Encabezado.FieldByName('ccdebito').Value := qry_encabezado_giros_dolarestasa_cambio_giros_dolares.Value;
Tbl_Encabezado.Post;
end;
end;
Tbl_Encabezado.Close;
Tbl_Encabezado.Open;
qry_Encabezado_giros_dolares.next
end;