twbparser

# Install from GitHub (using pak)
install.packages("pak")
pak::pak("PrigasG/twbparser")

# Or using devtools
install.packages("devtools")
devtools::install_github("PrigasG/twbparser")

library(twbparser)

# Parse workbook
path <- normalizePath("path/to/workbook.twbx", mustWork = FALSE)
stopifnot(file.exists(path))

parser <- TwbParser$new(path)

# summary (prints)
parser$summary

# summary (one row tibble)
parser$overview

library(twbparser)

run_twbparser_app()

parser <- TwbParser$new("path/to/workbook.twbx")

# Inspect manifest
parser$twbx_manifest

# Datasources / parameters / all sources
parser$get_datasources()
parser$get_parameters()
parser$get_datasources_all()

# Fields and calculated fields (parameters excluded by default)
parser$get_fields()
parser$get_calculated_fields(pretty = TRUE, wrap = 120)

# What pages exist?
parser$pages
# Or functional: twb_pages(parser)

# One-line summaries per page
parser$pages_summary

# What is on a page and where? (filters include x/y/w/h on dashboards)
parser$get_page_composition("Executive Dashboard")

# Filters across dashboards (with positions)
twb_dashboard_filters(parser)

# Chart/mark types per worksheet
twb_charts(parser)

# Colors and palettes referenced
twb_colors(parser)

# Fields on rows, cols, color, size, label … per worksheet
parser$get_sheet_shelves()
# or: twb_sheet_shelves(parser, sheet = "Sales")

# Worksheet filters — categorical members, range min/max
parser$get_sheet_filters()

# Axis configuration — reversed, include-zero, scale type
parser$get_sheet_axes()

# Sort directives — direction and method
parser$get_sheet_sorts()

# Which sheets are on a dashboard and where?
parser$get_dashboard_sheets()
# or: twb_dashboard_sheets(parser, dashboard = "Overview")

# Full zone tree — parent zones, component types, tiled vs floating
parser$get_dashboard_layout()

# Filter and URL actions — source/target sheets, trigger, URL
parser$get_dashboard_actions()

# Declared dashboard page size and sizing mode
parser$get_dashboard_size()
# or: twb_dashboard_size(parser, dashboard = "Overview")

# Style-rule formats: fonts, number/date formats, shading, and palette maps
parser$get_formatting()
# or: twb_formatting(parser, scope = "worksheet")

# Plain-text worksheet tooltip content
parser$get_tooltips()

# Full rebuild spec for a worksheet: mark type, rows/cols shelves in order,
# dimensions vs. measures, every marks-card encoding, tooltip config,
# plus filters, sorts, and axes
spec <- twb_sheet_spec(parser, sheet = "Sales")
spec$Sales$mark_type    # "bar"
spec$Sales$dimensions   # fields used as dimensions
spec$Sales$measures     # fields used as measures
spec$Sales$encodings    # channel -> field tibble (color, size, label, ...)

# What graphs are on a dashboard page? one row per placed worksheet
twb_dashboard_charts(parser, dashboard = "Overview")
# or: parser$get_dashboard_charts("Overview")

# Fields defined but never used anywhere: the safe-to-drop list
twb_unused_fields(parser)
# or: parser$get_unused_fields()

# Calculated fields in creation order: rebuild each formula after the
# calculations it depends on (cycles are flagged, not silently misordered)
twb_calc_build_order(parser)
# or: parser$get_calc_build_order()

# Where each parameter is consumed: formulas, shelves, filters, dashboards
twb_parameter_usage(parser)
# or: parser$get_parameter_usage()

# Audit every workbook in a folder and collect migration inventory tables
audit <- audit_tableau_folder("path/to/tableau-workbooks")

# Trace dependencies from datasources and fields through dashboards
lineage <- twb_lineage(parser)

# Assess a target platform and produce migration deliverables
assessment <- twb_migration_assessment(parser, target = "powerbi")
bundle <- export_migration_bundle(parser, output_dir = "migration-bundle")

library(dplyr)
library(tidyr)

rel_df <- parser$get_relationships() |>
  mutate(
    op   = replace_na(operator, "="),
    left = paste0(left_table,  ".", left_field),
    right= paste0(right_table, ".", right_field),
    Join = paste(left, op, right)
  ) |>
  select(Join, datasource_left = left_table, datasource_right = right_table,
         operator, everything(), -left, -right, -left_is_calc, -right_is_calc)

rel_df

library(dplyr)

calcs <- parser$get_calculated_fields(pretty = TRUE, wrap = 120) |>
  select(Name = name, Formula = formula_pretty, Datasource = datasource)

# DT example optional:
# DT::datatable(calcs, escape = FALSE, rownames = FALSE,
#   options = list(scrollX = TRUE, pageLength = 50)) |>
#   DT::formatStyle("Formula", `white-space` = "pre", `font-family` = "monospace")

out <- twbparser::parse_twb("my_dashboard.twb", output_dir = "results/")
list.files(out)