Skip to content

GitLab

Commit 3fa46b60 authored by kapsner's avatar kapsner
Browse files

changed position of reset.js

parent adfb9185
Hide whitespace changes
Inline Side-by-side
Showing
with 57 additions and 60 deletions
+57 -60
DQA_Tool/app/_utilities/RMD/DQA_report.Rmd
+ 1
- 1
View file @ 3fa46b60
---
# script by Lorenz Kapsner
# (c) 2019 Lorenz Kapsner
title: |
| Datenqualitätsanalyse des §21-Datensatzes:
| Überprüfung der ETL-Strecken zwischen Quellsystem (exportierte §21 Rohdaten) und Zielsystem (i2b2 Datenbank)
......
DQA_Tool/app/reset.js → DQA_Tool/app/_utilities/reset.js
+ 0
- 0
View file @ 3fa46b60
File moved
DQA_Tool/app/tests/testthat/test-headless.R
+ 0
- 3
View file @ 3fa46b60
......@@ -46,8 +46,5 @@ test_that("correct functioning of headless function",{
expect_s3_class(rv$list_source[["OPS.CSV"]], "data.table")
expect_known_hash(rv$list_source[["ICD.CSV"]], "8dda050b3d")
expect_s3_class(rv$list_source[["ICD.CSV"]], "data.table")
})
DQA_Tool/app/ui.R
+ 56
- 56
View file @ 3fa46b60
......@@ -5,67 +5,67 @@ shinyUI(dashboardPage(skin = "black",
dashboardHeader(title = "MIRACUM DQA"),
dashboardSidebar(
# Include shinyjs in the UI Sidebar
shinyjs::useShinyjs(),
extendShinyjs(script = "reset.js", functions = "reset"), # Add the js code to the page
#Sidebar Panel
sidebarMenu(id = "tabs",
menuItem("Dashboard", tabName = "tab_dashboard", icon = icon("tachometer-alt")),
sidebarMenuOutput("menu"),
menuItem("Settings", tabName = "tab_config", icon = icon("cogs")),
menuItem("DQ MDR", tabName = "tab_mdr", icon = icon("database")),
tags$hr(),
actionButton("reset", "Reset DQA Tool")
)),
# Include shinyjs in the UI Sidebar
shinyjs::useShinyjs(),
extendShinyjs(script = "./_utilities/reset.js", functions = "reset"), # Add the js code to the page
#Sidebar Panel
sidebarMenu(id = "tabs",
menuItem("Dashboard", tabName = "tab_dashboard", icon = icon("tachometer-alt")),
sidebarMenuOutput("menu"),
menuItem("Settings", tabName = "tab_config", icon = icon("cogs")),
menuItem("DQ MDR", tabName = "tab_mdr", icon = icon("database")),
tags$hr(),
actionButton("reset", "Reset DQA Tool")
)),
dashboardBody(
# Include shinyjs in the UI Body
shinyjs::useShinyjs(),
# js reset function
# https://stackoverflow.com/questions/25062422/restart-shiny-session
extendShinyjs(script = "./_utilities/reset.js", functions = "reset"), # Add the js code to the page
tabItems(
tabItem(tabName = "tab_dashboard",
moduleDashboardUI("moduleDashboard")
),
tabItem(tabName = "tab_config",
moduleConfigUI("moduleConfig")
),
tabItem(tabName = "tab_rawdata1",
moduleRawdata1UI("moduleRawdata1")
),
# Include shinyjs in the UI Body
shinyjs::useShinyjs(),
tabItem(tabName = "tab_numerical",
moduleNumericalUI("moduleNumerical")
),
# js reset function
# https://stackoverflow.com/questions/25062422/restart-shiny-session
extendShinyjs(script = "reset.js", functions = "reset"), # Add the js code to the page
tabItem(tabName = "tab_categorical",
moduleCategoricalUI("moduleCategorical")
),
tabItems(
tabItem(tabName = "tab_dashboard",
moduleDashboardUI("moduleDashboard")
),
tabItem(tabName = "tab_config",
moduleConfigUI("moduleConfig")
),
tabItem(tabName = "tab_rawdata1",
moduleRawdata1UI("moduleRawdata1")
),
tabItem(tabName = "tab_numerical",
moduleNumericalUI("moduleNumerical")
),
tabItem(tabName = "tab_categorical",
moduleCategoricalUI("moduleCategorical")
),
tabItem(tabName = "tab_plausibility",
modulePlausibilityUI("modulePlausibility")
),
tabItem(tabName = "tab_visualizations",
moduleVisualizationsUI("moduleVisulizations")
),
tabItem(tabName = "tab_report",
moduleReportUI("moduleReport")
),
tabItem(tabName = "tab_mdr",
moduleMDRUI("moduleMDR")
)
tabItem(tabName = "tab_plausibility",
modulePlausibilityUI("modulePlausibility")
),
tabItem(tabName = "tab_visualizations",
moduleVisualizationsUI("moduleVisulizations")
),
tabItem(tabName = "tab_report",
moduleReportUI("moduleReport")
),
tabItem(tabName = "tab_mdr",
moduleMDRUI("moduleMDR")
)
)
)
))
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment