Painel de líderes

Olá Pessoal, O componente ACBrNFSeX conta com mais dois provedores: Isaneto que segue a versão 2.03 do layout da ABRASF e até o momento atende a cidade de Castanhal/PA e PRODAUB que segue a versão 2.04 do layout da ABRASF que atende a cidade de Uberlândia/MG (o ambiente de produção vai ser liberado em 01/03/2024).

Instruções fornecidas pelo nosso amigo @Victor H. Gonzales - Panda. Erro: 12175 - Um ou mais erros foram encontrados no certificado Secure Sockets Layer (SSL) enviado pelo servidor O processo será abortado! Este erro acontece devido a falhas de comunicação entre a aplicação e a Sefaz. Principais causas: Configurações do Windows ou falta de atualizações; Configurações da rede (Protocolos de segurança, DNS, Proxy, etc); Certificado ou Cadeias de Certificado Digital; Como resolver: Siga atentamente cada passo listado abaixo. Ao final de cada passo teste novamente sua aplicação. Passo 1 Vá até o Painel de Controle do Windows. Escolha a Opção "Opções da Internet"; Vá até a aba “Avançadas”; no bloco “Configurações”, vá até as últimas opções e deixe configurado como na imagem abaixo: Marque: Não salvar páginas criptografadas em disco; Desmarque: Usar SSL 2.0; Marque: Usar SSL 3.0; Desmarque: Usar TLS 1.0; Desmarque: Usar TLS 1.1; Marque: Usar TLS 1.2; Passo 2 1º Encerre as aplicações, ou sua aplicação que utiliza nossos componentes. Se você está utilizando certificado A3, remova ele da porta USB. 2° Vá em executar, digite, certlm.msc, para abrir a interface de certificados, caso esse comando não funcione, utilize o certmgr.msc. 3° Remova todos os certificados de "Autoridade de Certificação de Raiz Confiáveis". 4º Ainda na listagem de certificados, aperte F5 para atualizar a página, e remova qualquer novo certificado que aparecer, repita esse processo algumas vezes, até que retorne sempre vazio. 5° Faça o download desse arquivo. 6° Execute como Administrador o InstaladorCadeias_1.0.2.0.exe. 7º Clique em Instalar, e aguarde até que o processo seja finalizado. 8° Teste novamente a comunicação com a SEFAZ. Salve, reinicie a máquina, e teste novamente. O problema ainda persiste? Algumas versões do Windows não dão suporte ao .NET Framework 4.6.2 ou superior com protocolo TLS 1.2. Veja a lista de versões do windows que NÃO FUNCIONAM. Windows Server 2003 Windows 7 - Sem SP1 Windows 8 Windows Vista Windows XP Para esses casos, a solução é instalar uma outra versão de sistema operacional. Você ainda pode ter problemas com outras versões do Windows, pois nem todos vem nativamente habilitados para o uso desse protocolo, portanto, será necessário executar o windows update para que as atualizações necessárias sejam instalados, e o protocolo seja habilitado. Após instalar algumas das atualizações será necessário reiniciar o Windows, lembre-se de sempre que iniciar novamente, abrir o Windows Update novamente e conferir se não apareceram novas atualizações, se houverem, inicie novamente o processo de instalação. Casos de atualizações específicas necessárias: Windows 7 : Instalar o SP1 + Se for 64 bits: Atualização do Windows 7 para sistemas com base em x64 (KB3140245) Atualização de segurança do Windows 7 para sistemas com base em x64 (KB2992611) Se for 32 bits: Atualização do Windows 7 (KB3140245) Atualização de segurança do Windows 7 (KB2992611) Windows 8.1: Se for 64 bits: Atualização de segurança do Windows 8.1 para sistemas com base em x64 (KB2992611) Se for 32 bits: Atualização de segurança do Windows 8.1 (KB2992611) Windows 10 não funciona? Baixe e execute o arquivo em anexo (FixCrypto_TLS1_2_Windows.reg) de registros, reinicie a máquina e teste novamente. Como verifico as atualizações disponíveis para o Windows? Clicar em Iniciar e digitar na caixa de pesquisa "Windows Update"; Clicar em "Verificar se há atualizações" ou "Windows Update"; Clicar na opção para procurar atualizações; Alternativa ao Passo 2 (Remoção dos certificados Raiz) Caso não seja possível remover os certificados Raiz do computador, uma solução alternativa seria: Acessar a listagem de certificados raiz, através do do painel certlm.msc (descrito no passo 2); Selecionar o certificado Autoridade Certificadora Raiz Brasileira V5; Modificar a opção Finalidades do certificado, selecionando então a opção "Ativar todas as finalidades desse certificado" Observações : Alguns antivírus podem impedir a comunicação com os webservices da SEFAZ. Um exemplo é o Avast e o KasperSky, que se faz necessário adicionar os links do Web Service da Sefaz na lista de exceções do antivírus para conseguir emitir a NFe 4.00. Alguns aplicativos de bancos, para acesso ao internet banking (como o chamado WarSaw), podem alterar as configurações de TLS e SSL quando são executados. Cadeias de Certificado Autoridade Certificadora Raiz Brasileira desmarcando propriedades automaticamente! Problema: Alguns servidores estão apresentando problemas na comunicação com a SEFAZ recebendo o retorno "A conexão subjacente estava fechada: Não foi possível estabelecer relação de confiança para o canal seguro de SSL/TLS". Como solução temos que acessar o Certmgr.msc e alterar em propriedades da Autoridade Certificadora Raiz Brasileira v5 para utilizar a opção "Autenticação do Servidor" ou simplesmente marcar a opção "Ativar todas as finalidades deste certificado". O problema volta a ocorrer após alguns dias, onde temos que reconfigurar as propriedades do Raiz Brasileira v5 novamente. Solução: Para que a configuração da cadeia de certificado Autoridade Certificadora Raiz Brasileira v5 não volte as configurações, é necessário efetuar o procedimento abaixo: Usando o Editor de Política de Grupo Local (gpedit.msc), alterar a seguinte propriedade: - Política Computador Local > Configuração do Computador > Modelos Administrativos > Sistema > Gerenciamento de Comunicação da Internet > Configurações de Comunicação da Internet > Desativar Atualização Automática de Certificados Raiz. - Definir esta regra como "Habilitado". - Em seguida no prompt de comando como administrador, executar o seguinte comando: gpupdate /force FixCrypto_TLS1_2_Windows.reg

