Earmarques

Bom dia, Pois é. Notei que o componente não está carregando, portanto devo estar esquecendo alguma coisa: procedure TfrmACBrNFe.btnDistrDFePorChaveClick(Sender: TObject); var xTitulo, cUFAutor, CNPJ, Chave: string; begin xTitulo := 'Distribuição DFe Por Chave'; cUFAutor := ''; if not(InputQuery(xTitulo, 'Código da UF do Autor', cUFAutor)) then exit; CNPJ := ''; if not(InputQuery(xTitulo, 'CNPJ/CPF do interessado no DF-e', CNPJ)) then exit; Chave := ''; if not(InputQuery(xTitulo, 'Chave da NF-e', Chave)) then exit; ShowMessage('Documentos antes: ' + ACBrNFe1.NotasFiscais.Count.ToString); ACBrNFe1.DistribuicaoDFePorChaveNFe(StrToInt(cUFAutor), CNPJ, Chave); ShowMessage('Documentos depois: ' + ACBrNFe1.NotasFiscais.Count.ToString); MemoResp.Lines.Text := ACBrNFe1.WebServices.DistribuicaoDFe.RetWS; memoRespWS.Lines.Text := ACBrNFe1.WebServices.DistribuicaoDFe.RetornoWS; LoadXML(ACBrNFe1.WebServices.DistribuicaoDFe.RetWS, WBResposta); end; Nos ShowMessages acima retorna 0 antes e 0 depois. Mesmo retornando o arquivo que anexei acima contendo ele em base64. Atenciosamente,

Bom dia, Estou estudando o exemplo do ACBr NFe e ao clicar no botão "Distribuição DF-e por Chave", consultando uma nota já manifestada, retorna esse arquivo, mas ao carregar no navegador não se parece com um XML de documento fiscal, embora o componente salve como tal, inclusive na pasta de NFe mesmo. Como posso visualizar isso como uma nota mesmo? Obrigado 20250608085913-dist-dfe.xml

Olá, Estou precisando implementar e homologar o TEF e PIX no meu sistema de PDV e gostaria de saber se tem algum programador interessado em implementar via TeamViewer em horários e valor a combinar. Um cliente meu está contratando o TEF da Martins então tenho que implementar de forma mais rápida. Obrigado

Boa tarde, Li todo o tópico e gostaria de confirmar com vocês: o XML de uma nota só pode ser baixado uma vez pelo destinatário, é isso? Se um contador tiver um programa que baixou o XML com o certificado do meu cliente ele não vai conseguir baixar a mesma nota no programa dele novamente na empresa? Obrigado.

Boa tarde, Tem como após emitir a NFCe no android(celular), a gente visualizar o Danfe mesmo em PDF ou eu precisaria transmitir esse danfe para um servidor REST por exemplo, meu para retornar o PDF no celular e visualizar? No exemplo para android não tem, por isso a pergunta. Obrigado.

Pois é, acabei de testar aqui, disse documentos localizados, mas não acho nas pastas configuradas para salvamento:

Pessoal, Obrigado. Sabemos que é obrigação dos fornecedores enviar o XML mas infelizmente não tenho como bater de frente com o cliente neste caso, pois o concorrente fornece esse recurso. Ou implementa ou perde o cliente. Juliomar, vou implementar, copiar mesmo e adaptar. Com o exemplo não tem desculpa. Obrigado

Boa tarde, É possível implementar rotina de download de XML pela chave ou em lote para o meu cliente baixar as notas emitidas para a empresa dele usando o ACBrNFE com o certificado? Se tiver como eu agradeceria pela ajuda. Porque ele disse que já viu em outros sistemas e no dele não tem. Att.

Obrigado Daniel!

Boa noite, A minha instalação do Windows 11 e delphi Alexandria são novas e estão apresentando os mesmos erros. Sendo que nunca tive delphi nesse windows, instalei hoje, nunca vi esse erro:

Pessoal, Resolvi, consegui achar a tal "Scope Names". Adicionei Vcl e pronto. Obrigado

Bom dia, Estou com um problema parecido. Acabei de reinstalar o Delphi e os componentes ACBr. Mas na hora de compilar um VCL mesmo, novo, dá esse erro: [dcc32 Fatal Error] ACBrDFeReport.pas(51): F2613 Unit 'Graphics' not found. Sendo que não estou tentando compilar em FMX, o ACBr.inc está salvo da forma abaixo. Tem alguma configuração nova para que o ACBr encontre a unit Graphics?

Não, isso não, vou pesquisar como faz então. Obrigado.

Não sei se vou saber responder, mas printei as opções que marquei quando criei esse REST. Se precisar de mais informações posso anexar o projeto aqui pro senhor.

