root = Card([header, metricsCard, expensesChart, highValueTx, monthSelector, downloadButtons])
header = CardHeader("Month-End Finance View", null)
metricsCard = Card([cashOnHand, monthlyBurn, runwayMonths], "sunk")
cashOnHand = TextContent("Cash on Hand: $500,000", "large")
monthlyBurn = TextContent("Monthly Burn: $120,000", "large")
runwayMonths = TextContent("Runway: 5 months", "large")
expensesChart = BarChart(expenseLabels, [expenseSeries], "grouped", "Category", "USD")
expenseLabels = ["Salaries", "Rent", "Software", "Marketing", "Other"]
expenseSeries = Series("Expenses", [40000, 30000, 15000, 10000, 5000])
highValueTx = ListBlock([tx1, tx2, tx3], "number")
tx1 = ListItem("Acquisition of equipment", "$15,000", null, null)
tx2 = ListItem("Office lease deposit", "$12,500", null, null)
tx3 = ListItem("Marketing campaign", "$11,200", null, null)
jan = SelectItem("jan", "January")
feb = SelectItem("feb", "February")
mar = SelectItem("mar", "March")
apr = SelectItem("apr", "April")
may = SelectItem("may", "May")
jun = SelectItem("jun", "June")
jul = SelectItem("jul", "July")
aug = SelectItem("aug", "August")
sep = SelectItem("sep", "September")
oct = SelectItem("oct", "October")
nov = SelectItem("nov", "November")
dec = SelectItem("dec", "December")
monthOptions = [jan, feb, mar, apr, may, jun, jul, aug, sep, oct, nov, dec]
monthSelector = Select("month_selector", monthOptions, "Select month")
downloadBtn = Button("Download Statement", null, "secondary", "medium")
downloadButtons = Buttons([downloadBtn], "row")