add backend error heuristic for q_advanced error

chreman · chreman · commit 67c90bb69e62 · 2025-11-25T16:57:11.000+01:00
diff --git a/server/preprocessing/other-scripts/utils.R b/server/preprocessing/other-scripts/utils.R
@@ -95,6 +95,12 @@ detect_error <- function(failed, service, params) {
           reason <- c(reason, 'API error: timeout')
       }
     }
+    if (length(reason) == 0 && service == 'base') {
+      # check if q_advanced is in list of params
+      if (!is.null(params$q_advanced)) {
+        reason <- c(reason, "API error: q_advanced")
+      }
+    }
     if (length(reason) == 0 && service == 'pubmed') {
       if (startsWith(failed$query_reason, "HTTP failure: 500") && grepl("error forwarding request", failed$query_reason, fixed=TRUE)){
           reason <- c(reason, 'API error: requested metadata size')

Original file line number	Diff line number	Diff line change
`@@ -95,6 +95,12 @@ detect_error <- function(failed, service, params) {`
`95`	`95`	`reason <- c(reason, 'API error: timeout')`
`96`	`96`	`}`
`97`	`97`	`}`
	`98`	`+ if (length(reason) == 0 && service == 'base') {`
	`99`	`+ # check if q_advanced is in list of params`
	`100`	`+ if (!is.null(params$q_advanced)) {`
	`101`	`+ reason <- c(reason, "API error: q_advanced")`
	`102`	`+ }`
	`103`	`+ }`
`98`	`104`	`if (length(reason) == 0 && service == 'pubmed') {`
`99`	`105`	`if (startsWith(failed$query_reason, "HTTP failure: 500") && grepl("error forwarding request", failed$query_reason, fixed=TRUE)){`
`100`	`106`	`reason <- c(reason, 'API error: requested metadata size')`