commit 3fbfc0a8c718784d6e08568e2d1195add503f721 Author: Maxime Wack Date: Mon Mar 27 17:00:15 2017 +0200 Initial commit diff --git a/actes.csv b/actes.csv new file mode 100644 index 0000000..e0496ce --- /dev/null +++ b/actes.csv @@ -0,0 +1,362 @@ +Code;Libelle;Appareil +ABSA012;Fermeture d'une brèche ostéodurale ou d'une méningocèle de l'étage antérieur de la base du crâne, par endoscopie;ORL +ACHA003;Biopsie de lésion de la base du crâne, par endoscopie buccale ou nasale;ORL +AHQE002;Électromyographie de détection des muscles du larynx par électrode aiguille, par laryngoscopie;ORL +BBCE001;Dacryo-cysto-rhinostomie [DCR], par endoscopie nasale;ORL +BBQE900;Endoscopie des voies lacrymales;ORL +CBQE001;Examen unilatéral ou bilatéral de l'oreille externe et/ou moyenne, sous microscope ou par endoscopie méatale;ORL +CBQE900;Fibroendoscopie de l'oreille moyenne, par voie tubaire;ORL +EBNE001;Coagulation bilatérale de l'artère sphénopalatine, par endoscopie nasale;ORL +EBNE002;Coagulation unilatérale de l'artère sphénopalatine, par endoscopie nasale;ORL +GAME001;Turbinoplastie ou turbinectomie inférieure et/ou moyenne unilatérale ou bilatérale, par endoscopie;ORL +GAME002;Plastie unilatérale ou bilatérale de la cavité nasale pour rhinite atrophique, par endoscopie;ORL +GAQE001;Endoscopie de la cavité nasale et du rhinopharynx [cavum], par voie nasale;ORL +GAQE003;Endoscopie de la cavité nasale, par voie nasale;ORL +GASE001;Hémostase intranasale par cautérisation ou électrocoagulation, par endoscopie;ORL +GASE002;Hémostase intranasale par injection unilatérale ou bilatérale transmuqueuse d'agent pharmacologique, par endoscopie;ORL +GBFA007;Exérèse de lésion du sinus sphénoïdal, par endoscopie;ORL +GBFA008;Ethmoïdectomie antérieure bilatérale avec septoplastie nasale, par endoscopie;ORL +GBJA001;Évacuation unilatérale ou bilatérale de collection du sinus frontal, par endoscopie nasale et par abord direct;ORL +GBJE001;Évacuation de collection du sinus frontal, par endoscopie nasale;ORL +GBJE002;Évacuation de collection du sinus sphénoïdal, par endoscopie directe ou transethmoïdale;ORL +GBPA003;Sinusotomie frontale unilatérale ou bilatérale avec résection du septum et du plancher nasaux, par endoscopie nasale ou par abord direct;ORL +GBPE001;Méatotomie nasale moyenne, par endoscopie;ORL +GBPE002;Marsupialisation de mucocèle du sinus ethmoïdal et/ou du sinus frontal, par endoscopie;ORL +GBPE003;Méatotomie nasale inférieure bilatérale, par endoscopie;ORL +GBQA002;Sinusoscopie maxillaire, par voie méatale inférieure et/ou par abord de la fosse canine [abord vestibulaire];ORL +GBQE001;Sinusoscopie sphénoïdale;ORL +GBQE002;Sinusoscopie frontale;ORL +GCME001;Plastie des choanes par endoscopie nasale avec laser, pour imperforation bilatérale;ORL +GCME002;Plastie des choanes par endoscopie nasale avec laser, pour imperforation unilatérale;ORL +GCME003;Plastie des choanes par endoscopie nasale sans laser, pour imperforation bilatérale;ORL +GCME004;Plastie des choanes par endoscopie nasale sans laser, pour imperforation unilatérale;ORL +GCQE001;Fibroscopie du pharynx et du larynx, par voie nasale;ORL +GCQE002;Endoscopie du rhinopharynx [cavum], par voie buccale sous anesthésie générale;ORL +GCQE003;Fibroscopie du pharynx et du larynx par voie nasale, avec examen stroboscopique du larynx;ORL +GDFE001;Aryténoïdectomie, par laryngoscopie directe;ORL +GDFE002;Exérèse de lésion ou épluchage de la muqueuse du plan glottique, par laryngoscopie directe avec laser;ORL +GDFE003;Cordectomie laryngée, par laryngoscopie directe avec laser;ORL +GDFE004;Exérèse de lésion ou épluchage de la muqueuse du plan glottique, par laryngoscopie directe sans laser;ORL +GDFE005;Résection ou section des plis aryépiglottiques, par laryngoscopie directe sans laser;ORL +GDFE006;Exérèse de lésion laryngée infraglottique, par laryngoscopie directe avec laser;ORL +GDFE007;Cordectomie laryngée, par laryngoscopie directe sans laser;ORL +GDFE008;Épiglottectomie partielle, par laryngoscopie directe sans laser;ORL +GDFE009;Épiglottectomie partielle, par laryngoscopie directe avec laser;ORL +GDFE010;Exérèse du vestibule du larynx, par laryngoscopie directe avec laser;ORL +GDFE011;Exérèse de lésion laryngée infraglottique, par laryngoscopie directe sans laser;ORL +GDFE012;Dilatation et/ou résection de sténose du larynx, par endoscopie sans laser;ORL +GDFE013;Résection ou section des plis aryépiglottiques, par laryngoscopie directe avec laser;ORL +GDFE014;Exérèse de lésion sousmuqueuse du plan glottique, par laryngoscopie directe;ORL +GDFE015;Exérèse du vestibule du larynx, par laryngoscopie directe sans laser;ORL +GDFE016;Dilatation et/ou résection de sténose du larynx, par endoscopie avec laser;ORL +GDGE001;Ablation de corps étranger du larynx, par laryngoscopie directe;ORL +GDHE001;Biopsie oro-pharyngo-laryngée, par laryngoscopie indirecte;ORL +GDLE001;Pose ou changement de prothèse de calibrage du larynx, par laryngoscopie directe;ORL +GDLE003;Injection de graisse dans le pli vocal [corde vocale], par laryngoscopie directe;ORL +GDLE004;Injection de substance hétérologue dans le pli vocal [corde vocale], par laryngoscopie directe;ORL +GDNE001;Coagulation d'un œdème du larynx, par laryngoscopie directe avec laser;ORL +GDNE002;Destruction de lésion du larynx, par laryngoscopie directe sans laser;ORL +GDNE003;Destruction de lésion du larynx, par laryngoscopie directe avec laser;ORL +GDNE004;Coagulation d'un œdème du larynx, par laryngoscopie directe sans laser;ORL +GDPE001;Désobstruction du larynx, par laryngoscopie directe avec laser;ORL +GDPE002;Cordotomie postérieure, par laryngoscopie directe sans laser;ORL +GDPE003;Cordotomie postérieure, par laryngoscopie directe avec laser;ORL +GDQE002;Laryngoscopie indirecte au laryngoscope rigide, avec examen stroboscopique du larynx;ORL +GDQE003;Laryngoscopie indirecte au laryngoscope rigide;ORL +GDQE007;Exploration de pli vocal [corde vocale], par laryngoscopie directe [Cordotomie exploratrice endoscopique];ORL +GKGE002;Ablation d'implant phonatoire œsotrachéal ou de tube de calibrage intralaryngé, par endoscopie;ORL +GKKE002;Changement d'implant phonatoire œsotrachéal, par endoscopie;ORL +GKQE001;Bilan phonétique de la parole avec fibroscopie du pharynx et du larynx par voie nasale;ORL +GKQP010;Bilan instrumental de la phonation avec enregistrement vidéoscopique et/ou photographique, et examen stroboscopique du larynx;ORL +HDFE001;Résection et/ou dilatation de sténose du pharynx, par endoscopie avec laser;ORL +HDFE002;Exérèse de lésion de l'hypopharynx, par endoscopie;ORL +HDFE003;Résection et/ou dilatation de sténose du pharynx, par endoscopie sans laser;ORL +HDGE001;Ablation de corps étranger de l'oropharynx, par endoscopie rigide;ORL +HDGE002;Ablation de corps étranger de l'oropharynx, par laryngoscopie indirecte;ORL +HDNE001;Destruction de lésion de l'hypopharynx avec laser, par endoscopie;ORL +HDNE002;Destruction de lésion de l'hypopharynx sans laser, par endoscopie;ORL +HDPE001;Myotomie du faisceau cricopharyngien du muscle constricteur inférieur du pharynx, par endoscopie avec laser;ORL +HDPE002;Myotomie du faisceau cricopharyngien du muscle constricteur inférieur du pharynx, par endoscopie sans laser;ORL +HDQE001;Orohypopharyngoscopie avec laryngoscopie directe;ORL +LAFA015;Ethmoïdectomie totale unilatérale avec septoplastie nasale et sphénoïdotomie, par endoscopie;ORL +LAFA016;Ethmoïdectomie totale unilatérale avec septoplastie nasale, par endoscopie;ORL +LAFA017;Ethmoïdectomie totale unilatérale avec sphénoïdotomie, par endoscopie;ORL +LAFA018;Ethmoïdectomie totale bilatérale avec sphénoïdotomie, par endoscopie;ORL +LAFA019;Ethmoïdectomie totale bilatérale avec septoplastie nasale et sphénoïdotomie, par endoscopie;ORL +LAFA020;Ethmoïdectomie totale bilatérale avec septoplastie nasale, par endoscopie;ORL +LAFA021;Ethmoïdectomie antérieure, par endoscopie;ORL +LAFA022;Ethmoïdectomie totale bilatérale, par endoscopie;ORL +LAFA023;Ethmoïdectomie antérieure unilatérale avec septoplastie nasale, par endoscopie;ORL +LAFA024;Ethmoïdectomie totale unilatérale, par endoscopie;ORL +AJLJ002;Infiltration thérapeutique transgastrique des nerfs splanchniques, avec guidage échoendoscopique;Digestif +EHNE001;Séance de sclérose et/ou de ligature de varices œsogastriques en dehors de la période hémorragique, par endoscopie;Digestif +EHNE002;Sclérose et/ou ligature de varices œsogastriques en période hémorragique, par endoscopie;Digestif +HEAE001;Dilatation rétrograde de l'œsophage, par endoscopie rigide;Digestif +HEAE002;Dilatation antérograde de l'œsophage, par endoscopie rigide;Digestif +HEAE003;Dilatation antérograde de l'œsophage, par fibroscopie;Digestif +HEFE001;Exérèse d'un polype de 1cm et plus de diamètre ou de 4 polypes ou plus de l'œsophage, de l'estomac et/ou du duodénum, par œso-gastro-duodénoscopie;Digestif +HEFE002;Exérèse de 1 à 3 polypes de moins de 1cm de diamètre de l'œsophage, de l'estomac et/ou du duodénum, par œso-gastro-duodénoscopie;Digestif +HEFE003;Séance de mucosectomie de l'œsophage, de l'estomac ou du duodénum, par œso-gastro-duodénoscopie;Digestif +HEGE001;Ablation de corps étranger de l'œsophage, par endoscopie rigide;Digestif +HEGE002;Ablation de corps étranger de l'œsophage, de l'estomac et/ou du duodénum, par œso-gastro-duodénoscopie;Digestif +HEGE003;Ablation d'une endoprothèse de l'œsophage, par endoscopie;Digestif +HEKE001;Changement d'une endoprothèse de l'œsophage, par endoscopie;Digestif +HELE001;Pose de guide intraœsophagien pour curiethérapie [endobrachytherapy], par fibroscopie;Digestif +HELE002;Pose d'une endoprothèse de l'œsophage, par endoscopie;Digestif +HELE900;Séance d'injection de toxine botulique au niveau du sphincter inférieur de l'œsophage, par endoscopie;Digestif +HEME002;Création d'une fistule œsotrachéale avec pose d'implant phonatoire, par endoscopie;Digestif +HEME900;Correction d'un reflux gastroœsophagien, par endoscopie;Digestif +HENE001;Séance de destruction photodynamique de lésion de l'œsophage et/ou de l'estomac avec laser, par œso-gastro-duodénoscopie;Digestif +HENE002;Séance de destruction de lésion de l'œsophage et/ou de l'estomac avec laser, par œso-gastro-duodénoscopie;Digestif +HENE004;Séance de destruction de lésion de l'œsophage et/ou de l'estomac sans laser, par œso-gastro-duodénoscopie;Digestif +HENE900;Séance de destruction d'une hétérotopie de la muqueuse de l'œsophage inférieur, par endoscopie;Digestif +HEQE001;Œsophagoscopie au tube rigide;Digestif +HEQE002;Endoscopie œso-gastro-duodénale;Digestif +HEQE003;Endoscopie œso-gastro-duodénale avec test à l'uréase, avant l'âge de 6 ans;Digestif +HEQE004;Endoscopie œso-gastro-duodénale peropératoire;Digestif +HEQE005;Endoscopie œso-gastro-duodénale avec test à l'uréase, après l'âge de 6 ans;Digestif +HEQJ001;Échoendoscopie œsogastrique sans biopsie;Digestif +HEQJ002;Échoendoscopie œsogastrique avec biopsie transœsogastrique guidée;Digestif +HESE001;Hémostase de lésion de l'œsophage, de l'estomac et/ou du duodénum avec laser, par œso-gastro-duodénoscopie;Digestif +HESE002;Hémostase de lésion de l'œsophage, de l'estomac et/ou du duodénum sans laser, par œso-gastro-duodénoscopie;Digestif +HFAE001;Dilatation du pylore, par œso-gastro-duodénoscopie;Digestif +HFCB001;Gastrostomie, par voie transcutanée avec guidage endoscopique;Digestif +HFKE001;Changement d'une sonde de gastrostomie ou de gastrojéjunostomie, par œso-gastro-duodénoscopie;Digestif +HFLE001;Pose d'une sonde gastrique, duodénale ou jéjunale, par œso-gastro-duodénoscopie;Digestif +HGAE001;Dilatation d'une sténose iléale, par iléoscopie;Digestif +HGFE001;Exérèse d'un polype de plus de 1cm de diamètre ou de 4 polypes ou plus de l'intestin grêle, par iléoscopie;Digestif +HGFE002;Exérèse de 1 à 3 polypes de moins de 1cm de diamètre de l'intestin grêle, par iléoscopie;Digestif +HGFE003;Exérèse d'un polype de plus de 1cm de diamètre ou de 4 polypes ou plus de l'intestin grêle, par jéjunoscopie;Digestif +HGFE004;Exérèse de 1 à 3 polypes de moins de 1cm de diamètre de l'intestin grêle, par jéjunoscopie;Digestif +HGFE005;Exérèse de la papille duodénale majeure, par œso-gastro-duodénoscopie;Digestif +HGGE001;Ablation d'une endoprothèse du duodénum, par œso-gastro-duodénoscopie;Digestif +HGKE001;Changement d'une endoprothèse du duodénum, par œso-gastro-duodénoscopie;Digestif +HGLE001;Pose d'une endoprothèse du duodénum, par œso-gastro-duodénoscopie;Digestif +HGNE001;Séance de destruction de lésion du duodénum, par œso-gastro-duodénoscopie;Digestif +HGQE001;Entéroscopie jéjunale avec entéroscopie iléale;Digestif +HGQE002;Duodénoscopie par appareil à vision latérale;Digestif +HGQE003;Entéroscopie jéjunale [Jéjunoscopie];Digestif +HGQE004;Entéroscopie jéjunale et/ou iléale peropératoire;Digestif +HGQE005;Entéroscopie iléale [Iléoscopie];Digestif +HGQJ001;Échoendoscopie duodénale avec biopsie transduodénale guidée;Digestif +HGQJ002;Échoendoscopie duodénale sans biopsie;Digestif +HGSE001;Hémostase de lésion intestinale sans laser, par jéjunoscopie;Digestif +HGSE002;Hémostase de lésion intestinale avec laser, par jéjunoscopie;Digestif +HGSE003;Hémostase de lésion intestinale sans laser, par iléoscopie;Digestif +HGSE004;Hémostase de lésion intestinale avec laser, par iléoscopie;Digestif +HHAE001;Dilatation d'une sténose du côlon et/ou du rectum, par endoscopie;Digestif +HHEE001;Détorsion d'un volvulus du côlon, par endoscopie;Digestif +HHFE001;Exérèse de 1 à 3 polypes de moins de 1cm de diamètre du côlon et/ou du rectum, par rectosigmoïdoscopie ou par coloscopie partielle;Digestif +HHFE002;Exérèse de 1 à 3 polypes de moins de 1cm de diamètre du côlon et/ou du rectum, par coloscopie totale;Digestif +HHFE004;Exérèse d'un polype de plus de 1cm de diamètre ou de 4 polypes ou plus du côlon et/ou du rectum, par coloscopie totale;Digestif +HHFE005;Exérèse d'un polype de plus de 1cm de diamètre ou de 4 polypes ou plus du côlon et/ou du rectum, par rectosigmoïdoscopie ou par coloscopie partielle;Digestif +HHFE006;Séance de mucosectomie rectocolique, par endoscopie;Digestif +HHGE002;Ablation de corps étranger du côlon et/ou du rectum, par endoscopie;Digestif +HHGE010;Ablation d'une endoprothèse du côlon, par coloscopie;Digestif +HHJE001;Exsufflation du côlon, par endoscopie;Digestif +HHLE005;Pose d'une endoprothèse du côlon, par coloscopie;Digestif +HHNE001;Séance de destruction de lésion du côlon et/ou du rectum sans laser, par coloscopie totale;Digestif +HHNE002;Séance de destruction de lésion du côlon et/ou du rectum avec laser, par coloscopie totale;Digestif +HHNE003;Séance de destruction de lésion du côlon et/ou du rectum avec laser, par rectosigmoïdoscopie ou par coloscopie partielle;Digestif +HHNE004;Séance de destruction de lésion du côlon et/ou du rectum sans laser, par rectosigmoïdoscopie ou par coloscopie partielle;Digestif +HHQE001;Coloscopie peropératoire;Digestif +HHQE002;Coloscopie totale, avec franchissement de l'orifice iléocolique;Digestif +HHQE003;Exploration complète du côlon après colectomie droite, par endoscopie;Digestif +HHQE004;Coloscopie partielle au delà du côlon sigmoïde;Digestif +HHQE005;Coloscopie totale avec visualisation du bas-fond cæcal, sans franchissement de l'orifice iléocolique;Digestif +HHQJ002;Échoendoscopie colique sans biopsie;Digestif +HHSE001;Hémostase de lésion du côlon avec laser, par rectosigmoïdoscopie ou par coloscopie partielle;Digestif +HHSE002;Hémostase de lésion du côlon sans laser, par coloscopie totale;Digestif +HHSE003;Hémostase de lésion du côlon avec laser, par coloscopie totale;Digestif +HHSE004;Hémostase de lésion du côlon sans laser, par rectosigmoïdoscopie ou par coloscopie partielle;Digestif +HJQE001;Rectosigmoïdoscopie;Digestif +HJQE002;Rectoscopie au tube rigide;Digestif +HJQJ001;Échoendoscopie anorectale avec biopsie transanorectale guidée;Digestif +HJQJ002;Échoendoscopie anorectale sans biopsie;Digestif +HKQE001;Anuscopie;Digestif +HMAE001;Dilatation de l'ampoule hépatopancréatique [du sphincter d'Oddi], par œso-gastro-duodénoscopie;Digestif +HMAE002;Dilatation rétrograde de conduit biliaire, par œso-gastro-duodénoscopie;Digestif +HMGE001;Ablation d'endoprothèse biliaire et/ou pancréatique, par œso-gastro-duodénoscopie;Digestif +HMGE002;Ablation de calcul de la voie biliaire principale, par œso-gastro-duodénoscopie;Digestif +HMGH001;Ablation de calcul de la voie biliaire principale, par œso-gastro-duodénoscopie et par voie transcutanée avec guidage échographique et/ou radiologique;Digestif +HMJE001;Drainage de conduit biliaire ou pancréatique par voie nasale, au cours d'une endoscopie œso-gastro-duodénale;Digestif +HMKE001;Changement d'une endoprothèse biliaire, par œso-gastro-duodénoscopie;Digestif +HMKE002;Changement de plusieurs endoprothèses biliaires, par œso-gastro-duodénoscopie;Digestif +HMLE002;Pose d'une endoprothèse biliaire, par œso-gastro-duodénoscopie;Digestif +HMLE003;Pose de plusieurs endoprothèses biliaires, par œso-gastro-duodénoscopie;Digestif +HMLH001;Pose d'une endoprothèse biliaire, par œso-gastro-duodénoscopie et par voie transcutanée avec guidage échographique et/ou radiologique;Digestif +HMNE001;Lithotritie mécanique des conduits biliaires, par œso-gastro-duodénoscopie;Digestif +HMNE002;Lithotritie des conduits biliaires par ondes de choc, par cholangioscopie rétrograde;Digestif +HMPE001;Section du versant biliaire du muscle sphincter de l'ampoule hépatopancréatique [sphincter d'Oddi], par œso-gastro-duodénoscopie [Sphinctérotomie biliaire endoscopique];Digestif +HMQH001;Cholangioscopie, par voie buccale;Digestif +HMQH002;Cholangiopancréatographie rétrograde avec manométrie oddienne, par œso-gastro-duodénoscopie;Digestif +HMQH003;Cholangiographie rétrograde avec infundibulotomie [ponction diathermique de l'infundibulum biliaire] ou précoupe de la papille duodénale majeure, par œso-gastro-duodénoscopie;Digestif +HMQH005;Cholangiopancréatographie rétrograde sans manométrie oddienne, par œso-gastro-duodénoscopie;Digestif +HMQH007;Cholangiographie rétrograde, par œso-gastro-duodénoscopie;Digestif +HMQJ001;Échoendoscopie biliopancréatique sans biopsie;Digestif +HMQJ002;Échoendoscopie biliopancréatique avec biopsie transbiliopancréatique guidée;Digestif +HNAE001;Dilatation du conduit pancréatique, par œso-gastro-duodénoscopie;Digestif +HNCE001;Anastomose entre un faux kyste du pancréas et l'estomac ou le duodénum, par œso-gastro-duodénoscopie sans guidage [Kystogastrostomie ou kystoduodénostomie endoscopique];Digestif +HNCJ001;Anastomose entre un faux kyste du pancréas et l'estomac ou le duodénum, par œso-gastro-duodénoscopie avec guidage échoendoscopique;Digestif +HNGE001;Ablation de calcul pancréatique, par œso-gastro-duodénoscopie;Digestif +HNKE001;Changement d'une endoprothèse du conduit pancréatique, par œso-gastro-duodénoscopie;Digestif +HNLE001;Pose d'une endoprothèse du conduit pancréatique, par œso-gastro-duodénoscopie;Digestif +HNPE002;Section du versant pancréatique du muscle sphincter de l'ampoule hépatopancréatique [sphincter d'Oddi], par œso-gastro-duodénoscopie [Sphinctérotomie pancréatique endoscopique];Digestif +HNPE003;Sphinctérotomie de la papille duodénale mineure [papille accessoire], par œso-gastro-duodénoscopie;Digestif +HNQH001;Pancréatographie rétrograde par cathétérisme de la papille duodénale mineure [papille accessoire], par œso-gastro-duodénoscopie;Digestif +HNQH002;Pancréaticoscopie par voie buccale;Digestif +HNQH003;Pancréatographie rétrograde par cathétérisme de la papille duodénale majeure, par œso-gastro-duodénoscopie;Digestif +HQQE001;Bilan fonctionnel de la déglutition avec fibroscopie du pharynx et du larynx par voie nasale, essai alimentaire et enregistrement vidéo;Digestif +HZHE001;Prélèvement pour analyse biologique, au cours d'une endoscopie diagnostique des voies digestives;Digestif +HZHE002;Biopsie et/ou brossage cytologique de la paroi du tube digestif ou de conduit biliopancréatique, au cours d'une endoscopie diagnostique;Digestif +HZHE004;Coloration et/ou tatouage de la paroi du tube digestif, au cours d'une endoscopie diagnostique;Digestif +HZHE005;Macrobiopsie de la paroi du tube digestif, au cours d'une endoscopie diagnostique;Digestif +GDQE004;Fibroscopie du larynx et de la trachée;Respiratoire +GDQE005;Laryngoscopie directe [Laryngoscopie en suspension];Respiratoire +GDQE001;Laryngo-trachéo-bronchoscopie au tube rigide;Respiratoire +GEFE001;Séance de résection et/ou de dilatation de sténose de la trachée, par endoscopie avec laser;Respiratoire +GEFE002;Séance de résection et/ou de dilatation de sténose de la trachée, par endoscopie sans laser;Respiratoire +GEGE001;Ablation de corps étranger intratrachéal et/ou intrabronchique, par bronchoscopie au tube rigide;Respiratoire +GEGE003;Ablation de corps étranger intratrachéal et/ou intrabronchique, par fibroscopie;Respiratoire +GEHE001;Biopsie trachéale et/ou bronchique, au cours d'une endoscopie diagnostique des voies aériennes;Respiratoire +GEJE001;Aspiration intrabronchique à visée thérapeutique, par fibroscopie [Fibroaspiration bronchique];Respiratoire +GEJE002;Lavage pulmonaire unilatéral à visée thérapeutique pour protéinose alvéolaire, par endoscopie;Respiratoire +GEJE003;Aspiration intrabronchique à visée thérapeutique chez un patient intubé ou trachéotomisé, par fibroscopie;Respiratoire +GELE001;Intubation trachéale par fibroscopie ou dispositif laryngé particulier, au cours d'une anesthésie générale;Respiratoire +GELE002;Instillation intrabronchique d'agent pharmacologique à visée thérapeutique, par bronchoscopie au tube rigide;Respiratoire +GELE003;Pose intrabronchique de matériel à visée hémostatique, par fibroscopie;Respiratoire +GELE004;Intubation trachéale, par fibroscopie ou dispositif laryngé particulier;Respiratoire +GELE005;Instillation intrabronchique d'agent pharmacologique à visée thérapeutique, par fibroscopie;Respiratoire +GELE006;Pose de tuteur trachéal, par endoscopie;Respiratoire +GELE007;Pose intrabronchique de matériel à visée hémostatique, par bronchoscopie au tube rigide;Respiratoire +GELE008;Pose d'une endoprothèse trachéobronchique, par endoscopie;Respiratoire +GELE009;Pose de guide intrabronchique pour curiethérapie [endobrachytherapy], par fibroscopie;Respiratoire +GENE001;Destruction mécanique de lésion de l'arbre trachéobronchique, par bronchoscopie au tube rigide;Respiratoire +GENE002;Destruction de lésion de l'arbre trachéobronchique avec laser, par fibroscopie;Respiratoire +GENE003;Destruction tissulaire photodynamique de lésion de l'arbre trachéobronchique avec laser, par fibroscopie;Respiratoire +GENE004;Destruction de lésion de l'arbre trachéobronchique avec laser, par bronchoscopie au tube rigide;Respiratoire +GENE005;Destruction de lésion de l'arbre trachéobronchique par cryothérapie ou thermocoagulation, par fibroscopie;Respiratoire +GENE006;Destruction de lésion de l'arbre trachéobronchique par cryothérapie ou thermocoagulation, par bronchoscopie au tube rigide;Respiratoire +GENE008;Destruction mécanique de lésion de l'arbre trachéobronchique, par fibroscopie;Respiratoire +GEQE001;Bronchoscopie au tube rigide, avec prélèvement médiastinal à l'aiguille par voie transbronchique;Respiratoire +GEQE002;Fibroscopie bronchique, avec prélèvement lymphonodal à l'aiguille par voie transbronchique;Respiratoire +GEQE003;Fibroscopie trachéobronchique avec photodétection de lésion par autofluorescence avec laser;Respiratoire +GEQE004;Fibroscopie bronchique, avec lavage bronchioloalvéolaire à visée diagnostique;Respiratoire +GEQE005;Bronchoscopie au tube rigide, avec biopsie pulmonaire par voie transbronchique sans guidage;Respiratoire +GEQE006;Fibroscopie bronchique, avec biopsie pulmonaire par voie transbronchique sans guidage;Respiratoire +GEQE007;Fibroscopie bronchique;Respiratoire +GEQE008;Bronchoscopie au tube rigide;Respiratoire +GEQE009;Fibroscopie bronchique avec lavage bronchioloalvéolaire à visée diagnostique, chez un patient intubé ou trachéotomisé;Respiratoire +GEQE010;Fibroscopie trachéobronchique avec photodétection de lésion par autofluorescence sans laser;Respiratoire +GEQE012;Fibroscopie bronchique, chez un patient intubé ou trachéotomisé;Respiratoire +GEQE013;Examen panendoscopique des voies aérodigestives supérieures avec trachéoscopie et œsophagoscopie;Respiratoire +GEQH002;Fibroscopie bronchique, avec biopsie pulmonaire par voie transbronchique avec guidage radiologique;Respiratoire +GEQH003;Bronchoscopie au tube rigide, avec biopsie pulmonaire par voie transbronchique avec guidage radiologique;Respiratoire +JANE002;Fragmentation intrarénale de calcul caliciel inférieur avec ondes de choc ou laser [Lithotritie intrarénale], par urétéronéphroscopie;Genito-urinaire +JANE005;Fragmentation intrarénale de calcul avec ondes de choc ou laser [Lithotritie intrarénale], par urétéronéphroscopie;Genito-urinaire +JANJ002;Fragmentation intrarénale de calcul par ondes de choc [Lithotritie intrarénale], par néphroscopie par une néphrostomie déjà en place;Genito-urinaire +JBFE001;Exérèse de tumeur pyélique et/ou calicielle, par endoscopie rétrograde;Genito-urinaire +JBHE001;Biopsie de la voie excrétrice supérieure, par endoscopie rétrograde;Genito-urinaire +JBNE004;Destruction de tumeur calicielle et/ou pyélique avec laser, par urétéronéphroscopie;Genito-urinaire +JBPE001;Urétéropyélotomie ou urétérotomie, par urétéroscopie rétrograde;Genito-urinaire +JBPE002;Urétéropyélotomie ou urétérotomie, par néphroscopie par une néphrostomie déjà en place;Genito-urinaire +JBPG001;Urétéropyélotomie ou urétérotomie, par néphroscopie par voie transcutanée;Genito-urinaire +JBQE001;Urétéro-pyélo-caliscopie rétrograde, par voie urétrale;Genito-urinaire +JCAE001;Dilatation de l'uretère, par urétéroscopie rétrograde;Genito-urinaire +JCAH001;Dilatation de l'uretère, par urétrocystoscopie avec guidage radiologique;Genito-urinaire +JCEE001;Refoulement de calcul de l'uretère par sonde urétérale, par endoscopie rétrograde;Genito-urinaire +JCFE001;Exérèse de tumeur de l'uretère lombal, par urétéroscopie rétrograde;Genito-urinaire +JCFE002;Exérèse de tumeur de l'uretère pelvien, par urétéroscopie rétrograde;Genito-urinaire +JCFE003;Exérèse de tumeur de l'uretère iliaque, par urétéroscopie rétrograde;Genito-urinaire +JCGE001;Ablation et/ou fragmentation de calcul de l'uretère pelvien, par urétéroscopie rétrograde;Genito-urinaire +JCGE003;Ablation unilatérale ou bilatérale d'une sonde urétérale, par endoscopie rétrograde;Genito-urinaire +JCGE004;Ablation d'une endoprothèse urétérale, par endoscopie rétrograde;Genito-urinaire +JCGE005;Ablation et/ou fragmentation de calcul de l'uretère iliaque, par urétéroscopie rétrograde;Genito-urinaire +JCGE006;Ablation et/ou fragmentation de calcul de l'uretère lombal, par urétéroscopie rétrograde;Genito-urinaire +JCGH004;Ablation et/ou fragmentation de calcul de l'uretère, par urétrocystoscopie avec guidage échographique et/ou radiologique;Genito-urinaire +JCKE001;Changement d'une sonde urétérale, par endoscopie rétrograde;Genito-urinaire +JCKE002;Changement d’une endoprothèse urétérale, par endoscopie rétrograde;Genito-urinaire +JCLE001;Pose d'une sonde urétérale à visée thérapeutique, par endoscopie rétrograde;Genito-urinaire +JCLE002;Pose d'une endoprothèse urétérale, par endoscopie rétrograde;Genito-urinaire +JCLE003;Pose d'une sonde urétérale à visée diagnostique, par endoscopie rétrograde;Genito-urinaire +JCLE004;Injection sousmuqueuse intra-urétérale de matériel hétérologue, par endoscopie;Genito-urinaire +JCNE001;Destruction d'un moignon de l'uretère, par urétéroscopie rétrograde;Genito-urinaire +JCNE002;Destruction de tumeur de l'uretère pelvien, par urétéroscopie rétrograde;Genito-urinaire +JCNE003;Destruction de tumeur de l'uretère iliaque, par urétéroscopie rétrograde;Genito-urinaire +JCNE004;Destruction de tumeur de l'uretère lombal, par urétéroscopie rétrograde;Genito-urinaire +JCPE001;Incision d'une urétérocèle, par endoscopie;Genito-urinaire +JCPE002;Incision du méat urétéral, par endoscopie;Genito-urinaire +JCQE001;Urétéroscopie par une urétérostomie cutanée directe;Genito-urinaire +JCQE003;Urétéroscopie rétrograde, par voie urétrale;Genito-urinaire +JDDA003;Cervicocystopexie par bandelette par abord vaginal et par voie transcutanée, avec guidage endoscopique;Genito-urinaire +JDDA008;Cervicocystopexie indirecte par abord vaginal et par voie abdominale, avec guidage endoscopique;Genito-urinaire +JDDB007;Soutènement vésical par bandelette synthétique infra-urétrale, par voie transvaginale et par voie transrétropubienne, avec contrôle endoscopique;Genito-urinaire +JDFE001;Résection de 4 tumeurs de la vessie ou plus, par endoscopie;Genito-urinaire +JDFE002;Résection de 1 à 3 tumeurs de la vessie, par endoscopie;Genito-urinaire +JDFE003;Résection du col de la vessie, par endoscopie;Genito-urinaire +JDGE001;Ablation de calcul ou de corps étranger de la vessie, par endoscopie;Genito-urinaire +JDHE001;Biopsie de la vessie à l'anse coupante, par endoscopie;Genito-urinaire +JDHE002;Biopsie de la vessie à la pince, par endoscopie;Genito-urinaire +JDHE003;Biopsie randomisée de la vessie, par endoscopie;Genito-urinaire +JDJE001;Décaillotage de la vessie, par endoscopie;Genito-urinaire +JDLE332;Injection de toxine botulique dans la musculeuse vésicale, par urétrocystoscopie;Genito-urinaire +JDNE001;Destruction de lésion de la vessie, par endoscopie;Genito-urinaire +JDPE001;Incision de collet de diverticule de la vessie, par urétrocystoscopie;Genito-urinaire +JDPE002;Incision cervicale ou cervicoprostatique, par endoscopie;Genito-urinaire +JDQE001;Fibroscopie urétrovésicale;Genito-urinaire +JDQE002;Exploration endoscopique d'une néovessie intestinale;Genito-urinaire +JDQE003;Urétrocystoscopie à l'endoscope rigide;Genito-urinaire +JECE001;Ouverture de diverticule de l'urètre, par endoscopie;Genito-urinaire +JEEE001;Alignement de rupture traumatique de l’urètre, par endoscopie;Genito-urinaire +JEFE001;Résection de tumeur de l'urètre, par endoscopie;Genito-urinaire +JEFE003;Résection du sphincter strié de l'urètre, par endoscopie;Genito-urinaire +JEFE004;Résection de sténose de l'urètre à l'anse coupante, par endoscopie;Genito-urinaire +JEFE005;Résection de valve de l'urètre, par endoscopie;Genito-urinaire +JEGE001;Ablation de corps étranger de l'urètre, par urétroscopie;Genito-urinaire +JEGE002;Ablation d'une endoprothèse temporaire de l'urètre, par endoscopie;Genito-urinaire +JEGE003;Épilation de l'urètre, par endoscopie;Genito-urinaire +JEGE004;Ablation d'une endoprothèse définitive de l'urètre, par endoscopie;Genito-urinaire +JEHE001;Biopsie de l'urètre à l'anse coupante, par endoscopie;Genito-urinaire +JEHE002;Biopsie de l'urètre à la pince, par endoscopie;Genito-urinaire +JEKE001;Changement d'une endoprothèse de l'urètre, par endoscopie;Genito-urinaire +JELD001;Injection sousmuqueuse périurétrocervicale de matériel hétérologue par voie transvaginale, avec guidage endoscopique;Genito-urinaire +JELE001;Injection sousmuqueuse intra-urétrale de matériel hétérologue, par endoscopie;Genito-urinaire +JELE002;Pose d'une endoprothèse de l'urètre, par endoscopie;Genito-urinaire +JELE003;Pose d'une endoprothèse de l'urètre cervicoprostatique, par endoscopie;Genito-urinaire +JENE001;Destruction de lésion de l'urètre, par endoscopie;Genito-urinaire +JEPE001;Incision du sphincter strié de l'urètre, par endoscopie;Genito-urinaire +JEPE002;Urétrotomie, par endoscopie;Genito-urinaire +JEPH001;Incision de valve de l'urètre par endoscopie, avec contrôle radiologique;Genito-urinaire +JFQC001;Exploration de l'espace rétropéritonéal et de son contenu, par rétropéritonéoscopie [Rétropéritonéoscopie exploratrice];Genito-urinaire +JGFA014;Résection palliative de la prostate [Recalibrage de l'urètre], par urétrocystoscopie;Genito-urinaire +JGFA015;Résection d'une hypertrophie de la prostate, par urétrocystoscopie ;Genito-urinaire +JGFA016;Résection ou marsupialisation de collection de la prostate ou de diverticule de l'urètre, par urétrocystoscopie;Genito-urinaire +JGFE004;Résection et/ou désobstruction des conduits éjaculateurs, par urétrocystoscopie;Genito-urinaire +JGFE023;Résection d'une hypertrophie de la prostate sans laser, par urétrocystoscopie;Genito-urinaire +JGFE365;Résection d'une hypertrophie de la prostate avec laser, par urétrocystoscopie ;Genito-urinaire +JGNE003;Destruction d'une hypertrophie de la prostate par radiofréquence, par urétrocystoscopie avec guidage échographique;Genito-urinaire +JGNE171;Destruction d’une hypertrophie de la prostate par laser [photovaporisation], par urétrocystoscopie;Genito-urinaire +JGQH003;Déférentovésiculographie unilatérale ou bilatérale, par cathétérisme endoscopique des conduits éjaculateurs;Genito-urinaire +JHQP002;Péniscopie;Genito-urinaire +JJLE001;Cathétérisme rétrograde unilatéral ou bilatéral de la trompe utérine, par hystéroscopie;Genito-urinaire +JJPE001;Interruption unilatérale ou bilatérale de la perméabilité des trompes utérines par insertion de dispositif intratubaire, par hystéroscopie;Genito-urinaire +JKFE001;Exérèse de polype de l'utérus, par hystéroscopie;Genito-urinaire +JKFE002;Résection de myome de l'utérus, par hystéroscopie;Genito-urinaire +JKFE003;Exérèse de lésion du col de l'utérus, par colposcopie;Genito-urinaire +JKGE001;Ablation d'un dispositif intra-utérin, par hystéroscopie;Genito-urinaire +JKGE002;Ablation de corps étranger de l'utérus, par hystéroscopie;Genito-urinaire +JKND003;Destruction de lésion du col de l'utérus par colposcopie, avec laser;Genito-urinaire +JKND004;Destruction de lésion du col de l'utérus par colposcopie, sans laser;Genito-urinaire +JKNE001;Abrasion de la muqueuse de l'utérus [Endométrectomie], par hystéroscopie;Genito-urinaire +JKPE001;Section ou résection de cloison utérine, par hystéroscopie;Genito-urinaire +JKPE002;Section et/ou destruction de synéchies de l'utérus, par hystéroscopie;Genito-urinaire +JKPJ001;Section et/ou destruction de synéchies de l'utérus, par hystéroscopie avec guidage échographique;Genito-urinaire +JKQE001;Hystéroscopie avec curetage de la cavité de l'utérus;Genito-urinaire +JKQE002;Hystéroscopie;Genito-urinaire +JLGE001;Ablation de corps étranger du vagin, par vaginoscopie;Genito-urinaire +JLQE001;Vaginoscopie;Genito-urinaire +JLQE002;Colposcopie;Genito-urinaire +JMQP001;Vulvoscopie;Genito-urinaire +JPQE001;Amnioscopie;Genito-urinaire +JZQE001;Exploration endoscopique d'une malformation cloacale;Genito-urinaire +ZCQC001;Exploration de la cavité abdominale par cœlioscopie, avec hystéroscopie;Genito-urinaire diff --git a/endoscopies.rmd b/endoscopies.rmd new file mode 100644 index 0000000..5aac0b8 --- /dev/null +++ b/endoscopies.rmd @@ -0,0 +1,218 @@ +--- +title: Endoscopies +output: + html_document: + toc: true + toc_float: true +params: + endoscopies: NA + endoscopies_ext: NA + endoscopies_hos: NA + liste_actes: NA +--- + +```{r setup, message = F, warning = F, echo = F} +library(tidyverse) +library(DT) +library(knitr) +library(magrittr) +library(stringr) + +opts_chunk$set(message = F, + echo = F, + warning = F) +options(DT.options = list(paging = F, + searching = F, + info = F, + dom = "Bfrtip", + buttons = c("copy", "excel"))) +``` + +# Codes utilisés {.tabset} + +## ORL + +```{r liste_orl} +liste_actes %>% + filter(Appareil == "ORL") %>% + select(- Appareil) %>% + datatable(rownames = F, options = list(paging = T, searching = T)) +``` + +## Digestif + +```{r liste_dig} +liste_actes %>% + filter(Appareil == "Digestif") %>% + select(- Appareil) %>% + datatable(rownames = F, options = list(paging = T, searching = T)) +``` + +## Respiratoire + +```{r liste_respi} +liste_actes %>% + filter(Appareil == "Respiratoire") %>% + select(- Appareil) %>% + datatable(rownames = F, options = list(paging = T, searching = T)) +``` + +## Génito-urinaire + +```{r liste_uro} +liste_actes %>% + filter(Appareil == "Genito-urinaire") %>% + select(- Appareil) %>% + datatable(rownames = F, options = list(paging = T, searching = T)) +``` + +# Global + +## Total + +```{r global_total} +endoscopies() %>% + summarise(Venues = n_distinct(Venue)) %>% + datatable(rownames = F, + extensions = "Buttons") +``` + +## Par service exécutant +```{r global_par_service} +endoscopies() %>% + group_by(Service) %>% + summarise(Venues = n_distinct(Venue)) %>% + ungroup %>% + arrange(desc(Venues)) %>% + datatable(rownames = F, + extensions = "Buttons") +``` + +# Externe + +## Total +```{r ext_total} +endoscopies_ext() %>% + summarise(Venues = n_distinct(Venue), + Valorisation = sum(Tarif)) %>% + datatable(rownames = F, + extensions = "Buttons") %>% + formatCurrency(2, currency = "€", dec.mark = ",", mark = " ", before = F) +``` + +## Par appareil +```{r ext_par_appareil} +endoscopies_ext() %>% + group_by(Appareil) %>% + summarise(Venues = n_distinct(Venue), + Valorisation = sum(Tarif)) %>% + arrange(desc(Valorisation)) %>% + datatable(rownames = F, + extensions = "Buttons") %>% + formatCurrency(3, currency = "€", dec.mark = ",", mark = " ", before = F) +``` + +## Par acte +```{r ext_par_acte} +endoscopies_ext() %>% + group_by(Acte, Acte_libelle) %>% + summarise(Venues = n_distinct(Venue), + Valorisation = sum(Tarif)) %>% + ungroup %>% + arrange(desc(Valorisation)) %>% + datatable(options = list(paging = T, searching = T), + colnames = c("Libelle" = "Acte_libelle"), + rownames = F, + extensions = "Buttons") %>% + formatCurrency(4, currency = "€", dec.mark = ",", mark = " ", before = F) +``` + +## Par service exécutant +```{r ext_par_service} +endoscopies_ext() %>% + group_by(Service) %>% + summarise(Venues = n_distinct(Venue), + Valorisation = sum(Tarif)) %>% + ungroup %>% + arrange(desc(Valorisation)) %>% + datatable(rownames = F, + extensions = "Buttons") %>% + formatCurrency(3, currency = "€", dec.mark = ",", mark = " ", before = F) +``` + +## Par service exécutant et par acte +```{r ext_par_acte_et_service} +endoscopies_ext() %>% + group_by(Service, Acte, Acte_libelle) %>% + summarise(Venues = n_distinct(Venue), + Valorisation = sum(Tarif)) %>% + arrange(Service, desc(Valorisation)) %>% + ungroup %>% + datatable(options = list(paging = T, searching = T), + colnames = c("Libelle" = "Acte_libelle"), + rownames = F, + extensions = "Buttons", + filter = "top") %>% + formatCurrency(5, currency = "€", dec.mark = ",", mark = " ", before = F) +``` + + +# Hospitalisation + +## Total +```{r total_hos} +endoscopies_hos() %>% + summarise(RSS = n(), + Valorisation = sum(Valorisation)) %>% + datatable(rownames = F, + extensions = "Buttons") %>% + formatCurrency(2, currency = "€", dec.mark = ",", mark = " ", before = F) +``` + +## Par durée d'hospitalisation +```{r hos_par_durée} +endoscopies_hos() %>% + group_by(Type_duree) %>% + summarise(RSS = n(), + Valorisation = sum(Valorisation)) %>% + datatable(rownames = F, + colnames = c("Durée" = "Type_duree"), + extensions = "Buttons") %>% + formatCurrency(3, currency = "€", dec.mark = ",", mark = " ", before = F) +``` + +## Par GHM {.tabset} + +### 0 ou 1j +```{r ghm_hos_0j} +endoscopies_hos() %>% + filter(Type_duree == "0 ou 1 j") %>% + group_by(GHM, GHM_libelle) %>% + summarise(RSS = n(), + Valorisation = sum(Valorisation)) %>% + ungroup %>% + arrange(desc(RSS)) %>% + datatable(rownames = F, + colnames = c("Libelle GHM" = "GHM_libelle"), + options = list(paging = T), + extensions = "Buttons") %>% + formatCurrency(4, currency = "€", dec.mark = ",", mark = " ", before = F) %>% + formatRound(5) +``` + +### 1+ j +```{r ghm_hos_1j} +endoscopies_hos() %>% + filter(Type_duree == "1+ j") %>% + group_by(GHM, GHM_libelle) %>% + summarise(RSS = n(), + Valorisation = sum(Valorisation)) %>% + ungroup %>% + arrange(desc(RSS)) %>% + datatable(rownames = F, + colnames = c("Libelle GHM" = "GHM_libelle"), + options = list(paging = T), + extensions = "Buttons") %>% + formatCurrency(4, currency = "€", dec.mark = ",", mark = " ", before = F) %>% + formatRound(5) +``` diff --git a/endoscopies_ext.wid b/endoscopies_ext.wid new file mode 100644 index 0000000..e2d3e64 Binary files /dev/null and b/endoscopies_ext.wid differ diff --git a/endoscopies_hos.wid b/endoscopies_hos.wid new file mode 100644 index 0000000..9bca0ba Binary files /dev/null and b/endoscopies_hos.wid differ diff --git a/index.Rmd b/index.Rmd new file mode 100644 index 0000000..7e62769 --- /dev/null +++ b/index.Rmd @@ -0,0 +1,315 @@ +--- +title: Endoscopies +runtime: shiny +output: + html_document: + toc: true + toc_float: true +--- + +```{r setup, message = F, warning = F, echo = F} +library(tidyverse) +library(DT) +library(knitr) +library(magrittr) +library(stringr) + +opts_chunk$set(message = F, + echo = F, + warning = F) +options(DT.options = list(paging = F, + searching = F, + info = F, + dom = "Bfrtip", + buttons = c("copy", "excel")), + shiny.maxRequestSize = 100*1024^2) +``` + +# {.tabset} + +## Chargement des données + +Les fichiers doivent être fournis au format CSV avec les paramètres suivants : + +* séparateur de champs = , +* guillemets = " +* encodage = UTF-8 +* séparateur de décimales = , + +### Endoscopies en externe + +Le fichier doit être issu de la [requête suivante](endoscopies_ext.wid). + +### Endoscopies en hospitalisation + +Le fichier doit être issu de la [requête suivante](endoscopies_hos.wid). + +```{r data} +inputPanel( + fileInput("ext", "Endoscopies externes", accept = "text/csv"), + fileInput("hos", "Endoscopies hospitalisations", accept = "text/csv"), + downloadButton("report", "Générer le rapport") +) + +read_csv2("actes.csv") -> liste_actes + +endoscopies <- reactive( + { + req(input$ext) + + read_csv(input$ext$datapath, locale = locale(decimal_mark = ",")) %>% + setNames(c("Venue", "Intervention", "Acte", "Tarif", "Acte_libelle", "Service", "Type_venue")) %>% + left_join(liste_actes %>% select(Code, Appareil), by = c("Acte" = "Code")) %>% + dmap_if(is.character, factor) %>% + filter(Tarif != 0) %>% + distinct + } +) + +endoscopies_ext <- reactive( + { + req(endoscopies()) + + endoscopies() %>% + filter(Type_venue != 2) + }) + +endoscopies_hos <- reactive( + { + req(input$hos) + + read_csv(input$hos$datapath, locale = locale(decimal_mark = ",")) %>% + setNames(c("RSS", "Durée", "GHM", "GHM_libelle", "Valorisation")) %>% + distinct %>% + mutate(Type_duree = `Durée` %>% cut(c(-Inf, 1.5, Inf), labels = c("0 ou 1 j", "1+ j"))) + }) + +``` + +```{r report} +output$report <- downloadHandler(filename = "endoscopies.html", + content = function(file) + { + tempReport <- file.path(tempdir(), "endoscopies.rmd") + file.copy("endoscopies.rmd", tempReport, overwrite = T) + rmarkdown::render(tempReport, output_file = file, params = list(liste_actes = liste_actes, endoscopies = endoscopies(), endoscopies_ext = endoscopies_ext(), endoscopies_hos = endoscopies_hos())) + }) +``` + +## Rapport + +### Codes utilisés {.tabset} + +#### ORL +```{r liste_orl} +liste_actes %>% + filter(Appareil == "ORL") %>% + select(- Appareil) %>% + datatable(rownames = F, options = list(paging = T, searching = T)) +``` + +#### Digestif +```{r liste_dig} +liste_actes %>% + filter(Appareil == "Digestif") %>% + select(- Appareil) %>% + datatable(rownames = F, options = list(paging = T, searching = T)) +``` + +#### Respiratoire +```{r liste_respi} +liste_actes %>% + filter(Appareil == "Respiratoire") %>% + select(- Appareil) %>% + datatable(rownames = F, options = list(paging = T, searching = T)) +``` + +#### Génito-urinaire +```{r liste_uro} +liste_actes %>% + filter(Appareil == "Genito-urinaire") %>% + select(- Appareil) %>% + datatable(rownames = F, options = list(paging = T, searching = T)) +``` + +### Global + +#### Total +```{r global_total} +renderDataTable( + { + endoscopies() %>% + summarise(Venues = n_distinct(Venue)) %>% + datatable(rownames = F, + extensions = "Buttons") + }) +``` + +#### Par service exécutant +```{r global_par_service} +renderDataTable( + { + endoscopies() %>% + group_by(Service) %>% + summarise(Venues = n_distinct(Venue)) %>% + ungroup %>% + arrange(desc(Venues)) %>% + datatable(rownames = F, + extensions = "Buttons") + }) +``` + +### Externe + +#### Total +```{r ext_total} +renderDataTable( + { + endoscopies_ext() %>% + summarise(Venues = n_distinct(Venue), + Valorisation = sum(Tarif)) %>% + datatable(rownames = F, + extensions = "Buttons") %>% + formatCurrency(2, currency = "€", dec.mark = ",", mark = " ", before = F) + }) +``` + +#### Par appareil +```{r ext_par_appareil} +renderDataTable( + { + endoscopies_ext() %>% + group_by(Appareil) %>% + summarise(Venues = n_distinct(Venue), + Valorisation = sum(Tarif)) %>% + arrange(desc(Valorisation)) %>% + datatable(rownames = F, + extensions = "Buttons") %>% + formatCurrency(3, currency = "€", dec.mark = ",", mark = " ", before = F) + }) +``` + +#### Par acte +```{r ext_par_acte} +renderDataTable( + { + endoscopies_ext() %>% + group_by(Acte, Acte_libelle) %>% + summarise(Venues = n_distinct(Venue), + Valorisation = sum(Tarif)) %>% + ungroup %>% + arrange(desc(Valorisation)) %>% + datatable(options = list(paging = T, searching = T), + colnames = c("Libelle" = "Acte_libelle"), + rownames = F, + extensions = "Buttons") %>% + formatCurrency(4, currency = "€", dec.mark = ",", mark = " ", before = F) + }) +``` + +#### Par service exécutant +```{r ext_par_service} +renderDataTable( + { + endoscopies_ext() %>% + group_by(Service) %>% + summarise(Venues = n_distinct(Venue), + Valorisation = sum(Tarif)) %>% + ungroup %>% + arrange(desc(Valorisation)) %>% + datatable(rownames = F, + extensions = "Buttons") %>% + formatCurrency(3, currency = "€", dec.mark = ",", mark = " ", before = F) + }) +``` + +#### Par service exécutant et par acte +```{r ext_par_acte_et_service} +renderDataTable( + { + endoscopies_ext() %>% + group_by(Service, Acte, Acte_libelle) %>% + summarise(Venues = n_distinct(Venue), + Valorisation = sum(Tarif)) %>% + arrange(Service, desc(Valorisation)) %>% + ungroup %>% + datatable(options = list(paging = T, searching = T), + colnames = c("Libelle" = "Acte_libelle"), + rownames = F, + extensions = "Buttons", + filter = "top") %>% + formatCurrency(5, currency = "€", dec.mark = ",", mark = " ", before = F) + }) +``` + +### Hospitalisation + +#### Total +```{r total_hos} +renderDataTable( + { + endoscopies_hos() %>% + summarise(RSS = n(), + Valorisation = sum(Valorisation)) %>% + datatable(rownames = F, + extensions = "Buttons") %>% + formatCurrency(2, currency = "€", dec.mark = ",", mark = " ", before = F) + }) +``` + +#### Par durée d'hospitalisation +```{r hos_par_durée} +renderDataTable( + { + endoscopies_hos() %>% + group_by(Type_duree) %>% + summarise(RSS = n(), + Valorisation = sum(Valorisation)) %>% + datatable(rownames = F, + colnames = c("Durée" = "Type_duree"), + extensions = "Buttons") %>% + formatCurrency(3, currency = "€", dec.mark = ",", mark = " ", before = F) + }) +``` + +#### Par GHM {.tabset} + +##### 0 ou 1j +```{r ghm_hos_0j} +renderDataTable( + { + endoscopies_hos() %>% + filter(Type_duree == "0 ou 1 j") %>% + group_by(GHM, GHM_libelle) %>% + summarise(RSS = n(), + Valorisation = sum(Valorisation)) %>% + ungroup %>% + arrange(desc(RSS)) %>% + datatable(rownames = F, + colnames = c("Libelle GHM" = "GHM_libelle"), + options = list(paging = T), + extensions = "Buttons") %>% + formatCurrency(4, currency = "€", dec.mark = ",", mark = " ", before = F) %>% + formatRound(5) + }) +``` + +##### 1+ j +```{r ghm_hos_1j} +renderDataTable( + { + endoscopies_hos() %>% + filter(Type_duree == "1+ j") %>% + group_by(GHM, GHM_libelle) %>% + summarise(RSS = n(), + Valorisation = sum(Valorisation)) %>% + ungroup %>% + arrange(desc(RSS)) %>% + datatable(rownames = F, + colnames = c("Libelle GHM" = "GHM_libelle"), + options = list(paging = T), + extensions = "Buttons") %>% + formatCurrency(4, currency = "€", dec.mark = ",", mark = " ", before = F) %>% + formatRound(5) + }) +```