tradeone

boa tarde Italo, Atualizamos ontem dia 28/08/2013. Deletamos a pasta, eliminamos bpls, instalamos novamente o acbr no delphi.... e continuou o problema....

Prezados colegas, Na última versão do acbr, notamos que na impressão do DACTE onde tinhamos FOLHA 01/01 agora esta saindo 01/02, algum colega já passou por esta situação? desde já agradeço a atenção Julio

Problema Resolvido. No parametro aguardarconsultaret estava com 15000 por isto estava demorando 15 segundos, colocamos 0 e voltou a ficar rapido. Isaque, obrigado pela sua atenção.

Problema Resolvido. No parametro aguardarconsultaret esta com 15000 por isto estava demorando 15 segundos, colocamos 0 e voltou a ficar rapido.

obrigado Isaque. Vamos continuar em nossos testes, até descobrirmos o problema. Se algum colega estiver passando por esta situação, favor relatar, pois pode nos ajudar a encontrar o problema. Assim que tivermos uma conclusão iremos postar aqui.

Nos testes que fizemos não esta entrando em nenhuma exception, tanto que estamos conseguindo imprimir o danfe sem receber nenhuma mensagem de exceção. raise EACBrNFeException.Create(Self.Retorno.Msg);

A versão anterior (a rapida 3 segundos), tem exatamente o mesmo código da versão atual (versão lenta 15 segundos). Compilamos o demo do acbr e enviamos por ele, onde também apresentou a mesma lentidão. Estamos usando o delphi 7.

Prezado Isaque, No evendo gerarLog do componente esta em branco. Fizemos os mesmos testes no demo do acbr e também apresentou a mesma lentidão entre 15 a 20 segundos. Antes a resposta era em torno de 3 a 5 segundos. Quando a gente volta a versão anterior fica rapido novamente. Entre esta versão do sistema que esta rapida e a nova não fizemos nenhuma alteração na NFe, somente a atualização do componente ACBR o qual demos um build no projeto, e alguns clientes começaram a nos retornar que estava lento ao enviar a nfe, dai simulamos em nosso ambiente de homologação e constatamos que realmente tem uma diferença consideravel. Esta lentidão ocorre em produção e também no ambiente de homologação.

Prezados, Após atualizarmos uma nova versão do sistema, onde haviamos atualizado o acbr, alguns clientes nos reportaram uma lentidão ao enviar a NFe, coisa que não acontecia nas versões anteriores. Após mapeamento chegamos na linha de codigo onde esta o gargalo, porém não conseguimos descobrir o que esta ocorrendo. Algum colega esta passando pela mesma situação? segue dados de nossa pesquisa sobre o problema: IMPORTANTE: LENTIDÃO NO RETORNO/LIBERAÇÃO DO PROTOCOLO PARA EMISSÃO DO DANFE. PROJETO: Atualizado em 25/04/2013 as 10:00h UNIT: ACBrNFeWebServices - Linha: 1540 IMPORTANTE: Se cometarmos o bloco em negrito retorna ao tempo aceitável. function TWebServices.Envia(ALote: String; const ASincrono: Boolean): Boolean; begin //retirado por recomendação do documento disponível em http://www.nfe.fazenda.gov.br/PORTAL/docs/Consumo_Indevido_Aplicacao_Cliente_v1.00.pdf { if not(Self.StatusServico.Executar) then begin if Assigned(TACBrNFe( FACBrNFe ).OnGerarLog) then TACBrNFe( FACBrNFe ).OnGerarLog(Self.StatusServico.Msg); raise EACBrNFeException.Create(Self.StatusServico.Msg); end; } self.Enviar.FLote := ALote; self.Enviar.FSincrono := ASincrono; if not(Self.Enviar.Executar) then begin if Assigned(TACBrNFe( FACBrNFe ).OnGerarLog) then TACBrNFe( FACBrNFe ).OnGerarLog(Self.Enviar.Msg); raise EACBrNFeException.Create(Self.Enviar.Msg); end; if (FConfiguracoes.Geral.ModeloDF = moNFe) or (not ASincrono) then begin Self.Retorno.Recibo := Self.Enviar.Recibo; if not(Self.Retorno.Executar) then begin if Assigned(TACBrNFe( FACBrNFe ).OnGerarLog) then TACBrNFe( FACBrNFe ).OnGerarLog(Self.Retorno.Msg); raise EACBrNFeException.Create(Self.Retorno.Msg); end; end; Result := true; end; Desde já agradecemos a sua atenção,

Prezados colegas, alguém ja conseguiu instalar os componentes do ACBR no Delphi XE2? abraços a todos att, Julio