LucaCampos

Bom dia Italo, No XML do RPS é gerado somente o Código do Município, e então é me retornado o erro "Pais do tomador do serviço inválido". Se enviar como 9999999 o código do pais é gerado no XML e a tag, e a nota aprovada. Preencho da seguinte forma: Tomador.Endereco.CodigoMunicipio = 3520509 (Sai no XML) Tomador.Endereco.CodigoPais = 1058 (Não sai no XML) Nesse caso não teria como gerar o xml com um município diferente do 9999999?

Bom dia Pessoal do ACBr, Na emissão da NFS-e estou com um problema que é me retornado a mensagem "Pais do tomador do serviço inválido". No provedor DEISS usa como base o ABRASFv2 e na unit ACBrNFSeXGravarXML_ABRASFv2 existe uma validação sobre o pais estrangeiro (Código Município = 9999999) Ao remover a validação o problema não ocorreu e a NFS-e foi aprovada, portanto dando a entender que a tag do pais deve ser gerada em todos os casos para o DEISS Schema 2.3. Alguém poderia me ajudar nesse caso? Desde ja Obrigado!

Bom dia Pessoal da ACBr, tudo bem ? Recentemente notei que teve mudanças sobre a chave do cte de complemento de valores. N impressão da DACTe para Fast Report não está saindo quando o cte é versão 4.0. Se alguém puder fazer a analise da contribuição, não consegui efetuar os testes para ver se de fato resolve. Obrigado. ACBrCTeDACTEFR.pas

Bom dia Pessoal do Forum ACBr, Aparentemente falta ser adicionado os eventos de Insucesso e Canc. Insucesso no TACBrCTeDACTEFR.CarregaDadosEventos. ACBrCTeDACTEFR.pas

Boa tarde Juliomar, Verifiquei e aparentemente está ok. Na unit ACBrCTeDACTEFR, dentro da procedure TACBrCTeDACTEFR.CarregaDadosEventos, não preenche o dsEventos dentro do case pois não tem o evento de insucesso.

Bom dia Pessoal do Forum ACBr, No evento de insucesso na entrega do CT-e, minha impressão está ficando "vazia". Alguém sabe o que pode ser? Nesse tipo de evento existe a impressão?

Obrigado!

Boa tarde, tudo bem a todos. percebi que na pasta do Schemas CT-e não existe o Schemas retConsReciCTe_v4.00. Estou usando a function ACBrCTe.WebServices.Retorno.Executar

Boa tarde, Tive que tratar formatação do xml de retorno e alterar os métodos. (A Consulta para mim Resolveu alterando NFseBrasil.LerXML, NFSeBrasil.Provider). (A solução não é a mais adequada principalmente no ACBrXmlDocument). (Não consegui anexar o soap de retorno ainda). TACBrNFSeXWebserviceNFSeBrasil.TratarXmlRetornado Result := RemoverCaracteresDesnecessarios(Result); Result := StringReplace(Result, '<return xsi:type="xsd:string">', '<return>', [rfReplaceAll]); Result := StringReplace(Result, '<Nfse versao="1.0">', '<Nfse>', [rfReplaceAll]); TNFSeR_NFSeBrasil.LerXmlNfse(const ANode: TACBrXmlNode) AuxNode1 := ANode.Childrens.FindAnyNs('xml'); AuxNode1 := AuxNode1.Childrens.FindAnyNs('CompNfse'); procedure TACBrXmlDocument.LoadFromXml(AXmlDocument: string); loadedDoc := xmlParseDoc(PAnsiChar(AnsiToUtf8(AXmlDocument)));

Bom dia Italo, Anexei o retorno ret.xml

Bom dia Italo, efetuei a Aprovação/Consulta por RPS. Talvez não seja a melhor solução... arquivos editados. ACBrXmlDocument.pasNFSeBrasil.LerXml.pasNFSeBrasil.Provider.pas

Bom dia, o problema ocorre neste ponto. uses ACBrXMLDocument procedure TACBrXmlDocument.LoadFromXml(AXmlDocument: string); var loadedDoc: xmlDocPtr; loadedRoot: xmlNodePtr; begin loadedDoc := xmlParseDoc(PAnsiChar(ansistring(AXmlDocument))); if loadedDoc <> nil then begin xmlFreeDoc(xmlDocInternal); xmlDocInternal := loadedDoc; loadedRoot := xmlDocGetRootElement(xmlDocInternal); if loadedRoot <> nil then begin xmlRootElement.Free; xmlRootElement := TACBrXmlNode.Create(Self, loadedRoot); end else raise EACBrXmlException.Create(xmlGetLastError()^.message); end else raise EACBrXmlException.Create(xmlGetLastError()^.message); end;

