tidy up exception handling

itsleeds · Sep 8, 2023 · 0c47eb7 · 0c47eb7
1 parent 8c60dd3
commit 0c47eb7
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/R/atoc_export.R b/R/atoc_export.R
@@ -320,10 +320,10 @@ makeCalendar <- function(schedule, ncores = 1) {
     set_TREAT_DATES_AS_INT( FALSE )
 
     #revert treating date as int
-    if( TRUE==treatDatesAsInt && exists("res.calendar") )
+    if( TRUE==treatDatesAsInt )
     {
-      res.calendar = makeDateFieldsDateType( res.calendar )
-      cancellations = makeDateFieldsDateType( cancellations )
+      if (exists("res.calendar")){ res.calendar = makeDateFieldsDateType( res.calendar ) }
+      if (exists("cancellations")){ cancellations = makeDateFieldsDateType( cancellations ) }
     }
   })