Luiz Alberto da Silva Lope

Olá Pessoal. Tive uma rejeição na NFS-e da cidade de São Paulo. O RPS é pra estrangeiro. Então fui verificar o que havia ocasionado a rejeição. Vi que a função "AssinaturaAdicional" estava usando o NIF do intermediador mas, pelo que vi no manual, o NIF têm que ser do tomador. Abaixo esta o trecho do manual que me levou a esta interpretação: Vejam o "Indicador de CPF/CNPJ do Tomador", têm que ser valor "4" para NIF, o que torna o campo 16 obrigatório. Não menciona nada sobre NIF do intermediador. Mediante esta informação fiz os ajustes na unit "ISSSaoPaulo.Provider.pas" (anexa no post), fiz emissão em PRODUÇÃO e funcionou. Apesar dos ajustes terem funcionado, têm um detalhe que não consegui resolver. Pelo manual, fiquei com o entendimento de que eu poderia fazer uma RPS sem CPF, CNPJ, NIF e NaoNIF. Que neste caso o indicador do tomador seria "3". O ajuste que fiz não atende essa situação, o indicador do tomador será sempre 1, 2, ou 4. ISSSaoPaulo.Provider.pas

Boa tarde. Desculpem, fiquei um tempo fora e não vi as notificações. Como faz muito tempo desde o post, não tenho os XML's da primeira operação. Então refiz o processo e anexei os XML's, de venda e de cancelamento. Quando vou fazer o cancelamento, eu carrego o XML autorizado: ACBrNFe1.NotasFiscais.LoadFromFile(caminhocompleto); Depois monto o XML de cancelamento e carrego: ACBrNFe1.EventoNFe.LerXMLFromString(); 35251058968365000194650010000001111771033373-nfe.xml 34987106-canc.xml

Não uso a LIB. Mas vi que o problema que ocorria no componente também ocorria na LIB.

Olá pessoal. Estou enviando essas sugestões de melhorias/correções pro evento de cancelamento por substituição. Ao enviar o cancelamento "comum" (TACBrNFe.EnviarEvento), o componente utilizava o número do protocolo da NF-e que já estava carregada, mas não fazia o mesmo pro "cancelamento por substituição". Além disso: - Utilizar o protocolo de autorização informado ao carregar XML do evento; - Impressão do evento em A4; - Exportar PDF do evento; ACBrLibNFeBase.pas ACBrNFe.pas ACBrNFCeDANFeFPDF.pas ACBrNFeDANFeEventoRLRetrato.pas ACBrNFe.RetEnvEvento.pas

Eu baixo daqui https://wiki.overbyte.eu/wiki/index.php/ICS_Download Prefiro essa compilação pois não têm dependências da .Net

Já tive problema semelhante ao seu. Eu usei a legacy.dll de 32 bits e resolveu. O problema é que o OpenSSL 3.5 não suporta os algoritmos antigos (e inseguros) por isso precisa da legacy.dll. Uma saída é importar o certificado pro Windows e depois exportar o PFX usando a criptografia AES256-SHA256

Olá pessoal. Este post é apenas informativo. Acabei de testar o qrcode versão 3. Em SP, no ambiente de homologação, foi autorizado.

Bom dia. Acredito que meu texto não esclareceu o problema. Vou tentar explicar melhor: A correção que eu sugeri é pra remover os espaços em branco no nome da tag TRANSFORM. Ao fazer a assinatura do XML está gerando estes espaços branco, conforme a imagem acima. Esses espaços são desnecessários. Na maioria das vezes não causa problema algum, mas no caso do XHARBOUR, o parser de XML acusa erro na leitura desta tag.

Olá pessoal. Estou enviando esta correção na rotina que salva os XML's de eventos. Ao processar o XML de retorno da consulta de NF-e, a rotina deveria salvar os XML's dos eventos nas pastas conforme a configuração. Mas a chamada da função "Arquivos.GetPathEvento" não informava a data do evento, fazendo com que o XML do evento fosse salvo em uma pasta diferente, por exemplo: Se uma NF-e fosse autorizada e cancelada dia 31/05, e o usuário executasse uma consulta desta NF-e dia 01/06, o XML do evento seria salvo na pasta errada (mês 06). Também inclui a leitura da tag "CPF" ao salvar os eventos. Eu vi que este problema ocorre em vários documentos fiscais mas como só utilizo NF-e, não pude testar a solução nos demais documentos. Decidi fazer uma única postagem pra todos os documentos fiscais mas se quiserem posso separar os posts pra cada tipo documento de documento. ACBrBPeWebServices.pas ACBrCTeWebServices.pas ACBrDCeWebServices.pas ACBrMDFeWebServices.pas ACBrNF3eWebServices.pas ACBrNFComWebServices.pas ACBrNFeWebServices.pas

Olá pessoal. Estou enviando uma correção na função FormatarCNPJouCPF. function FormatarCNPJouCPF(const AValue: String): String; var S: String; begin S := OnlyAlphaNum(AValue); if Length(S) = 0 then Result := S else begin //if Length(S) = 14 then if Length(S) > 11 then Result := FormatarCNPJ(S) else Result := FormatarCPF(S); end; end; Como nenhum CPF pode ter mais que 11 digitos, o "if Length(S) = 14 then" acaba gerando formatação errada. ACBrValidador.pas

Olá pessoal. Tenho uma rotina escrita em xHarbour que precisa carregar XML's de NFC-e. Essa rotina utiliza a classe TXmlDocumento (txml.prg) e, ao carregar o XML já assinado, apresenta erro no trecho abaixo: <Transforms> <Transform Algorithm="http://www.w3.org/2000/09/xmldsig#enveloped-signature"></Transform > <Transform Algorithm="http://www.w3.org/TR/2001/REC-xml-c14n-20010315"></Transform > </Transforms> Durante os testes identificamnos que o erro ocorre devido ao espaço ao fechar a tag "</Transform' '>". Tenho outras rotinas escritas em Delphi que conseguem carregar o XML sem erros. Então alterei a Unit, testei e o erro não ocorreu novamente. ACBrXmlWriter.pas

Olá pessoal, estou enviando esta correção pra gerar o conteúdo da tag cEAN. ACBrNFe.XmlWriter.pas

Olá pessoal. Atualizei o repositório e esta correção resolveu o problema com as senha que eu tinha! Revision: 34689 Author: dopi Date: segunda-feira, 5 de agosto de 2024 11:45:49 Message: Bug Fix in TFPDF._escape This could affect "SetProtection", since it produces wrong data on "/O" section, when a CR was escaped ---- Modified : /trunk2/Fontes/Terceiros/FPDF-Pascal/ACBr_fpdf.pas

Ainda estou preso nesta etapa. O código excede um pouco a minha capacidade cognitiva, mas ainda chego lá. Conforme for avançando eu posto aqui.

Criei um exemplo pra reproduzir o problema. var Report: TFPDFExt; begin Report := TFPDFExt.Create; try Report.AddPage; Report.SetFont('Arial'); Report.Write(10, 'TESTE PRA GERAR PDF PROTEGIDO POR SENHA'); Report.SetProtection([canCopy, canPrint], '10658', '10658'); Report.SaveToFile('.\PROTEGIDO.PDF'); finally Report.Free; end;