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;

Bom dia pessoal Conforme explicado pelos colegas do time, a separação de quebra de linha é padrão para todos, e alterar para algo diferente pode gerar outras dificuldades, afinal podemos ter outros pedidos semelhantes de colegas que utilizam outras linguagens. At.

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:

Boa tarde, A versão está errada, precisa ser a 4.0. https://acbr.sourceforge.io/ACBrMonitor/WebServices.html https://acbr.sourceforge.io/ACBrMonitor/NFESetVersaoDF.html

Boa tarde Ricardo, A NFS-e é um caso a parte. Todos os demais DF-e, devemos gerar o XML do mesmo, assinar, validar, enviar para a SEFAZ e esta caso os dados estejam corretos retorna o protocolo de autorização que é adicionado ao XML que foi gerado e enviado. Já a NFS-e, devemos gerar o XML do RPS (Recibo Provisório de Serviço) ou DPS (Declaração Provisória de Serviço - Padrão Nacional), assinar, validar, enviar para o webservice do provedor e este caso os dados estejam corretos vai gerar um novo XML que é o da NFS-e. Lembre-se o XML da NFS-e é gerado pelo webservice do provedor. Sendo assim optamos por separar esses XMLs. É criado automaticamente uma pasta chamada Recibos onde os XMLs dos RPS / DPS são salvos e uma outra pasta chamada Notas onde são salvos os XMLs das NFS-e retornados pelos webservices dos provedores.

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.

Boa tarde @Valdir Dill, Tanto o DANFSE feito em Fortes quanto o que foi feito em Fast Report, foram feitos baseados no layout do XML da NFS-e da ABRASF. Nas units que fazem a leitura dos XMLs das NFS-e dos provedores que tem layout próprio, foram inseridas algumas linhas para poder alimentar os campos necessários para que os dados das notas fossem impressos. Se faz necessário fazer o mesmo com a unit que realiza a leitura do XML da NFS-e do Padrão Nacional. Lhe peço um pouco mais de paciência que vamos resolver isso. O layout do DANFSE vai continuar o mesmo que você esta acostumado. Caso algum cliente ou contador implicar com esse layout, basta usar o método ObterDANFSE, este vai baixar da API do Padrão Nacional o PDF do DANFSE segundo o layout deles.

Oi Clóvis, bom dia. Esses logs indicam que o ACBr foi instalado corretamente. Essa é a boa notícia. A má notícia é que o erro que você apresentou não é de instalação. Esse erro: Geralmente isso significa que o compilador está encontrando arquivos dcu ou pas de versões diferentes e/ou não consegue recompilar os mesmos. Isso pode ser por vários motivos: Seu path do Windows pode estar incluindo pastas que são de Delphis diferentes Tem várias cópias do ACBr na máquina Tem várias cópias do código fonte da synapse na máquina Em qualquer uma das situações acima, o Delphi encontrou uma "Synautil"(.dcu ou .pas) uma vez (na hora de compilar o dcu da unit ACBrUtil.Math), mas depois (na hora de montar o exe) está encontrando outra "Synautil". A única opção que você tem é localizar essas units Synautil que estão repetidas e remover elas. Daí reinstalar o ACBr e aí tentar recompilar o demo. Antes disso, faça questão de localizar no seu computador a pasta de BPLs de todos as versões Delphi que tem instalada e apagar qualquer bpl do ACBr ou Synapse que esteja lá. Elas geralmente ficam na pasta: C:\Users\Public\Documents\Embarcadero\Studio\<versao>\Bpl Onde <versao> deve ser uma versão instalada. Por exemplo o Delphi Alexandria é 22.0, ficando: C:\Users\Public\Documents\Embarcadero\Studio\22.0\Bpl Verifique todas as pastas BPL que tiver. Atualmente, nenhuma BPL do ACBr deve ficar nessas pastas.

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.

Boa tarde. Vamos pedir para o cliente fazer o processo do zero novamente, desde a geração da chave PIX para ver se não ficou algo errado, e vamos testar novamente.

Ele dá o erro quando você carrega o Monitor ou ao tentar realizar a emissão da NFE? Se possível anexe o Log do monitor para avaliarmos.

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...

Boa tarde, O Segmento N realmente esta errado, vou corrigir. Agora quanto ao J52, segundo o manual da Febraban devemos gerar esse campo com um espaço em branco, veja: O campo da linha 06.4.J52 informar com 1 espaço em branco. Qual é o banco que é diferente?

