diff options
Diffstat (limited to 'R/intex_deal_functions.R')
| -rw-r--r-- | R/intex_deal_functions.R | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/R/intex_deal_functions.R b/R/intex_deal_functions.R index 6fd34e9e..a1e4626b 100644 --- a/R/intex_deal_functions.R +++ b/R/intex_deal_functions.R @@ -346,7 +346,7 @@ severityfromscenarios <- function(scenariosd, scenariosr){ get.reinvassets <- function(dealname, tradedate){ r <- list() - sqlstr <- "select * from et_historicaldealinfo($1, $2) where ReinvFlag Is true" + sqlstr <- "SELECT * FROM et_historicaldealinfo($1, $2) WHERE ReinvFlag is true" data <- dbGetQuery(etdb, sqlstr, params=list(dealname, tradedate)) if(nrow(data)>0){ for(i in 1:nrow(data)){ |