R/UI/mintReconTab.R

In ravi9884/PersonalFinance: Creates personal expenses and budget dashboard

library(shiny)
mintReconTab <- tabPanel("Reconcile Mint Data",
                         fluidRow(
                           #The combination should be 2 in mint and ALL in transactions
                           column(3,
                                  selectInput("rcnTabMn_mintWeek", "Mint Transaction History", c("1","2","ALL"), selected = "2")),
                           column(3,
                                  selectInput("rcnTabMn_tranwk", "Data Entry History", c("1","2","ALL"), selected = "ALL")),
                           column(3,
                                  checkboxInput("rcnTabMn_showRecon", "Show Reconciled", value = FALSE))
                         ),
                  fluidRow(
                    column(4,
                           h2("Mint Transactions"),
                           tableOutput('reconMint')
                    ))
)