Leonardo Gregianin
Membros-
Total de ítens
712 -
Registro em
-
Última visita
Tipo de Conteúdo
Blocks
Notes ACBrLibNFe
Fóruns
Downloads
Calendário
Tudo que Leonardo Gregianin postou
-
Nfc-E - Nota Fiscal Do Consumidor Eletrônica
Leonardo Gregianin replied to André Ferreira de Moraes's tópico in ACBrNFe
Emerson, O FastReport aceita vários formatos como: BMP, JPG, PNG, etc. Salvo em formato PNG com a API do Google Charts e passo ACBrNFeDANFEFR1.Logo := c:\imagem.png'; Qualquer problema, avisa. -
Danny, Também tenho este problema, tente fazer o segue abaixo na unit ACBrDANFeCBRaveRetrato.pas: Linha 125: - if Length(vEnd)>122 then + if Length(vEnd)>100 then Linha 128: - PrintCenter(vEnd,PosX+(aWidthOutros/2)); + PrintLeft(vEnd,PosX+1); Linha 131: - PrintCenter(vEnd,PosX+(aWidthOutros/2)); + PrintLeft(vEnd,PosX+1); Linha 135: - PrintCenter(vEnd,PosX+(aWidthOutros/2)); + PrintLeft(vEnd,PosX+1); Isso faz com que seja iniciada a impressão na margem esquerda, da mesma forma que faz na impressão em paisagem. E a segunda linha é iniciada após o caracter 100 da primeira linha.
-
Nfc-E - Nota Fiscal Do Consumidor Eletrônica
Leonardo Gregianin replied to André Ferreira de Moraes's tópico in ACBrNFe
Bom dia, Fiz a atualização do Danfe NFC-e em FastReport: * Inclusão do campo "Valor Desconto R$" que busca a tag "VDesc" do grupo "Total". * Alteração da altura do Danfe na propriedade PaperHeight para 29,70. Útil somente para visualização em PDF pois na impressão não fiscal corta o papel ao final das informações do Danfe. Há a possibilidade de inclusão no svn das alterações do ACBrNFeDANFEFRDM.pas e .dfm ? -
Nfc-E - Nota Fiscal Do Consumidor Eletrônica
Leonardo Gregianin replied to André Ferreira de Moraes's tópico in ACBrNFe
Não poderei te ajudar muito, não sei como funciona o Monitor. -
Nfc-E - Nota Fiscal Do Consumidor Eletrônica
Leonardo Gregianin replied to André Ferreira de Moraes's tópico in ACBrNFe
Se o erro ocorre na "validação" dos dados você já gerou o XML. Conforme diz a mensagem de erro, você deve ter passado a tag XNome e não passou o resto dos dados. -
Nfc-E - Nota Fiscal Do Consumidor Eletrônica
Leonardo Gregianin replied to André Ferreira de Moraes's tópico in ACBrNFe
Poste o XML -
Peguei a mesma URL que você passou e troquei o "&tpAmb" para 2 e mostrou a nota no site. http://www.sefaz.mt.gov.br/nfce/consultanfce?chNFe=51131003460900000290650010000000031000000031&nVersao=100&tpAmb=2&cDest=02801244147&dhEmi=323031332D31302D32345431363A32313A30332D30333A3030&vNF=1,00&vICMS=0,00&digVal=78764D34764E2B48586A735657516F653474415A547855547764383D&cIdToken=000001&cHashQRCode=7AF4285DA2D18133BEF9F9370AD4A185B2527AFB Suspeito que o problema seja na Sefaz.
-
Meu código funciona assim: function StringToHex(S: String): String; var i: Integer; begin Result:= ''; for i := 1 to length(S) do Result:= Result+IntToHex(ord(S[i]),2); end; function Iif(Condicao: Boolean; Verdadeiro, Falso: Variant): Variant; begin if Condicao then Result := Verdadeiro else Result := Falso; end; if ACBrNFe1.NotasFiscais.Items[0].NFe.Ide.tpAmb = taProducao then URL := 'http://www.sefaz.mt.gov.br/nfce/consultanfce?' else URL := 'http://homologacao.sefaz.mt.gov.br/nfce/consultanfce?'; if ACBrNFe1.NotasFiscais.Items[0].NFe.Ide.tpAmb = taProducao then tpAmb := '1' else tpAmb := '2'; cDest := Iif(Length(ACBrNFe1.NotasFiscais.Items[0].NFe.Dest.CNPJCPF) > 0, ACBrNFe1.NotasFiscais.Items[0].NFe.Dest.CNPJCPF, ''); Memo.Lines.Clear; Memo.Text := URL + 'chNFe=' + ACBrNFe1.NotasFiscais.Items[0].NFe.procNFe.chNFe + '&nVersao=' + '100' + '&tpAmb=' + tpAmb + Iif((Length(cDest) > 0),('&cDest=' + cDest), '') + '&dhEmi=' + StringToHex(DateTimeTodhUTC(ACBrNFe1.NotasFiscais.Items[0].NFe.Ide.dEmi,GetUTC(ACBrNFe1.NotasFiscais.Items[0].NFe.emit.enderEmit.UF, ACBrNFe1.NotasFiscais.Items[0].NFe.Ide.dEmi))) + '&vNF=' + FormatFloat(',0.00;-,0.00', ACBrNFe1.NotasFiscais.Items[0].NFe.Total.ICMSTot.vNF) + '&vICMS=' + FormatFloat(',0.00;-,0.00', ACBrNFe1.NotasFiscais.Items[0].NFe.Total.ICMSTot.vICMS) + '&digVal=' + StringToHex(ACBrNFe1.NotasFiscais.Items[0].NFe.procNFe.digVal) + '&cIdToken=' + '000001'; Hash_SHA1 := ACBrEAD1.CalcularHash(UTF8Encode(Memo.Text), dgstSHA1); Memo.Text := Memo.Text + '&cHashQRCode=' + Hash_SHA1;
-
Bom dia leufmt, Veja como funciona o exemplo do NFSe na procedure TfrmDemo_ACBrNFSe.GerarNFSe(NumNFSe: String). As informações do número do RPS e data de emissão são geradas por você mesmo.
-
Como você está utilizando "Items[0].SaveToFile" então tem que limpar o componente a cada adição de dados com "ACBrNFe1.NotasFiscais.Clear"
-
Erro Consulta Nfse Por Rps - Savetostream Sem Conteudo Nas Tags Do Xml
Leonardo Gregianin replied to medreis's tópico in ACBrNFSe
Bom dia medreis, Ao passar os caminhos para salvar: ACBrNFSe1.Configuracoes.Arquivos.PathGer := ACBrNFSe1.Configuracoes.Arquivos.PathRPS := ACBrNFSe1.Configuracoes.Arquivos.PathNFSe := ACBrNFSe1.Configuracoes.Arquivos.PathCan := ACBrNFSe1.Configuracoes.Geral.PathSalvar := e habilitar as propriedades para salvar: ACBrNFSe1.Configuracoes.Arquivos.Salvar := True; ACBrNFSe1.Configuracoes.Geral.Salvar := True; ACBrNFSe1.Configuracoes.WebServices.Salvar := True; Após a consulta os arquivos são salvos automaticamente por isso não entendi o porque de usar SaveToStream. Outra situação é: Será que o correto seria mesmo utilizar SaveToStream? Em algumas situações eu utilizo SaveToFile: ACBrNFSe1.NotasFiscais.Items[0].SaveToFile(ACBrNFSe1.Configuracoes.Arquivos.PathNFSe + '\' + nronfse + '.xml'); Desculpe se falei qualquer besteira. -
Como ficou o resultado desta alteração, está no svn e ficou ok?
-
Impressão Da Acbrnfse Com Fast Report
Leonardo Gregianin replied to diego.camposrosa's tópico in ACBrNFSe
Bom dia diego.camposrosa, Nos arquivos que postou não consta nenhuma NFSe somente os RPS, você quer visualizar os RPS mesmo? Se for, não existe layout para RPS no ACBr, porém a visualização do RPS pode ser feita da mesma forma que a NFSe. O que aparece na minha visualização é o número do RPS, dados do tomador, discriminação do serviço, código do serviço, os valores e as retenções. Como é somente um recibo provisório, o que você precisa imprimir mesmo é a NFSe, precisa de algo mais? -
Nfc-E - Nota Fiscal Do Consumidor Eletrônica
Leonardo Gregianin replied to André Ferreira de Moraes's tópico in ACBrNFe
Por enquanto utilizo o site do Google Chart, neste artigo tem o exemplo em Delphi, e depois da visualização salvo a imagem na máquina -
Nfc-E - Nota Fiscal Do Consumidor Eletrônica
Leonardo Gregianin replied to André Ferreira de Moraes's tópico in ACBrNFe
Tente assim: FormatDateTime('yyyy-mm-ddThh:nn:ss-03:00', NFe.NotasFiscais.Items[i].NFe.Ide.dEmi)); -
Nfc-E - Nota Fiscal Do Consumidor Eletrônica
Leonardo Gregianin replied to André Ferreira de Moraes's tópico in ACBrNFe
Para Mato Grosso os endereços são: http://www.sefaz.mt.gov.br/nfce/consultanfce? e http://homologacao.sefaz.mt.gov.br/nfce/consultanfce? Os endereços de todos os Estados estão aqui. -
Nfc-E - Nota Fiscal Do Consumidor Eletrônica
Leonardo Gregianin replied to André Ferreira de Moraes's tópico in ACBrNFe
Boa tarde, Como forma de retribuir a imensa ajuda que os componentes do ACBr nos dão, já que não pago o SAC tento contribuir com código ou encontrar bugs. Criei um layout para NFC-e no FastReport com largura do papel de 8 cm para ser utilizado em impressoras não fiscais, mas nada impede de ser impresso em papel A4. As alterações foram feitas somente no carregamento dos dados para o ClientDataSet do FastReport (ACBrNFeDANFEFRDM.pas) como: * Criado o ClientDataSet para a tag "pag" (tag exlusiva para NFC-e) * Alterado o ClientDataSet "Identificacao" para carregar a "MensagemFiscal" e compatibilizado a tag "DEmi" para a NFCe mostrar Data e Hora. * Criado no CDS "Destinatario" o campo "Consumidor". Nenhuma destas alterações influenciam ou causa "problemas" na impressão da NF-e. Em anexo os arquivos ACBrNFeDANFEFRDM.pas e ACBrNFeDANFEFRDM.dfm com os últimos fontes do svn. Limitações: 1. A impressão do QR Code vem de uma imagem externa, da mesma forma que é utilizado na impressão da logomarca da empresa. A fazer: 1. Selecionar a URL dos Estados para gerar o endereço do site de consulta. Pág. 14 do Manual de Especificações Técnicas do DANFE NFC-e e QR Code - versão 3.1 2. Criar uma nova propriedade no componente Danfe em FastReport para receber o caminho da imagem QR Code. Utilização: 1. Caminho do arquivo FastReport: ACBrNFeDANFEFR1.FastFile := 'C:\DANFeNFCe.fr3'; 2. Caminho da imagem QR Code: ACBrNFeDANFEFR1.Logo := C:\QR.jpeg'; 3. Imprimir: ACBrNFe1.NotasFiscais.Clear; ACBrNFe1.NotasFiscais.LoadFromFile(PathDoXML); ACBrNFe1.NotasFiscais.Imprimir; Em anexo como ficou minha impressão, espero que ajude. -
Nfc-E - Nota Fiscal Do Consumidor Eletrônica
Leonardo Gregianin replied to André Ferreira de Moraes's tópico in ACBrNFe
Será que a mesma base do código do ACBr para o Danfe em FastReport, criando um novo layout para NFCe e passando a imagem do QR Code como uma imagem externa não daria para fazer? -
Alguém que utilize envio por DPEC poderia comentar esta situação?
-
Nfc-E - Nota Fiscal Do Consumidor Eletrônica
Leonardo Gregianin replied to André Ferreira de Moraes's tópico in ACBrNFe
Tenho uma NFCe em ambiente de produção que está com o mesmo erro no site, a leitura do QR Code por celular funciona perfeitamente. Talvez o site da Sefaz não está conseguindo gerar o QR Code com o hash da URL. Segue o link: http://www.sefaz.mt.gov.br/nfce/consultanfce?chNFe=51130915375991000679650040000021351000021359&nVersao=100&tpAmb=1&dhEmi=323031332D30392D32315431363A31363A31322D30343A3030&vNF=367.58&vICMS=0&digVal=627934516769722B646E4E572B544F5117870435651178626A4B44343D&cIdToken=000001&cHashQRCode=EC5DC564AEE7E96325AA14066C1FE3E3D311E2D2 -
Nfc-E - Nota Fiscal Do Consumidor Eletrônica
Leonardo Gregianin replied to André Ferreira de Moraes's tópico in ACBrNFe
udenilson, o endereço da sua NFCe é esse: http://homologacao.sefaz.mt.gov.br/nfce/consultanfce?chNFe=51131009471363000180650010000000021000000025&nVersao=100&tpAmb=2&cDest=80704611104&dhEmi=323031332d31302d31355431303a34323a32382d30343a3030&vNF=10.00&vICMS=1.70&digVal=57362b6e67566f796b69426f33396869372b4a57563763307337383d&cIdToken=000001&cHashQRCode=EECCAE64A51CBFFEEB0F724B7E2B7BF5305E4EC4 Parabéns, só o QR Code ainda está errado. A mensagem do site "Erro 100 - QR Code Inválido." -
Primeira Versão Do Acbrnfemonitor Compatível Com Nfc-E
Leonardo Gregianin replied to André Ferreira de Moraes's tópico in ACBrNFe
É o que eu faço.- 318 replies
-
- acbrnfemonitor
- nfce
- (e 2 mais)
-
Primeira Versão Do Acbrnfemonitor Compatível Com Nfc-E
Leonardo Gregianin replied to André Ferreira de Moraes's tópico in ACBrNFe
Não seria bem isso que eu pensava. A diretiva NF_V_310 seria somente em tempo de compilação e ao propor uma nova propriedade no componente o próprio usuário do sistema definiria a versão que quer utilizar.- 318 replies
-
- acbrnfemonitor
- nfce
- (e 2 mais)
-
Primeira Versão Do Acbrnfemonitor Compatível Com Nfc-E
Leonardo Gregianin replied to André Ferreira de Moraes's tópico in ACBrNFe
Boa tarde Ítalo, Eu acredito que uma nova propriedade no componente seria a forma mais simples e eficiente, já que futuramente pode haver a mesma situação que ocorre hoje. Como não se pode enviar o Xml na versão 3.10 gerando a rejeição "Cabeçalho - versão do arquivo XML superior a versão vigente", acho suficiente trabalhar somente com a constante "NFenviNFe". No meu sistema eu altero a constante para variável "NFenviNFe" e alimento ela no construtor da classe "NotaFiscal.Create" e consigo gerar, assinar e validar o xml.- 318 replies
-
- acbrnfemonitor
- nfce
- (e 2 mais)