Possível erro no ACBRNFeWebServices

[windsoft]

Olá amigos bom dia!

Estou testando a NFSe na trunk2 e tentando resolver algumas dificuldades. Debugando encontrei um possível erro na unit ACBrNFeWebServices.pas na função TWebServices.Envia

No trecho de código:

  if (TACBrNFSe(FACBrNFSe).Configuracoes.Geral.ConsultaLoteAposEnvio) and (Result) then
  begin
    if not (TACBrNFSe(FACBrNFSe).Configuracoes.Geral.Provedor in [proDigifred, proProdata,
           proVitoria, proPVH, profintelISS, proSaatri, proSisPMJP, proCoplan,
           proISSDigital, proISSDSF, proFiorilli, proFreire, proTecnos, proDBSeller]) then
     begin
       Result := FConsSitLoteRPS.Executar;

       if not (Result) then
         FConsSitLoteRPS.GerarException( FConsSitLoteRPS.Msg );
     end;

     if TACBrNFSe(FACBrNFSe).Configuracoes.Geral.Provedor = proInfisc then
       Result := True
     else
       Result := FConsLote.Executar;

     if not (Result) then
       FConsLote.GerarException( FConsLote.Msg );
  end;

Na parte destacada em vermelho, não seria um ELSE IF? 

Outra sugestão seria unificar a função Envia, pois existem 2 funções que fazem a mesma coisa e (pelo que percebi) a única diferença é que uma função recebe um Integer como parâmetro e outra uma String.

Se eu estiver correto e desejarem que eu faça as modificações eu faço e envio por aqui, caso eu esteja errado, por favor, me esclareçam.  

Abraço e obrigado a todos.

[windsoft]

@Italo Jurisato Junior bom dia! Chegou a ver esta mensagem? 

[Juliomar Marchetti]

eu acho que não!

veja que até está confuso informou no sub forum da nfse mas fala do webservice da nf-e mas no corpo fala da nfs-e!

[windsoft]

Puta merda, não tinha percebido a cagada, tem hora que a cabeça dá um nó.

Valeu @Juliomar Marchetti

Não tem como corrigir o titulo mais, o que faço? Abro outro?

Editado 23 Outubro, 2015 por windsoft