<div dir="ltr"><div>A propósito, hoje o módulo está dando erro aqui. Não tentei debugar, pois como é fim de ano deve ter alguma coisa diferente no site do Tesouro.</div><div><br></div><div>Semana que vem eu vou atrás se continuar sem funcionar.<br></div></div><br><div class="gmail_quote"><div dir="ltr" class="gmail_attr">Em qua., 30 de dez. de 2020 às 18:27, Adriano <<a href="mailto:adrianoss@gmail.com">adrianoss@gmail.com</a>> escreveu:<br></div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex"><div dir="ltr">Agora segue o arquivo que editei.<br></div><br><div class="gmail_quote"><div dir="ltr" class="gmail_attr">Em qua., 30 de dez. de 2020 às 18:26, Adriano <<a href="mailto:adrianoss@gmail.com" target="_blank">adrianoss@gmail.com</a>> escreveu:<br></div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex"><div dir="ltr"><div dir="ltr"><div>Yulli, Rafael, eu tive uns problemas com conexão no módulo Tesouro.pm, e mandei uma mensagem sobre isso um tempo atrás, com a solução que funcionou para mim.</div><div><br></div><div>Agora vi que a minha mensagem ficou retida para aprovação, acho que vocês não receberam. Então copio o conteúdo abaixo. Vou mandar em duas partes, para diminuir o tamanho.<br></div><div><br></div><div>Primeira parte, só o texto. O arquivo editado mando em seguida.<br></div><div><br></div><div>----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------</div><div></div><div><div>Rafael, obrigado pelo arquivo.</div><div><br></div><div>Mas eu comparei aqui e é o mesmo que eu tinha. Então o problema era em outro lugar.</div><div><br></div><div>Mas nada com um bom sábado pela manhã para consertar essas coisas...</div><div><br></div><div>Resumindo, editei o <a href="http://tesouro.pm" target="_blank">tesouro.pm</a> (anexo) e agora funciona para mim.</div><div><br></div><div>A versão completa segue abaixo.</div><div><br></div><div>Como
 você disse que funcionava para você, mas eu tenho um erro que parecia 
