Antonio Paulo Mangili

comentei, reinstalei e deu o mesmo erro: Erro(s): Código : X999 Mensagem: Erro de Conexão: Input is not proper UTF-8, indicate encoding ! Bytes: 0xE1 0x20 0x69 0x6E Correção: --------- segue anexo os XML 48667066-env-lot-sinc.xml 48667066-env-lot-sinc-soap.xml 48667066-lista-nfse-sinc-soap.xml 3523030357163700012656000000000007100-rps.xml

isso esta no svn, ou vou fazer em meu repositorio da minha maquina????

Olha só. o que esta acontecendo. quando dá esse erro a prefeitura esta processando e acatando a nota. mas no retorno da nota para o sistema dá esse erro. eu descobri porque fui no site e a nota que estava dando erro estava lá. ai eu peguei o XML direto da prefeitura e gerei o PDF, e sai com alguns caracteres estranho mesmo, na leitura do XML. vou anexar aqui. 3523030357163700012656000000000008022-nfse.pdf NFSe8022.xml me parece que é quando o componente vai tratar o arquivo de retorno do provedor

o que é estranho é que é algumas rps, e algumas dão certo. hoje mesmo já tirei varias e quando do nada da esse erro em uma e não vai

realizei o atualização novamente, reinstalei o abcr removendo os arquivos. e fiz os teste e continua o mesmo problema vou anexar arqui os arquivos obrigado 34437631-env-lot-sinc.xml 34437631-env-lot-sinc-soap.xml 34437631-lista-nfse-sinc-soap.xml 3523030357163700012656000000000007100-rps.xml

