Bom dia Danilo,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".
Segue em anexo o módulo atualizado para as debêntures.Existe uma mudança no arquivo Quote.pm para usar o yahoo_json para atualizar as cotações das moedas. Segue as diferenças:
diff Quote.pm Quote.pm.orig ========================================= 39d38 < use JSON qw( decode_json ); 53c52 < $YAHOO_CURRENCY_URL = "https://query1.finance.yahoo.com/v7/finance/quote?symbols="; ---
$YAHOO_CURRENCY_URL = "http://finance.yahoo.com/d/quotes.csv?e=.csv&f";
253,254c253,254
< my $json_result = JSON::decode_json $data;
< my $exchange_rate =
$json_result->{'quoteResponse'}{'result'}[0]-{'regularMarketPrice'};
---
my $exchange_rate = $data;
========================================== Qualquer problema... é só perguntar.. Abs, Rafael cASALI Em 20-11-2017 10:33, Danilo Castanheira escreveu:
Pessoal, bom dia.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.Tentei atualizar o Perl baixando a última versão (utilizei o Strawberry Perl para Windows), atualizei o YahooJSON.pm e tesouro.pm <http://tesouro.pm> já disponibilizados. Tem mais alguma alteração a ser feita?No caso de debêntures, também teve mudança? Obrigado, Danilo _______________________________________________ gnucash-br mailing list [email protected] https://lists.gnucash.org/mailman/listinfo/gnucash-br
DebBrasil.pm
Description: Perl program
_______________________________________________ gnucash-br mailing list [email protected] https://lists.gnucash.org/mailman/listinfo/gnucash-br
