[[duilioisola]]

¿Has verificado que las condiciones son correctas?
¿Por donde pasa cuando haces debug?
¿Has probado los resultados mostrándolos, por ejemplo?
¿Has probado que no de una excepción y esté capturada en otro sitio del código?

Código Delphi [-]
  if Trim(sCodigo_Holding) <> '' then
  begin
    ShowMessage('sCodigo_Holding = ' + sCodigo_Holding);
    With dmAyuda_Emp_Holding.FDQuery4 do
    begin
     // dmAyuda_Emp_Holding.ClientDataSet4.Active := False;
      Close;
      ParamByName('Codigo_Holding').AsString := sCodigo_Holding;
      Open;
      ShowMessage('Registros del Query = ' + IntToStr(RecordCount));

       dmAyuda_Emp_Holding.ClientDataSet4.Active := True;  (es aquí donde debería mostrar datos)
...