Bom dia Italo, emissão ficou ok. Estou tendo um problema na consulta (ConsultaNFSePorRPS) function TACBrNFSeXWebserviceNFSeBrasil.TratarXmlRetornado( const aXML: string): string; begin Result := inherited TratarXmlRetornado(aXML); if Pos('ISO-8859-1', Result) > 0 then Result := AnsiToNativeString(Result); Result := string(NativeStringToUTF8(Result)); Result := StringReplace(Result, '&amp;amp;', 'e',[rfReplaceAll]); Result := ParseText(AnsiString(Result), True, {$IfDef FPC}True{$Else}False{$EndIf}); Result := RemoverDeclaracaoXML(Result, True); Result := RemoverCDATA(Result); Result := RemoverIdentacao(Result); Result := RemoverPrefixosDesnecessarios(Result); Result := StringReplace(Result, 'R$', '', [rfReplaceAll]); Result := StringReplace(Result, '&', '&amp;', [rfReplaceAll]); end; Document.LoadFromXml(Response.ArquivoRetorno); Mesmo com as tratativas está me retornando a mensagem: Erro input is not proper UTF-8, indicate encoding! bytes.

Bom dia Italo, tive que alterar NFSe.Tomador.Endereco.xMunicipio / NFSe.Tomador.Endereco.CodigoMunicipio. para conseguir aprovar. unit NFSeBrasil.GravarXml function TNFSeW_NFSeBrasil.GerarEnderecoTomador: TACBrXmlNode; begin Result.AppendChild(AddNode(tcStr, '#43', 'CodigoMunicipio', 1, 7, 0, NFSe.Tomador.Endereco.CodigoMunicipio, DSC_CMUN)); end; NFSeBrasil.GravarXml.pas

Boa tarde Ítalo, sobre o problema 'Acesso não permitido, verifique os dados e certifique-se de possuir permissão para a operação.' é necessário uma liberação por parte do provedor para o envio. estou tentando enviar em Produção que me retorna o problema Mensagem: Erro de Conexão: Erro Interno: 0 Erro HTTP: 200. Enviei um e-mail para o suporte do provedor, estou aguardando um resposta deles.

Boa tarde Ítalo, No arquivo adicionei o provedor sendo igual a NFSeBrasil.

Bom dia, os fontes estão atualizados e estou utilizando TLS 1.2.

Arquivo envio tm_lote_rps_service.importarLoteRPS.xml

Pessoal Bom dia! Alguém pode me ajudar com essa questão Na cidade de Vazante/MG estou com o seguinte problema na Aprovação da NFS-e, componente NFS-eX Erro(s): Código : X999 Mensagem: Erro de Conexão: Erro Interno: 0 Erro HTTP: 200 URL: http://nfsebrasil.net.br/nfse/ws/lote_rps_service.php

Boa noite Ítalo, Realmente, só encontrei o da consulta. Meus arquivos gerados pelo componente são enviados para o site da prefeitura, porém estão ficando como "Erro de Processamento". Analisei o manual junto aos arquivos enviados, e o conteúdo gerado na tag base64. Porém não consegui encontrar o problema. ISSBarueri está normal ? Obrigado

Boa noite Italo, Achei alguns Schemas nesse mesmo link de envio. Na cidade de Barueri tem a necessidade de carregar os arquivos gerados pelo componente no site da prefeitura?

Bom dia Italo, 1. Cancelamento deu a mesma mensagem "Arquivo enviado fora da estrutura do arquivo XML de Entrada", gerando o XML sem o Motivo de Cancelamento. 2. ConsultaPorRPS reinstalei os fontes e passou a funcionar.

Bom dia Italo, Consegui estes XML's do Cancelar com o Suporte da Prefeitura, não conseguiram identificar o problema também. sobre o Consultar estou passando o nº do RPS, consultei na prefeitura e o mesmo se encontra aprovado. XML ACBr.rar XML Exemplo Prefeitura.rar

Bom dia Italo, beleza? Tentei com os Schemas que encontrei no site https://www.barueri.sp.gov.br/nfe/wfManuais.aspx, Adicionei uma pasta chamada ISSBarueri e inclui os Schemas que anexei aqui e deu o mesmo problema. XML_PMB_Schemas_V01.zip

Boa tarde Juliana, O mesmo está ocorrendo no demo. Estou com a última pasta de Schemas. Este problema aparentemente era no Provedor, entrei em contato com o suporte e foi ajustado (Erro de Conexão: S:Server - br/com/bry/x509/certificado/X509DistinguishedName). Usando o demo está me retornando os logs. 1 Cancelar NFse. 2. Consulta NFse por RPS.