bom dia em meu arquivo esta assim: function TACBrNFSeXWebserviceFiorilli200.TratarXmlRetornado( const aXML: string): string; begin Result := inherited TratarXmlRetornado(aXML); if UTF8Decode(Result) = '' then Result := NativeStringToUTF8(Result); Result := StringReplace(Result, '
', '\s\n', [rfReplaceAll]); Result := StringReplace(Result, ''#$A'', '\s\n', [rfReplaceAll]); Result := ParseText(AnsiString(Result), True, {$IfDef FPC}True{$Else}False{$EndIf}); Result := RemoverPrefixosDesnecessarios(Result); Result := RemoverCaracteresDesnecessarios(Result); Result := StringReplace(Result, '&', '&', [rfReplaceAll]); end; esta igual ao que vc me passou

boa noite a todos estou recebendo esse erro ao enviar a RPS para o provedor Fiorilli. Mas isso esta acontecendo nessa RPS, pois já emitie varias e deu tudo certo para esse mesmo provedor. alguem poderia me dar uma ajuda por favor. vou anexar os xml aqui obrigado 69010716-env-lot-sinc.xml 69010716-env-lot-sinc-soap.xml 69010716-lista-nfse-sinc-soap.xml 3523020357163700012656000000000007093-rps.xml

boa noite a todos. testes efetuados e deu tudo certo. por favor poderia fechar o topico. obrigado a todos Paulinho

ok vou fazer isso e depois dou um feedback por aqui. muito obrigado

bom dia. não fui eu que coloquei o -1, ja estava. apenas coloquei o 0(zero) conforme orientação acima do @Renato Rubinho e foi onde deu certo. e eu coloquei nessa linha NrOcorrInscMunTomador := 0; // <<<< veja o post acima. obrigado

bom dia @Diego Foliene sabe me informar se essa atualização já esta no SVN??? muito obrigado Paulinho

ok vou aguardar para atualizar. muito obrigado Paulinho

bom dia @Renato Rubinho efetuei essa alteração que voce me orientou e fiz a emissão. deu tudo certo. vou postar aqui o arquivo, mas estou voltando como era, e vou ficar aguardando ele subir no svn para que eu possa compilar novamente. muito obrigado Paulinho Fiorilli.GravarXml.pas 3523010206247600026356000000000003002-rps.xml 3523010206247600026356000000000002637-nfse.xml

boa tarde a todos. estou recebendo esse erro ao enviar a NFSe do provedor fiorilli de Jaú. só que eu estou informando em minha ERP a insc.municipal do tomador, só que nao esta gravando no arquivo da RPS conforme anexo. rotina do meu programa: Tomador.IdentificacaoTomador.CpfCnpj := CdsTabClieCNPJ.AsString; Tomador.IdentificacaoTomador.InscricaoEstadual := CdsTabClieIE.AsString; Tomador.NomeFantasia := CdsTabClieFANTASIA.AsString; Tomador.IdentificacaoTomador.InscricaoMunicipal := CdsTabClieINSCMUNICIPAL.AsString; Tomador.RazaoSocial := RemoveAcentos(CdsTabClieNOME.AsString); será que pode ser algo no componente??. Nao entrei em contato ainda com o provedor, pois vão me questionar que eu não estou enviando essa informação na RPS. alguem poderia me orientar, por favor obrigado 50319483-env-lot-sinc.xml 50319483-env-lot-sinc-soap.xml 50319483-lista-nfse-sinc.xml 50319483-lista-nfse-sinc-soap.xml 3523010206247600026356000000000003002-rps.xml ErroAutoViaçao.txt

ok processo realizado. poderia fechar o topico por favor. e muito obrigado a todos

@Diego Foliene com essa unit deu certinho. pulou a linha, e não saiu aqueles caracteres especial. voce vai subir essa unit no svn?? vou voltar a velha e aguardar voce subir ai instalo novamente. obrigado

e como eu consigo saber isso: Precisamos saber se o &#xd; + a quebra de linha (LF) é a mesma coisa que \s\n ou não. Espero que o provedor não exija uma sequencia no envio e gere outra totalmente diferente no retorno. obrigado

segue anexo. obrigado mais uma vez 84774813-env-lot-sinc.xml 84774813-env-lot-sinc-soap.xml 84774813-lista-nfse-sinc.xml 84774813-lista-nfse-sinc-soap.xml 3522121518781900018756000000000003353-rps.xml 3522121518781900018756000000000003467-nfse.xml 3522121518781900018756000000000003467-nfse.pdf

mesmo com a unit do diego, ou a que já existe, essa configuração já esta nessa unit. e mesmo assim não esta saindo os caracteres especiais, mas esta pulando linha. quando troquei a unit por essa do diego, ai nem linha pulou mais. obrigado digo esta saindo os caracteres especiais

ok feito a reversão. muito obrigado

bom dia @Diego Foliene com essa unit que vc me enviou, agora mesmo eu inserindo o: ';' a descrição não esta pulando linha. segue anexo a RPS, a Nota, e o pdf. Obrigado 3522121518781900018756000000000003352-rps.xml 3522121518781900018756000000000003466-nfse.xml 3522121518781900018756000000000003466-nfse.pdf

ok vou fazer isso amanha e depois te retorno aqui. muito obrigado por hora

ok segue obrigado 93643048-env-lot-sinc.xml 93643048-env-lot-sinc-soap.xml 93643048-lista-nfse-sinc.xml 93643048-lista-nfse-sinc-soap.xml

boa tarde @Diego Foliene já esta marcado salvar envelope soap. voce que os xmls???? é isso?? obrigado

boa tarde a todos. queria solicitar a ajuda de alguem para que eu possa acertar esse detalhe em minha ERP. quando estou gerando uma NFeS pelo componente ACBRNFeSx, entre um serviço e outro eu estou inserindo o simbolo ';'. veja abaixo minha rotina: DiscrSrv := DiscrSrv + Idescritem + FormatFloat(' Qtd 0', QtServ) + FormatFloat(' Valor Unitário #,##0.00', VServUnit) + FormatFloat(' Valor Total ###,##0.00', VINFS) +';'; porem quando ele imprimi o PDF sai um simbolo, que anexei na imagem. alguem poderia me informar como faria para não sair esse simbolo. desde já agradeço a todos que colaborarem. Paulinho