MarcosRWeimer

Algumas considerações: 1 - Se seto a quebra de linha como \r\n ou sLineBreak ao enviar para o sefaz rejeita a CCe 2 - Se faço um replace no xCorrecao para trocar a quebra de linha por ; autoriza, porem a impressão sai tudo na mesma linha 3 - Se não altero a quebra de linha, no XML envia | no lugar da quebra de linha e na impressão ocorre tudo corretamente

Sem sucesso. Instalou corretamente. Setei a quebra de linha com sLineBreak (\r\n) Ao enviar o evento rejeita por causa da quebra de linha no xCorrecao, se faço a substituição do sLineBreak por ';' (replace na string mesmo, mantendo a configuração da quebra de linha no componente) autoriza a CCe porem na impressão não quebra a linha.

Marquei para remover antigos antes de instalar, erro persiste.

Boa Tarde! Será que faltou fazer o commit de alguma coisa? Cleaning ok Compiling package C:\componentes\ACBr\Pacotes\Delphi\ACBrDFe\ACBrNFe\ACBr_NFe.dpk "C:\Program Files (x86)\Embarcadero\Studio\22.0\bin\dcc32.exe" "C:\componentes\ACBr\Pacotes\Delphi\ACBrDFe\ACBrNFe\ACBr_NFe.dpk" Embarcadero Delphi for Win32 compiler version 35.0 Copyright (c) 1983,2022 Embarcadero Technologies, Inc. C:\componentes\ACBr\Fontes\ACBrDFe\ACBrNFe\ACBrNFeNotasFiscais.pas(3830) Error: E2003 Undeclared identifier: 'QuebraLinha' C:\componentes\ACBr\Fontes\ACBrDFe\ACBrNFe\ACBrNFeWebServices.pas(2498) Fatal: F2063 Could not compile used unit 'ACBrNFeNotasFiscais.pas' Compilation failure Erro ao compilar o pacote "ACBr_NFe.dpk". Abortando... Ocorreram erros na compilação dos pacotes.

Bom Dia! Conseguiu simular?

Ola! - Criado componente acbr e setado a quebra de linha: FACBrNFe1.Configuracoes.WebServices.QuebradeLinha := sLineBreak; ou (o resultado é o mesmo) FACBrNFe1.Configuracoes.WebServices.QuebradeLinha := '\r\n'; E vou tentar emitir a CCe (Carta de Correção de NFe), sempre substitui a quebra de linha por ';' Debugando cheguei em alguns lugares. procedure TNFeEnvEvento.DefinirDadosMsg; (unit ACBrNFeWebServices.pas) Executa a linha EventoNFe := TEventoNFe.Create; No create chama o CreateOptions (herdado de TACBrXmlWriter), que por usa vez chama o TACBrXmlWriterOptions.Create que faz o seguinte: constructor TACBrXmlWriterOptions.Create; begin inherited; FIdentarXML := False; FFormatoAlerta := 'TAG:%TAGNIVEL% ID:%ID%/%TAG%(%DESCRICAO%) - %MSG%.'; // Vide comentário em wAlerta FRetirarEspacos := True; FRetirarAcentos := True; FSuprimirDecimais := False; FSomenteValidar := False; FDecimalChar := '.'; FQuebraLinha := ';'; end; Ou seja, no Create ele substitui a quebra de linha, ignorando a quebra de linha previamente configurada. Atualizei o componente hoje pela manhã (rev. 35098) na esperança de resolver o problema mas sem sucesso. Existe alguma forma de contornar isto? esqueci alguma configuração?

Sim, postei minha opinião pessoal visto que já haviam visitas na thread mas sem manifesto. Modifiquei aqui: simplesmente removi o ParseText, no nomento resolveu, mas será que é padrão vir na codificação utf8? o ParseText foi inserido ali em algum momento e deve ter tido algum motivo para isso.

Como ninguém se manifestou até o momento, a minha opinião é alterar o componente para não converter, já que o arquivo já vem em utf8. A questão é quando o arquivo for fornecido em codificação diferente. Alguem recebeu o XML da DI em codificação diferente de utf8?

Ola! Estou tendo problemas na acentuação ao importar uma declaração declaração de importação. Situação: arquivo xml em utf 8, com acentuação correta e declaração no inicio como utf 8 (acbr utiliza para verificar se o arquivo é utf8 para converter) ao importar no componente através do "LerXml" ele converte.... (unit: ACBrDIDeclaracaoImportacao.pas) AXML está com a acentuação correta: depois de convertido fica com a acentuação incorreta No ParseText (unit ACBrUtil.XMLHTML), converte a string de UTF8 para NativeString (via DecodeToString da unit ACBrUtil.Strings), depois faz um replace nas acentuações padrão html e converte novamente de native string para utf8. Como resolver?

