Painel de líderes

Esqueci e mencionar, segue detalhado a forma que chamo a classe em tempo de execução. Var ACBrConsultaCNPJ :TACBrConsultaCNPJws; begin ACBrConsultaCNPJ := TACBrConsultaCNPJws.Create(Self); if ACBrConsultaCNPJ.Consulta(EditCNPJ.Text, 'https://receitaws.com.br/v1/cnpj/') then begin ... end; ACBrConsultaCNPJ.Free; end;

No dia 13/09/2023 foram republicadas as NT 03/2023 e o schema R-4010. http://sped.rfb.gov.br/pagina/show/7270 No amigo @Edson Costa sempre atento as atualizações que nos informou! As alterações serão avaliadas e caso seja necessária alguma alteração nos fontes ela será informada neste tópico! TK-4438

Boa tarde! Conferindo no painel Situação-SVC, é possível observar que a Sefaz do Paraná está com contingência agendada para o dia 16/09/2023, com previsão de inicio ás 13h00 e encerramento ás 19h00. Para usar o ACBr em contingência durante este período, siga as orientações deste tópico:

No evento ChromiumLoadEnd do componente, e o link vai no evento AfterCreated... No Create do Form vc cria o Chromium... Chromium1.CreateBrowser(CEFWindowParent1); E no afterCreated faz o seguinte... procedure Chromium1AfterCreated(Sender: TObject;const browser: ICefBrowser); begin inherited; ///PostMessage(Handle, CEF_AFTERCREATED, 0, 0); Chromium1.LoadURL('https://solucoes.receita.fazenda.gov.br/Servicos/cnpjreva/Cnpjreva_Solicitacao.asp?cnpj=' +cxMaskEditCPF.Text); end; Foi pego os dados do html, igual o amigo do projeto mais acima.

Abri um chamado na Sefaz de MT também, qualquer retorno deles, mantenho aqui informado Obrigado

Você testou em todos os estados essa alteração? Veja que no MOC da versão 4 o conteúdo da tag é diferente da versão 3 mesmo: Então se a UF em questão está validando diferente, seria o caso de abrir um chamado pra que façam a correção.

O serviço que o componente usava foi desativado pela receita. Veja o tópico: https://www.projetoacbr.com.br/forum/topic/73968-acbrconsultacnpj

Boa tarde, Não sou muito bom em implementação de componentes, mas peguei o arquivo ACBrConsultaCNPJ.pas mudei o nome dele para ACBrConsultaCNPJws.pas e fiz algumas alterações pra fazer a busca utilizando a api do site https://www.receitaws.com.br/ que no gratuito permite 3 consultas por minutos, para os clientes que tenho atendeu bem. Na minha tela de consulta chamei ele da seguinte forma if ACBrConsultaCNPJ.Consulta(EditCNPJ.Text, 'https://receitaws.com.br/v1/cnpj/') then Lembrando que fiz apenas o básico pra funcionar e meus clientes parar de reclamar rsrsrsr. Coloquei as dll do OpenSSL versão 1.1.1.10 na pasta do executável, senão não funciona. ACBrConsultaCNPJws.pas

Boa tarde Renato! Realmente não faz sentido usar SSLType = LT_all, com certificado A3 mas foi a única forma que funcionou, já com certificado A1 uso SSLType = LT_TLSv1_2. Fiz um vídeo com o programa teste do Reinf-Acbr para demonstrar a situação. Teste transmissão Reinf certificado A3.mp4

Boa Luiz, só não faz sentido a alteração do SSLType. Tente fixar com tls1.2, pois deve funcionar também. De qualquer forma, indica algum problema no cenário do cliente. Maurício, se não me engano, por padrão eles não respondem mesmo e mandam uma resposta automática citando isso. Tente outro computador com Windows 10 ou 11, atualizado e veja se funciona. Se o erro persistir, revise os passos que o Luiz citou acima e foram bem completos, caso o problema seja relacionado à leitora.

Boa tarde! O cliente me enviou a leitora e o certificado A3 e instalei tudo aqui na minha máquina. -EM AMBIENTE DE HOMOLOGAÇÃO VERSÃO 2.1.2 Consegui realizar a transmissão corretamente alterando propriedade ACBrReinf.SSL.SSLType para LT_all com certificado A3. Envie evento da série R-1000, R-2000 e R-4000.

Na verdade, testamos com todos os tamanhos e encaixou certinho, como a tela ficou pequena acredito que ele identifica achando que é um celular e redmensiona ela conforme, sobre os arquivos nao sei ao certo pois nao precisamos de um para rodar, porque ja usamos um recurso de mensagens automaticas de whatsapp em nosso programa e ele usa o Chromium, o arquivo que ele solicitada era o CEF4Bin, que vinha junto com a instalação deste programa, mas acredito que todas as dll que o chromium precisa esta nele mesmo. https://github.com/salvadordf/CEF4Delphi Talvez este arquivo resolva, nao sei se é igual ao que tenho aqui, ate enviaria mas ele zipado é acima do limite de arquivo que da para enviar por aqui.

