Problema Lendo .xml De Reposta Do Envio (Contribuição)

[ServerInfo]

Existe casos onde no .xml de resposta do envio o provedor não coloca a tag "Tipo", causando a rotina de leitura retornar branco para essa tag.

Como o resultado da rotina que lê retorna Variant, dá problema ao fazer o cast implícito para o tipo enum do campo.

 

Arquivo com a alteração correta anexado.

pnfsEnvLoteRpsResposta.pas

Editado 17 Março, 2015 por ServerInfo

[Juliomar Marchetti]

Boa tarde

seu svn está desatualizado 

já tem tratamento onde você somente verifica se está vazio para não entrar!