Código Delphi [-]ejecutar_con_active(fm_rpt_necesidades.sql_necesidades, query);
ejecutar_con_active(fm_rpt_necesidades.sql_necesidades, query);