Bom dia...precisei enviar ao e-Social a admissão de um Aprendiz, e no Fontes\ACBrDFe\ACBreSocial\PCNeSocial\pcesGerador.pas tive que ajustar para também gerar o XML com indAprend = 1 e sem pAprend.NrInsc informado... Segue para vossa apreciação: procedure TeSocialEvento.GerarInfoAprend(pAprend: TAprend); begin // if (pAprend.NrInsc <> EmptyStr) then if (pAprend.NrInsc <> EmptyStr) OR (pAprend.cnpjEntQual <> EmptyStr) then begin Gerador.wGrupo('aprend'); if VersaoDF >= veS01_02_00 then begin Gerador.wCampo(tcStr, '', 'indAprend', 1, 1, 1, eStpIndAprendToStr(pAprend.indAprend)); Gerador.wCampo(tcStr, '', 'cnpjEntQual', 0, 15, 0, pAprend.cnpjEntQual); end; if (pAprend.NrInsc <> EmptyStr) then begin Gerador.wCampo(tcStr, '', 'tpInsc', 1, 1, 1, eSTpInscricaoToStr(pAprend.TpInsc)); Gerador.wCampo(tcStr, '', 'nrInsc', 1, 15, 1, pAprend.NrInsc); end; if VersaoDF >= veS01_02_00 then Gerador.wCampo(tcStr, '', 'cnpjPrat', 0, 15, 0, pAprend.cnpjPrat); Gerador.wGrupo('/aprend'); end; end;

Ola! Estou testando as novas possibilidades de consulta CNPJ pelas APIs que foram disponibilizadas no ACBrConsultaCNPJ e senti falta de exceção quando vem um erro do servidor. Como por exemplo o ReceitaWS com mais de 3 consultas por minuto já da erro, porem no componente não esta acontecendo nada. Fica sugestão a alteração que fiz. Implementei na ReceitaWS e na BrasilAPI. Em ambas adicionei um else se não deu certo, para lançar uma exceção do campo "message". if (Trim(LJsonObject.Values['message'].AsString) <> '') then raise EACBrConsultaCNPJWSException.Create(LJsonObject.Values['message'].AsString); Obrigado. ACBrConsultaCNPJ.WS.BrasilAPI.pas ACBrConsultaCNPJ.WS.ReceitaWS.pas

