rommaraujo

a Função ehAutorizacao já possui esse codigo atualizado no ACBr. Vou checar o arquivo .ini

Eu tenho conversado com alguns amigos para nos organizarmos em Associação para podermos tratar desses e outros assuntos juntos as Secretarias de Fazenda. Acredito ser esta uma boa saída, pois hoje não há quem cobre uma posição e fica tudo muito disperso.

Olá, estamos passando pela mesma dificuldade com NFC-e, já envie e-mail para sefaz-am perguntando se o servidor de produção estava passando algum tipo de instabilidade, mas segundo eles está tudo normal. Quando testamos em homologação funciona normalmente, mas basta colocar em produção e apenas consultar o status de uma nota que o sistema já retorna timeOut.

Nós também estamos com essa mesma dificuldade em nossos módulos fiscais. Mesmo configurando o ACBr com os parâmetros abaixo o sistema retorna modo: Assincrono ou Sincrono SSLLib=Wincrypt, CryptLib=WinCrypt, HTTPLib=Winhttp, XMLSign=MsXML, Timeout=30000 e Tantivas=4 Mesmo assim continuamos tendo problemas com a maioria dos nossos clientes.

Preciso salvar o texto da impressão da DANFE para ser enviada na tag ImpressãoFiscal da RespostaFiscal do MFe existe uma maneira de fazer isso? estou usando ESCPOS do AcbrMonitor, mas ele não retorna nenhum texto.

Já havia visto este tópico e não resolveu. Hoje voltou a funcionar normalmente. : ) Obrigada.

uso certificado próprio e sou do amazonas

Comecei a testar a versão 4.0 do nfce e está retornando este erro. Erro Interno: 0 Erro HTTP: 500

Olá pessoal, estou com o mesmo problema citado no tópico. No meu caso já reinstalei várias vezes o Delphi 7, gostaria que alguém apontasse a forma correta de instalar o Delphi!

Como faço pra usar com OpenSSL André?...

Olás Regys, geralmente uso Serasa ou VALID, em ambos já tive essa dificuldade, você já usou algum certificados desses com o WebService do Amazonas?

Olá senhores, como já é do conhecimento de todos, para que funcione corretamente o envio de Notas Fiscais, é necessário que nas Configurações Avançadas da Internet, estejam marcadas as opções: SSL 2.0 e TLS 1.0, e estejam desmarcadas as opções SSL 3.0 e TLS 1.1 e TLS 1.2, pois bem, tenho um cliente que utiliza o site da Caixa Econômica para realizar diversos serviços por lá, para que tudo funcione corretamente no site é necessários que as opções SSL 3.0 e TLS 1.1 e 1.2 estejam marcadas, eu gostaria de saber se há alguma solução para este conflito? e qual o motivo de termos que configurar as opções de internet desta maneira?

Estou com o mesmo problema citado acima... Já tem solução?

Barbosa, estou precisando gerar o SPED com NFCe, e nesse caso não devem ser informados no C100 e C190 os registros de PIS e COFINS, e nem os de ST de todos, já tentei colocar com zero, mas ele cria os campos e isso gera um erro no validador. Essa mudança contempla isso também?

André encontrei a falha nesta rotina. O seu aruiqvo de teste não possui a tag <enviDIe> e por consequência o seu fechamento <enviDIe>. quando invoco o método Assinar que ele acrescenta a estrutura de assinatura ao final ele devolve apenas a </DIe>, faltando acrescentar a tag </enviDIe>. Feito isto a rotina funcionou perfeitamente. Se possível seria interessante acrescentar na rotina de assinatura o tipo DIe em futuras versões do ACBr, se este tipo de documento existir para outros estados além do Amazonas. Muito obrigado pela colaboração. É sempre bom saber que podemos contar com a cooperação de profissionais competentes. Cordialmente, Rômulo Araújo.

André, usando esta rotina quando tentar carregar o arquivo na instrução: If not xmldoc.loadXML(XML) then raise EACBrNFeException.Create('Não foi possível carregar o arquivo XML:'+XML); Ela retorna Exceção. Em anexo estou colocando um dos vários arquivos que usei para teste. DIe1401507761.xml

Andre vou testar e te retorno. Por enquanto muito obrigado.

André, Valeu pelas dicas. Executei todos os procedimentos cima citados por você. Acredito que não estou conseguindo assinar corretamente o documento XML, pois após gerar o XML assinado eu invoco o método NFeUtil.ValidaAssinatura e ele me retorna a seguinte mensagem: "Erro ao verificar assinatura do arquivo: The digest value computed does not match with the provided one for Reference uri '#Die1401507761'. É como se o digest fosse calculado para um arquivo e depois este arquivo é alterado. Porém para mim isto é muito estranho pois esta rotina é praticamente um clone da Rotina NFeUtil.AssinarMSXML, como você pode ver anteriormente. Em anexo estou te enviando um arquivo menor que estou usando para teste com versão assinada e outra não assinada, para ver se juntos encontramos o que pode estar acontecendo. Acredito que seja algum detalhe que eu esteja cometendo de errado nesta rotina de assinar, mas como você tem mais experiência poderá me auxiliar melhor. Desde já agradeço pela cooperação. DIe1401507761notsingned.xml DIe1401507761.xml

