Eu entendi a mudança aqui. Porem o consultar recibo não esta retornado nada. Na versão anterior funciona perfeitamente.
meu código:
PerApur := ano + '-' + mes;
TipoEvento := 'R-2010';
nrInscEstab := FcnpjEmpresa;
cnpjPrestador := retiraCaracter(selecionaServicocnpj.Value);
nrInscTomador := '';
DataApur := '';
if ACBrReinf1.ConsultaReciboEvento(PerApur, StrToTipoEvento(Ok, TipoEvento),
nrInscEstab, cnpjPrestador,
nrInscTomador, dtApur) then
if ACBrReinf1.Configuracoes.Geral.VersaoDF >= v2_01_01 then
begin
with ACBrReinf1.WebServices.ConsultarReciboEvento.RetConsulta_R9011 do
begin
end;
end;