[原创]利用s-plus从bloomberg提取数据-经管之家官网！

扫码加入金融交流群

目的：

做研究离不开数据，bloomberg现在是全球最好的资讯系统之一，有庞大的数据，s-plus 8 提供了financedb模块可以方便地提取数据，教你如何从bloomberg提取数据放入数据库。

环境准备：

有一台bloomberg终端；
安装s-plus，并安装了financedb模块；
配置好odbc连接串。

过程分析：
利用s-plus的financedb模块提供的函数从bloomberg终端的dde server提取数据，并写入数据库。

源代码实现：
从bloomberg终端提取恒生指数的成分明细以及成份股权重，放入数据库。

假设：
配置的odbc连接串dns为oracle_odbc；
数据库表index_weight有字段：index_name,dt,bloomberg_id,weight

源代码如下：
#//////////////////////////////////////////////////////////////////////////////////////////////////////

#开启链接
openDBConnection()

#设定ODBC连接串
vODBCString <- "DSN=oracle_odbc;UID=你的用户名;PWD=你的密码; server=Oracle监听名"

#get hsi index member weight from bloomberg dde server
outData <- import.data.bloomberg("Bulk", c("hsi index"),
c("INDX_MWEIGHT"), "", "", "Now", "Now", "Day",
"Chronological", "BLP.EXE")

#import into database
for (j in 1:length(outData[, 1]))
{
#deal with the outData
if (is.character(outData[j, 1]))
{
if (regexpr("#N/A", outData[j, 1])[1] > 0)
{
outData[j, 1] <- " "
}

}

if (is.character(outData[j, 2]))
{
if (regexpr("#N/A", outData[j, 2])[1] > 0)
{
outData[j, 2] <- 0
}

}

#merge parameter
SqlStr = "insert into index_weight (index_name,dt,bloomberg_id,weight) values("
SqlStr = paste(SqlStr, "\'hsi\',\'20081128\',trim(\'",
outData[j, 1], "\'),", outData[j, 2] / 100, ")")

#import into database
SQL <- importData(type="ODBC", odbcConnection=vODBCString,
odbcSqlQuery=SqlStr)
}

#drop variable
rm(SqlStr)
rm(outData)
rm(SQL)

#关闭连接
closeDBConnection()

#//////////////////////////////////////////////////////////////////////////////////////////////////////

更多的使用方法可以参考s-plus的financedb模块的帮助。

有问题可以联系www.jinronq.com，金融圈。

「经管之家」APP：经管人学习、答疑、交友，就上经管之家！
免流量费下载资料----在经管之家app可以下载论坛上的所有资源，并且不额外收取下载高峰期的论坛币。
涵盖所有经管领域的优秀内容----覆盖经济、管理、金融投资、计量统计、数据分析、国贸、财会等专业的学习宝库，各类资料应有尽有。
来自五湖四海的经管达人----已经有上千万的经管人来到这里，你可以找到任何学科方向、有共同话题的朋友。
经管之家（原人大经济论坛），跨越高校的围墙，带你走进经管知识的新世界。
扫描下方二维码下载并注册APP