# Create custom parser #####
custom_parser <- function(x, ...){
# Custom parsing code will go here
# new_qryflow_chunk(type = "custom", name = name, sql = sql_txt, tags = tags)
}
# Create custom handler #####
custom_handler <- function(con, chunk, ...){
# Custom execution code will go here...
# return(result)
}
# Register Separately #####
register_qryflow_parser("custom", custom_parser, overwrite = TRUE)
register_qryflow_handler("custom", custom_handler, overwrite = TRUE)
# Register Simultaneously #####
register_qryflow_type("query-send", custom_parser, custom_handler, overwrite = TRUE)
Run the code above in your browser using DataLab