CUSIPData Example

Here we have a simple demonstration regarding how to get CUSIP data from CUSIP Global Services (CGS). The picture below shows this same R 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 <- GetCUSIPData(issueISINNumber = "US0378331005")

CUSIPData Example