Solivan

Não sei se sou a pessoa mais indicada a responder mais ai vai uma pequena explicação; Este arquivo em negrito é o arquivo que contém o layout de impressão do Gerador de Relatórios FastReport, ele ainda não é uma versão oficial da suite ACbr, mas foi criado aqui pelos colegas do Fórum, numa tentativa de tentar mesclar o código ao componente que também emite nota fiscal eletronica ACBrNFe. E quanto a emissão da NFCe você deve usar os arquivos da NFe que foram modificados e disponibilizados aqui para download. Use a consulta para encontra-los. Att. Solivan

Acho que alguém já postou um arquivo que gera o QRCode totalmente escrito em pascal, acho que não precisamos de component para isso. É só usar a chasse para gerar a imagem e linkar com o componente image do fastreport, acho que já resolve.

Eu acho que esse erro está associado com algum tipo de objeto instanciado pela nota fiscal, pq estou passando pelo mesmo problema, quando envio a nota sem utilizar variáveis da nota fiscal tal como; numero da ID, CNPJ, protocolo, data autorização, etc... envia normal, mas quando faço referência a alguns desses objetos recebo a mesma mensagem de erro!

Elevando o nível de acesso com o arquivo de manifesto resolveria de imediato, porque uso aqui e funciona perfeitamente! Depois que você embutir o arquivo *.res de manifesto tenha certeza de remover todas as referências a Unit XPMan.pas de sua aplicação, caso contrário seu procedimento em burlar a segurança do Windows não funcionará. Att. Solivan!

Você deve localizar este arquivo no seu computador usando a busca do OS e incluir o caminho do arquivo no Library Path do Delphi assim ele não mostrará mais o erro.

Você está recebendo a mensagem é devido a falta de um layout especifico para a NFC-e que ainda não foi criado oficialmente. Existe um aqui no fórum feito em fast report mas ainda não foi incorporado ao projeto. segue arquivos em anexo, é só substituir e atribuir no seu projeto. Testei aqui e funcionou perfeitamente, tive que fazer alguns ajustes pq estava cortando a parte superior e esquerda, mas agora está perfeito. Att. Solivan DANFeNFCe.rar Exemplo de Uso.txt

Experimente colocar toda a parte de configuração da conexão antes mesmo de conectar-se.

se o seu delphi for ate a versão Xe, como é o meu caso tente usar os arquivos deste anexo, como o fortes é open source espero que não tenha problemas pelo fato de estar postando a cópia do componente aqui no fórum. Att. Solivan Fortes Report XE.rar

Tenta registrar pelo modo de segurança!

Eu acho que seria melhor você pedir orientação ao contador, pq eles são responsáveis pelos documentos fiscais enviados a sefa e cada um tem um ponto de vista diferente sobre o cenário fiscal, Att: Solivan

Não sei qual a sua intenção em gravar o pdf no seu banco de dados. Mas por que que ao invés disso você não grava o XML que é a fonte de todas as informações da NF-e? com ele você pode gerar o pdf a hora que for necessário. Respondendo a sua pergunta: o caminho do pdf é composto pelo caminho do arquivo pdf que vc mesmo atribui ao componente mais a chave de acesso + .pdf. Ex: cChaveNfe := GetJustNumbers(ACBrNFe.NotasFiscais.Items.NFe.infNFe.ID); cExt := '.pdf'; cPath := IncludeTrailingPathDelimiter(ACBrNFe.DANFE.PathPDF)+cChaveNfe+cExt; Espero ter ajudado. Att. Solivan

Eu passei por esse mesmo problema, tentei pegar o retorno usando o mesmo método da nota fiscal-e mas recebi um erro de violação de acesso, então tentei de outra forma e deu certo, segue exemplo abaixo; cChaveNFCe := SomenteNumeros(ACBrNFe1.NotasFiscais.Items[0].NFe.infNFe.ID); { begin = Grava os dados do retorno no BD ... } cProtocolo := ACBrNFe1.NotasFiscais.Items[0].NFe.procNFe.nProt; cDigVal := ACBrNFe1.NotasFiscais.Items[0].NFe.procNFe.digVal; wDataRetorno := ACBrNFe1.NotasFiscais.Items[0].NFe.procNFe.dhRecbto; Att. Solivan

