thi4182

O provedor Thema para Esteio mudou a url de http para https. Segue anexo ACBrNFSeXServicos.ini já ajustado. Obrigado. ACBrNFSeXServicos.ini

Olá, Além dos ajustes citados anteriormente, eu precisei corrigir a descrição de duas naturezas da operação já tratadas no .pas do provider. Na função NaturezaOperacaoDescricao o "COM" e "SEM" está invertido, de acordo com o documento disponível na prefeitura. Segue o link com a tabela e em anexo o .pas ajustado. https://www.saoleopoldo.rs.gov.br/download_anexo/tabela de codigo de operacoes.pdf Obrigado Thema.Provider.pas

Olá e desculpe a demora na resposta; A nota só autorizou quanto eu ajustei a tag para a com erro de português. Este problema é antigo do provedor THEMA, tem uma postagem aqui mesmo no fórum de 2016 onde outro usuário relatou este mesmo problema e ele teve que mexer nos fontes. Eu também contornei isto ajustando manualmente, mas ao migrar para o componente novo, resolvi repassar isto para que seja corrigido na origem.

Olá, O provedor THEMA possuí a tag de construção civil sem o "S", então para preencher essas informação é preciso gerar a tag como "ContrucaoCIvil"; Eu realizei o ajuste no pas "Thema.GravarXml.pas" para ele gerar o XML corretamente, apenas criando o override do "GerarConstrucaoCivil"; Para ler a tag eu ajustei o "ACBrNFSeXLerXml_ABRASFv1.pas", onde no "LerConstrucaoCivil", se não foi encontrado nada pela tag padrão, busca pela tag sem o S; Em anexo os PAS com o ajuste Obrigado; Tiago ACBrNFSeXLerXml_ABRASFv1.pas Thema.GravarXml.pas

Bom dia, Quando eu realizo uma consulta por faixa, na unit "ACBR\Fontes\ACBrDFe\ACBrNFSeX\Base\WebServices\ACBrNFSeXWebserviceBase.pas", na função "TACBrNFSeXWebservice.ExtrairRetorno",linha 846 quando ele faz o "Document.LoadFromXml(xRetorno);", dentro do LoadFromXml dá o erro "raised exception class EACBrXmlException with message 'EntityRef: expecting ';'" ao fazer o xmlParseDoc; Este problema ocorre porque o nome da empresa tem "&" e ao utilizar a opção de TratarXmlRetornado ele transforma o & para &; Se eu mantenho o & ele não gera erro, mas pra fazer este teste eu estou alterando direto no "ParseText" do ACBrUtil.XMLHTML; Não sei qual a melhor forma de corrigir este erro ou se tem algum tratamento ou opção que eu possa fazer; Segue anexo o xml de retorno se precisarem. Obrigado 000000000000001000000000000001000001-lista-nfse-fai.xml 000000000000001000000000000001000001-lista-nfse-fai-soap.xml

Olá, Sobre as consultas do provedor, eu implementei a opção "ConsultarNFSePorFaixa" e em cima deste ajuste eu ajustei a configuração ConfigGeral.ConsultaPorFaixaPreencherNumNfseFinal para True; Também incluí a opção "TratarRetornoConsultaNFSeporFaixa" semelhante a já incluída anteriormente "TratarXmlRetornado" devido a tag a mais que o provedor gera; Obrigado IPM.Provider.pas

Bom dia de novo, Esqueci de reportar no topico acima, que o envio e retorno, por parte do ACBR, está funcionando 100%, depois do ajuste que leva em consideração a tag "Item". Infelizmente por parte do provedor ainda tem problema, pois eles estão retornando a tag "CodigoPais" com o texto "BR" ao invés do código 1058, mas isso eu estou contornando facilmente ate eles corrigirem. Obrigado.

Bom dia, Ao usar a opção de consulta, me retorna que o serviço não foi implementado: Requisição Ambiente: 2 Cidade : Novo Hamburgo/RS Provedor: IPM Versão: 2.04 Método Executado: ConsultarNFSePorFaixa Parâmetros de Envio Num. Ini. NFSe: 1 Num. Fin. NFSe: 2 Data Inicial : 30/12/1899 Data Final : 30/12/1899 Parâmetros de Retorno Sucesso : False Erro(s): Código : X999 Mensagem: Erro de Conexão: Serviço não implementado para este provedor. Correção: ---------