Olá pessoal, No mobile ainda não temos componentes para gerar o DANFE, então estou tentando criar uma aplicação REST para receber o XML, gerar o DANFE em PDF e devolver ao app mobile. No entanto, ao fazer os testes mesmo no ambiente desktop com uma requisição por vez funciona, mas quando simulo por exemplo 03 requisições simultâneas os executáveis dos clientes apresentam erro de tempo limite atingido e o servidor rest standalone trava. Podem me ajudar a entender o que posso estar fazendo de errado? Obrigado de antemão.

Obrigado Daniel, Sem dúvidas já é um grande avanço gerar e transmitir no próprio Android mesmo. A gente mesmo criar um REST é nada comparado ao que já está funcionando e perfeitamente. Obrigado mesmo.

Olá, É possível gerar o PDF da NFE no Android? Desculpem se eu não tiver encontrado, mas não vi no demo do Android por isso fiquei com essa dúvida. Estive pensando que se não tiver como, uma saída seria criar uma aplicação REST para receber o XML e devolver o PDF, mas quero ver se consigo gerar no próprio celular. Agradeço se puderem me ajudar nessa dúvida.

Não aconteceu a mesma coisa. Verifiquei aqui, encontrei o local onde estava alterando indevidamente o valor. Você me ajudou muito. Toda vez vou simular no demo antes. Obrigado.

Bom dia, Houve alguma mudança no preenchimento do campo VL_DOC no C100? É que estou preenchendo com um valor, mas após alimentar o C190 o arquivo TXT gerado sai com outro valor, parece que a soma do VL_OPR. Alguém pode me informar? Obrigado.

Bom dia, Descobri o que aconteceu, eu gravei o logo usando o demo do ACBrPosPrinter. No entanto, apagando o logo, apesar de ter resolvido, apenas preenchendo o parâmetro "Logo" no ACBrDANFEEscPos não está imprimindo. Se alguém puder ajudar agradeço. Estou usando a EPSON TM-T20 na porta virtual mesmo.

Pessoal boa noite, Eu estou tentando adicionar a logomarca na NFCe, no entanto, depois que eu carreguei a primeira imagem BMP, mesmo mudando o nome do arquivo ou salvando outra imagem por cima, enfim, o sistema continua imprimindo a primeira imagem, não importa o que eu faça. Estou usando o ACBRDANFEEscPos com ACBRPosPrinter. No PosPrinter precisei deixar falso o campo "Ignorar logo": Alguém já passou por isso? Segue o código para carregar o BMP. Já testei inclusive fixando o endereço do arquivo novo, mas continua saindo o primeiro que testei. with ACBrNFeDANFeESCPOS1 do begin PosPrinter.Porta := dados.var_PORTAECF; PosPrinter.Device.Baud := 9600; ImprimeEmUmaLinha := True; ImprimeDescAcrescItem := True; PosPrinter.IgnorarTags := false; if FilesExists(ExtractFilePath(Application.ExeName) + 'download.bmp') then Logo := ExtractFilePath(Application.ExeName) + 'download.bmp'; end;

Pessoal, Pesquisando na internet achei uma rotina no site abaixo que valida o GTIN de 13 números, calculado conforme o site do GS1(https://www.gs1.org/services/how-calculate-check-digit-manually): function calcBarcodeCheckSum(barcode: string): string; var sum,factor,k,dig1:integer; begin sum := 0; Factor := 3; try for k := length(barcode) downto 1 do begin dig1 := strToInt(copy(barcode, k, 1)); sum := sum + (dig1 * Factor); Factor := 4 - Factor; end; except sum:=-1; end; sum := (sum mod 10); if sum <> 0 then sum := 10 - sum; result:=intToStr(sum); end; Eu uso o ACBrValidador mas ele está validando mesmo se o dígito não bate, então não sei se já foi atualizado mas se servir para acrescentar no código do componente aí está. Fonte: http://www.pointercloud.com/2014/12/26/calculate-ean-13-barcode-checksum/#comment-341

Beleza Sérgio, Obrigado pela resposta. Na verdade o meu objetivo é criar uma nota complementar, então vou copiar bloco a bloco mesmo(a beleza da orientação a objetos né?) e gravar o xml. Nesse caso a intenção é arquivar o xml complementar apenas, sem gerar novas informações no banco de dados pois já tem os dados da NFe enviada. Obrigado mais uma vez.

Pessoal, Como posso excluir a tag protNFe de uma xml já enviado e autorizado, para enviar novamente nova nota com numeração diferente aproveitando o restante dos dados? Existe essa possibilidade? Obrigado

Boa tarde, eu posso ajudar sim o senhor se for coisa simples, tipo, o senhor manda a foto das etiquetas que o senhor precisa imprimir com uma espécie de gabarito escrevendo mesmo com caneta na etiqueta a localização de cada dado a ser exibido. No caso o senhor quer exibir que dados?