Rubinho
-
Total de ítens
76 -
Registro em
-
Última visita
Tipo de Conteúdo
Blocks
Notes ACBrLibNFe
Fóruns
Downloads
Calendário
Posts postados por Rubinho
-
-
Obrigado, Junior! Funcionou!
-
2
-
-
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?
-
22 minutos atrás, José M. S. Junior disse:
Boa tarde
Utilize as dlls da pasta do repositório em: C:\ACBr\DLLs\XMLSec\MinGW\32
Descomente a Diretiva: {$DEFINE USE_MINGW} neste caso...
Funcionou!
Muito obrigado, galera!!!
JR, valeu pela dica, obrigado!
-
2
-
-
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?
-
8 minutos atrás, BigWings disse:
O terceiro parâmetro no método enviar indica que você está usando o modo síncrono.
No modo síncrono não é executado o método de consulta de recibo.
Para capturar o cStat de retorno tente usar:
cStatus := ACBrNFe1.WebServices.Enviar.cStat;
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!
-
1
-
-
16 horas atrás, Daniel Simoes disse:
Não deixe de ver o vídeo indicado nesse tópico:
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.
-
7 minutos atrás, Italo Jurisato Junior disse:
Rubens,
Quando uma nota é rejeitada o componente não gera uma exceção.
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!
-
1
-
-
Usando assim:
ACBrNFe1.NotasFiscais.Items[0].NFe.procNFe.xMotivo // Aqui o motivo da rejeição vem corretamenteACBrNFe1.NotasFiscais.Items[0].NFe.procNFe.cStat // Aqui vem sempre zero
1 minuto atrás, Italo Jurisato Junior disse:Rubens,
Quando uma nota é rejeitada o componente não gera uma exceção.
Isso!
4 minutos atrás, Italo Jurisato Junior disse:Boa tarde Rubens,
Vai ser necessário "debugar" para descobrir porque as propriedades que mencionei não estão recebendo os valores que deveriam receber.
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.
-
1
-
-
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;
-
1 hora atrás, Italo Jurisato Junior disse:
Rubens,
Analisando as rotinas e se baseando nesse XML, as propriedades:
ACBrNFe1.WebServices.Retorno.cStat é para receber o valor 464
ACBrNFe1.WebServices.Retorno.xMotivo é para receber a string: "Rejeicao: Codigo de Hash no QR-Code difere do calculado"
a não ser as condições abaixo não sejam satisfeitas.
if ((FPConfiguracoesNFe.Geral.ModeloDF = moNFCe) or (FVersaoDF >= ve310)) and FSincrono then
begin
(...)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.
-
<?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.
-
-
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
-
-
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
UF não pode ser vazia apenas usando socket
em ACBrMonitor PLUS
Postado
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