#' 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)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.