tabItem(tabName = "treatment",
column(width = 8,
shinyjs::useShinyjs(),
div(img(src = "si-indicators/art.png", height = '30%', width = '30%'), style="text-align: center;"),
br(),
box(width = NULL,
status = "primary",
solidHeader = TRUE,
title = "People on ART",
collapsible = TRUE,
collapsed = FALSE,
bsModal(id = "seeDataTable_ART", title = "Data Table", trigger = "viewData_ART", size = "large",
DT::dataTableOutput('dataTable_ART', width = "100%")
),
id = 'art_panel',
uiOutput(outputId = "UI_uART"),
uiOutput(outputId = "UI_uART_source"),
uiOutput(outputId = "UI_uART_year")
)
),
column(width = 4,
box(width = NULL,
status = "warning",
solidHeader = TRUE,
title = "Help Panel",
helpText("Please fill in the boxes with details regarding each of the strategic information indicators,
then select the source of the data from the drop-down menu below.
Once entered hit 'Next' to proceed. For further details please see:"),
a(href = "http://who.int/hiv/pub/guidelines/strategic-information-guidelines/en/", "WHO - Consolidated Strategic Information Guidelines for HIV in the Health Sector.", target = "_blank"),
p(""),
bsButton(inputId = "viewData_ART", label = "VIEW DATA", style = "primary", size = "default", block = TRUE),
bsButton(inputId = "resetART", label = "RESET", style = "danger", size = "default", block = TRUE)
),
bsAlert(anchorId = "uART_ALERT_green"),
bsAlert(anchorId = "uART_ALERT_amber"),
bsAlert(anchorId = "uART_ALERT_red"),
bsAlert(anchorId = "uART_ALERT"),
uiOutput(outputId = "UI_uART_national"),
fluidRow(
column(width = 6,
bsButton(inputId = "PREV_art", label = "Back", style = "danger", size = "large", block = TRUE, icon = icon("arrow-left", class = "fa-lg fa-fw", lib = "font-awesome"))
),
column(width = 6,
HTML('<button id="NEXT_art" type="button" class="btn action-button btn-success btn-lg btn-block"> Next <i class="fa fa-arrow-right fa-lg fa-fw"></i> </button>')
)
)
)
)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.