1 files changed, 7 insertions, 1 deletions
diff --git a/R/build_portfolios.R b/R/build_portfolios.R
index 026dd740..ffab4f9f 100644
--- a/R/build_portfolios.R
+++ b/R/build_portfolios.R
@@ -4,6 +4,12 @@ library("yaml")
 args <- commandArgs(trailingOnly=TRUE)
 code.dir <- Sys.getenv("CODE_DIR")
 
+if(.Platform$OS.type == "unix"){
+  root.dir <- "/home/share/CorpCDOs"
+}else{
+  root.dir <- "//WDSENTINEL/share/CorpCDOs"
+}
+
 source(file.path(code.dir, "code", "R", "intex_deal_functions.R"), chdir=TRUE)
 source(file.path(code.dir, "code", "R", "yieldcurve.R"))
 source(file.path(code.dir, "code", "R", "mlpdb.R"))
@@ -59,7 +65,7 @@ for(i in seq_along(dealnames)){
     deal.weights <- deal.portfolio$notional/sum(deal.portfolio$notional)
     deal.spread5y <- portfoliospread(deal.portfolio, index$maturity)
     deal.spreadatmaturity <- portfoliospread(deal.portfolio)
-    save.dir <- file.path("/home/share/CorpCDOs/Scenarios", paste("Portfolios", workdate, sep="_"))
+    save.dir <- file.path(root.dir, "Scenarios", paste("Portfolios", workdate, sep="_"))
     if(!file.exists(save.dir)){
         dir.create(save.dir)
     }