Paulo C. L. Vicente

Boa tarde. Esse erro foi desgastante para contornar: O atributo 'Algorithm' tem valor 'http://www.w3.org/2001/04/xmldsig-more#rsa-sha256' que não corresponde ao valor fixo 'http://www.w3.org/2000/09/xmldsig#rsa-sha1' no DTD ou no esquema. Ocorria em computadores com Windows 10 versão de 32 bits. Só uso certificado A1. Estes arquivos mantenho numa pasta compartilhada no servidor: fbclient.dll gds32.dll msvcm80.dll msvcp80.dll msvcr80.dll capicom.dll iconv.dll inpout32.dll libeay32.dll libxml2.dll libxmlsec-openssl.dll libxmlsec.dll libxslt.dll msvcr71.dll msxml5.dll msxml5r.dll ssleay32.dll zlib1.dll Não instalo o sistema nas estações, acesso através da rede. Não uso o instalador do Firebird nas estações. Nas estações, copio para a pasta System32 ou SysWOW64 e registro: capicom.dll msxml5.dll msxml5r.dll Durante o problema estava usando esta configuração: ACBrNFe1.Configuracoes.Geral.SSLLib := libWinCrypt; ACBrNFe1.Configuracoes.Geral.SSLCryptLib := cryWinCrypt; ACBrNFe1.Configuracoes.Geral.SSLHttpLib := httpWinHttp; ACBrNFe1.Configuracoes.Geral.SSLXmlSignLib := xsMsXml; ACBrNFe1.SSL.SSLType := LT_TLSv1_2; No meu caso foi resolvido usando esta configuração: ACBrNFe1.Configuracoes.Geral.SSLLib := libOpenSSL; ACBrNFe1.Configuracoes.Geral.SSLCryptLib := cryOpenSSL; ACBrNFe1.Configuracoes.Geral.SSLHttpLib := httpOpenSSL; ACBrNFe1.Configuracoes.Geral.SSLXmlSignLib := xsXmlSec; ACBrNFe1.SSL.SSLType := LT_ALL; Abraços Paulo C. L. Vicente

Em função do exposto pelo juliomazoni, semelhante ao que já é feito para geração de outros grupos de impostos, minha sugestão para gerar o grupo ICMSUFDest somente quando necessário: procedure TNFeW.GerarDetImpostoICMSUFDest(const i: Integer); begin if (nfe.Det[i].Imposto.ICMSUFDest.vBCUFDest > 0) or (nfe.Det[i].Imposto.ICMSUFDest.pICMSInter > 0) or (nfe.Det[i].Imposto.ICMSUFDest.pICMSInterPart > 0) then begin Gerador.wGrupo('ICMSUFDest', 'NA01'); Gerador.wCampo(tcDe2, 'NA03', 'vBCUFDest', 01, 15, 1, nfe.Det[i].Imposto.ICMSUFDest.vBCUFDest, DSC_VBCUFDEST); Gerador.wCampo(IIf(Usar_tcDe4,tcDe4,tcDe2), 'NA05', 'pFCPUFDest', 01, IIf(Usar_tcDe4,07,05), 1, nfe.Det[i].Imposto.ICMSUFDest.pFCPUFDest, DSC_PFCPUFDEST); Gerador.wCampo(IIf(Usar_tcDe4,tcDe4,tcDe2), 'NA07', 'pICMSUFDest', 01, IIf(Usar_tcDe4,07,05), 1, nfe.Det[i].Imposto.ICMSUFDest.pICMSUFDest, DSC_PICMSUFDEST); // Alterado para ficar em conformidade com o novo Schema Gerador.wCampo(tcDe2, 'NA09', 'pICMSInter ', 01, 05, 1, nfe.Det[i].Imposto.ICMSUFDest.pICMSInter, DSC_PICMSINTER); Gerador.wCampo(IIf(Usar_tcDe4,tcDe4,tcDe2), 'NA11', 'pICMSInterPart', 01, IIf(Usar_tcDe4,07,05), 1, nfe.Det[i].Imposto.ICMSUFDest.pICMSInterPart, DSC_PICMSINTERPART); Gerador.wCampo(tcDe2, 'NA13', 'vFCPUFDest ', 01, 15, 1, nfe.Det[i].Imposto.ICMSUFDest.vFCPUFDest, DSC_VFCPUFDEST); Gerador.wCampo(tcDe2, 'NA15', 'vICMSUFDest ', 01, 15, 1, nfe.Det[i].Imposto.ICMSUFDest.vICMSUFDest, DSC_VICMSUFDEST); Gerador.wCampo(tcDe2, 'NA17', 'vICMSUFRemet', 01, 15, 1, nfe.Det[i].Imposto.ICMSUFDest.vICMSUFRemet, DSC_VICMSUFREMET); Gerador.wGrupo('/ICMSUFDest'); end; end;