Johni, A unit que monta a consulta é DBSeller.Provider Mas especificamente essa consulta temos: function TACBrNFSeXWebserviceDBSeller204.ConsultarNFSeServicoPrestado( ACabecalho, AMSG: String): string; var Request: string; begin FPMsgOrig := AMSG; Request := '<e:ConsultarNfseServicoPrestado>'; Request := Request + '<xml>' + XmlToStr(AMSG) + '</xml>'; Request := Request + '</e:ConsultarNfseServicoPrestado>'; Result := Executar('', Request, ['return', 'ConsultarNfseServicoPrestadoResposta'], [Namespace]); end; altere para: function TACBrNFSeXWebserviceDBSeller204.ConsultarNFSeServicoPrestado( ACabecalho, AMSG: String): string; var Request: string; begin FPMsgOrig := AMSG; Request := '<e:ConsultarNfseServicoPrestado>'; Request := Request + '<xml>' + XmlToStr('<?xml version="1.0" encoding="UTF-8"?>' +AMSG) + '</xml>'; Request := Request + '</e:ConsultarNfseServicoPrestado>'; Result := Executar('', Request, ['return', 'ConsultarNfseServicoPrestadoResposta'], [Namespace]); end; Salve a alteração, reinstale o ACBr, recompile a aplicação e refaça o teste.

infelizmente Não... Mas creio que se você copiar o arquivo ACBrNFeServicos.ini, na mesma pasta onde está a DLL, ele fará uso do arquivo externo http://svn.code.sf.net/p/acbr/code/trunk2/Fontes/ACBrDFe/ACBrNFe/ACBrNFeServicos.ini

Nós usamos Lib C# e lemos a propriedade ValorRecebido. Versão da lib: ACBrLibBoleto-0.2.0.271

Boa tarde Aécio, Muito obrigado pela colaboração, já inclui na minha lista de tarefas. TK-4999

Boa tarde Italo. Vou atualizar lá e já começar os testes.

Entrei em contato com o provedor e solicitei a lista de municípios e suas respectivas URL's. Assim que eu tiver, encaminho aqui. Farei os testes agora com o que você liberou e vou dando o feedback

Boa tarde Felipe, Já implementei o provedor e enviei para o SVN. Essa implementação só foi feita no novo componente: ACBrNFSeX. Atualize todos os fontes de todas as pastas e reinstale o ACBr. Abra o arquivo ACBrNFSeXServicos.ini e veja o que eu escrevi na seção que se refere a Uberlândia/MG Caso deseje realizar testes, no inicio desse arquivo INI existe uma instrução de como proceder.

Ok Renato, Como comentei numa mensagem anterior, tenho ciência que este tipo de suporte não faz parte do atendimento e agradeço muito o esforço. Já vi aqui que eu tenho uma VM de W7 montada. Só vou fazer uma instalação limpa do Visual Object e dos demais arquivos necessários. Ate mais. Sergio

Boa tarde Diego ! Tudo bem ? Primeiramente obrigado pelo seu retorno ! A versão foi alterada sim ! Só estou aguardando um retorno do responsável no cliente para verificar se foi atualizado o arquivo ACBRCteServicos.ini ! Porque talvez também possa ter sido isso ! Assim que for verificado isso, eu reporto aqui !

Por favor disponibilize também o ini do monitor, para testarmos o mesmo cenário. Como existem dados sensíveis, queira enviar para [email protected] mencionando este tópico para identificação.

Olá @Emanoel Fortuna, Conforme a orientação do próprio fórum do BB, a URL para ser utilizada é a que já está no código. Veja esse post: https://forum.developers.bb.com.br/t/qual-a-diferencas-entre-as-seguintes-urls-de-homologacao/2248

bom dia, Italo; Também estou na luta aqui com a prefeitura da Serra, até o momento nenhum retorno positivo dos mesmos, nem mesmo com a informação se vão ou não manter a entrada em produção em 01/02/2024, caso eu consiga, informo aqui!

