[xmlParseDoc erro ao ler Xml de NFS-e]

Não resolveu.

no debug mostra erro: 

'Input is not proper UTF-8, indicate encoding !
Bytes: 0xBA 0x20 0x37 0x36
'

[xmlParseDoc erro ao ler Xml de NFS-e]

Na unit ACBrXmlDocument;

 loadedDoc := xmlParseDoc(PAnsiChar(ansistring(AXmlDocument)));

loadedDoc fica como null, não lendo o arquivo XML, retirei todos acentos do arquivo, mas mesmo erro.

Será que tem mais algum caractere inválido?

 

 

conteúdo de AXmlDocument:

'<CompNfse><Nfse><InfNfse><Numero>642</Numero><CodigoVerificacao>9E A3 3A</CodigoVerificacao><DataEmissao>2022-01-11T16:28:39</DataEmissao><NaturezaOperacao>1</NaturezaOperacao><RegimeEspecialTributacao>1</RegimeEspecialTributacao><OptanteSimplesNacional>2</OptanteSimplesNacional><IncentivadorCultural>2</IncentivadorCultural><Competencia>202201</Competencia><NfseSubstituida>626</NfseSubstituida><OutrasInformacoes>.</OutrasInformacoes><Servico><ItemListaServico>101</ItemListaServico><CodigoCnae>6202300</CodigoCnae><CodigoTributacaoMunicipio>10700</CodigoTributacaoMunicipio><Discriminacao>Suporte e atualizacao do sistema '#$D#$D'Total = R$ 7.841,00'#$D'Condicao de pagamento: 18/01/2022'#$D#$D'Valor aproximado dos tributos R$ 1.361,20 (17,36%) Fonte: IBPT'#$D#$D'I - DOCUMENTO EMITIDO POR ME OU EPP OPTANTE PELO SIMPLES NACIONAL"; e II - "NAO GERADIREITO A CREDITO FISCAL DE IPI."'#$D'Dispensada de retencao de IRRF de acordo com a (IN RFB nº 765/2007, c/c os artigos 181 a 184 do RIR/2018)'#$D'Dispensada de retencao de CSRF de acordo com a (IN SRF nº 459/2004, artigo 3º)</Discriminacao><MunicipioPrestacaoServico>3543402</MunicipioPrestacaoServico><Valores><ValorServicos>7841</ValorServicos><ValorDeducoes>0</ValorDeducoes><ValorPis>0</ValorPis><ValorCofins>0</ValorCofins><ValorInss>0</ValorInss><ValorIr>0</ValorIr><ValorCsll>0</ValorCsll><IssRetido>2</IssRetido><OutrasRetencoes>0</OutrasRetencoes><BaseCalculo>7841</BaseCalculo><Aliquota>2</Aliquota><ValorLiquidoNfse>7841</ValorLiquidoNfse><ValorIssRetido>0</ValorIssRetido><ValorIss>156.82</ValorIss><DescontoCondicionado>0</DescontoCondicionado><DescontoIncondicionado>0</DescontoIncondicionado></Valores></Servico><PrestadorServico><IdentificacaoPrestador><CpfCnpj><Cnpj>34785106000160</Cnpj></CpfCnpj><InscricaoMunicipal>20117602</InscricaoMunicipal></IdentificacaoPrestador><RazaoSocial>Idever Inteligencia Digital Ltda</RazaoSocial><Endereco><Endereco>Rua Jose Bianchi</Endereco><Numero>555</Numero><Complemento>- sala 150</Complemento><Bairro>Nova Ribeirania</Bairro><Cidade>3543402</Cidade><Estado>SP</Estado><Cep>14096730</Cep></Endereco><Contato><Telefone>1691038292</Telefone><Email>[email protected]</Email></Contato></PrestadorServico><TomadorServico><IdentificacaoTomador><CpfCnpj><Cnpj>53045266000893</Cnpj></CpfCnpj></IdentificacaoTomador><RazaoSocial>JAD ZOGHEIB &amp; CIA LTDA</RazaoSocial><Endereco><Endereco>Rua Campos Salles</Endereco><Numero>755</Numero><Bairro>Vila Falcao</Bairro><Cidade>3506003</Cidade><Estado>SP</Estado><Cep>17050000</Cep></Endereco><Contato /></TomadorServico><OrgaoGerador><CodigoMunicipio>3543402</CodigoMunicipio><Uf>SP</Uf></OrgaoGerador><ValorCredito>0</ValorCredito></InfNfse><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" /><Reference URI="http://www.w3.org/TR/2000/REC-xhtml1-20000126/"><Transforms><Transform Algorithm="http://www.w3.org/2000/09/xmldsig#enveloped-signature" /></Transforms><DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1" /><DigestValue>zUnWpOWI/ZLSvFkGuVgue+2ZPzE=</DigestValue></Reference></SignedInfo><SignatureValue></SignatureValue><KeyInfo><X509Data><X509Certificate></X509Certificate></X509Data></KeyInfo></Signature></Nfse></CompNfse>'

