Estou tentando construir uma função em R para fazer o download múltiplo de documentos diretamente do sistema disponibilizado pela CVM.
As instruções gerais dadas pela CVM para o download múltiplo são descritas em: http://sistemas.cvm.gov.br/Port/DownloadArqs/download02.htm
Em resumo, o acesso ao sistema depende de autenticação via login e senha e exige que se informem os parâmetros da consulta via método POST. O sistema responderá em XML, disponibilizando as URLs para download dos documentos.
O que eu quero fazer é retornar no R a lista contendo essas URLs. Para isso, tentei escrever uma função simples usando o package "httr", descrita a seguir:
sist_cvm <- "https://www.rad.cvm.gov.br/DOWNLOAD/SolicitaDownload.asp"
login <- list(txtLogin = "MEU_LOGIN", txtSenha = "MINHA_SENHA", txtData = "15/04/2015", txtHora = "00:00", txtDocumento = "4")
library(httr)
acesso <- POST(url=sist_cvm, body=login, encode="multipart", verbose())
Todavia, ao tentar rodar, retorna o seguinte erro:
SSL certificate problem: Error in function (type, msg, asError = TRUE)
Obs.: tentei fazer múltiplas combinações ao redigir a função POST
, variando encode
como form
, multipart
e json
, bem como incluindo ou omitindo verbose()
. Também tentei substituir os elementos de login e senha da lista login
por authenticate("MEU_LOGIN", "MINHA_SENHA")
. Em todos os casos, o mesmo erro foi retornado.
Alguém podia me dar alguma sugestão, por favor?
Obrigado!