Obrigado Ítalo pelo esclarecimento.

Olá, gostaria apenas de um esclarecimento por parte do responsavel pela NFe; tenho um modulo no meu sistema que faz a importação do XML e quando tento pegar o valor da variavel ACBrNFe.NotasFiscais.Items[0].NFe.Ide.dSaiEnt esta me retorna um valor nulo como: 30/12/1899, no entando estou usando a variavel ACBrNFe.NotasFiscais.Items[0].NFe.Ide.dEmi; para obter a data que necessito. Gostaria de saber pq a variavel nao retorna o valor da entrada / saida da nf-e? isso não acontece com todos os xml apenas com alguns que baixo aqui do fórum pra fazer testes. Será que o usuário que gera está esquecendo ou o componente não está retornando? Não considero isso um problema do componente, apenas gostaria de entender, verifiquei dentro do xml e não pude localizar esta propriedade "dSaiEnt". Obrigado. obrigado! Solivan Noleto Milhomem

Caro colega, o problema está na construção da sua URL, você passou a usar o token em produção mas não definiu no parametro tpAmb=2 que deve ser 2 e não 1. Veja a Nota clicando aqui Att. Solivan

Tente dessa forma SELECT DISTINCT PRODUTO.CODIGO, PRODUTO.DESCRICAO, PRODUTO.PRECO, SUM(ESTOQUE.QUANTIDADE) as Quantidade, ESTOQUE.LOJA FROM PRODUTO inner join ESTOQUE on (PRODUTO.CODIGO = ESTOQUE.CODIGO) GROUP BY PRODUTO.CODIGO, PRODUTO.DESCRICAO, PRODUTO.PRECO, ESTOQUE.LOJA. o comando SUM, pode ser usado pra somar a quantidade de todos os registro da tabela estoque e mostrar apenas uma quantidade sendo o total. Espero que ajude.

Eu gerei o arquivo utilizando dados da venda cujos cupons foram emitidos e também as notas digitadas no meu sistema e validou de boa pelo validador da SEFA PA. Att

Você deve instalar o RAVE, o Fast Report e o Quick Report no seu Delphi antes de instalar os componentes da suite ACBr. Espero ter ajudado. Solivan

Certo, você diz que não interfere no uso da NF-e, mas da forma que está sem subir para o SVN, fica ruim de está controlando pois atualizo o meu ACBr diaramente e o interessante é que a alteração fosse feita de forma permanente. Solivan

Ítalo, Gostaria de saber se essas alterações sugeridas pelo usuário que alterou o danfe, não pode resultar na criação de um novo componente para impressão do Danfe da NFC, dessa forma não teria que substituir os arquivos do DANFE da nota fiscal eletrônica. Att. Solivan

Verifique se seu antivirus ou firewall não está bloqueando o processo...

primeira cuidado ao enviar email é; não colocar link dentro do corpo do email... e tentar não repetir o mesmo conteúdo no assunto e na mensagem do email. Dessa forma o servidor de email não vai ver sua mensagem como spam. Att. Solivan

Segue em anexo o arquivo com as url atualizadas. Solivan ACBrNFeUtil.pas

