funcao sem scopo

[Antonio Gomes]

A função abaixo da unit ACBrNFSeWebServices, sem  conteúdo, não poderia ser removida? Pois o uso da mesma gera violação de acesso. se for usado variáveis carregadas por ela após.

O segundo overload está correto.

 

function TWebServices.ConsultaLoteRps(ANumLote, AProtocolo: String;
  const CarregaProps: boolean): Boolean;
begin
(*
  if CarregaProps then
  begin
     FConsLote.FCNPJ := '';
     FConsLote.FIM   := '';
  end;

  FConsLote.FNumeroLote := ANumLote;
  FConsLote.FProtocolo := AProtocolo;

  Result := FConsLote.Executar;

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