Boa tarde,
Não funcionaram as alterações.
1 - Juros: Se olhar no fontes que enviei foi alterado o teste de juros para que se não tiver valor de juros o sistema deve gerar a tag com informação 3 - isento. E na versão disponibilizada não tem essa alteração.
2 - Quanto ao envio de teste: o ambiente da API é PRODUÇÃO e o envio é de TESTE, não muda o ambiente, o ambiente continua sendo Produção, só muda a informação no Jason, no campo Ambiente = T.
Na alteração que enviei utilizo o campo VersaoDF para informar que é TESTE, mas o ambiente PRODUÇÃO, pois deve buscar os endereços da URL da API de produção.
Enviei o T - teste no campo VersaoDF para que não mude o ambiente, apenas preencha o campo ambiente do Jason com = 'T', mas sem alterar o ambiente da API, que deve continuar como produção.
if Boleto.Configuracoes.WebService.VersaoDF = 'T' then
Result := 'T'
else
Result := IfThen(Boleto.Configuracoes.WebService.Ambiente = taProducao, 'P', 'T');
Ou seja teremos a seguinte situação:
1) Ambiente da API - obedece a propriedade Webservice.Ambiente
2) O Campo Ambiente do Jason segue o teste acima:
Se VersaoDF = T o campo no Jason = T
Se VersaoDF <> T utilizar de acordo com o ambiente P-Produção ou T-Homologação