Olá ontem estava lendo um tópico aqui no fórum e tomei nota de que o estado do Amazonas disponibilizou um Web Service para testes que poderá ser utilizado por desenvolvedores de todo pais, bastando apenas utilizar o CNPJ e o certificado digital, inclusive fiz alguns testes mudando as URLs dentro da unit ACBrNFeUtil.pas da nota fiscal, que foram fornecidas através deste link http://www.tecnospeed.com.br/blog/sefazam-libera-ambientes-de-testes-de-nfc-e-para-todo-o-pais/, e consegui enviar várias notas fiscais sem nenhum problema e gostaria de saber se essas novas URLs vão ser atualizadas para as URLs do AM. minha função ficou dessa forma; e consegui enviar muitas notas na madrugada. Para se adequar ao WS tive que colocar todos os endereços do emitente, destinatario, emissor e destino para o estado AM, e a cidade coloquei Manaus, deu tudo certo passou de boa. class function NotaUtil.GetURLAM(AAmbiente: Integer; ALayOut: TLayOut; AModeloDF: TpcnModeloDF = moNFe): WideString; begin if AModeloDF = moNFe then begin case ALayOut of LayNfeRecepcao : Result := DFeUtil.SeSenao(AAmbiente=1, 'https://nfe.sefaz.am.gov.br/services2/services/NfeRetRecepcao2' 'https://homnfe.sefaz.am.gov.br/services2/services/NfeRetRecepcao2'); LayNfeCancelamento : Result := DFeUtil.SeSenao(AAmbiente=1, 'https://nfe.sefaz.am.gov.br/services2/services/NfeInutilizacao2' 'https://homnfe.sefaz.am.gov.br/services2/services/NfeInutilizacao2'); LayNfeConsulta : Result := DFeUtil.SeSenao(AAmbiente=1, 'https://nfe.sefaz.am.gov.br/services2/services/NfeStatusServico2' 'https://homnfe.sefaz.am.gov.br/services2/services/NfeStatusServico2'); LayNfeCadastro : Result := DFeUtil.SeSenao(AAmbiente=1, 'https://nfe.sefaz.am.gov.br/services2/services/RecepcaoEvento' 'https://homnfe.sefaz.am.gov.br/services2/services/RecepcaoEvento'); end; end else begin (* case ALayOut of LayNfeRecepcao : Result := DFeUtil.SeSenao(AAmbiente=1, 'https://nfe.sefaz.am.gov.br/nfce-services/services/NfeRetRecepcao2' 'https://homnfce.sefaz.am.gov.br/nfce-services/services/NfeRetRecepcao2'); LayNfeInutilizacao : Result := DFeUtil.SeSenao(AAmbiente=1, 'https://nfe.sefaz.am.gov.br/nfce-services/services/NfeConsulta2' 'https://homnfce.sefaz.am.gov.br/nfce-services/services/NfeConsulta2'); LayNfeStatusServico : Result := DFeUtil.SeSenao(AAmbiente=1, 'https://nfe.sefaz.am.gov.br/nfce-services/services/RecepcaoEvento' 'https://homnfce.sefaz.am.gov.br/nfce-services/services/RecepcaoEvento'); end; *) // Novos endereços disponibilizados para a NFC-e case ALayOut of LayNfeRecepcao : Result := DFeUtil.SeSenao(AAmbiente=1, 'https://nfce.sefaz.am.gov.br/nfce-services/services/NfeRetRecepcao2' 'https://homnfce.sefaz.am.gov.br/nfce-services-nac/services/NfeRetRecepcao2'); LayNfeInutilizacao : Result := DFeUtil.SeSenao(AAmbiente=1, 'https://nfce.sefaz.am.gov.br/nfce-services/services/NfeConsulta2' 'https://homnfce.sefaz.am.gov.br/nfce-services-nac/services/NfeConsulta2'); LayNfeStatusServico : Result := DFeUtil.SeSenao(AAmbiente=1, 'https://nfce.sefaz.am.gov.br/nfce-services/services/RecepcaoEvento' 'https://homnfce.sefaz.am.gov.br/nfce-services-nac/services/RecepcaoEvento'); end; end; end; Obrigado, Solivan!

Esse que postei não é um aplicativo e sim um componente com modelos de codigos de barras a perder de vista, dos quais o QRCode também faz parte, devo ter me equivocado ao passar a URL do verdadeiro componente. Eu verifiquei a URL do SVN do Zint que uso e constatei que estamos falando do mesmo componente URL para a Suíte: http://theunknownones.googlecode.com/svn Somente o Zint em questão: http://theunknownones.googlecode.com/svn/trunk/Components/ZintBarcode/ Solivan.