Boa Tarde, nos aqui da minha empresa conseguimos contornar o problema de uma forma diferente, nao tem como eu mandar o projeto pois ja esta dentro do nosso projeto oficial, nao por fora. Mas irei passar os códigos que usamos. Resumindo, usamos o TChromiun e conectamos na pagina diretamente, porem para ficar visivelmente mais bonito, colocamos um codigo para retirar da pagina tudo que não é preciso. if frame.IsMain then begin // remove elemento Chromium1.Browser.MainFrame.ExecuteJavaScript('document.getElementById("barra-brasil").remove();', '', 0); // remove elemento Chromium1.Browser.MainFrame.ExecuteJavaScript( 'var elementos = document.getElementsByTagName("' + 'header' + '");' + 'for (var i = elementos.length - 1; i >= 0; i--) {' + ' elementos[i].parentNode.removeChild(elementos[i]);' + '}', '', 0 ); // remove elemento Chromium1.Browser.MainFrame.ExecuteJavaScript( 'var elementos = document.getElementsByTagName("' + 'ul' + '");' + 'for (var i = elementos.length - 1; i >= 0; i--) {' + ' elementos[i].parentNode.removeChild(elementos[i]);' + '}', '', 0 ); // remove elemento Chromium1.Browser.MainFrame.ExecuteJavaScript( 'var elementos = document.getElementsByClassName("' + 'footer-wrapper' + '");' + 'for (var i = elementos.length - 1; i >= 0; i--) {' + ' elementos[i].parentNode.removeChild(elementos[i]);' + '}', '', 0 ); // ajuste css do elemento Chromium1.Browser.MainFrame.ExecuteJavaScript( 'var elementos = document.getElementsByClassName("' + 'col-md-8 form-group' + '");' + 'for (var i = elementos.length - 1; i >= 0; i--) {' + ' elementos[i].className = "col-md-10 form-group";' + '}', '', 0 ); // remove elemento JavaScriptAux := 'var divElement = document.querySelector(".col-md-12");' + 'if (divElement) {' + ' var h4Element = divElement.querySelector("h4");' + ' if (h4Element) {' + ' h4Element.remove();' + ' }' + ' var pElements = divElement.querySelectorAll("p");' + ' if (pElements.length > 0) {' + ' pElements[0].remove();' + ' }' + '}'; Chromium1.Browser.MainFrame.ExecuteJavaScript(JavaScriptAux, '', 0); JavaScriptAux := 'var bodyElement = document.body;' + 'if (bodyElement) {' + ' bodyElement.style.paddingTop = "30px";' + // Substitua "10px" pelo valor desejado '}'; // Execute o código JavaScript no TChromium Chromium1.Browser.MainFrame.ExecuteJavaScript(JavaScriptAux, '', 0); // bloqueia edicao do cnpj Chromium1.Browser.MainFrame.ExecuteJavaScript( 'document.getElementById("' + 'cnpj' + '").readOnly = true;' , '', 0 ); // remove elemento Chromium1.Browser.MainFrame.ExecuteJavaScript( 'var elementos = document.getElementsByClassName("' + 'btn btn-secondary' + '");' + 'for (var i = elementos.length - 1; i >= 0; i--) {' + ' elementos[i].parentNode.removeChild(elementos[i]);' + '}', '', 0 ); CEFWindowParent1.Visible := true; // lê o html da pagina e obtem o dados if (Chromium1.Browser.MainFrame.Url = 'https://solucoes.receita.fazenda.gov.br/Servicos/cnpjreva/Cnpjreva_Comprovante.asp') then begin Chromium1.RetrieveHTML(); Pesquisou := true; PanelNavegador.Visible := false; end; end; ------------- Chromium1LoadEnd Abaixo uma imagem de como ficou...

Bom dia. No dia 12/09/2023, por volta das 09h20, começamos a receber relatos em nossa comunidade do Discord de membros com problemas para enviar CT-e para a Sefaz de MG na versão 3.0. Todos os relatos tinha em comum que ao consultar o documento, o retorno constante era de "Lote em Processamento", mesmo consultando após um longo período de tempo. Alguns até mesmo relataram que quando consultava no portal da sefaz, o CT-e constava como autorizado, mas a consulta por web service devolvida "Lote em Processamento". O membro de nossa comunidade @Adan Diogo, chamou atenção ao seguinte recado que consta no Fale Conosco da Sefaz de MG* *Para visualizar a mensagem, é necessário selecionar a opção Documentos Eletrônicos > CT-e > Contingência / Transmissão / Validação. Tivemos relatos de membros que conseguiram emitir com sucesso ao usar contingência. Vale citar também que está mensagem faz parte do processo da emissão na versão 3.00. Na versão 4.00 que é síncrona, o envio deve ocorrer sem dificuldades.