Utilizo ao ACBr para emissão de NFe e NFCe, e em ambos os casos tudo tem funcionado perfeitamente com a CAPICOM. Também criei uma função com base na função NFeUtil.Assinar para assinar outro modelo de documento XML chamado de DAI (Declaração Amazonense de Importação), enquanto eu estava usando a versão anterior do ACBr eu conseguia assinar e validar estes arquivos de DAI no site da sefaz. Porém a poucos dias atualizei a versão do ACBR, devido a atualização para o padrão 3.10 do NFCe e e estes documentos de DAI passaram a ser rejeitos com a seguinte mensagem de retorno: Assinatura Inválida (Digest do Documento não Confere). O Interessante é quando utilize outro aplicativo para assinar o documento como XML Signer o digest value gerado é diferente do gerado por esta função que uso (detalhe estou usando o mesmo certificado digital para ambas aplicações). Alguém pode me dar uma dica do que está acontecendo? Abaixo a função que uso e em anexo o arquivo assinado: Desde já agradeço pelo suporte técnico. function AssinarDIe(XML : AnsiString; Certificado : ICertificate2; out XMLAssinado : AnsiString): Boolean; var I, J, PosIni, PosFim : Integer; URI : String ; Tipo : Integer; xmlHeaderAntes, xmlHeaderDepois : AnsiString ; xmldoc : IXMLDOMDocument3; xmldsig : IXMLDigitalSignature; dsigKey : IXMLDSigKey; signedKey : IXMLDSigKey; begin Assinatura:=TStringList.Create; Assinatura.Clear; if (Pos('<Signature',XML) <= 0) and (TipoAssinatura='Matriz') then //Assinar MatrizDIe begin I := pos('<InfMatrizDIe',XML) ; Tipo := 1; URI := 'MatrizDIe00000041483057' ; if Tipo = 1 then XML := copy(XML,1,pos('</MatrizDIe>',XML)-1); XML := XML + '<Signature xmlns="http://www.w3.org/2000/09/xmldsig#"><SignedInfo><CanonicalizationMethod Algorithm="http://www.w3.org/TR/2001/REC-xml-c14n-20010315"/><SignatureMethod Algorithm="http://www.w3.org/2000/09/xmldsig#rsa-sha1" />'; XML := XML + '<Reference URI="#'+URI+'">'; XML := XML + '<Transforms><Transform Algorithm="http://www.w3.org/2000/09/xmldsig#enveloped-signature" /><Transform Algorithm="http://www.w3.org/TR/2001/REC-xml-c14n-20010315" /></Transforms><DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1" />'; XML := XML + '<DigestValue></DigestValue></Reference></SignedInfo><SignatureValue></SignatureValue><KeyInfo></KeyInfo></Signature>'; if Tipo = 1 then XML := XML + '</MatrizDIe>'+'</enviMatrizDIe>'; end Else begin //Assinar DIe I := pos('<InfDIe',XML) ; Tipo := 2; URI := URIDIe ; end; // Lendo Header antes de assinar // xmlHeaderAntes := '' ; I := pos('?>',XML) ; if I > 0 then xmlHeaderAntes := copy(XML,1,I+1) ; xmldoc := CoDOMDocument50.Create; xmldoc.async := False; xmldoc.validateOnParse := False; xmldoc.preserveWhiteSpace := True; xmldsig := CoMXDigitalSignature50.Create; if (not xmldoc.loadXML(XML) ) then begin Log:=TStringList.Create; Log.Text:=xml; Log.SaveToFile('C:\LogDAI.XML'); raise EACBrNFeException.Create('Não foi possível carregar o arquivo (Foi Gerado um Log em C:\LogDAI.txt).'); end; xmldoc.setProperty('SelectionNamespaces', DSIGNS); xmldsig.signature := xmldoc.selectSingleNode('.//ds:Signature'); if (xmldsig.signature = nil) then raise EACBrNFeException.Create('É preciso carregar o template antes de assinar.'); if NumCertCarregado <> Certificado.SerialNumber then CertStoreMem := nil; if CertStoreMem = nil then begin CertStore := CoStore.Create; CertStore.Open(CAPICOM_CURRENT_USER_STORE, 'My', CAPICOM_STORE_OPEN_MAXIMUM_ALLOWED); CertStoreMem := CoStore.Create; CertStoreMem.Open(CAPICOM_MEMORY_STORE, 'Memoria', CAPICOM_STORE_OPEN_MAXIMUM_ALLOWED); Certs := CertStore.Certificates as ICertificates2; for i:= 1 to Certs.Count do begin Cert := IInterface(Certs.Item) as ICertificate2; if Cert.SerialNumber = Certificado.SerialNumber then begin CertStoreMem.Add(Cert); NumCertCarregado := Certificado.SerialNumber; end; end; end; OleCheck(IDispatch(Certificado.PrivateKey).QueryInterface(IPrivateKey,PrivateKey)); xmldsig.store := CertStoreMem; dsigKey := xmldsig.createKeyFromCSP(PrivateKey.ProviderType, PrivateKey.ProviderName, PrivateKey.ContainerName, 0); if (dsigKey = nil) then raise EACBrNFeException.Create('Erro ao criar a chave do CSP.'); signedKey := xmldsig.sign(dsigKey, $00000002); if (signedKey <> nil) then begin XMLAssinado := xmldoc.xml; PosIni := Pos('<SignatureValue>',XMLAssinado) + length('<SignatureValue>'); PosFim := Pos('</SignatureValue>',XMLAssinado)-1; PosIni := Pos('<SignatureValue>',XMLAssinado)+length('<SignatureValue>'); XMLAssinado := copy(XMLAssinado,1,PosIni-1) + StringReplace( copy(XMLAssinado,PosIni,length(XMLAssinado)), ' ', '', [rfReplaceAll] ) ; PosIni := Pos('<X509Certificate>',XMLAssinado)-1; PosFim := DFeUtil.PosLast('<X509Certificate>',XMLAssinado); XMLAssinado := copy(XMLAssinado,1,PosIni)+copy(XMLAssinado,PosFim,length(XMLAssinado)); end else raise EACBrNFeException.Create('Assinatura Falhou.'); if xmlHeaderAntes <> '' then begin I := pos('?>',XMLAssinado) ; if I > 0 then begin xmlHeaderDepois := copy(XMLAssinado,1,I+1) ; if xmlHeaderAntes <> xmlHeaderDepois then XMLAssinado := StuffString(XMLAssinado,1,length(xmlHeaderDepois),xmlHeaderAntes) ; end else XMLAssinado := xmlHeaderAntes + XMLAssinado ; end ; dsigKey := nil; signedKey := nil; xmldoc := nil; xmldsig := nil; Assinatura.Clear; Assinatura.Text:=XMLAssinado; Result := True; end; 1413914987.xml