Ola! Você que está precisando: - Migrar seu sistema para versões mais novas do Delphi - Migrar seu banco de dados Firebird para versões mais novas - Migrar seu método procedural para camadas (Entity, Interface, Proxy, DAO) - Centralizar funções com métodos singleton/anônimos - Servidor rest + horse? - Migrar seu sistema legado - Criar novas rotinas - Corrigir bugs Entre em contato por mensagem privada. Programador Delphi (Pascal) / Visual Studio (c#) Desde 2009 trabalhando com ERP.

Aqui acontece a mesma coisa, não encontra na hora de compilar mas se vou no CTRL + CLICK abre o arquivo ACBrDIDeclaracaoImportacao normalmente, adicionei no library/browse e nada, aqui é Rad Studio 11.3

Bom dia! Testado e aprovado! Obrigado.

Esqueci de mencionar, tentei editar mas o tempo já havia passado... - A informação de desconto não tem no XSD nem no XML de exemplo baixado do portal da prefeitura (equiplano) - No portal da prefeitura é possível informar o desconto, a partir dai foi só seguir o mesmo padrão de nome dos outros campos e encontrar a posição do campo (que é depois das retenções, em outra posição não funciona)

Ola! Estavamos com problemas para fechar os valores da NFSe da equiplano com desconto e retenções, então depois de muito procurar descobrimos que existe a possibilidade de enviar o valor do desconto no xml. Desta forma alterei para gerar a tag e mudei o schema, assim está autorizando as notas corretamente com desconto. Alteração: Equiplano.GerarXML TiposesNFse_v01.xsd Anexo arquivos alterados e exemplo do XML gerado que foi autorizado ocultando dados do tomador Equiplano.GravarXml.pas TiposEsnfs_v01.xsd 196F-rps - Copia.xml

Revision 29823 implementou o seguinte: mas com isso ao imprimir (fast report) um RPS da IPM (e provavelmente de outros provedores também) temos o "Data do RPS" no lugar do "Nome/Razão Social" do tomador do serviço, pois ele é o memo12:

Testado e aprovado! Obrigado

Ola! Desde o dia 04/09/23 entrou em produção a nova versão da IPM no município de Nova Santa Rosa - PR Segue alterações feitas no ini: [4117222] ; Atualizado em 06/09/2023 Nome=Nova Santa Rosa UF=PR Provedor=IPM Versao=1.01 ProRecepcionar=https://novasantarosa.atende.net/atende.php?pg=rest&service=WNERestServiceNFSe&cidade=padrao Tive de incluir: Versao, ProRecepcionar Não encontrei nada referente ao ambiente de homologação. Com esta configuração consegui emitir a NFSe sem problemas no ambiente de produção, estava tendo rejeição de "acesso negado" até descobrir que deveria informar a versão=1.01 (mesmo no manual informando ser a 2.2)

Alguem conseguiu solução? Estou com o mesmo problema aqui: vNF Recebida (com origem em GO): 9980.00 vNF da Devolução (Gerada por empresa em MG): 2891.68 Será uma falha de comunicação entre as SEFAZ? Em qual situação está ocorrendo este problema para vocês ?

Tudo funcionando na V4 em Homologação para o PR.

Era no Sefaz/PR, acabei de conseguir consultar e cancelar, testem ai, deve estar funcionando para vocês tambem.

nada ainda, tudo na mesma

pois é, por isso abri a thread, mas parece que ninguem começou ainda a implementar a versão 4.00 no PR

Ola! Mais alguem tentando migrar para o CTe 4.00 e recebendo erro 999 não catalogado para o estado do PR em homologação ? Desde ontem estou tentando, acredito que seja problemas no Sefaz/PR mas achei melhor perguntar. O que fiz: - atualizei o ACBr, reinstalei - Mudei a versão do CTe de 3.00 para 4.00 - Está autorizando, mas consultando/cancelando não está.

Bom dia Italo! Estive ausente por alguns dias, está ok, muito obrigado

Bom dia Italo! - SAATRI Funcionando perfeitamente - EQUIPLANO Para funcionar para equiplano tive de fazer uma alteração com base na alteração feita por você para Saatri: Anexo arquivo modificado. (Equiplano.Provider) Equiplano.Provider.pas