Bom dia, Criada a TK-4440 para avaliar a contribuição. Em relação a não conseguir anexar arquivos, vá no seu perfil no alto da página e acesse a opção "Meus Anexos". Ali é possível excluir arquivos antigos que você enviou e liberar espaço para adicionar novos anexos. Obrigado!

Teste aqui, funciona 100% para o que meus clientes querem... Obrigado

Não possui. Imagina fazer um layout de DANFSE pra todos os provedores. O gerado pelo ACBr deve ser aceito sem problemas tanto pela prefeitura quanto pelos tomadores.

Bom dia, Criada a TK-4437 para avaliar a contribuição. Obrigado

sugere alguma correção na função mencionada?

Boa tarde, muito obrigado, vou baixar os novos arquivos

Até que seja confirmada ou não a inviabilidade de uso da api pública pelo componente do ACBR, o que pode ser feito é usar usarmos a consulta pública como foi sugerido aqui no forum. Ou seja, um projeto que contenha um navegador (edge), possibilitando que o próprio usuário clique no botão (Sou Humano) e efetue a consulta manualmente. Após a consulta manual é possível extrair os dados do próprio html resultante. Fiz um protótipo funcional que efetua isso a quem interessar. ConsultaCNPJ.dpr ConsultaCNPJ.dproj uConsultaCNPJ.dfm uConsultaCNPJ.pas

Bom dia pessoal. Li os tópicos e pude observar que há bastante dúvidas sobre a retenção do IR, desconto e afins. Vamos por partes: Desconto é diferente de abatimento, note que, quando o contador disse que o IR abate não é no valor da NFe, e sim, por ocasião da entrega da declaração de ajuste anual da PJ. Estes valores retidos serão abatidos de eventual IRPJ a ser recolhido. Quanto a alíquotas, é importante observar alguns critérios. Art. 15 da Lei 9.249/1995. Art. 15. A base de cálculo do imposto, em cada mês, será determinada mediante a aplicação do percentual de 8% (oito por cento) sobre a receita bruta auferida mensalmente, observado o disposto no art. 12 do Decreto-Lei no 1.598, de 26 de dezembro de 1977, deduzida das devoluções, vendas canceladas e dos descontos incondicionais concedidos[...] I - um inteiro e seis décimos por cento atividade de revenda, para consumo, de combustível derivado de petróleo, álcool etílico carburante e gás natural; (para o segmento de combustíveis); II - dezesseis por cento: a) para a atividade de prestação de serviços de transporte, exceto o de carga, para o qual se aplicará o percentual previsto no caput deste artigo (aqui se for transporte de carga é de 8%). b) para as pessoas jurídicas a que se refere o inciso III do art. 36 da Lei nº 8.981, de 20 de janeiro de 1995, observado o disposto nos §§ 1º e 2º do art. 29 da referida Lei ( aqui é para bancos, e será de 9%) vide § 1º do artigo 29; III - trinta e dois por cento, para as atividades de a) prestação de serviços em geral, exceto a de serviços hospitalares e de auxílio diagnóstico e terapia, patologia clínica, imagenologia, anatomia patológica e citopatologia, medicina nuclear e análises e patologias clínicas, desde que a prestadora destes serviços seja organizada sob a forma de sociedade empresária e atenda às normas da Agência Nacional de Vigilância Sanitária – Anvisa; Importante destacar que a regra é para confundir, e não para facilitar nada, pois, a retenção de imposto de renda que é de competência da união pelo órgão municipal, havendo convênio entre o município e a RFB, o imposto é na sua integralidade do ente que realizou a retenção, assim, criam um mecanismo absurdo para as empresas. Logo, é necessário estar atento ao que dispõe a Lei 8.981/1995. Lá estão os percentuais a que se refere as instruções normativas, estas não possuem qualquer força jurídica para aumentar ou diminuir percentuais de tributos. Quanto ao tema faturamento, penso ser importante uma parametrização por produto ou não sendo possível, que pelo menos seja por setor de atuação da empresa, uma vez que a confusa lei mistura Pessoa Jurídica e produtos, imagine, uma PJ que vende óleo lubrificante que tenha também um setor de peças e outro de serviços? Desta forma o faturamento deve conter: Líquido = Valor Faturado – (Desconto + IRRPJ), senão o livro caixa vira uma bagunça. Ou seja, mais dor de cabeça para os desenvolvedores. Traduzindo, um manicômio tributário Brasileiro.