CUSIPPortfolioData Example

Home | FAQ | CUSIP Global Services Website | Bitbucket | Bamboo | Try it!

Here we have a simple demonstration regarding how to get the CUSIP portfolio data available from CUSIP Global Services (CGS). The picture below shows this same script, along with some of the information returned from CGS.

library(rCUSIPGlobalServices)
options(CGS_USERID=Sys.getenv("CGS_USERID"))
options(CGS_PASSWORD=Sys.getenv("CGS_PASSWORD"))
rCUSIPGlobalServices::Initialize ()
rCUSIPGlobalServices::Login(userId = getOption("CGS_USERID"), password = getOption("CGS_PASSWORD"))
result <- GetCUSIPPortfolioData(cusip = "3128Q43H0")

CUSIPPortfolioData Example