Bom dia Felipe, Esse é o Schema (XSD) e não o XML. Fique tranquilo, achei o problema aqui.

https://www.projetoacbr.com.br/pro Para ter um atendimento com SLA pela equipe de consultores a assinatura PRO é a melhor opção. Além do atendimento terá acesso a treinamentos exclusivos. De qualquer forma o forum é um ambiente comunitário e você pode colocar suas dúvidas e aguardar a ajuda de alguma pessoa da comunidade. Obrigado

RESOLVIDO. Era isso mesmo como eu tinha suspeitado. O ITAU não esta aceitando colocar caracter especial - Os parenteses () - no arquivo remessa. Obrigado.

Obrigado pela contribuição, em breve será validada para possível inclusão ao svn #TK-4996

acho que já está. exceto algo do mercado pago todos os bancos e pix estão com url homologação e produção

Olá, Só complementando os testes, na resposta anterior, após publicar, muitos dos comentários que coloquei sumiram ! Também inclui outra variável para iniciar a LIB (declarei antes de CNPJ_Consultar: CNPJ_Inicializar := GetProcAddress(hDll, "CNPJ_Inicializar") // OK CNPJ_Inicializar = 0x03417CA0 CNPJ_Consultar := GetProcAddress(hDll, "CNPJ_Consultar") // OK CNPJ_Consultar = 0x03417E90 Definindo resposta := '' ou resposta := space(tamanhoResposta) o resultado era o mesmo: resposta = '' ou resposta = space(256) Tentei também definir a variável resposta como tipo PSZ, e antes de exibir o retorno, transformar em string (defini como PSZ também na definição da função da LIB) Só que após incluir a inicialização (CNPJ_Inicializar), o log não esta mais exibindo o retorno e na linha "SetRetorno" aparece um caractere "diferente": 17/01/24 06:51:00:469 - TLibConsultaCNPJConfig.AplicarConfiguracoes: c:\sistemas\CoPg_Soares\ACBrLib.ini 17/01/24 06:51:00:470 - TLibConsultaCNPJConfig.Gravar: c:\sistemas\CoPg_Soares\ACBrLib.ini 17/01/24 06:51:00:471 - TLibConsultaCNPJConfig.Gravar - Feito 17/01/24 06:51:00:471 - TLibConsultaCNPJConfig.AplicarConfiguracoes - Feito 17/01/24 06:51:00:471 - TLibConsultaCNPJConfig.Ler - Feito 17/01/24 06:51:00:471 - LIB_Inicializar( ACBrLib.ini, ) 17/01/24 06:51:00:471 - ACBrLibConsultaCNPJ - 0.0.0.38 17/01/24 06:51:16:708 - CNPJ_Consultar ( 13397985000182,2 ) 17/01/24 06:51:16:709 - Travar 17/01/24 06:51:17:018 - Destravar 17/01/24 06:51:17:018 - MoverStringParaPChar. StrLen:607, BufLen:256 17/01/24 06:51:17:020 - SetRetorno(0, [Consult_) 17/01/24 06:55:18:354 - TLibConsultaCNPJConfig.AplicarConfiguracoes: c:\sistemas\CoPg_Soares\ACBrLib.ini 17/01/24 06:55:18:354 - TLibConsultaCNPJConfig.Gravar: c:\sistemas\CoPg_Soares\ACBrLib.ini 17/01/24 06:55:18:355 - TLibConsultaCNPJConfig.Gravar - Feito 17/01/24 06:55:18:356 - TLibConsultaCNPJConfig.AplicarConfiguracoes - Feito 17/01/24 06:55:18:356 - TLibConsultaCNPJConfig.Ler - Feito 17/01/24 06:55:18:356 - LIB_Inicializar( ACBrLib.ini, ) 17/01/24 06:55:18:356 - ACBrLibConsultaCNPJ - 0.0.0.38 17/01/24 06:55:22:067 - CNPJ_Consultar ( 13397985000182,2 ) 17/01/24 06:55:22:067 - Travar 17/01/24 06:55:22:318 - Destravar 17/01/24 06:55:22:319 - MoverStringParaPChar. StrLen:607, BufLen:607 17/01/24 06:55:22:319 - SetRetorno(0, [Con_) Bom, vou continuar os testes aqui. Sergio

Boa noite, isso com acbr e fácil de você fazer. Coloca um componente acbr na tela e manda ler os arquivos xml ,criar uma variável recebendo a tag totalnfe e acabou

Olá Diego, A sua resposta faz muito sentido sim! Seria uma alternativa para usar uma DLL, porém segue abaixo os resultados (em vermelho): // Carregando a DLL dinamicamente hDll := LoadLibrary("ACBrConsultaCNPJ32.dll") // OK, carregou a DLL, retornando hDll = 0x03410000 // Verificando se a DLL foi carregada corretamente IF hDll <> 0 // Obtendo um ponteiro para a função CNPJ_Consultar @CNPJ_Consultar := GetProcAddress(hDll, "CNPJ_Consultar") // Chamando a função como de costume LOCAL resultado, resposta, tamanhoResposta // definido no inicio da função tamanhoResposta := 256 resposta := Space(tamanhoResposta) resultado := CNPJ_Consultar("12345678901234", 1, @resposta, @tamanhoResposta) // Trabalhando com a resposta ? "Resultado da consulta:", resultado ? "Resposta da consulta:", resposta // Fechando a DLL FreeLibrary(hDll) ELSE ? "Erro ao carregar a DLL" ENDIF Enfim Diego, eu imaginava que iria funcionar, mas continuou não retornando nada na variável resposta. Agradeço muitooo o empenho de todos, mesmo este tipo de problema não fazendo parte do suporte. Caso vocês queiram continuar tentando (pois eventualmente possa ajudar algum outro usuário), vou testar todas as sugestões levantadas, porém caso queiram parar por aqui, eu já fico muito grato pela ajuda. Mesmo não sendo uma solução "elegante", ler o resultado do LOG resolve o meu problema e já consigo usar a LIB. Mais uma vez, muito obrigado pelas horas dedicadas a tentar resolver meu problema. Sergio

Deve estar usando MSXML (ele usa DLL acusada no erro) Usa a LibXML2, conforme sugestão acima do Renato Rubinho

Obrigado por reportar. Perfeito, ao carregar o ini você será as configurações no componente utilizado pela lib. Parabéns pela iniciativa, esperamos sempre contar com a ajuda de todos, pois é assim que a comunidade se fortalece. Fechando. Para novas dúvidas, criar um novo tópico.

parece fazer sentido, muito obrigado pela contribuição... @Victor H. Gonzales - Panda, pode analisar e subir no SVN ?

Boa tarde, Revise suas configurações de SSL/TLS que pode resolver o problema.

Olá, Conforme avisado pelo @William Mometti, a Receita informou que está suspensa a revisão do conjunto de versões de protocolos TLS na EFD-Reinf e a nova data para a manutenção será comunicada em oportunidade futura. http://sped.rfb.gov.br/pagina/show/7315

Boa tarde, Tenta remover os parenteses do nome do pagador e faz um teste. A cliente reportou que nos boletos que não tem o parênteses, o banco aceitou, acredito que alteraram algo lá, pois sempre aceitava.

Olá, Implementados ajustes da NT 2024.06 na Rev-31934 Quem utiliza a Lib ou Monitor, na próxima compilação já estará disponível.

Bom dia Rene, Conforme consta no manual referente ao layout da versão 3.00 do CT-e página 61, o grupo infCteComp tem no máximo 1 ocorrência, portanto não é uma lista. Por outro lado, no manual da versão 4.00 página 72 o grupo infCteComp tem no máximo 10 ocorrências, ou seja, é uma lista. Se você estiver gerando o XML para a versão 3.00 vai utilizar da seguinte forma: infCteComp.chCTe Agora se for gerar o XML para a versão 4.00 deve usar na seguinte forma: infCteComp10[x].chCTe, onde x vai variar de zero até infCteComp10.Count - 1. infCteComp não é uma lista infCteComp10 é uma lista

Olá, garela achei a solução deve-se passar ao final do comando os caracteres '\r' + '\n' + "." + '\r' + '\n', com isso o comando ficaria enviaComando.print(comando.toUpperCase() + '\r' + '\n' + "." + '\r' + '\n');

Bom dia Devido a outras demandas este caso ainda não entrou para análise, esperamos ter um retorno no decorrer da proxima semana. At.