aboutsummaryrefslogtreecommitdiffstats
path: root/R/intex_deal_functions.R
diff options
context:
space:
mode:
Diffstat (limited to 'R/intex_deal_functions.R')
-rw-r--r--R/intex_deal_functions.R8
1 files changed, 3 insertions, 5 deletions
diff --git a/R/intex_deal_functions.R b/R/intex_deal_functions.R
index f6fa2c2c..8e7d0b43 100644
--- a/R/intex_deal_functions.R
+++ b/R/intex_deal_functions.R
@@ -46,13 +46,11 @@ listdealnames <- function(){
return( dbGetQuery(dbCon, sqlstring))
}
-cusip.data <- function(date){
- if(missing(date)){
- sqlstring <- "SELECT a.cusip, b.maturity, a.coupon AS grosscoupon, a.spread,
+cusip.data <- function(){
+ ## TODO: make it date dependent
+ sqlstring <- "SELECT a.cusip, b.maturity, a.coupon AS grosscoupon, a.spread,
CASE WHEN a.floater_index like 'LIBOR%' THEN 'FLOAT' ELSE 'FIXED' END
AS fixedorfloat, a.orig_moody from cusip_universe a LEFT JOIN latest_clo_universe b ON a.dealname = b.dealname"
- }else{
- }
data <- dbGetQuery(dbCon, sqlstring)
return( data )
}