R/app_server.R

Defines functions app_server

#' The application server-side
#'
#' @param input,output,session Internal parameters for {shiny}.
#'     DO NOT REMOVE.
#' @import shiny
#' @noRd

app_server <- function(input, output, session) {

  # modulos de conjuntura
  callModule(mod_conj_atividade_economica_server, "atividade_economica_ui_1")
  callModule(mod_conj_atividade_economica_es_server, "atividade_economica_es_ui_1")
  callModule(mod_conj_mercados_server, "mercados_ui_1")
  callModule(mod_conj_inflacao_server, "inflacao_ui_1")
  callModule(mod_conj_consumo_server, "consumo_ui_1")
  callModule(mod_conj_credito_server, "credito_ui_1")
  callModule(mod_conj_setor_publico_server, "setor_publico_ui_1")
  mod_conj_setor_publico_br_server("setor_publico_br_ui_1")

  # modulo de cobranca
  mod_cob_overview_server("cob_overview_ui_1")

  # modulos de fundos
  mod_fundos_introducao_server("fundos_introducao_ui_1")
  mod_fundos_vitoria_500_server("fundos_vitoria_500_ui_1")
  mod_fundos_institucional_server("fundos_institucional_ui_1")
  mod_fundos_investidor_server("fundos_investidor_ui_1")
  mod_invest_public_server("invest_public_ui_1")
  mod_fundo_previdenciario_server("fundo_previdenciario_ui_1")
  mod_fundos_vip_server("fundos_vip_ui_1")
  mod_fundo_liquidez_server("fundo_liquidez_ui_1")
  mod_fundos_referencial_server("fundos_referencial_ui_1")
  mod_fundos_btg_server("fundos_btg_ui_1")
  mod_fundos_invest_money_server("fundos_invest_money_ui_1")
  mod_fundos_Solidez_server("fundos_Solidez_ui_1")
  mod_fundos_valores_server("fundos_valores_ui_1")
  mod_fundos_debentures_server("fundos_debentures_ui_1")
  mod_fundos_Estrategia_server("fundos_Estrategia_ui_1")
  mod_fundos_dividendos_server("fundos_dividendos_ui_1")

  #menu Itens
  observeEvent(input$tabs, {
    shinyjs::toggleClass(selector = "body", class = "sidebar-collapse")
  }, ignoreInit = TRUE)
}
albersonmiranda/econdashboard documentation built on Aug. 13, 2024, 1:38 a.m.