diff options
| -rw-r--r-- | R/calibrate_tranches_BC.R | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/R/calibrate_tranches_BC.R b/R/calibrate_tranches_BC.R index 6e8bf8ab..a622e9ea 100644 --- a/R/calibrate_tranches_BC.R +++ b/R/calibrate_tranches_BC.R @@ -130,12 +130,9 @@ for(run in config$runs){ cat(csvheaders(index), sep="\n", file=filename)
}
cat(tocsv(index), sep="\n", file=filename, append=TRUE)
-
r <- with(tosql(index),
- dbSendQuery(serenitasdb, stmt, params))
- if(dbHasCompleted(r)){
- dbClearResult(r)
- }
+ tryCatch(dbGetQuery(serenitasdb, stmt, params),
+ error = function(e) logerror(e$message)))
loginfo("done")
}
}
|
