Renato Rubinho

Você deve preencher o código do município. Veja como foi feito o programa de exemplo para entender como deve ser feito. ../trunk2/Exemplos/ACBrDFe/ACBrNFSeX

Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.

Boa tarde, Foram enviadas algumas correções esses dias, inclusive hoje. Atualize seus fontes, reinstale os componentes e teste novamente. Se o problema persistir, teste com o programa de exemplo para verificar se não é algo na sua aplicação.

Boa tarde, Leia o manual de orientação, especialmente o item a respeito de uso abusivo / rate limiting. Uma sugestão é colocar um tempo de espera entre as consultas, pois fatalmente um dia poderá ser penalizado por essa prática. http://sped.rfb.gov.br/estatico/89/C87BFB863314B3BDF6692D6D68AE360836F41B/ManualOrientacaoDesenvolvedor-REINF-v2.2.pdf Não, a consulta interna/automática seria realizar um novo evento e fica a critéria de cada aplicação fazer como achar melhor. Acredito que receita alterou para ser assíncrono, pois o processamento pode não ser imediato e muito provavelmente nunca será, só tendendo a piorar quanto maior for a demanda.

O certificado foi instalado no perfil do usuário logado, mas o serviço deve estar utilizando o usuário "System" ou algo parecido, que não tem o certificado instalado. Vá nas propriedades do serviço instalado no Windows, configure para logar com o mesmo usuário e senha que foi instalado o certificado e deve funcionar. Lembrando que o A3 é só dor de cabeça, ainda mais em situações como essa, fale para o cliente comprar um A1, utilize OpenSSL, arquivo pfx e acabe com seus problemas.

Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.

Preencha o COD_VER com o valor esperado pelo validador. ../trunk2/Fontes/ACBrTXT/ACBrSPED/ACBrSPEDPisCofins/ACBrEPCBlocos.pas unit ACBrEPCBlocos; interface uses SysUtils, Classes, DateUtils, ACBrTXTUtils; type /// Vers�o do Leiaute do arquivo - TRegistro0000 TACBrCodVer = ( vlVersao100, // C�digo 001 - Vers�o 100 ADE Cofis n� 31/2010 de 01/01/2011 vlVersao101, // C�digo 002 - Vers�o 101 ADE Cofis n� 34/2010 de 01/01/2011 vlVersao200, // C�digo 002 - Vers�o 200 ADE Cofis n� 20/2012 vlVersao201, // C�digo 003 - Vers�o 201 ADE Cofis n� 20/2012 de 14/03/2012 vlVersao202, // C�digo 004 vlVersao310, // C�digo 005 - ADE Cofis n� 82/2018 - Apura��o em 01/01/2019 vlVersao320 // C�digo 006 - ADE Cofis ??? - Apura��o em 01/01/2020 ); TACBrVersaoLeiaute = TACBrCodVer;

Boa noite, Preencha a propriedade a seguir com o valor equivalente ao que estiver cadastrado no provedor. NFSe.Servico.ExigibilidadeISS function TNFSeW_ABRASFv2.GerarServico: TACBrXmlNode; var item: string; begin . . . Result.AppendChild(AddNode(tcInt, '#36', 'ExigibilidadeISS', NrMinExigISS, NrMaxExigISS, NrOcorrExigibilidadeISS, StrToInt(FpAOwner.ExigibilidadeISSToStr(NFSe.Servico.ExigibilidadeISS)), DSC_INDISS));

Aparentemente ou é S ou não manda a chave. Preencha ATitulo.TipoPagamento <> tpAceita_Qualquer_Valor para não gerar a chave no json. ../trunk2/Fontes/ACBrBoleto/WS/ACBrBoletoW_BancoBrasil_API.pas procedure TBoletoW_BancoBrasil_API.RequisicaoJson; var Data: string; Json: TJSONObject; begin if Assigned(ATitulo) then begin Json := TJsonObject.Create; try . . . if ATitulo.TipoPagamento = tpAceita_Qualquer_Valor then Json.Add('indicadorPermissaoRecebimentoParcial').Value.AsString := 'S';

Na nova versão foram disponibilizados apenas o Endpoint de envio dos eventos e o de consulta de protocolo. Não está escrito com todas as letras na documentação, mas agora que todos os registros retornam protocolo, a consulta por recibo se torna desnecessária(vou levantar melhor essa informação, mas por lógica não vejo outra hipótese), pois ao consultar o protocolo você terá as informações do 9001(antigo 5001), do 9011(antigo 5011) e dos novos 9005 e 9015. Veja o retorno da consulta do protocolo dos registros conforme abaixo, se é o resultado que está esperando: ACBrReinf1.WebServices.Consultar.RetEnvioLote.evento.Items[i].evtTotal ACBrReinf1.WebServices.Consultar.RetEnvioLote.evento.Items[i].evtRet ACBrReinf1.WebServices.Consultar.RetConsulta_R9011 ACBrReinf1.WebServices.Consultar.RetConsulta_R9015

