Extract metadata from qryflow objects
Examples
con <- example_db_connect(mtcars)
filepath <- example_sql_path("mtcars.sql")
parsed <- qryflow_parse(filepath)
qryflow_meta(parsed)
#> $source
#> [1] "-- @exec: drop_cyl_6\nDROP TABLE IF EXISTS cyl_6;\n\n-- @exec: prep_cyl_6\nCREATE TABLE cyl_6 AS\nSELECT *\nFROM mtcars\nWHERE cyl = 6;\n\n-- @query: df_mtcars\nSELECT *\nFROM mtcars;\n\n-- @query: df_cyl_6\nSELECT *\nFROM cyl_6;\n"
#>
#> $start_time
#> NULL
#>
#> $end_time
#> NULL
#>
#> $duration
#> NULL
#>
#> $status
#> [1] "init"
#>
qryflow_meta(parsed[[1]])
#> $source
#> [1] "-- @exec: drop_cyl_6\nDROP TABLE IF EXISTS cyl_6;\n"
#>
#> $start_time
#> NULL
#>
#> $end_time
#> NULL
#>
#> $duration
#> NULL
#>
#> $status
#> [1] "init"
#>
results <- qryflow_execute(con, parsed)
qryflow_meta(results)
#> $source
#> [1] "-- @exec: drop_cyl_6\nDROP TABLE IF EXISTS cyl_6;\n\n-- @exec: prep_cyl_6\nCREATE TABLE cyl_6 AS\nSELECT *\nFROM mtcars\nWHERE cyl = 6;\n\n-- @query: df_mtcars\nSELECT *\nFROM mtcars;\n\n-- @query: df_cyl_6\nSELECT *\nFROM cyl_6;\n"
#>
#> $start_time
#> [1] "2026-03-01 21:42:59 UTC"
#>
#> $end_time
#> [1] "2026-03-01 21:42:59 UTC"
#>
#> $duration
#> [1] 0.001745462
#>
#> $status
#> [1] "success"
#>
qryflow_meta(results[[1]])
#> $source
#> [1] "-- @exec: drop_cyl_6\nDROP TABLE IF EXISTS cyl_6;\n"
#>
#> $start_time
#> [1] "2026-03-01 21:42:59 UTC"
#>
#> $end_time
#> [1] "2026-03-01 21:42:59 UTC"
#>
#> $duration
#> [1] 0.0003244877
#>
#> $status
#> [1] "success"
#>
DBI::dbDisconnect(con)