20117602_NotaFiscaldeServiçoEletrônicaNFSe_000642.xml

[boleto repete o nome do arquivo do exportado anterior]

vi aqui esta mudança também não resolve, o nomeArquivo vem correto o nome FfrxPDFExport.FileName que está errado, não sei como atualizar este nome.

[boleto repete o nome do arquivo do exportado anterior]

Quando mudo o nome do arquivo após exportar o 1.boleto, o nome não muda. 

uso desta forma

      qFat.First;
      while not qFat.Eof do
      begin
        ACBrBoleto1.ListadeBoletos.Clear;
        PassaDadosBoletosPara_ACBR(true);
        NumeroDoc:=ACBrBoleto1.ListadeBoletos[0].NumeroDocumento;
        NomeArquivoPDF:=Path_Arquivos+'COBRANCA\'+tCobrancaFILIAL.AsString+'\BOLETO_'+NumeroDoc+'.pdf';
        ACBrBoletoFCFR1.NomeArquivo:=NomeArquivoPDF;
        ACBrBoleto1.GerarPDF;
        RegMail.Anexo.Add(NomeArquivoPDF);
        qFat.Next;
      end;

 

Linha 416 da unit ACBrBoletoFCFR;

O bloco 2 deve vir antes do 1 para resolver este problema?

 

[Certificado A1, Tem como instalar em outro usuário?]

Certificado A1, Tem como instalar em outro usuário em windows server, sem precisar fazer login na conta do usuário?

[NFS provedor IssDSF - Campinas units com correções para ler XML de NFS-e]

xmls NFS CAMPINAS.xml

boa tarde

em anexo

 

 

[NFS provedor IssDSF - Campinas units com correções para ler XML de NFS-e]

em  anexo as units alteradas para corrigir as tags do provedor IssDSF  para ler arquivo de notas fiscais.

 

ACBrNFSeXNotasFiscais.pas ISSDSF.LerXml.pas

[Importar NFS provedor IssDSF - Campinas]

Não está funcionando.

Estou vendo a codificação e tentando alterar.

Posso mudar a unit pnfsNFSeR;

e a  function TNFSeR.LerNFSe_ISSDSF: Boolean;

 

function TNFSeR.LerNFSe_ISSDSF: Boolean;
var
  ok: Boolean;
  Item: Integer;
  sOperacao, sTributacao: String;
begin
  Leitor.Grupo := Leitor.Arquivo;

  if (Pos('<Notas>', Leitor.Arquivo) > 0) or
     (Pos('<Nota>', Leitor.Arquivo) > 0) or
     (Pos('<ConsultaNFSe>', Leitor.Arquivo) > 0) or
     (Pos('<NOTA_FISCAL>', Leitor.Arquivo) > 0) then
  begin
    VersaoNFSe := ve100; // para este provedor usar padrão "1".

    FNFSe.Numero := Leitor.rCampo(tcStr, 'NumeroNota');                        <---------------------------------------  POSSO TROCAR ESTA CHAVE DO  'NumeroNota'  PARA  'NUM_NOTA'   CONFORME O XML?     OU DEVO ADICIONAR UM OR ?
    if (FNFSe.Numero = '') then
      FNFSe.Numero := Leitor.rCampo(tcStr, 'NumeroNFe');

 

conforme vou verificando

[Distribuição DFE - como ler o arquivo XML]

 

Deu Certo, 

Obrigado.

[Distribuição DFE - como ler o arquivo XML]

Neste XML tem os NSU e os cabeçalhos, mas o sistema deu um erro no processamento deste cabeçalho, assim o ultimo NSU fica o mesmo.

se eu pular os 50 NSU que veio neste arquivo vai processar novamente o ACbrNFe1.DistribuicaoDFe, mas vai ficar faltando os 50 cabeçalhos deste arquivo.

Não tem timer.

[Erro ao criar a chave do CSP]

Já ocorreu comigo, desinstalei tudo do certificado, inclusive java e reinstalei, funcionou.

[Distribuição DFE - como ler o arquivo XML]

bom dia,

depois de executar ACbrNFe1.DistribuicaoDFe  com o ultimo NSU

baixou o arquivo 20210108064325-dist-dfe.xml, mas no processo de gravação deu erro, se tento executar novamente ACbrNFe1.DistribuicaoDFe mostra erro de consumo indevido e pede o ultimo numero NSU.

Como carrego o arquivo 20210108064325-dist-dfe.xml no componente novamente?

 

[NFE - DistribuicaoDFe não sei como salva o XML da NFE]

Deu certo era este Schemas mesmo.

Obrigado BigWings

[NFE - DistribuicaoDFe não sei como salva o XML da NFE]

 

