Create and add an ethics or governance approval — new_approval • krt

Create and add an ethics or governance approval

Usage

new_approval(approval_type, ..., .id = NULL)

add_approval(x, ...)

Arguments

approval_type: One of krt_approval_types() (e.g. "IACUC", "IRB", "REB", "ethics").
...: Additional named fields: board_name, protocol_number, institution_name, institution_ror, jurisdiction, approved_on, consent_obtained, consent_scope, data_use_restrictions, redaction_level.
.id: Optional explicit approval id.
x: A krt_tbl.

Value

new_approval() returns a krt_approval; add_approval() returns the updated krt_tbl.

Examples

a <- new_approval("IACUC", protocol_number = "2026-017",
                  board_name = "Example IACUC")
k <- add_approval(new_krt("Demo"), a)