ser no acesso ao site, pesquisei um pouco e encontrei, primeiramente, 
isso: <a href="https://stackoverflow.com/questions/49411569/perl-getstore-gives-error-500-but-can-downlaod-via-wget-or-web-browser" target="_blank">https://stackoverflow.com/questions/49411569/perl-getstore-gives-error-500-but-can-downlaod-via-wget-or-web-browser.</a> Na
 resposta mais abaixo do link, o usuário sugere um código para detalhar o
 erro. Então usei o código, levemente alterado como abaixo, no <a href="https://www.onlinegdb.com/online_perl_compiler:" target="_blank">https://www.onlinegdb.com/online_perl_compiler</a>:</div><div><br></div><div><font face="Courier New, Courier, monospace">use LWP::Protocol::https;</font></div><div><font face="Courier New, Courier, monospace">use LWP::UserAgent qw();</font></div><div><font face="Courier New, Courier, monospace">my $ua = LWP::UserAgent->new;</font></div><div><span style="font-family:"Courier New",Courier,monospace">my $res = $ua->get('</span><a href="https://www.tesourodireto.com.br//json/br/com/b3/tesourodireto/service/api/treasurybondsinfo.json'" style="font-family:"Courier New",Courier,monospace" target="_blank">https://www.tesourodireto.com.br//json/br/com/b3/tesourodireto/service/api/treasurybondsinfo.json'</a><span style="font-family:"Courier New",Courier,monospace">);</span></div><div><font face="Courier New, Courier, monospace">if ($res->is_error) {</font></div><div><font face="Courier New, Courier, monospace">    printf(</font></div><div><font face="Courier New, Courier, monospace">        "get failed.\nStatus: %s\nContent:\n%s\n\nFull response:\n%s\n",</font></div><div><font face="Courier New, Courier, monospace">        $res->status_line,</font></div><div><font face="Courier New, Courier, monospace">        $res->content,</font></div><div><font face="Courier New, Courier, monospace">        $res->as_string</font></div><div><font face="Courier New, Courier, monospace">    )</font></div><div><font face="Courier New, Courier, monospace">}</font></div><div><br></div><div>O resultado foi esse:</div><div><br></div><div><font face="Courier New, Courier, monospace">get failed.</font></div><div><font face="Courier New, Courier, monospace">Status: 500 Can't connect to <a href="https://www.tesourodireto.com.br:443" target="_blank">www.tesourodireto.com.br:443</a></font></div><div><font face="Courier New, Courier, monospace">Content:</font></div><div><font face="Courier New, Courier, monospace">Can't connect to <a href="https://www.tesourodireto.com.br:443" target="_blank">www.tesourodireto.com.br:443</a></font></div><div><font face="Courier New, Courier, monospace"><br></font></div><div><font face="Courier New, Courier, monospace">LWP::Protocol::https::Socket: getaddrinfo: Name or service not known at /usr/share/perl5/LWP/Protocol/<a href="http://http.pm" target="_blank">http.pm</a> line 41.</font></div><div><font face="Courier New, Courier, monospace"><br></font></div><div><font face="Courier New, Courier, monospace"><br></font></div><div><font face="Courier New, Courier, monospace">Full response:</font></div><div><font face="Courier New, Courier, monospace">500 Can't connect to <a href="https://www.tesourodireto.com.br:443" target="_blank">www.tesourodireto.com.br:443</a></font></div><div><font face="Courier New, Courier, monospace">Content-Type: text/plain</font></div><div><font face="Courier New, Courier, monospace">Client-Date: Sat, 12 Dec 2020 11:53:53 GMT</font></div><div><font face="Courier New, Courier, monospace">Client-Warning: Internal response</font></div><div><font face="Courier New, Courier, monospace"><br></font></div><div><font face="Courier New, Courier, monospace">Can't connect to <a href="https://www.tesourodireto.com.br:443" target="_blank">www.tesourodireto.com.br:443</a></font></div><div><font face="Courier New, Courier, monospace"><br></font></div><div><font face="Courier New, Courier, monospace">LWP::Protocol::https::Socket: getaddrinfo: Name or service not known at /usr/share/perl5/LWP/Protocol/<a href="http://http.pm" target="_blank">http.pm</a> line 41.</font></div><div><br></div><div>Então usei o comando "<font face="Courier New, Courier, monospace">curl <a href="https://www.tesourodireto.com.br//json/br/com/b3/tesourodireto/service/api/treasurybondsinfo.json" target="_blank">https://www.tesourodireto.com.br//json/br/com/b3/tesourodireto/service/api/treasurybondsinfo.json</a></font>", que indicou erro de certificado:</div><div><br></div><div><font face="Courier New, Courier, monospace">curl: (60) SSL certificate problem: unable to get local issuer certificate</font></div><div><font face="Courier New, Courier, monospace">More details here: <a href="https://curl.haxx.se/docs/sslcerts.html" target="_blank">https://curl.haxx.se/docs/sslcerts.html</a></font></div><div><font face="Courier New, Courier, monospace"><br></font></div><div><font face="Courier New, Courier, monospace">curl failed to verify the legitimacy of the server and therefore could not</font></div><div><font face="Courier New, Courier, monospace">establish a secure connection to it. To learn more about this situation and</font></div><div><font face="Courier New, Courier, monospace">how to fix it, please visit the web page mentioned above.</font></div><div><br></div><div>Como seu código já tinha uma opção para ignorar a verificação do certificado, fiz o mesmo no curl:</div><div><br></div><div><font face="Courier New, Courier, monospace">curl -k <a href="https://www.tesourodireto.com.br//json/br/com/b3/tesourodireto/service/api/treasurybondsinfo.json" target="_blank">https://www.tesourodireto.com.br//json/br/com/b3/tesourodireto/service/api/treasurybondsinfo.json</a></font></div><div><br></div><div>Com o seguinte resultado:</div><div><br></div><div><font face="Courier New, Courier, monospace">curl: (35) error:141A318A:SSL routines:tls_process_ske_dhe:dh key too small</font></div><div><br></div><div>Aí eu achei isso aqui: <a href="https://stackoverflow.com/questions/36417224/openssl-dh-key-too-small-error?noredirect=1" target="_blank">https://stackoverflow.com/questions/36417224/openssl-dh-key-too-small-error</a></div><div><br></div><div>Na
 resposta, o usuário comenta que o OpenSSL passou a exigir chave DH mais
 forte (o OpenSSL do meu Fedora deve estar com essa exigência ativada), e
 sugere adicionar a opção <font face="Courier New, Courier, monospace"><span>SSL_cipher_list =></span> <span>'DEFAULT:!DH'</span></font> na verificação do SSL (a resposta no link acima explica o motivo).</div><div><br></div><div>Então mudei o arquivo <a href="http://tesouro.pm" target="_blank">tesouro.pm</a>. As linhas a partir da 100 ficaram assim:</div><div><br></div><div><font face="Courier New, Courier, monospace">    SSL_verify_mode => IO::Socket::SSL::SSL_VERIFY_NONE, </font></div><div><font face="Courier New, Courier, monospace">    SSL_cipher_list => 'DEFAULT:!DH', </font></div><div><font face="Courier New, Courier, monospace">    verify_hostname => 0);</font></div><div><br></div><div>E então voltou a funcionar.</div><div><br></div><div>Segue o <a href="http://tesouro.pm" target="_blank">tesouro.pm</a> editado em anexo, pode ser que alguma atualização futura do sistema operacional ative, para outros usuários, o mesmo erro que observei.</div><div><br></div><div>Abraço,</div><div>Adriano</div></div></div><div><br></div><div>--------------------------------------------------<br></div><div><br></div><div class="gmail_quote"><div dir="ltr" class="gmail_attr">Em qua., 30 de dez. de 2020 às 14:07, <<a href="mailto:rmcasali@gmail.com" target="_blank">rmcasali@gmail.com</a>> escreveu:<br></div><blockquote class="gmail_quote" style="margin:0px 0px 0px 0.8ex;border-left:1px solid rgb(204,204,204);padding-left:1ex">Caro Yulli,<br>