Anexados.

Tenho uma Pasta para cada Schemas.

20201022114328-con-dist-dfe.xml 20201022114329-dist-dfe.xml

[NFE - DistribuicaoDFe não sei como salva o XML da NFE]

Usei o ACBrNFe.DistribuicaoDFePorNSU ocorre a mesma situação.

com ACBrNFe1.DistribuicaoDFePorChaveNFe(35,dtmxml.ACBrNFe1.SSL.CertCNPJ,dtmxml.xmldfe.FieldByName('chNFe').AsString) ocorre "FALHA NO ESQUEMA XML"

Os schemas estão atualizados, pois quando pesquiso por ultNSU vem as notas.

O que acontece, as vezes falta alguma NFE e quero buscar apenas esta NFE, tentei pelo NSU e pela Chave e não retorna.

 

[NFE - DistribuicaoDFe não sei como salva o XML da NFE]

A NFE já está com o evento Ciência de Operação

Faço a consulta com ACBrNFe1.DistribuicaoDFe(35,dtmxml.ACBrNFe1.SSL.CertCNPJ,'',dtmxml.xmldfe.FieldByName('nsu').AsString,dtmxml.xmldfe.FieldByName('chNFe').AsString);

O ACbrNFe1.WebServices.DistribuicaoDFe.retDistDFeInt.cStat = 138   

como faço para salvar o XML da NFE?

salva somente o arquivo em anexo

 

20201021153655-dist-dfe.xml

[Envio de E-mail ACBrMail Aplicação como Serviço]

Quando uso o componente ACBRMail em um form funciona normalmente.

Estou criando um Serviço, mas no SEND Trava.

Fiz o teste nas 2 situações usando mesmas configurações de contas.

Sem Anexo Funcionou quando adiciono anexo no serviço não envia.

estou anexando desta foram:

      ACBrMail1.Attachments.Clear;
      for i := 0 to ListBoxAnexos.Count - 1 do
      begin
        ACBrMail1.AddAttachment(ListBoxAnexos.Items.Strings,Extract_File_name(ListBoxAnexos.Items.Strings),adAttachment);
      end;
 

Trava na linha em destaque.

 

[REINF ACESS VIOLATION na Assinatura]

Ja tinha comparado,  agora localizei o que causa o erro.

agora adicionei o mesmo formulário do demo no meu aplicativo, pois trabalho com DLL´s.  deu o mesmo erro.

comparei as diretivas e tem diretivas diferentes, mas não sei o uso da diretiva com problema:

Se compilar o demo com a diretiva como uso da mesmo erro:  diretiva uso =1  no demo está = 8

Todas minhas DLL´s tem esta diretiva=1.

Alguém sabe o que interfere? posso mudar tudo para 8?

[REINF ACESS VIOLATION na Assinatura]

No Demo funciona normal.

A minha Rotina Funcionava.

Atualizei, reinstalei os componentes e agora que não consigo localizar o que mudou. 

[REINF ACESS VIOLATION na Assinatura]

Atualizei tudo, e reinstalei.

Access violation na function abaixo: ANode não está null,  ANode^.Name não consigo ver valor pelo debug e nem o ANode^.NS^.href 

No momento que vai assinar, independente de qual evento R2020, R2010

function TDFeSSLXmlSignLibXml2.LibXmlNodeWasFound(ANode: xmlNodePtr;
  const NodeName: String; const NameSpace: String): boolean;
begin
  Result := (ANode <> nil) and (ANode^.Name = NodeName) and
    ((NameSpace = '') or (ANode^.ns^.href = NameSpace));
end;

Configuração:

[REINF - Erro na Assinatura]

Estão atualizados.

 

mostra um acess violation 

unit: ACBrDFeXsLibXml2

function TDFeSSLXmlSignLibXml2.LibXmlNodeWasFound(ANode: xmlNodePtr;
  const NodeName: String; const NameSpace: String): boolean;
begin
  Result := (ANode <> nil) and (ANode^.Name = NodeName) and
    ((NameSpace = '') or (ANode^.ns^.href = NameSpace));
end;
 

[REINF - Erro na Assinatura]

Alguem ja vi este erro na geração do arquivo XML do Reinf R1000

 

[NFS- Quebra de linha descrição serviço]

Na descrição do serviço, quero incluir a quebra de linha.

Consultei o provedor , ele me informou o seguinte:

Para realizar a quebra de linha deve-se utilizar o código hexadecimal &#xD; para textos codificados em UTF-8. 

tentei assim:  linha1+'&#xD'+linha2;

como devo fazer?

 

[valor da aliquota]

Continuo com o Problema também.

Alíquota do simples não pode ser inferior a 2% e superior a 5% 

[valor da aliquota]

Eu Tambem estou com o mesmo problema com este provedor em Ribeirão Preto.