Rapatriement libellé CSARR

Introduction

Script ultra-classique permettant de rapatrier un libellé, ici libellé des actes CSARR

A partir du référentiel annualisé des actes CSARR¹, on créé un référentiel dédoublonné des seuls libellés par acte CSARR. Puis on rattache ce référentiel à la table des actes CSARR produite à partir des “blocs CSARR” des RHS.

Code

library(dplyr)
library(refpmsi)

csarr_code <- refpmsi::refpmsi(csarr_code)

csarr_libelle <-  csarr_code %>% dplyr::slice_head(n = 1, by = csarr_code) %>% dplyr::select(csarr_code,csarr_libelle)

csarr_extend <- smr_rhs$csarr %>% 
    dplyr::select(code_csarr) %>% 
    dplyr::left_join(csarr_libelle, join_by(code_csarr == csarr_code))
csarr_extend

Commentaires

Ligne 8 : smr_rhs$csarr est un tibble des variables csarr liées à chaque RHS

La variable csarr_libelle est rapatriée par défaut dans tous les écrans PMSISoft SMR

Etre tenu au courant de la publication des nouveaux scripts PMSI R

Notes de bas de page

1. Documentation du référentiel csarr_code