Files
gemfin-shiny/ui.R
T
2026-03-19 17:06:40 +01:00

48 lines
1.3 KiB
R

## ui.R ##
dashboardPage(
dashboardHeader( ),
## Sidebar content
dashboardSidebar(
sidebarMenu(id = "tabs",
menuItem("buchungen", tabName = "buchungen", icon = icon("list")),
menuItem("konten", tabName = "konten", icon = icon("building-columns"))
),
conditionalPanel(
condition = "input.tabs == 'buchungen'",
tags$ul(
class = "sidebar-menu",
tags$li(
class = "treeview",
tags$a(href = "#",
tags$i(class = "fa fa-filter"),
tags$span("Filter"),
tags$span(class = "pull-right-container",
tags$i(class = "fa fa-angle-left pull-right")
)
),
tags$ul(
class = "treeview-menu",
style = "padding: 5px 0;",
tags$li(actionBttn("filter_alle", "Alle", size = "xs", style = "minimal")),
tags$li(actionBttn("filter_giro", "Girokonto", size = "xs", style = "minimal")),
tags$li(actionBttn("filter_monat", "Dieser Monat", size = "xs", style = "minimal"))
)
)
)
)
),
dashboardBody(
tabItems(
# First tab content
tabItem(tabName = "buchungen",
buchungenUI("buchungen_tab")
),
# Second tab content
tabItem(tabName = "widgets",
h2("Widgets tab content")
)
)
)
)