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)
csar_transcodage <- refpmsi::refpmsi(csar_transcodage)
csar_code <- refpmsi::refpmsi(csar_code)
base_csarr_csar <- smr_rhs$csarr %>%
dplyr::select(nas,no_semaine,code_csarr) %>%
dplyr::left_join(csarr_libelle, by = join_by(code_csarr == csarr_code)) %>%
dplyr::left_join(csar_transcodage, by = join_by(code_csarr == csarr_code)) %>%
dplyr::left_join(csar_code %>% dplyr::select(csar_code, csar_libelle), by = join_by(csar_code == csar_code))
base_csarr_csar
Transcodage des actes CSARR en CSAR
SMR
CSARR
CSAR
Introduction
On transcode les actes CSARR dans le nouveau référentiel CSAR en faisant appel aux référentiels csar_transcodage
et csar_code
du package refpmsi
Code
Commentaires
Ligne 4 : voir Documentation
Lignes 7 et 8 : voir Documentation
Ligne 10 : smr_rhs$csarr
est un tibble des variables csarr
liées aux RHS
Ligne 13 : le transcodage proprement dit
Ligne 14 : rapatriement des libellés CSAR
Le transcodage des actes CSARR en CSAR est disponible dans les écrans CSARR PMSISoft SMR
Etre tenu au courant de la publication des nouveaux scripts PMSI R