Passer au contenu

Le package refpmsi comprend 2 référentiels CSAR.

CSAR code

Intitulé du référentiel : csar_code

Mise à jour : 18 avril 2025

Référentiel non annualisé : version 2025.

Variables

#> Rows: 146
#> Columns: 14
#> $ csar_code    <chr> "01E01", "01E02", "01E03", "01E04", "01E05", "01E06", "01…
#> $ csar_libelle <chr> "Evaluation analytique des fonctions cognitives", "Evalua…
#> $ csar_temps   <lgl> TRUE, FALSE, TRUE, TRUE, FALSE, TRUE, FALSE, FALSE, FALSE…
#> $ csar_L1      <lgl> FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, F…
#> $ csar_L2      <lgl> FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, F…
#> $ csar_L3      <lgl> TRUE, TRUE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FAL…
#> $ csar_M1      <lgl> FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, TRUE, TR…
#> $ csar_M2      <lgl> FALSE, TRUE, FALSE, FALSE, FALSE, FALSE, FALSE, TRUE, TRU…
#> $ csar_QM      <lgl> FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, F…
#> $ csar_QI      <lgl> FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, F…
#> $ csar_QF      <lgl> FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, F…
#> $ csar_QS      <lgl> FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, F…
#> $ csar_QQ      <lgl> FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, F…
#> $ csar_QC      <lgl> TRUE, TRUE, FALSE, FALSE, FALSE, FALSE, FALSE, FALSE, FAL…

CSAR transcodage

Intitulé du référentiel : csar_transcodage

Mise à jour : 18 avril 2025

Référentiel non annualisé : version 2025.

Variables

#> Rows: 521
#> Columns: 2
#> $ csarr_code <chr> "ALQ+001", "ALQ+065", "ALQ+110", "ALQ+111", "ALQ+176", "ALQ…
#> $ csar_code  <chr> "01E01", "01E01", "01E01", "01E01", "01E01", "01E01", "01E0…

Exemples

Actes CSARR de préparations/suivi de dossier dans le nouveau CSAR “1R”

# library(dplyr)
# library(refpmsi)

csarr_code <- refpmsi::refpmsi(csarr_code)
csar_transcodage <- refpmsi::refpmsi(csar_transcodage)

# repérage des actes CSAR de préparation via la 3eme position signifiante en P
csar_transcodage_is_P <- csar_transcodage %>% 
    # création de la variable logique is_acte_csar_P
    dplyr::mutate(is_acte_csar_P = ifelse(stringr::str_sub(csar_code,3,3) == "P", TRUE, FALSE))
csar_transcodage_is_P
#> # A tibble: 521 × 3
#>    csarr_code csar_code is_acte_csar_P
#>    <chr>      <chr>     <lgl>         
#>  1 ALQ+001    01E01     FALSE         
#>  2 ALQ+065    01E01     FALSE         
#>  3 ALQ+110    01E01     FALSE         
#>  4 ALQ+111    01E01     FALSE         
#>  5 ALQ+176    01E01     FALSE         
#>  6 ALQ+183    01E01     FALSE         
#>  7 ALQ+285    01E01     FALSE         
#>  8 ANQ+029    01E01     FALSE         
#>  9 ANQ+411    01E01     FALSE         
#> 10 ANQ+462    01E01     FALSE         
#> # ℹ 511 more rows

csarr_preparations_suivi_dossier_csar <- csarr_code %>% 
    dplyr::select(csarr_code,csarr_libelle,annee_pmsi) %>% 
    # filtrage sur les seuls actes CSARR de l'année 2025
    dplyr::filter(annee_pmsi == "2025") %>% 
    dplyr::left_join(csar_transcodage_is_P, join_by(csarr_code == csarr_code)) %>% 
    dplyr::filter(is_acte_csar_P)
csarr_preparations_suivi_dossier_csar
#> # A tibble: 7 × 5
#>   csarr_code csarr_libelle                   annee_pmsi csar_code is_acte_csar_P
#>   <chr>      <chr>                           <chr>      <chr>     <lgl>         
#> 1 ZGM+105    Préparation et suivi de l'avan… 2025       11P01     TRUE          
#> 2 ZGM+247    Préparation et suivi de l'avan… 2025       11P01     TRUE          
#> 3 ZZM+143    Préparation et/ou suivi de l'a… 2025       11P04     TRUE          
#> 4 ZZM+066    Préparation et/ou suivi de l'a… 2025       11P02     TRUE          
#> 5 ZZM+161    Préparation et suivi de l'avan… 2025       11P02     TRUE          
#> 6 ZZM+159    Préparation et suivi de l'avan… 2025       11P03     TRUE          
#> 7 ZZE+026    Déplacement hors de l'établiss… 2025       11P02     TRUE
# on a repéré les 7 actes CSARR concernés