Calculate check digit for CARF — carf_calc

Returns the check digit of a CARF number or full number with the check digit.

carf_calc_dig(id, build = FALSE, verify = TRUE)

Arguments

id: Lawsuit number (including trailing zeros), excluding the check digit.
build: Whether or not the function return the complete number (or only the check digits)?
verify: Verify if number is well formed (gives error if it's not)

Value

The check digits or the complete identification number

Examples

{
  carf_calc_dig("10120.008427/2003", build = TRUE)
  carf_calc_dig("15374.002430/99", build = FALSE)
  carf_calc_dig(c("101200084272003", "1537400243099"))
}
#> [1] "02" "16"