mhq_terr_popunits seems to have assessed sites not confirmed by mhq_terr_assessments

[florisvdh]

Is this result within expectation @ToonHub (using current master; 9a066b9):

> mhq_terr_datapath <- file.path(dirname(gitroot), "n2khab-sample-admin/data/mhq_terr/rapportage2025")
> mhq_terr_assessments <-
    read_vc("mhq_terr_assessments", root = mhq_terr_datapath) %>%
    as_tibble()
> mhq_terr_popunits <-
    read_vc("mhq_terr_popunits", root = mhq_terr_datapath) %>%
    as_tibble()

> # mhq_terr_popunits seems to have assessed sites not confirmed by mhq_terr_assessments
> mhq_terr_popunits %>%
    filter(str_detect(source, "assessment")) %>%
    select(point_code, grts_ranking, grts_ranking_draw, type, source) %>% 
    anti_join(
      mhq_terr_assessments %>%
        select(assessment_date, point_code, type, is_present) %>%
        filter(is_present),
      join_by(point_code, type)
    )
# A tibble: 6 × 5
  point_code grts_ranking grts_ranking_draw type        source                    
  <chr>             <dbl>             <dbl> <chr>       <chr>                     
1 137042_1         137042            137042 91E0_vo     assessment/habitatmap 2023
2 1830705_1       1830705           1830705 2190_overig assessment                
3 2943734_2      53275382           2943734 6410_mo     assessment                
4 2998962_1       2998962           2998962 6510_huk    assessment/habitatmap 2023
5 4390190_1       4390190           4390190 6510_hus    assessment                
6 89310_1           89310             89310 4030        assessment/habitatmap 2023