<html>
  <head>
    <meta http-equiv="Content-Type" content="text/html; charset=utf-8">
  </head>
  <body text="#000000" bgcolor="#FFFFFF">
    <p>Bom dia Danilo,</p>
    <p>Os dois módulos deveriam funcionar apenas substituindo os
      arquivos anteriores (originais). Para o  YahooJSON buscar as
      cotações da bovespa, você deve mudar a "fonte de cotações" de cada
      ativo para "desconhecido -> yahoo_json".</p>
    <p>Segue em anexo o módulo atualizado para as debêntures.</p>
    <p>Existe uma mudança no arquivo Quote.pm para usar o yahoo_json
      para atualizar as cotações das moedas. Segue as diferenças:</p>
    <pre wrap="">diff Quote.pm Quote.pm.orig
=========================================
39d38
< use JSON qw( decode_json );
53c52
< $YAHOO_CURRENCY_URL = "<a class="moz-txt-link-freetext" href="https://query1.finance.yahoo.com/v7/finance/qu">https://query1.finance.yahoo.com/v7/finance/qu</a>ote?symbols=";
---
> $YAHOO_CURRENCY_URL = "<a class="moz-txt-link-freetext" href="http://finance.yahoo.com/d/quotes.csv?e=.csv&f">http://finance.yahoo.com/d/quotes.csv?e=.csv&f</a>";
</pre>
    <pre wrap="">
253,254c253,254
<   my $json_result = JSON::decode_json $data;
<   my $exchange_rate = $json_result->{'quoteResponse'}{'result'}[0]-{'regularMarketPrice'};
---
>   my $exchange_rate = $data;

</pre>
    <pre wrap="">==========================================

</pre>
    <p>Qualquer problema... é só perguntar..</p>
    <p>Abs,</p>
    <p>Rafael cASALI<br>
    </p>
    <br>
    <div class="moz-cite-prefix">Em 20-11-2017 10:33, Danilo Castanheira
      escreveu:<br>
    </div>
    <blockquote type="cite"
cite="mid:CAAVYp77FWwTJyOnZ=SpZSPWmwAn8NdJPqZP474K+EmBLGhnQvw@mail.gmail.com">
      <div dir="ltr">
        <div>Pessoal, bom dia.</div>
        <div><br>
        </div>
        <div>Após as mudanças nos sites de onde eram obtidas as cotações
          dos ativos, mesmo utilizando os últimos scripts com as
          alterações para o Tesouro e o Yahoo, ainda não estou
          conseguindo obter as cotações.</div>
        <div><br>
        </div>
        <div>Tentei atualizar o Perl baixando a última versão (utilizei
          o Strawberry Perl para Windows), atualizei o YahooJSON.pm e <a
            href="http://tesouro.pm" moz-do-not-send="true">tesouro.pm</a>
          já disponibilizados. Tem mais alguma alteração a ser feita? </div>
        <div><br>
        </div>
        <div>No caso de debêntures, também teve mudança?</div>
        <div><br>
        </div>
        <div>Obrigado,</div>
        <div><br>
        </div>
        <div>Danilo</div>
      </div>
      <br>
      <fieldset class="mimeAttachmentHeader"></fieldset>
      <br>
      <pre wrap="">_______________________________________________
gnucash-br mailing list
<a class="moz-txt-link-abbreviated" href="mailto:gnucash-br@gnucash.org">gnucash-br@gnucash.org</a>
<a class="moz-txt-link-freetext" href="https://lists.gnucash.org/mailman/listinfo/gnucash-br">https://lists.gnucash.org/mailman/listinfo/gnucash-br</a>
</pre>
    </blockquote>
    <br>
  </body>
</html>