You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
125 lines
3.7 KiB
125 lines
3.7 KiB
#
|
|
# Custom App developed for Finance Team of Aramco
|
|
# ::Asitav Sen::
|
|
# ::LaNubia Consulting::
|
|
# ::asitav.sen@lanubia.com::
|
|
#
|
|
|
|
library(shiny)
|
|
library(shinydashboard)
|
|
library(countup)
|
|
library(shinyWidgets)
|
|
library(shinydashboardPlus)
|
|
library(DBI)
|
|
library(RPostgres)
|
|
library(dplyr)
|
|
library(echarts4r)
|
|
library(lubridate)
|
|
library(DT)
|
|
library(excelR)
|
|
library(blastula)
|
|
library(shinymanager)
|
|
library(glue)
|
|
library(shinythemes)
|
|
library(kableExtra)
|
|
library(waiter)
|
|
|
|
|
|
|
|
source("helper_server.R")
|
|
source("mod_valuebox.R")
|
|
source("mod_elinearea.R")
|
|
source("mod_step.R")
|
|
source("mod_datatable.R")
|
|
source("helper_ui.R")
|
|
|
|
# Define UI for application
|
|
|
|
shinyUI(
|
|
secure_app(
|
|
shinydashboardPlus::dashboardPage(
|
|
title = "Budgetrack",
|
|
#skin = "blue-light",
|
|
#skin = "midnight",
|
|
header = shinydashboardPlus::dashboardHeader(title = "Budgetrack"),
|
|
sidebar = shinydashboardPlus::dashboardSidebar(
|
|
sidebarMenuOutput("menu")
|
|
),
|
|
body = dashboardBody(
|
|
|
|
tags$head(tags$style(HTML(
|
|
|
|
'
|
|
/* logo */
|
|
.skin-blue .main-header .logo {
|
|
background-color: #0477ci;
|
|
}
|
|
|
|
/* logo when hovered */
|
|
.skin-blue .main-header .logo:hover {
|
|
background-color: #009adc;
|
|
}
|
|
|
|
/* navbar (rest of the header) */
|
|
.skin-blue .main-header .navbar {
|
|
background-color: #0033a0;
|
|
}
|
|
|
|
/* main sidebar */
|
|
.skin-blue .main-sidebar {
|
|
background-color: #ffffff;
|
|
}
|
|
|
|
/* active selected tab in the sidebarmenu */
|
|
.skin-blue .main-sidebar .sidebar .sidebar-menu .active a{
|
|
background-color: #01a54b;
|
|
}
|
|
|
|
/* other links in the sidebarmenu */
|
|
.skin-blue .main-sidebar .sidebar .sidebar-menu a{
|
|
background-color: #ffffff;
|
|
color: #000000;
|
|
}
|
|
|
|
/* other links in the sidebarmenu when hovered */
|
|
.skin-blue .main-sidebar .sidebar .sidebar-menu a:hover{
|
|
background-color: #009adc;
|
|
}
|
|
'
|
|
|
|
))),
|
|
tabItems(dashboard,
|
|
upload,
|
|
appndev,
|
|
explan,
|
|
admin))
|
|
),
|
|
enable_admin = TRUE,
|
|
theme = shinythemes::shinytheme("united"),
|
|
tags_top =
|
|
tags$div(
|
|
tags$h4("Created exclusively for ", style ="align:center"),
|
|
br(),
|
|
tags$img(
|
|
src = "https://www.aramco.com/images/affiliateLogo-2x.png", width = 100
|
|
),
|
|
br(),
|
|
br(),
|
|
tags$h4("By", style ="align:center"),
|
|
tags$img(src="logo.png", width=100)
|
|
),
|
|
tags_bottom = tags$p(
|
|
"For any question, please contact",
|
|
tags$a(
|
|
href ="mailto:asitav.sen@lanubia.com?Subject=Aramco%20aBugdet",
|
|
target="_top","Asitav Sen"
|
|
)
|
|
),
|
|
background = "linear-gradient(225deg,rgb(0,163,224),
|
|
rgb(0,51,160),
|
|
rgb(0,132,61),
|
|
rgb(132,189,0));"
|
|
)
|
|
|
|
)
|
|
|
|
|