Boa tarde a todos! Vou testar o problema da Tag item e retorno assim que possível. No treinamento que que teve dia 22/02 por parte da IPM eles passaram que tem disponível três eventos de consulta, que são: ConsultarNfseFaixaEnvio e ConsultarNfseServicoPrestadoEnvio, este tanto por período quanto singular. Coloquei em anexo os XMLs de exemplo que eles passaram... acredito que alguém com maior conhecimento interno no ACBR, possa incluir estes recursos com mais facilidade, por isso peço auxilio de todos. Avisando também que eles vão disponibilizar em breve (duvido muito) a consulta de notas por RPS. Obrigado. Consulta em faixa.txt Consulta singular e por período.txt

Olá, Eu também estou homologando esta migração de provedor e enviei um e-mail pra eles falando sobre esta tag a mais que eles estão colocando no retorno e eles me responderam o seguinte: "esta tag é um retorno de nossa estrutura do framework interno e estamos trabalhando para que estas informações a mais não estejam nos retornos do padrão ABRASF. Em breve será corrigido." Ou seja, vamos ter que aguardar eles corrigirem isto pra que a integração fique 100%.

Ao enviar um dos blocos do REINF que é assíncrono, exemplo R-4020, eu configuro, preencho, assino e faço o envio e depois de enviar eu pego o número do protocolo e fico em loop consultando até obter a resposta. Eu utilizo desta forma e a dúvida que eu fico é se no momento de enviar, já é feito uma consulta interna/automática onde internamente já fica o retorno final do evento, para que não seja necessário realizar um novo evento de consulta? Obrigado.

Ao consultar um protocolo em que a resposta do lote é "2 - Lote processado com sucesso - Todos eventos processados com sucesso." a unit pcnReinfR9005.pas dá o erro "Project *.exe raised exception class EListError with message 'List index out of bounds (0)'." Identifiquei que o erro é na leitura da tag "totApurMen" que não é feito o .new antes de preencher ela. Coloquei em anexo ela ajustada, onde o erro não ocorre mais. Ajustei as outras tags semelhantes que estavam do mesmo jeito, mas as demais eu não consegui testar, por não ter exemplos. Obrigado pcnReinfR9005.pas

Ajuste feito no delphi XE2 Segue anexo ACBrNFeDANFEFRDM.pas

Olá, Dentro desta unit (ACBR\Fontes\ACBrDFe\ACBrNFe\DANFE\NFe\Fast\ACBrNFeDANFEFRDM.pas) eu precisei ajustar o "Create" dela para que o campo "DescricaoProduto" passe a suportar 10.000 caracteres contra os 2.000 anteriores. Esta necessidade veio em contra a um cliente preencher as tags da ARMA e esta informação deve aparecer na DANFE, junto a descrição do produto. Só que em um produto com 15 unidades, somente o texto que o ACBR cria para agregar a descrição, passa dos 2000; Aumentar para 10.000 já irá fazer ele suportar 50 tags de ARMA informadas, onde irá atender o porte da empresa, mesmo que o limite de tags ARMA seja 500; O ajuste foi feito na linha 404 onde passo de FieldDefs.Add('DescricaoProduto', ftString, 2000); para FieldDefs.Add('DescricaoProduto', ftString, 10000); Obrigado!

Realizei um ajuste na linha 1796 na function TNFSeR.LerNFSe_ABRASF_V2 para incluir um bloco do XML que atualmente não está sendo lido. Incluído texto: if Leitor.rExtrai(3, 'ContatoPrestadorServico') <> '' then begin NFSe.PrestadorServico.Contato.Telefone := Leitor.rCampo(tcStr, 'Telefone'); NFSe.PrestadorServico.Contato.Email := Leitor.rCampo(tcStr, 'Email'); end; // fim ContatoPrestadorServico Se alguém puder aplicá-la, agradeço. pnfsNFSeR.pas