colmanetti

Não resolveu. no debug mostra erro: 'Input is not proper UTF-8, indicate encoding ! Bytes: 0xBA 0x20 0x37 0x36 '

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

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.

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 em windows server, sem precisar fazer login na conta do usuário?

xmls NFS CAMPINAS.xml boa tarde em anexo

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

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

Deu Certo, Obrigado.

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.

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

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?

Deu certo era este Schemas mesmo. Obrigado BigWings

Anexados. Tenho uma Pasta para cada Schemas. 20201022114328-con-dist-dfe.xml 20201022114329-dist-dfe.xml

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.

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

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.

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?

No Demo funciona normal. A minha Rotina Funcionava. Atualizei, reinstalei os componentes e agora que não consigo localizar o que mudou.

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:

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;

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

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?

Continuo com o Problema também. Alíquota do simples não pode ser inferior a 2% e superior a 5%

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