Italo,
Esta reinstalando o ACBr e achei um erro:
unit ACBrNFSeWebServices;
procedure DoNFSeConsultarLoteRPS;
{Erro: Too many actual parameters}
FDadosMsg := TNFSeG.Gera_DadosMsgConsLote(Prefixo3,
Prefixo4,
NameSpaceDad,
FVersaoXML,
TNFSeConsultarLoteRPS(Self).Protocolo,
TNFSeConsultarLoteRPS(Self).FCNPJ,
TNFSeConsultarLoteRPS(Self).FIM,
TNFSeConsultarLoteRPS(Self).FSenha,
TNFSeConsultarLoteRPS(Self).FFraseSecreta,
FTagI,
FTagF,
FProvedor); //,
>>>TNFSeConsultarLoteRPS(Self).FRazaoSocial<<<); {Parâmetro Razão Social não existe na Função)
unit pnfsNFSeG;
class function Gera_DadosMsgConsLote(Prefixo3,
Prefixo4,
NameSpaceDad,
VersaoXML,
Protocolo,
CNPJ,
IM,
senha,
frase_secreta: String;
TagI,
TagF: AnsiString;
AProvedor: TnfseProvedor = proNenhum) : AnsiString;