Obrigado Italo, então já vou verificando aqui como posso resolver esta situação da mensagem em contingência, depois dou um retorno aqui no grupo.

Olá, li no manual que o DANFE da NFCe emitida em modo de contigência off-line (9) tem que aparecer a mensagem indicando que foi : 'EMITIDA EM CONTIGÊNCIA' fiz o teste aqui com esse DANFE do FastReport e não saiu nenhuma mensagem, o componente ainda não está atendendo este requisito ou faltou eu parametrizar alguma coisa?

Obrigado Sulivan, eu verifiquei isso mesmo dando uma olhada com mais calma no tópico! Já consegui emitir, consultar e gerar o DANFE, graças a Deus meu QRCode funcionou (Quase que de primeira, não fosse o endereço de consulta em homologação que estava errado). Enfim, muito obrigado mesmo a todos vocês que cooperam muito pra facilitar o trabalho dos desenvolvedores!..... Me diga só mais uma coisa, esse DANFE aí já está atendendo completamente à legislação vigente?

Olá, peço ajuda novamente!..... Eu vi esse código aqui na discussão do post, mas não entendi a linha em negrito, pra que serve este arquivo que está apontando? ... outra coisa... o Modelo da NFCe que já postaram imagens diversas vezes, ele já vem pronto nesse componente do DANFEFR? ACBrNFeDANFEFR1.FastFile := 'C:\DANFeNFCe.fr3'; ACBrNFeDANFEFR1.ImgQrCode := 'C:\QR.jpeg'; ACBrNFe1.NotasFiscais.Clear; ACBrNFe1.NotasFiscais.LoadFromFile(PathDoXML); ACBrNFe1.NotasFiscais.Imprimir;

Obrigado Brasil, vou prosseguir aqui na implementação e posto um feedback assim que estiver pronto!

Olá, tenho acompanhado bastante o post e estou desenvolvendo um aplicativo de NFC-e também, aqui pra empresa. Já instalei os componentes necessários para gerar o QRCode (ZintBarCode) e o FastReport (tudo que foi indicado e resultou em sucesso nos aplicativos dos programadores aqui). Bom, algo não ficou claro pra mim: Essa geração do QRCode e Hash, dentro desse código padrão que a maioria de vocês estão utilizando, isso tudo é gerado antes do processo de envio na NFC-e ou na hora da impressão? .. Digo isso porque eu já gerei uma NFC-e e Consultei sem problemas, mas nessa parte da impressão não entendi isso aí.