Boa tarde Alexandre Veja bem, NFes e NFCes gravam normalmente na Pasta Arquivos DFes, somente as NFSes que não. Essas configurações não foram criadas agora e, quando foram feitas, foram salvas e o Monitor, desde então já foi fechado e aberta várias vezes.

Boa tarde, Algumas sugestões: Depois de mudar os caminhos, salve as configurações, encerre o Monitor e abra novamente. Verifique se está rodando como administrador. Verifique se tem acesso/permissão na pasta que deseja salvar.

Bom dia! Aqui ele vai guardar os seus arquivos de envio e de envelope, então por exemplo, se você emitir uma NFSe com número do lote 1, ele vai gerar pagar você 1-emit.xml, 1-emit-soap.xml e lista-nfse.xml e lista-nfse-soap.xml. Aqui, ele vai salvar os XMLs da NFS-e respeitando as configurações de separação definidas.

Por favor atualize seus fontes, pelo SVN do ACBr... Já subimos para o nosso repositório de fontes, modificações que podem corrigir algum dos itens referentes a esse tópico... Por favor atualize seus fontes, faça testes, e se possível comente em uma nova resposta, se o problema foi resolvido... Dúvidas, sobre o uso do SVN ? Clique aqui e veja um vídeo

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. Emiti novos: NOSSO NUMERO: 4-5 NOSSO NUMERO: 5-5 NOSSO NUMERO: 6-5 Execute em modo homologação. Se julgar necessário vc pode emitir ai novos boletos, se atente em emitir no modo homologação.

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

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

Bom dia, Não existe 4098. O 4099 é para fechamento e reabertura de acordo com o preenchimento do campo fechRet. Segue manual mais recente para análise. http://svn.code.sf.net/p/acbr/code/tools/DFe/Reinf/Leiautes_2.1/Leiautes da EFD-Reinf versão 2.1.2.pdf

Boa tarde @Jean Peixoto, O assunto é regido pela NT 2019.001 que trata das validações do cBenef, porém não localizei em nenhum ponto nada sobre alterações no Danfe, portanto não vejo necessidade de impressão, inclusive tendo em vista que o documento fiscal em si é o próprio arquivo XML e não a impressão. Como sugestão solicite ao seu cliente a documentação e legislação que orienta a impressão. Até para justificar uma eventual alteração. Caso ele apresente a documentação pode encaminhar para que possamos avaliar também. Obrigado.

Tópico movido para a área do SAC, para que o SLA de respostas seja considerado. Boa tarde @Lemarc Sistemas, A princípio o layout de impressão do cupom do SAT não prevê essa informação. O local indicado seria nas observações do contribuinte. Você poderia tentar colocar como um item de venda, porém não recomendo por envolver questões tributárias. Aí o recomendado seria consultar o responsável pela contabilidade do seu cliente qual seria a orientação para destacar esse valor.

Boa tarde, muito obrigado, vou baixar os novos arquivos

No usa a versão BETA é informado claramente que não deve usar mesmo windows que estiver usando em versões de produção pois pode afetar. então portanto para tanto terá que remover ambas as versões e instalar a 11.3 ou inferior para resolver seu problema.

Não... pelo menos ainda não... Eles só atualizam depois ou bem próximo do lançamento. Eu não tive acesso a essa versão ainda então não posso afirmar com certeza o que aconteceu. Mas geralmente pede-se para instalar uma versão beta em outra máquina justamente por conta de conflitos com as instalações anteriores. Oi @Paulo Alexandre Hostertpela mensagem de erro, o mais certo é que a instalação do Delphi 12 tenha "bagunçado" a detecção de versões instaladas. Olhando no código fonte, mesmo considerando o código da JCL eu não consegui encontrar exatamente onde no código o problema é levantado. Mas acredito que consegui fazer uma alteração que vai proporcionar ao instalador continuar mesmo quando o erro for levantado. Assim que fizer mais testes, subo a versão e aviso aqui no tópico. Mas até lá, ou até nós termos o ACBrInstall compatível, talvez o melhor seja desinstalar essa versão do Delphi nessa máquina e instalar ela em outra. Ou talvez instalar o ACBr em uma outra máquina ou numa máquina virtual. É claro, você sempre tem a opção de instalar o ACBr manualmente, pacote por pacote.... mas não recomendamos isso. É muito trabalhoso.

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.

@IBS Sistemas Subimos para o SVN, por favor faça o update e rode o instalador do ACBr Obrigado @IBS Sistemas pela contribuição