<br>
Não consegui reproduzir o seu erro, mas me parece problema de conexão<br>
com o site de buscca.<br>
<br>
Mas é bom ter em mente que o módulo está configurado para pegar o preço<br>
de resgate. No site, <br>
<br>
<a href="https://www.tesourodireto.com.br/titulos/precos-e-taxas.htm" rel="noreferrer" target="_blank">https://www.tesourodireto.com.br/titulos/precos-e-taxas.htm</a><br>
<br>
a tabela de resgate não está funcionando, provavelmente não é possível<br>
fazer resgate hoje de nenhum título. Provalvelmente o módulo irá<br>
retornar um preço zero. <br>
<br>
Fica atento o site oficial do Tesouro se está tudo ok. Volta e meia tem<br>
problemas de mercado fechado e etc.<br>
<br>
Abs<br>
<br>
E Feliz ano novo a todos da lista.<br>
<br>
Rafael<br>
<br>
<br>
Em ter, 2020-12-29 às 19:24 +0000, yulli dias escreveu:<br>
> Boa Tarde Rafael!<br>
> <br>
> Consegui configurar o módulo! Segui esses passos que você me falou e<br>
> deu certo. Agora o problema é para utilizar o gnc-fq-dump, como faço<br>
> para configurar a data e a moeda?<br>
> <br>
> $ gnc-fq-dump tesouro IPCA+15052035<br>
> <br>
> Finance::Quote fields Gnucash uses:<br>
>     symbol: IPCA+15052035 (deduced) <=== required<br>
>       date: ** missing **        <=== recommended<br>
>   currency: ** missing **        <=== required<br>
> Use of uninitialized value $last in printf at /usr/bin/gnc-fq-dump<br>
> line 120.<br>
>       last:                      <=\      <br>
> Use of uninitialized value $nav in printf at /usr/bin/gnc-fq-dump<br>
> line 121.<br>
>        nav:                      <=== one of these<br>
> Use of uninitialized value $price in printf at /usr/bin/gnc-fq-dump<br>
> line 122.<br>
>      price:                      <=/        <br>
>   timezone:                      <=== optional<br>
> <br>
> ** This stock quote cannot be used by GnuCash!<br>
> <br>
> <br>
> Obrigada,<br>
> Yulli Dias<br>
> De: <a href="mailto:rmcasali@gmail.com" target="_blank">rmcasali@gmail.com</a> <<a href="mailto:rmcasali@gmail.com" target="_blank">rmcasali@gmail.com</a>><br>
> Enviado: terça-feira, 22 de dezembro de 2020 10:49<br>
> Para: yulli dias <<a href="mailto:yulli.dias@hotmail.com" target="_blank">yulli.dias@hotmail.com</a>>; <a href="mailto:gnucash-br@gnucash.org" target="_blank">gnucash-br@gnucash.org</a> <<br>
> <a href="mailto:gnucash-br@gnucash.org" target="_blank">gnucash-br@gnucash.org</a>><br>
> Assunto: Re: [gnucash-br] Problemas para configurar o Tesouro.pm<br>
>  <br>
> Bom dia Yulli,<br>
> <br>
> Vamos ver se consigo lhe ajudar.<br>
> <br>
> 1. O arquivo '<a href="http://tesouro.pm" rel="noreferrer" target="_blank">tesouro.pm</a>' deve ser copiado para o diretório onde se<br>
> encontra os outros módulos (ZA.pm, YahooJSON.pm etc). Normalmente é<br>
> um<br>
> diretóio "Quote" onde tem o arquivo "Quote.pm"<br>
> <br>
> 2. Preste atenção as letras minúsculas do nome do arquivo e para o<br>
> nome<br>
> do módulo a ser inserido em "Quote.pm"<br>
> <br>
> 3. Na edição do arquivo "Quote.pm", procure onde estão definidos os<br>
> módulos. No meu arquivo, está por volta da linha 185, você deve<br>
> encontrar algo do tipo:<br>
> ---- <br>
>     # Default modules<br>
> <br>
>     @modules = qw/AEX AIAHK AlphaVantage ASEGR ASX BMONesbittBurns<br>
>         BSERO Bourso Cdnfundlibrary Citywire CSE Currencies Deka<br>
>         DWS FTPortfolios Fidelity FidelityFixed FinanceCanada Fool<br>
>         FTfunds HU GoldMoney HEX IEXCloud IndiaMutual LeRevenu<br>
>         ManInvestments Morningstar MorningstarAU MorningstarCH<br>
>         MorningstarJP MStaruk NZX Platinum SEB SIXfunds SIXshares<br>
>         StockHouseCanada TSP TSX Tdefunds Tdwaterhouse Tiaacref<br>
>         TNetuk Troweprice Trustnet Union USFedBonds VWD ZA<br>
>         Cominvest Finanzpartner YahooJSON YahooYQL ZA_UnitTrusts/;<br>
>   }<br>
> ------<br>
> Pode inserir uma linha, ou colocar no final de qualquer linha, ou<br>
> entre<br>
> dois módulos o nome do arquivo sem extensão "tesouro"<br>
> <br>
> Bom, se ainda tiver problemas, mande aí que tentaremos ajudar.<br>
> <br>
> Abs<br>
> Rafael  <br>
> <br>
> Em seg, 2020-12-21 às 23:20 +0000, yulli dias escreveu:<br>
> > Boa noite Rafael!<br>
> > <br>
> > Tentei utilizar o arquivo que você me mandou, mas deu erro na hora<br>
> de<br>
> > executar o gnc-fq-check.<br>
> > <br>
> > $ sudo gnc-fq-check<br>
> > Can't locate object method "methods" via package<br>
> > "Finance::Quote::Tesouro" (perhaps you forgot to load<br>
> > "Finance::Quote::Tesouro"?) at /usr/share/perl5/Finance/Quote.pm<br>
> line<br>
> > 120.<br>
> > <br>
> > Sabe o que pode ser?<br>
> > <br>
> > PS: removi as configurações que eu tinha feito utilizando a outra<br>
> > solução.<br>
> > <br>
> > Desde já agradeço,<br>
> > --<br>
> > Yulli Dias<br>
> > <br>
> > De: <a href="mailto:rmcasali@gmail.com" target="_blank">rmcasali@gmail.com</a> <<a href="mailto:rmcasali@gmail.com" target="_blank">rmcasali@gmail.com</a>><br>
> > Enviado: segunda-feira, 21 de dezembro de 2020 13:15<br>
> > Para: yulli dias <<a href="mailto:yulli.dias@hotmail.com" target="_blank">yulli.dias@hotmail.com</a>>; <a href="mailto:gnucash-br@gnucash.org" target="_blank">gnucash-br@gnucash.org</a> <<br>
> > <a href="mailto:gnucash-br@gnucash.org" target="_blank">gnucash-br@gnucash.org</a>><br>
> > Assunto: Re: [gnucash-br] Problemas para configurar o Tesouro.pm<br>
> >  <br>
> > Boa tarde...<br>
> > <br>
> > Como não sei se você está com a última versão do módulo, vou enviar<br>
> o<br>
> > que estou usando.<br>
> > <br>
> > Abs,<br>
> > Rafael<br>
> > <br>
> > Em dom, 2020-12-20 às 21:10 +0000, yulli dias escreveu:<br>
> > > Olá pessoal!<br>
> > > <br>
> > > Estou na tentativa de configurar o módulo do tesouro mas estou<br>
> > > obtendo o erro "Undefined fetch-method tesouro passed to<br>
> > > Finance::Quote::fetch at /usr/bin/gnc-fq-dump line 191. No<br>
> results<br>
> > > found for stock B_Principal_150535." quando eu executo o comando<br>
> > > gnc-fq-dump Tesouro B_Principal_150535. Alguém consegue me<br>
> ajudar?<br>
> > > <br>
> > > Para configurar o módulo do tesouro eu segui os seguintes passos:<br>
> > > 1 - Baixei o arquivo (<br>
> > > <br>
> <a href="http://lists.gnucash.org/pipermail/gnucash-br/attachments/20180305/08ff692c/attachment.pl" rel="noreferrer" target="_blank">http://lists.gnucash.org/pipermail/gnucash-br/attachments/20180305/08ff692c/attachment.pl</a><br>
> > > ) que encontrei na lista de e-mails (<br>
> > > <br>
> <a href="https://lists.gnucash.org/pipermail/gnucash-br/2018-March/000754.html" rel="noreferrer" target="_blank">https://lists.gnucash.org/pipermail/gnucash-br/2018-March/000754.html</a><br>
> > > ) e salvei em /usr/share/perl5/Finance como Tesouro.pm.<br>
> > > 2 - Editei o arquivo Quote.pm e acrescentei o modulo Tesouro na<br>
> > > lista de módulos.<br>
> > > 3 - Executei o comando export FQ_LOAD_QUOTELET="Currencies",<br>
> > > conforme indicado em <br>
> > > <a href="https://github.com/romuloceccon/finance-quote-brazil" rel="noreferrer" target="_blank">https://github.com/romuloceccon/finance-quote-brazil</a><br>
> > > 4 - Executei o comando gnc-fq-check<br>
> > > $ gnc-fq-check<br>
> > > ("1.49" "fetch_live_currencies" "known_currencies")<br>
> > > 5 - Executei o comando gnc-fq-update<br>
> > > $ sudo gnc-fq-update<br>
> > > Reading '/root/.local/share/.cpan/Metadata'<br>
> > >   Database was generated on Sun, 20 Dec 2020 19:55:55 GMT<br>
> > > Date::Manip is up to date (6.83).<br>
> > > Finance::Quote is up to date (1.49).<br>
> > > 6 - Por fim o comando de teste<br>
> > > $ gnc-fq-dump tesouro B_Principal_150535<br>
> > > Undefined fetch-method tesouro passed to Finance::Quote::fetch at<br>
> > > /usr/bin/gnc-fq-dump line 191.<br>
> > > No results found for stock B_Principal_150535.<br>
> > > <br>
> > > Desde já agradeço,<br>
> > > --<br>
> > > Yulli Dias<br>
> > > _______________________________________________<br>
> > > gnucash-br mailing list<br>
> > >  <a href="mailto:gnucash-br@gnucash.org" target="_blank">gnucash-br@gnucash.org</a><br>
> > > <br>
> > >  <a href="https://lists.gnucash.org/mailman/listinfo/gnucash-br" rel="noreferrer" target="_blank">https://lists.gnucash.org/mailman/listinfo/gnucash-br</a><br>
> > > <br>
> <br>
<br>
_______________________________________________<br>
gnucash-br mailing list<br>
<a href="mailto:gnucash-br@gnucash.org" target="_blank">gnucash-br@gnucash.org</a><br>
<a href="https://lists.gnucash.org/mailman/listinfo/gnucash-br" rel="noreferrer" target="_blank">https://lists.gnucash.org/mailman/listinfo/gnucash-br</a><br>
</blockquote></div>
</div>
</blockquote></div>
</blockquote></div>