Segundo informações na página http://www.sped.fazenda.pr.gov.br/modules/conteudo/conteudo.php?conteudo=104 Para consulta em produção ou homologação utiliza-se a mesma URL www.dfeportal.fazenda.pr.gov.br/dfe-portal/rest/servico/consultaNFCe No exemplo na mesma página é usado http Fiz um teste com http e consegui enviar o XML Só não consegui entender onde isso pode ser ajustado. Obrigado

Segundo informações na página http://www.sped.fazenda.pr.gov.br/modules/conteudo/conteudo.php?conteudo=104 Para consulta em produção ou homologação utiliza-se a mesma URL www.dfeportal.fazenda.pr.gov.br/dfe-portal/rest/servico/consultaNFCe No exemplo na mesma página é usado http Fiz um teste com http e consegui enviar o XML Só não consegui entender onde isso pode ser ajustado. Obrigado

A partir da informação no post http://www.projetoacbr.com.br/forum/topic/19199-qr-code-paran%C3%A1/ gerei o XML em anexo com o endereço www.dfeportal.fazenda.pr.gov.br/dfe-portal/rest/servico/consultaNFCeTeste mas a msg de erro continua a mesma Obrigado 41151179569471000175650010000000021000000519-NFCe.xml

Testes no ambiente de homologação. No dia 03/11 consegui enviar um XML para a SEFAZ/PR e gerar uma NFCe ok. Hoje, ao enviar mais um XML de NFCe, passei a receber a msg de erro exigindo informar o QRCode. Passei a usar ACBrNFe1.Configuracoes.Geral.IncluirQRCodeXMLNFCe := True; e passsei a receber a msg de erro: "Endereco do site da UF da Consulta via QR-Code diverge do previsto" Estou usando os schemas de 29/10 e a última versão do trunk2 Segue XML usado no teste. Desde já agradeço.41151179569471000175550010000000021000000516-NFCe.xml

Bom dia. A única informação que consta no site da Prefeitura de São José/SC, é que o sistema atual(novo como é citado na página abaixo) é o Pronim. Não recebemos nenhuma comunicação oficial, até o momento, de que haverá nova alteração. http://www.saojose.sc.gov.br/index.php/sao-jose/nota-fiscal-de-servicos-eletronica-nfs-e Obrigado.

Italo, eu que agradeço pelos componentes dos projeto. Parabéns a todos os envolvidos pelo incrível trabalho realizado.

Bom dia. Fiz alguns testes em ambiente de homologação usando o provedor GovBR e não consegui enviar lote. Após ler aqui sobre o provedor Pronim fiz as alterações abaixo e conegui enviar lote, consultar situação e obter código de verificação. - Alterado 4216602 (São José/SC) do provedor Betha para o provedor Pronim unit pnfsConversao function CodCidadeToProvedor - acrescentada 4216602 para assinar lote unit ACBrProvedorPronim function GetConfigCidade - acrecentada cidade 4216602 unit ACBrProvedorPronim function GetConfigURL pnfsConversao.pas ACBrProvedorPronim.pas

Bom dia. Quando implementei a geração de arquivo para importar no site de algumas Prefeituras fiz uma rotina que concatena o texto dos serviços existentes na nf da minha apicação numa única string e informa como serviço único. Concatenei, também, a lista de vencimentos das parcelas, além de uma mensagem quando é definido que haverá depósito em conta por parte do cliente. Fiz isso porque obtive a informação de que cada nota somente pode ter um item. Att Paulo

Bom dia Proponho uma pequena alteração, para converter a variável CaminhoXML em parâmetro function GerarXML(Arquivo : AnsiString; CaminhoXML : AnsiString = '') : String; e ao final da função alterar if CaminhoXML = '' then CaminhoXML := PathWithDelim(ExtractFilePath(Application.ExeName))+copy(NFe.infNFe.ID, (length(NFe.infNFe.ID)-44)+1, 44)+'-nfe.xml'; Com isso é possível definir antes da chamada da função o caminho+nome do arquivo XML criado; Após alguns testes, alterei a linha if LerCampo(Grupo,'|&|IMPOSTO SOBRE PRODUTOS INDUSTRIALIZADOS|&|')<>'' then para if LerCampo(Grupo,'|&|IMPOSTO SOBRE PRODUTOS INDUSTRIALIZADOS |&|')<>'' then Na página obtida do SEFAZ tem um espaço a mais e isto estava impedindo a inclusão do IPI no XML Obrigado Paulo C. L. Vicente

Boa tarde ao usar o componente não estava retornando o número do protocolo no método TRetCCeNFe.LerXml alterei as linhas if Leitor.rExtrai(1, 'retEnvEvento') <> '' then para if Leitor.rExtrai(1, 'retEvento') <> '' then (*HR25 *)FretEvento.Items.FRetInfEvento.FdhRegEvento := Leitor.rCampo(tcStr, 'dhRegEvento'); para (*HR25 *)FretEvento.Items.FRetInfEvento.FdhRegEvento := Leitor.rCampo(tcDatHor, 'dhRegEvento'); resolveu meu problema Obrigado Paulo