Abstract Error No Retorno - Prov. Betha

[ncc.star]

Bom dia!

 

Em pnfsConsSitLoteRpsResposta.pas, aprox. na linha 227:

 

InfSit.FMsgRetorno.FIdentificacaoRps.Tipo   := Leitor.rCampo(tcStr, 'Tipo');

 

no Leitor.rCampo(tcStr, 'Tipo') o retorno está retornando conteúdo vazio, então eu fiz essa alteração:

 

          if Leitor.rCampo(tcStr, 'Tipo')<>'' then

            InfSit.FMsgRetorno.FIdentificacaoRps.Tipo   := Leitor.rCampo(tcStr, 'Tipo');

 

Segue em anexo o arquivo para avaliação para colocar no svn.

pnfsConsSitLoteRpsResposta.pas

[Juliomar Marchetti]

Pergunta: esse campo é obrigatório no XML

[ncc.star]

Fiz um teste agora. 

Leitor fica um XML somente com as tags: <Codigo>, <Mensagem> e <Correcao> 

Anexei o conteúdo.

Leitor.xml

[Italo Giurizzato Junior]

Boa tarde ncc,

 

A leitura da TAG Tipo foi incluída, pois existe um provedor (não me recordo agora) que tem esta informação na resposta a consulta a situação do lote.

[ncc.star]

Oi Italo.

 

E é possível alterar para se não encontrar conteúdo nessa tag, não entrar aí? Ou fazer de outra forma que não dê o erro?

[Italo Giurizzato Junior]

Bom dia ncc,

 

A solução adotada por você não funciona, uma vez que o campo tipo não é string, o que estava faltando é a função para converter a informação lida no formato string para o tipo correto do campo.

 

Por favor atualize os fontes e teste novamente.

[ncc.star]

Perfeito!

Ficou Ok.

 

Muito obrigado!