-
Total de ítens
75 -
Registro em
-
Última visita
Contact Methods
-
Website URL
apoluserp.com.br
Últimos Visitantes
1.539 visualizações
Thobias Sobczak's Achievements
-
Eu que agradeço Italo a hora que puder, da uma lida nesse tópico: Creio que tem outro bug rolando que já foi solucionado parcialmente rs
-
Resolvido! if NFe.Ide.gPagAntecipado.refNFe.Count > 0 then RESOLVEU :)
-
Caracteres especiais em XML para impressão de DANFE
Thobias Sobczak replied to guarasemini's tópico in ACBrNFe
ACBNFe.XMLReader Rev 46038 Ponto de definição do xNome para o Destinatario //Nessa revisão foi comitado um 're-parse' com DECODE = TRUE ( parametro DEFAULT da ParseText ), no meu cenário de debug isso matou a acentuação que já estava correta pelo ParseText da ObterConteudo NFe.Dest.xNome := ParseText(ObterConteudo(ANode.Childrens.Find('xNome'), tcStr)); ** POSSIVEL CORREÇÃO ** SE EU DESLIGO O DECODE AQUI RESOLVE: NFe.Dest.xNome := ParseText(ObterConteudo(ANode.Childrens.Find('xNome'), tcStr), False); <--DECODE=FALSE // O obterCounteudo já faz um parse sem DECODE function TNFeXmlReader.ObterConteudo(const ANode: TACBrXmlNode; const Tipo: TACBrTipoCampo): variant; begin Result := inherited ObterConteudo(ANode, Tipo); if Tipo in [tcStr, tcEsp, tcStrOrig] then Result := ParseText(Result, False); <-- DECODE = FALSE end; 04/05/2026 -- ACBrNFeXmlReader -- [-] ACBr-8858 Corrige erro de parse de nomes com elementos XML/XHTML [*] https://www.projetoacbr.com.br/forum/topic/89759-acbr-8858-correção-de-visualização-no-danfe-entidades-htmlxml-em-nomes-xnome/#comment-583416 Por: Soma Soluções em TI Demais pontos , como NFe.Emit.xNome := ObterConteudo(ANode.Childrens.Find('xNome'), tcStr); NFe.Emit.xFant := ObterConteudo(ANode.Childrens.Find('xFant'), tcStr); aparentemente foram corrigidos na revisão 46981!! Parece que faltou o mesmo tratamento para a NFe.Dest.xNome e NFe.Transp.Transporta.xNome -
Por enquanto a solução encontrada pra 'quebrar galho' é matar essa instancia do gPagAntecipado quando não tem ele de fato, assim o Writer nao cria a tag no xml If Assigned(Ide.gPagAntecipado) Then FreeAndNil(Ide.gPagAntecipado);
-
Mesma situação aqui: TNFeXmlWriter.GerarIde function TNFeXmlWriter.Gerar_gPagAntecipado: TACBrXmlNode; var i: Integer; begin Result := nil; if Assigned(NFe.Ide.gPagAntecipado) then <---SEMPRE TRUE pois 'gPagAntecipado' é criado no TIde.Create; begin Result := FDocument.CreateElement('gPagAntecipado'); for i := 0 to NFe.Ide.gPagAntecipado.refNFe.Count - 1 do begin Result.AppendChild(AddNode(tcStr,'BC02','refNFe', 44, 44, 1, NFe.Ide.gPagAntecipado.refNFe[i].refDFEChave, DSC_REFNFE)); end; end; end; ACBrNFe.Classes constructor TIde.Create; begin inherited Create; FNFref := TNFrefCollection.Create(); FgCompraGov := TgCompraGov.Create; FgPagAntecipado := TgPagAntecipado.Create(); end; Se a gente for ver o método Gerar_Ide_CompraGov o tratamento é diferente pra criar a tag: function TNFeXmlWriter.Gerar_Ide_CompraGov: TACBrXmlNode; var i: Integer; begin Result := nil; if (NFe.ide.gCompraGov.tpEnteGov <> tcgNenhum) and (NFe.ide.gCompraGov.tpOperGov <> togNenhum) then begin Result := FDocument.CreateElement('gCompraGov'); Result.AppendChild(AddNode(tcStr, 'BB02', 'tpEnteGov', 1, 1, 1, tpEnteGovToStr(NFe.ide.gCompraGov.tpEnteGov), DSC_TPENTEGOV)); Result.AppendChild(AddNode(tcDe4, 'BB03', 'pRedutor', 1, 7, 1, NFe.ide.gCompraGov.pRedutor, DSC_PREDUTOR)); Result.AppendChild(AddNode(tcStr, 'BB04', 'tpOperGov', 1, 1, 1, tpOperGovToStr(NFe.ide.gCompraGov.tpOperGov), DSC_TPOPERGOV)); for i := 0 to NFe.Ide.gCompraGov.refDFeAnt.Count - 1 do begin Result.AppendChild(AddNode(tcStr, 'BB05', 'refDFeAnt', 44, 44, 1, NFe.Ide.gCompraGov.refDFeAnt[i].refDFEChave, DSC_DFEANT)); end; end; end;
-
Caracteres especiais em XML para impressão de DANFE
Thobias Sobczak replied to guarasemini's tópico in ACBrNFe
To com o mesmo erro aqui, tanto em Fast quando Fortes ( Win 10 e Rad Studio 11 ) e mesmo com o 'Usar unicode UTF-8 para suporte de linguagem mundial' DESMARCADO Estranho que todos xmls tem o RetirarAcentos = True no componente e a declaração '<?xml version="1.0" encoding="UTF-8"?>' no cabeçalho do xml De um tempo pra cá que parou de funcionar, mesmo após reinstalar o ACBr -
Se for pelo PORTAL NACIONAL, sugiro você fazer uma NFSe em produção lá, e baixar o XML pra ver como fica o DPS de envio do portal, e comparar com o que está sendo gerado pelo teu ERP. Após, cancelar a NFSe no PORTAL NACIONAL Pois basicamente é isso, preencher o ConstrucaoCivil.Endereco que vai OK Outra coisa, tenta NAO PREENCHER o ART e CODIGOOBRA, apenas o endereço
-
Padrão nacional - Alteração do local de incidência e retenção do ISS
um tópico no fórum postou Thobias Sobczak ACBrNFSe
Prezados, boa tarde, tudo bem? Venho aqui com uma duvida. Somos da cidade de Erechim/RS aonde tínhamos o provedor SystemPro, e nele, era possível alterar o local de incidência do serviço , aonde o município de incidência retia o ISS com a alíquota de seu municipio. Com a migração para o portal nacional, isso não é possível mais, apenas é permitido alterar o local de prestação mas as retenção do ISS fica pelo municipio do tomador, o que gera transtorno na emissão da NFSe. Para maior entendimento, trata-se de um prestador de serviços de obras, aonde ele emite a NFSe para um tomador localizado em uma cidade X mas com a obra em uma cidade Y. Precisávamos incidir o ISS na cidade Y! Gostaria de saber se mais alguém está com essa situação ou se realmente trata-se de um 'bug' no portal nacional ( o que acho difícil ) que deve ser corrigido. Att -
Impressão Android - SmartPos Positivo L300
Thobias Sobczak replied to Thobias Sobczak's tópico in ACBrSerial
Acabei de conseguir fazer a impressão atravez da bridge Delphi Android Podem fechar o topico por gentileza! -
Olá Pessoal Gostaria de saber se alguém conseguiu imprimir nessa SMARTPOS que a VERO ( RS ) está disponibilizando para testes. Tentei com o ACBRPosPrinter para Android sem sucesso.. A própria VERO disponibiliza as bilbiotecas em extensão .aar , que extraindo consigo obter os .jar Mesmo assim não obtive sucesso fazendo a ponte com o java2op.exe da Embarcadero Alguém conseguiu fazer funcionar a impressão? Creio que seria interessante o pessoal do ACBr implementar no ACBRPosPrinter, já que em conversa com a VERO a mesma vai disponibilizar apenas essa SMARTPOS para desenvolvimento... Desde já agradeço att Se é de interesse de alguém: Em anexo as duas bibliotecas .aar disponibilizadas pela VERO positivo-printer-1.00.00.aar posmpapi_1.01.01.aar
-
Iniciando no uso da API do Mercado Livre
Thobias Sobczak replied to wilsonaaugusto's tópico in Dúvidas não relacionadas ao ACBr
Marcelão, bom dia Use a suíte Rest DataWare, com ela você consegue passar um Bearer Token nas requisições, funciona 100% Abração -
Luizão, boa tarde, tudo bem? Já considerou Threads para essa geração de PDF? Sugiro que faça um teste , joga essa parte pra uma Thread fazer. Sugiro também ligar essa propriedade ACBrDANFE.OtimizaImpressaoPdf . O fastreports vai tratar de otimizar o tamanho do teu PDF: https://www.fast-report.com/en/blog/183/show/ Qualquer coisa posta aí, assunto interessante esse Abração!
