[Resolvido] Erro Ao Tentar Enviar Depois De Ter Atualizado Os Fontes

[Schinobli]

Boa tarde...

estou desde a semana passada em um impasse...

A versão do servidor daqui da empresa está funcionando corretamente... faz algumas semanas que não foram atualizados...

mas decidimos atualizar os fontes... para deixar em dia. Mas depois de atualizar, acontece esse erro...

'Linha: 1 - Coluna: 228 -  '<' character, hexadecimal value 0x3C, cannot be included in a name. Line 1, position 228.'

No caso... no webservices está com o XML_Rps vindo nulo

else vNotas := vNotas + '<' + Prefixo4 + 'Rps>' +
                               '<' + Prefixo4 + 'InfRps' +
                                 RetornarConteudoEntre(TNFSeGerarLoteRPS(Self).FNotasFiscais.Items[I].XML_Rps,
                                   '<' + Prefixo4 + 'InfRps', '</Rps>') +
                              '</' + Prefixo4 + 'Rps>';

Em anexo segue um exemplo do XML gerado...

 

Como mais alguem já aconteceu... ou onde eu posso encontrar o erro, corrigir, aonde que passa, como... ou apenas um oi?

 

Estou precisando de ajuda... não posso mais ficar neste impasse...

Desde já agradeço a todos...

<?xml version="1.0" encoding="UTF-8"?>

-<soap:Envelope xmlns:soap="http://schemas.xmlsoap.org/soap/envelope/" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">


-<soap:Body>


-<RecepcionarLoteRps xmlns="http://tempuri.org/">

<xmlEnvio> <?xml version="1.0" encoding="UTF-8"?><EnviarLoteRpsEnvio><LoteRps><NumeroLote>0000000</NumeroLote><Cnpj>00000000000000</Cnpj><InscricaoMunicipal>000000</InscricaoMunicipal><QuantidadeRps>1</QuantidadeRps><ListaRps><Rps><InfRps </Rps> <!-- aqui esta o erro --> </ListaRps></LoteRps></EnviarLoteRpsEnvio> </xmlEnvio>

</RecepcionarLoteRps>

</soap:Body>

</soap:Envelope>

Editado 8 Abril, 2015 por Schinobli

[Massao Aihara]

Testa ai...

 

atualiza o fonte do exemplo, compila e testa para ver se com ele vai.

E depois vai debugando sua rotina ate achar onde esta o problema.

[Schinobli]

ok... vou ver... vlw...

[Schinobli]

Vi que foi implementado no function TNFSeW.GerarXml alguns parametros, pode ser isso o problema... o que é esse ASincrono? consegue me explicar?

function TNFSeW.GerarXml(ASincrono: Boolean = False): boolean;  // Alterado por Nilton Olher - 11/02/2015

vlw

[Schinobli]

Se alguem conseguir me passar qual é a função em que gera o XML (TNFSeGerarLoteRPS(Self).FNotasFiscais.Items[I].XML_Rps) eu agradeceria... não sei mais o que procurar...

desde já eu agradeço.

[Juliomar Marchetti]

Boa tarde

você tem os fontes! certo

você programa em delphi também?

então vai entrando nas classes que está ali !

se tem dúvidas use o Ctrl+Shift+F do delphi e faça a pesquisa pela função!

 

veja não estou não querendo dizer mas estou lhe dando os métodos para ir achar pois imagine se tiver que achar dentro de outro lugar!

[Schinobli]

sim sim... já entrei e debuguei todas as classes... dei um Ctrl+Shift+F e em todos os lugares coloquei o break point...  infelizmente algo passou despercebido por mim... só pode... mas vou continuar e tentar achar... vou dar mais algumas conferidas...

vlw por tudo..

[Schinobli]

Como disse ali em cima... faz uma mais de uma semanda nesse impasse... e chegou ao ápice pois tive que postar aqui minha duvida... para ver se ocorreu com mais alguem...

e todas essas vezes eu entrei nas classes debugando... mas ainda não econtrei...

Editado 18 Março, 2015 por Schinobli

[Schinobli]

Juliomar, Akai... Muito obrigado PELA AJUDA...

vi que de tanto debugar não era nos fontes do acbr...

percebi que a procedure assinar passa como padrão True; mas no meu caso tinha que ser False;

procedure Assinar(AssinaRPS: Boolean = True);

Então passei como False e FUNCIONOU... KKK

ACBrNFSe1.NotasFiscais.Assinar(False);

Muito Obrigado... e eu sei... foi um discuido meu...

Vlw...