Hide unnecessary functions from step1 (choose Portfolio)

OasisLMF · Nov 19, 2024 · 6389392 · 6389392
1 parent bc2c3ad
commit 6389392
Showing 1 changed file with 14 additions and 14 deletions.
diff --git a/BFE_RShiny/oasisui/R/step1_choosePortfolio_module.R b/BFE_RShiny/oasisui/R/step1_choosePortfolio_module.R
@@ -57,22 +57,22 @@ panelPortfolioTable <- function(id) {
       oasisuiRefreshButton(ns("abuttonprgtblrfsh"))
     ),
     DTOutput(ns("dt_Portfolios")),
+    # fluidRow(
+    #   column(12,
+    #          oasisuiTableButton(ns("abuttonamendpf"), "Amend Portfolio", align = "centre") %>%
+    #            bs_embed_tooltip(title = defineSingleAna_tooltips$abuttonamendpf, placement = "right"),
+    #          oasisuiTableButton(ns("abuttondeletepf"), "Delete Portfolio", align = "centre") %>%
+    #            bs_embed_tooltip(title = defineSingleAna_tooltips$abuttondeletepf, placement = "right"),
+    #          oasisuiTableButton(ns("abuttonuploadsourcefiles"), "Upload Source Files", align = "centre") %>%
+    #            bs_embed_tooltip(title = defineSingleAna_tooltips$abuttonuploadsourcefiles, placement = "right"),
+    #          oasisuiTableButton(ns("abuttonpfdetails"), "Show Source Files", align = "centre") %>%
+    #            bs_embed_tooltip(title = defineSingleAna_tooltips$abuttonpfdetails, placement = "right")
+    #   )
+    # ),
+    # br(),
     fluidRow(
       column(12,
-             oasisuiTableButton(ns("abuttonamendpf"), "Amend Portfolio", align = "centre") %>%
-               bs_embed_tooltip(title = defineSingleAna_tooltips$abuttonamendpf, placement = "right"),
-             oasisuiTableButton(ns("abuttondeletepf"), "Delete Portfolio", align = "centre") %>%
-               bs_embed_tooltip(title = defineSingleAna_tooltips$abuttondeletepf, placement = "right"),
-             oasisuiTableButton(ns("abuttonuploadsourcefiles"), "Upload Source Files", align = "centre") %>%
-               bs_embed_tooltip(title = defineSingleAna_tooltips$abuttonuploadsourcefiles, placement = "right"),
-             oasisuiTableButton(ns("abuttonpfdetails"), "Show Source Files", align = "centre") %>%
-               bs_embed_tooltip(title = defineSingleAna_tooltips$abuttonpfdetails, placement = "right")
-      )
-    ),
-    br(),
-    fluidRow(
-      column(12,
-             oasisuiButton(ns("abuttoncreatepf"), "Create Portfolio", align = "centre"),
+             # oasisuiButton(ns("abuttoncreatepf"), "Create Portfolio", align = "centre"),
              actionButton(ns("abuttonpgotonextstep"), "Proceed to Choose Analysis", style = "float:right")
       ),
       style = "margin-top: 10px;"