Certo, havia entendido que não tivesse conseguido testar. Você está usando a versão 1_05_01 ou a 2_01_01? Se estiver utilizando o novo Leiaute, você precisa primeiro enviar o registro, depois consultar o protocolo recebido, assim como era feito no 2099, para obter o retorno do processamento do primeiro envio.

Boa tarde, Caso não tenha atualizado os fontes hoje com as novas implementações, atualize e reinstale os componentes. Teste com o programa de exemplo, marque o registro desejado, clique na opção gerar arquivos e depois na opção enviar.

Só um adendo, como você não informou o município não tive como confirmar aqui, mas veja no ACBrNFSeXServicos.ini se existe a chave ProLinkURL para este município/provedor. Se houver você pega o link montado e preenche antes de imprimir.

Muito provável, pois com o programa de exemplo funciona corretamente. Pode ser erro de configuração, algum detalhe de tratamento no fonte, etc. Mas confirmando, você tem que usar o comando a seguir, isso já basta. Anexe o XML gerado no retorno do processamento. ACBrNFe1.DistribuicaoDFePorUltNSU Por Ult NSU, pois sua mensagem inicial mostrava 1 registro retornado o que indicava estar usando o "PorNSU".

Boa tarde, Está recebendo alguma rejeição específica? Veja se está preenchendo o NFe.infRespTec.CNPJ, que é condição para gerar esse grupo de informações. ../trunk2/Fontes/ACBrDFe/ACBrNFe/PCNNFe/pcnNFeW.pas procedure TNFeW.GerarinfRespTec; begin if (NFe.infRespTec.CNPJ <> '') then begin Gerador.wGrupo('infRespTec', '#081'); Gerador.wCampoCNPJ('#82', NFe.infRespTec.CNPJ, CODIGO_BRASIL, True); Gerador.wCampo(tcStr, '#083', 'xContato', 02, 60, 1, NFe.infRespTec.xContato, DSC_XCONTATO); Gerador.wCampo(tcStr, '#084', 'email ', 06, 60, 1, NFe.infRespTec.email, DSC_EMAIL); Gerador.wCampo(tcStr, '#085', 'fone ', 07, 12, 1, NFe.infRespTec.fone, DSC_FONE); if (idCSRT <> 0) and (CSRT <> '') then begin Gerador.wCampo(tcInt, '#086', 'idCSRT ', 02, 02, 1, idCSRT, DSC_IDCSRT); Gerador.wCampo(tcStr, '#087', 'hashCSRT', 28, 28, 1, CalcularHashCSRT(CSRT, FChaveNFe), DSC_HASHCSRT); end; Gerador.wGrupo('/infRespTec'); end; end;

Está apresentando algum erro? Qual a dúvida? Não programo nessa linguagem para maiores detalhes sobre a programação em si, mas a respeito da lib, além dos exemplos, chegou a ver a documentação? https://acbr.sourceforge.io/ACBrLib/ExemplodeINI.html https://acbr.sourceforge.io/ACBrLib/Cancelamento.html Talvez consiga mais ajuda também no discord. https://discord.com/channels/798697718800318484/800042850959491072

Com o programa de exemplo o resultado foi o mesmo? Anexe um print do retorno gerado no programa de exemplo para vermos se a mensagem de retorno ajuda em algo.

Veja se falta instalar a LibXml2 e/ou OpenSSL. Veja se este tópico lhe ajuda. Se

Boa tarde, Veja como foram feitos os programas de exemplo para ter uma base. https://svn.code.sf.net/p/acbr/code/trunk2/Projetos/ACBrLib/Demos/Harbour/

Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.

Se você utilizar o ACBrNFe1.DistribuicaoDFePorUltNSU passando o último NSU recebido vai retornar novos lotes de 50 registros até o maxNSU do CNPJ que está sendo consultado. Se receber o retorno 656 de consumo indevido, aguarde 1h. Teste com o programa de exemplo para entender como fazer, utilize o botão Distribuição DF-e por Último NSU Também veja o tópico a seguir com maiores informações.

Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.

Você deve informar o último NSU que recebeu do serviço de distribuição. No print que você mandou mostra o 8521, se for a mesma informação que recebeu ao consultar, esse deve ser o NSU a passar na próxima consulta.

Boa tarde, Você está utilizando a consulta para um NSU específico, retornando apenas ele mesmo ACBrNFe1.DistribuicaoDFePorNSU Você deve utilizar a ACBrNFe1.DistribuicaoDFePorUltNSU

Você pode ter arquivos alterados barrando a atualização. Tente o revert em arquivos alterados ou apagar a pasta e baixar novamente.