Rubinho

Boa tarde, pessoal! Estou com um problema bem estranho, fiz alguns testes usando o ACBrMonitorPlus via arquivo e consegui emitir algumas NFCe (arquivo de requisição: 0000002631.req e retorno: 0000002631.ret, em anexo), porem, quando envio o mesmo arquivo (0000002631.req) via socket, alterando apenas o numero da NFC para evitar rejeição por duplicidade e acertando o horário, recebo o erro: "UF não pode ser vazia". Já revisei todo o arquivo e as UF's estão todas preenchidas, se mudo para troca de arquivos funciona. Como posso resolver? 0000002631.req 0000002631.ret ENT.txt

Obrigado, Junior! Funcionou!

Boa tarde, pessoal! Galera, quando uso o monitor via arquivo, perfeito, o monitor responde direitinho, mas quando uso via TCP/IP não recebo resposta. Acho que já testei todos os exemplos existentes no fórum, a exemplo: "\\https://www.projetoacbr.com.br/forum/topic/23959-resposta-cortando-informação-acbrmonitorplus-tcpip-v0173/\\" e não achei uma solução. Teste: var Resposta: String; begin fSocket := TBlockSocket.Create; fSocket.Connect('localhost', '3434'); Resposta := fSocket.RecvTerminated(15000, #3); fSocket.SendString( 'NFE.StatusServico' + #13+#10+'.'+#13+#10); Resposta := fSocket.RecvTerminated(15000, #3); fSocket.Free; Memo1.Lines.Add('Resposta:'); Memo1.Lines.Add(Resposta); Onde sera que estou errando?

Funcionou! Muito obrigado, galera!!! JR, valeu pela dica, obrigado!

Boa tarde, Jr! Copiei essas dlls para a pasta C:\ACBrMonitorPLUS e o erro continua.

Debugando pelo Lazarus, da um erro, segue em anexo as imagens do erro.

Boa tarde, pessoal! Montei um ambiente limpo com Win7 e Lazarus apenas para compilar o ACBrMonitor e estou recebendo o erro abaixo: "Suporte a "xsXmlSec" foi desativado por compilação {$DEFINE DFE_SEM_OPENSSL} ou {$DEFINE DFE_SEM_XMLSEC}" Segui a risca todos os passos de instalação dos componentes. Ele compila, mas ao executar continua apresentando o erro acima. Encontrei no forum uma dica que falava para comentar a linha: {.$DEFINE DFE_SEM_XMLSEC} do arquivo ACBr.inc, compila normalmente, mas ao testar e enviar algum arquivo de requisição (ENT.TXT) ele trava o Monitor e não faz nada. Já procurei no fórum e não achei algo que pudesse me ajudar. Se baixo o ACBrMonitor compilado do site, tudo volta a funcionar normalmente. Como posso resolver?

Foi exatamente esse o meu deslize. Tinha identificado agora de manhã antes de ler esse seu post, muito obrigado!!! Prolema resolvido, galera! Muito obrigado, pessoal!

Massa, vou olhar sim! Obrigado, Daniel!

Italo, Fiz um teste com o ACBrNFe_demo e nele tbm ao rejeitar gera uma exceção que aponta para: function TWebServices.Envia(const ALote: String; const ASincrono: Boolean; AZipado: Boolean): Boolean; begin FEnviar.Clear; FRetorno.Clear; FEnviar.Lote := ALote; FEnviar.Sincrono := ASincrono; FEnviar.Zipado := AZipado; if not Enviar.Executar then Enviar.GerarException( Enviar.Msg ); if not ASincrono or ((FEnviar.Recibo <> '') and (FEnviar.cStat = 103)) then begin FRetorno.Recibo := FEnviar.Recibo; if not FRetorno.Executar then FRetorno.GerarException( FRetorno.Msg ); end; Result := True; end; log de erro em anexo. erro.log

Vou fazer uns testes ACBrNFe_demo para tentar entender o que esta acontecendo com minha aplicação. Italo, muito obrigado!!! Tendo alguma novidade, posto aqui. Valeu!

Usando assim: ACBrNFe1.NotasFiscais.Items[0].NFe.procNFe.xMotivo // Aqui o motivo da rejeição vem corretamente ACBrNFe1.NotasFiscais.Items[0].NFe.procNFe.cStat // Aqui vem sempre zero Isso! Debuguei, foi aí que percebi q se gerava uma exceção. Lembro que há algum tempo atrás, percebi isso e acabei fazendo o controle da exceção, já que mesmo com a exceção eu, na epoca ainda recebia o Status e o Motivo. Mas agora não mais e não sei exatamente quando isso parou de acontecer.

Italo, É normal quando há uma rejeição da Sefaz o fluxo abaixo gerar uma Exceção? Veja os comentários do código. try ACBrNFe1.Enviar(vNumLote,True,True); cStatus := ACBrNFe1.NotasFiscais.Items[0].NFe.procNFe.cStat; Except On E: Exception do // Aqui é local correto de receber o código de rejeição? Quando a NFC esta sendo rejeitada esta sendo gerado uma exceção. cStatus := ACBrNFe1.NotasFiscais.Items[0].NFe.procNFe.cStat; End;

Então, Italo Acho que essa condição está sendo atendida, abaixo segue a versão 4.0 e QRCode só tem em NFC. -<retEnviNFe xmlns="http://www.portalfiscal.inf.br/nfe" versao="4.00">

Desculpe-me, segue em anexo. 1-pro-lot.xml

<?xml version="1.0" encoding="UTF-8"?> -<retEnviNFe xmlns="http://www.portalfiscal.inf.br/nfe" versao="4.00"> <tpAmb>2</tpAmb> <verAplic>SVRSnfce201807191353</verAplic> <cStat>104</cStat> <xMotivo>Lote processado</xMotivo> <cUF>28</cUF> <dhRecbto>2019-03-13T15:16:19-03:00</dhRecbto> -<protNFe versao="4.00"> -<infProt> <tpAmb>2</tpAmb> <verAplic>SVRSnfce201807191353</verAplic> <chNFe>28190307684607000187650060000000071000000075</chNFe> <dhRecbto>2019-03-13T15:16:19-03:00</dhRecbto> <digVal>VVPTSlJLABN3m/NWXUJx5GkkDgs=</digVal> <cStat>464</cStat> <xMotivo>Rejeicao: Codigo de Hash no QR-Code difere do calculado</xMotivo> </infProt> </protNFe> </retEnviNFe> Estou fazendo algumas simulações e não é sempre que esse arquivo é gravado quando há rejeições.

Zero

Perfeito. Ele dá erro e retorna zero, consulto a Sefaz e a NFC não foi registrada na Sefaz devido ao erro, exemplo, falta de NCM. Recebendo apenas o zero não consigo diferenciar uma inconsistência no XML, que não adianta reenvio, de um erro de timeout com a Sefaz. Não tem como capturar o status da rejeição?

Bom dia, pessoal! Uso ACBr com sucesso já há alguns anos e por esses dias comecei a ter alguns problemas de bloqueio junto a Sefaz. Percebi que o problema era porque eu não estava tratando direito os Status de rejeição, o que faz minha aplicação enviar varias vezes minhas NFC que estão em contingencia mesmo sem ter sido feito nenhuma correção na NFC. Li algumas dicas em outros tópicos aqui no Forum e não obtive sucesso. A pergunta é: Como fazer para capturar o código de status da rejeição após o uso do método "ACBrNFe1.Enviar(vNumLote,True,True);" ? Tentei outros métodos que achei em outros tópicos, tipo: ACBrNFe1.WebServices.Retorno.cStat; mas não funcionaram. Percebi que no arquivo: "***-pro-lot.xml" vem o status correto. Como tenho usado: try ACBrNFe1.Enviar(vNumLote,True,True); cStatus := ACBrNFe1.NotasFiscais.Items[0].NFe.procNFe.cStat; Except On E: Exception do cStatus := ACBrNFe1.NotasFiscais.Items[0].NFe.procNFe.cStat; End; Agradeço desde já a atenção de todos. Rubens

Em Sergipe também estou com o mesmo problema.

Bom dia, rapazes! Existe alguma forma de fazer o download da tabela IBPT direto do site: http://deolhonoimposto.ibpt.com.br através do componente ACBr?

Galera, perdão por meu equivoco. Italo, muito obrigado pelos esclarecimentos e atenção. Rubens

Boa tarde, galera! Acredito ter identificado um pequeno bug (não sei se já foi identificado e corrigido). Procurei por soluções/similaridades no fórum e não achei. Segue relato: Quando é feito o download do XML através do manifesto destinatário, o site da Receita adiciona algumas tags referentes a solicitação do download, exemplo: <retDownloadNFe xmlns="" versao="1.00"... .... Isso tem feito o componente se perder ao tentar imprimir o DANFE, ele passa a tratar o XML como versão 1.00, como a data vem no formato 3.10, o componente rejeita a data, por achar que o formato está errado. Resultado na data de emissão e data saída vem em branco. Segue XML´s de exemplo: Atenciosamente, Rubens 28150834274233028295550000003168741548041706 ok -nfe.xml 28150805482271001205550010000966781210031479 download-nfe.xml

Sim, o papel foi reposicionado diversas vezes e não surtil efeito. Att, Rubens

Boa tarde pessoal! Estou iniciando os testes com a impressora de código de barras Argox 214puls no ETQTeste.exe. Estou conseguindo imprimir com as seguintes configurações: Modelo: etqPpla Porta: COM4 DPI impressora: dpi203 Temperatura: 10 Limpar memória: True Avanço Etq.: 0 Nº Copias: 0 Problema: Quando clico em Etiqueta Simples ou bloco de etiquetas, o programa só imprime uma etiqueta e começa a avançar etiquetas sem parar até a impressora piscar os leds e parar. Já segui um tutorial para resetar a impressora e mesmo assim não tive exito. Pesquisei no forum e não encontrei nada a respeito. Alguem já passou por isso? Como posso resolver este problema? Att, Rubens