diff --git a/components/app/R/server.R b/components/app/R/server.R
index 731f3be7f..9e2c904d5 100644
--- a/components/app/R/server.R
+++ b/components/app/R/server.R
@@ -543,6 +543,10 @@ app_server <- function(input, output, session) {
       ## trigger on change dataset
       dbg("[SERVER] trigger on change dataset")
 
+      ## write GLOBAL variables
+      LOADEDPGX <<- PGX$name
+      DATATYPEPGX <<- PGX$datatype
+
       ## show beta feauture
       show.beta <- env$user_settings$enable_beta()
       if (is.null(show.beta) || length(show.beta) == 0) show.beta <- FALSE