Abort when no results files are found

OHDSI · Feb 26, 2025 · 9ec60b1 · 9ec60b1
1 parent 9fa5ecc
commit 9ec60b1
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 1 deletion.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -40,7 +40,8 @@ Imports:
     tidyr (>= 1.2.0),
     CohortGenerator (>= 0.10.0),
     remotes,
-    scales
+    scales,
+    cli
 Suggests:
     Eunomia,
     RSQLite (>= 2.2.1),

diff --git a/R/Shiny.R b/R/Shiny.R
@@ -198,6 +198,10 @@ createMergedResultsFile <-
         recursive = TRUE
       )
 
+    if (legnth(listOfZipFilesToUpload) == 0) {
+      cli::cli_abort("No result files found in folder", dataFolder)
+    }
+
     for (zipFileName in listOfZipFilesToUpload) {
       uploadResults(
         connectionDetails = connectionDetails,