/*AHCA*/ /* libname AHCA odbc dsn=AHCA schema=DBO; */ /* ----------------------------------------------------------------------- \0/ Note: This program uses the 2022 data. ! It became available on 08/23/2023. / \ ------------------------------------------------------------------------ */ libname AHCA 'C:\Data\Florida\Inpatient\'; proc format; value $ County /*PCCOUNTY*/ '01' = 'Alachua' '02' = 'Baker' '03' = 'Bay' '04' = 'Bradford' '05' = 'Brevard' '06' = 'Broward' '07' = 'Calhoun' '08' = 'Charlotte' '09' = 'Citrus' '10' = 'Clay' '11' = 'Collier' '12' = 'Columbia' '13' = 'Miami-Dade' '14' = 'Desoto' '15' = 'Dixie' '16' = 'Duval' '17' = 'Escambia' '18' = 'Flagler' '19' = 'Franklin' '20' = 'Gadsden' '21' = 'Gilchrist' '22' = 'Glades' '23' = 'Gulf' '24' = 'Hamilton' '25' = 'Hardee' '26' = 'Hendry' '27' = 'Hernando' '28' = 'Highlands' '29' = 'Hillsborough' '30' = 'Holmes' '31' = 'Indian River' '32' = 'Jackson' '33' = 'Jefferson' '34' = 'Lafayette' '35' = 'Lake' '36' = 'Lee' '37' = 'Leon' '38' = 'Levy' '39' = 'Liberty' '40' = 'Madison' '41' = 'Manatee' '42' = 'Marion' '43' = 'Martin' '44' = 'Monroe' '45' = 'Nassau' '46' = 'Okaloosa' '47' = 'Okeechobee' '48' = 'Orange' '49' = 'Osceola' '50' = 'Palm Beach' '51' = 'Pasco' '52' = 'Pinellas' '53' = 'Polk' '54' = 'Putnam' '55' = 'Saint Johns' '56' = 'Saint Lucie' '57' = 'Santa Rosa' '58' = 'Sarasota' '59' = 'Seminole' '60' = 'Sumter' '61' = 'Suwannee' '62' = 'Taylor' '63' = 'Union' '64' = 'Volusia' '65' = 'Wakulla' '66' = 'Walton' '67' = 'Washington' ; run; /***Gather one year of records from AHCA dataset***/ data work.inpt (KEEP = YEAR QTR AGE admsrc DISCHSTAT FACLNBR FAC_COUNTY OTHDIAG1-OTHDIAG30 POA1-POA30 PRINDIAG POA_PRIN_D SYS_RECID DIAG01-DIAG31 LOSDAYS); /* EP! set AHCA.HospitalInpatient_Details; */ set AHCA.Inpatient2022; where (YEAR in (2022) AND TYPE_SERV='1'); /* AND MOD_CODE IN ('CL01' 'CL02' 'CL07' 'CL10'); */ /*class 1 hosp, class2, class 1 rural, class 3 special medical*/ /* Note: Difference from previous years of the data (and code used to analyze). The 2022 data had only one value for MOD_CODE, particularly Cls - since the observations are further filtered below by injury code, initial injury status, and severity, the MOD_CODE (or hospital type) does not make a difference. */ /* -------------------------------------------------------------------------------------------- \0/ EP! Change the position of the initial injury indicator to 8 (account for decimal) ! / \ -------------------------------------------------------------------------------------------- */ /***Zero out any diagnoses that are not traumatic injuries***/ array diagnoses {31} PRINDIAG OTHDIAG1-OTHDIAG30; array present {31} POA_PRIN_D POA1-POA30; array new_diag {31} $ DIAG01-DIAG31; do i=1 to 31; /*Zero out the diagnosis value if it is not an an injury.*/ if (substr(diagnoses{i},1,1)="S" AND substr(diagnoses{i},3,1) NE "0" AND substr(diagnoses{i},8,1) IN ("A","B","C")) /* EP! - value position changes to reflect length of field */ OR substr(diagnoses{i},1,3) IN ("T07","T14","T30","T31","T32") OR (substr(diagnoses{i},1,3) IN ("T20","T21","T22","T23","T24","T25","T26","T27","T28") AND substr(diagnoses{i},8,1)="A") /* EP!-see comment above */ OR (substr(diagnoses{i},1,5) IN ("T79A1","T79A2","T79A3","T79A4","T79A5","T79A6","T79A7","T79A8","T79A9") AND substr(diagnoses{i},8,1)="A") /* EP!-see comment above */ THEN new_diag{i}=diagnoses{i}; else new_diag{i}=" "; end; do i=1 to 31; /*Zero out the diagnosis value if it is not an an injury.*/ if (substr(diagnoses{i},1,1)="S" AND substr(diagnoses{i},3,1) NE "0" AND substr(diagnoses{i},8,1) IN ("A","B","C")) /* EP!-see comment above */ OR substr(diagnoses{i},1,3) IN ("T07","T14","T30","T31","T32") OR (substr(diagnoses{i},1,3) IN ("T20","T21","T22","T23","T24","T25","T26","T27","T28") AND substr(diagnoses{i},8,1)="A") /* EP!-see comment above */ OR (substr(diagnoses{i},1,5) IN ("T79A1","T79A2","T79A3","T79A4","T79A5","T79A6","T79A7","T79A8","T79A9") AND substr(diagnoses{i},8,1)="A") /* EP!-see comment above */ THEN diagnoses{i}=1; else diagnoses{i}=0; end; /*How POA indicators are coded: Y - Yes Present at time that order for inpatient admission occurs. N - No Not present at the time that the order for inpatient admission occurs. U - Unknown Documentation is insufficient to determine if condition is present on admission. W - Clinically Undetermined Provider is unable to clinically determine whether the condition was present on admission or not. E - Exempt The condition is exempt from POA reporting.*/ do i=1 to 31; /*Zero out the diagnosis value if it is not present on admission.*/ if present{i} IN ('N', 'E') THEN diagnoses{i}=0; if present{i} IN ('N', 'E') THEN new_diag{i}=" "; end; /***Elimiate records for patients with no injuries***/ injury = PRINDIAG+OTHDIAG1+OTHDIAG2+OTHDIAG3+OTHDIAG4+OTHDIAG5+OTHDIAG6+OTHDIAG7+OTHDIAG8+OTHDIAG9+OTHDIAG10+OTHDIAG11+ OTHDIAG12+OTHDIAG13+OTHDIAG14+OTHDIAG15+OTHDIAG16+OTHDIAG17+OTHDIAG18+OTHDIAG19+OTHDIAG20+OTHDIAG21+OTHDIAG22+OTHDIAG23+OTHDIAG24+ OTHDIAG25+OTHDIAG26+OTHDIAG27+OTHDIAG28+OTHDIAG29+OTHDIAG30; if injury=0 THEN DELETE; RUN; /* Create a listing of variables in the initial data set (after eliminating non-injuries) - This is for debugging purposes to checking effect of code and make sure required variables are still active */ proc contents order=varnum data=inpt; run; proc freq data=inpt; table qtr; run; /***Import survial risk ratios***/ data WORK.SRR ; %let _EFIERR_ = 0; /* set the ERROR detection macro variable */ /* EP! Adjust the path to reflect location on local machine */ infile 'C:\Users\epracht\Box\000_Archive\Consulting\FLDOH\Trauma System Assessment 2022\SAS\FloridaAHCA_2017to2021_SRR_Adult.csv' delimiter =',' MISSOVER DSD lrecl=32767 firstobs=2 ; informat DIAGNOSIS $8. ; informat Incidence best32. ; informat Mortality best32. ; informat SRR best32. ; format DIAGNOSIS $8. ; format Incidence best12. ; format Mortality best12. ; format SRR best12. ; input DIAGNOSIS $ Incidence Mortality SRR; if _ERROR_ then call symputx('_EFIERR_',1); /* set ERROR detection macro variable */ run; data srr; set srr; /* DIAGNOSIS=compress(DIAGNOSIS,'.'); */ run; proc contents order=varnum data=SRR; run; /***Assign SRRs to specific injuries***/ DATA work.SRR; SET work.SRR; DIAG01=DIAGNOSIS; RUN; PROC SORT data=work.SRR; BY DIAG01; RUN; PROC SORT data=work.inpt; BY DIAG01; RUN; DATA work.inpt; MERGE work.inpt (IN=InSet) work.SRR; BY DIAG01; IF InSet=1; SRR01=SRR; DROP DIAGNOSIS Incidence Mortality; RUN; DATA work.SRR; SET work.SRR; DIAG02=DIAGNOSIS; RUN; PROC SORT data=work.SRR; BY DIAG02; RUN; PROC SORT data=work.inpt; BY DIAG02; RUN; DATA work.inpt; MERGE work.inpt (IN=InSet) work.SRR; BY DIAG02; IF InSet=1; SRR02=SRR; DROP DIAGNOSIS Incidence Mortality; RUN; DATA work.SRR; SET work.SRR; DIAG03=DIAGNOSIS; RUN; PROC SORT data=work.SRR; BY DIAG03; RUN; PROC SORT data=work.inpt; BY DIAG03; RUN; DATA work.inpt; MERGE work.inpt (IN=InSet) work.SRR; BY DIAG03; IF InSet=1; SRR03=SRR; DROP DIAGNOSIS Incidence Mortality; RUN; DATA work.SRR; SET work.SRR; DIAG04=DIAGNOSIS; RUN; PROC SORT data=work.SRR; BY DIAG04; RUN; PROC SORT data=work.inpt; BY DIAG04; RUN; DATA work.inpt; MERGE work.inpt (IN=InSet) work.SRR; BY DIAG04; IF InSet=1; SRR04=SRR; DROP DIAGNOSIS Incidence Mortality; RUN; DATA work.SRR; SET work.SRR; DIAG05=DIAGNOSIS; RUN; PROC SORT data=work.SRR; BY DIAG05; RUN; PROC SORT data=work.inpt; BY DIAG05; RUN; DATA work.inpt; MERGE work.inpt (IN=InSet) work.SRR; BY DIAG05; IF InSet=1; SRR05=SRR; DROP DIAGNOSIS Incidence Mortality; RUN; DATA work.SRR; SET work.SRR; DIAG06=DIAGNOSIS; RUN; PROC SORT data=work.SRR; BY DIAG06; RUN; PROC SORT data=work.inpt; BY DIAG06; RUN; DATA work.inpt; MERGE work.inpt (IN=InSet) work.SRR; BY DIAG06; IF InSet=1; SRR06=SRR; DROP DIAGNOSIS Incidence Mortality; RUN; DATA work.SRR; SET work.SRR; DIAG07=DIAGNOSIS; RUN; PROC SORT data=work.SRR; BY DIAG07; RUN; PROC SORT data=work.inpt; BY DIAG07; RUN; DATA work.inpt; MERGE work.inpt (IN=InSet) work.SRR; BY DIAG07; IF InSet=1; SRR07=SRR; DROP DIAGNOSIS Incidence Mortality; RUN; DATA work.SRR; SET work.SRR; DIAG08=DIAGNOSIS; RUN; PROC SORT data=work.SRR; BY DIAG08; RUN; PROC SORT data=work.inpt; BY DIAG08; RUN; DATA work.inpt; MERGE work.inpt (IN=InSet) work.SRR; BY DIAG08; IF InSet=1; SRR08=SRR; DROP DIAGNOSIS Incidence Mortality; RUN; DATA work.SRR; SET work.SRR; DIAG09=DIAGNOSIS; RUN; PROC SORT data=work.SRR; BY DIAG09; RUN; PROC SORT data=work.inpt; BY DIAG09; RUN; DATA work.inpt; MERGE work.inpt (IN=InSet) work.SRR; BY DIAG09; IF InSet=1; SRR09=SRR; DROP DIAGNOSIS Incidence Mortality; RUN; DATA work.SRR; SET work.SRR; DIAG10=DIAGNOSIS; RUN; PROC SORT data=work.SRR; BY DIAG10; RUN; PROC SORT data=work.inpt; BY DIAG10; RUN; DATA work.inpt; MERGE work.inpt (IN=InSet) work.SRR; BY DIAG10; IF InSet=1; SRR10=SRR; DROP DIAGNOSIS Incidence Mortality; RUN; DATA work.SRR; SET work.SRR; DIAG11=DIAGNOSIS; RUN; PROC SORT data=work.SRR; BY DIAG11; RUN; PROC SORT data=work.inpt; BY DIAG11; RUN; DATA work.inpt; MERGE work.inpt (IN=InSet) work.SRR; BY DIAG11; IF InSet=1; SRR11=SRR; DROP DIAGNOSIS Incidence Mortality; RUN; DATA work.SRR; SET work.SRR; DIAG12=DIAGNOSIS; RUN; PROC SORT data=work.SRR; BY DIAG12; RUN; PROC SORT data=work.inpt; BY DIAG12; RUN; DATA work.inpt; MERGE work.inpt (IN=InSet) work.SRR; BY DIAG12; IF InSet=1; SRR12=SRR; DROP DIAGNOSIS Incidence Mortality; RUN; DATA work.SRR; SET work.SRR; DIAG13=DIAGNOSIS; RUN; PROC SORT data=work.SRR; BY DIAG13; RUN; PROC SORT data=work.inpt; BY DIAG13; RUN; DATA work.inpt; MERGE work.inpt (IN=InSet) work.SRR; BY DIAG13; IF InSet=1; SRR13=SRR; DROP DIAGNOSIS Incidence Mortality; RUN; DATA work.SRR; SET work.SRR; DIAG14=DIAGNOSIS; RUN; PROC SORT data=work.SRR; BY DIAG14; RUN; PROC SORT data=work.inpt; BY DIAG14; RUN; DATA work.inpt; MERGE work.inpt (IN=InSet) work.SRR; BY DIAG14; IF InSet=1; SRR14=SRR; DROP DIAGNOSIS Incidence Mortality; RUN; DATA work.SRR; SET work.SRR; DIAG15=DIAGNOSIS; RUN; PROC SORT data=work.SRR; BY DIAG15; RUN; PROC SORT data=work.inpt; BY DIAG15; RUN; DATA work.inpt; MERGE work.inpt (IN=InSet) work.SRR; BY DIAG15; IF InSet=1; SRR15=SRR; DROP DIAGNOSIS Incidence Mortality; RUN; DATA work.SRR; SET work.SRR; DIAG16=DIAGNOSIS; RUN; PROC SORT data=work.SRR; BY DIAG16; RUN; PROC SORT data=work.inpt; BY DIAG16; RUN; DATA work.inpt; MERGE work.inpt (IN=InSet) work.SRR; BY DIAG16; IF InSet=1; SRR16=SRR; DROP DIAGNOSIS Incidence Mortality; RUN; DATA work.SRR; SET work.SRR; DIAG17=DIAGNOSIS; RUN; PROC SORT data=work.SRR; BY DIAG17; RUN; PROC SORT data=work.inpt; BY DIAG17; RUN; DATA work.inpt; MERGE work.inpt (IN=InSet) work.SRR; BY DIAG17; IF InSet=1; SRR17=SRR; DROP DIAGNOSIS Incidence Mortality; RUN; DATA work.SRR; SET work.SRR; DIAG18=DIAGNOSIS; RUN; PROC SORT data=work.SRR; BY DIAG18; RUN; PROC SORT data=work.inpt; BY DIAG18; RUN; DATA work.inpt; MERGE work.inpt (IN=InSet) work.SRR; BY DIAG18; IF InSet=1; SRR18=SRR; DROP DIAGNOSIS Incidence Mortality; RUN; DATA work.SRR; SET work.SRR; DIAG19=DIAGNOSIS; RUN; PROC SORT data=work.SRR; BY DIAG19; RUN; PROC SORT data=work.inpt; BY DIAG19; RUN; DATA work.inpt; MERGE work.inpt (IN=InSet) work.SRR; BY DIAG19; IF InSet=1; SRR19=SRR; DROP DIAGNOSIS Incidence Mortality; RUN; DATA work.SRR; SET work.SRR; DIAG20=DIAGNOSIS; RUN; PROC SORT data=work.SRR; BY DIAG20; RUN; PROC SORT data=work.inpt; BY DIAG20; RUN; DATA work.inpt; MERGE work.inpt (IN=InSet) work.SRR; BY DIAG20; IF InSet=1; SRR20=SRR; DROP DIAGNOSIS Incidence Mortality; RUN; DATA work.SRR; SET work.SRR; DIAG21=DIAGNOSIS; RUN; PROC SORT data=work.SRR; BY DIAG21; RUN; PROC SORT data=work.inpt; BY DIAG21; RUN; DATA work.inpt; MERGE work.inpt (IN=InSet) work.SRR; BY DIAG21; IF InSet=1; SRR21=SRR; DROP DIAGNOSIS Incidence Mortality; RUN; DATA work.SRR; SET work.SRR; DIAG22=DIAGNOSIS; RUN; PROC SORT data=work.SRR; BY DIAG22; RUN; PROC SORT data=work.inpt; BY DIAG22; RUN; DATA work.inpt; MERGE work.inpt (IN=InSet) work.SRR; BY DIAG22; IF InSet=1; SRR22=SRR; DROP DIAGNOSIS Incidence Mortality; RUN; DATA work.SRR; SET work.SRR; DIAG23=DIAGNOSIS; RUN; PROC SORT data=work.SRR; BY DIAG23; RUN; PROC SORT data=work.inpt; BY DIAG23; RUN; DATA work.inpt; MERGE work.inpt (IN=InSet) work.SRR; BY DIAG23; IF InSet=1; SRR23=SRR; DROP DIAGNOSIS Incidence Mortality; RUN; DATA work.SRR; SET work.SRR; DIAG24=DIAGNOSIS; RUN; PROC SORT data=work.SRR; BY DIAG24; RUN; PROC SORT data=work.inpt; BY DIAG24; RUN; DATA work.inpt; MERGE work.inpt (IN=InSet) work.SRR; BY DIAG24; IF InSet=1; SRR24=SRR; DROP DIAGNOSIS Incidence Mortality; RUN; DATA work.SRR; SET work.SRR; DIAG25=DIAGNOSIS; RUN; PROC SORT data=work.SRR; BY DIAG25; RUN; PROC SORT data=work.inpt; BY DIAG25; RUN; DATA work.inpt; MERGE work.inpt (IN=InSet) work.SRR; BY DIAG25; IF InSet=1; SRR25=SRR; DROP DIAGNOSIS Incidence Mortality; RUN; DATA work.SRR; SET work.SRR; DIAG26=DIAGNOSIS; RUN; PROC SORT data=work.SRR; BY DIAG26; RUN; PROC SORT data=work.inpt; BY DIAG26; RUN; DATA work.inpt; MERGE work.inpt (IN=InSet) work.SRR; BY DIAG26; IF InSet=1; SRR26=SRR; DROP DIAGNOSIS Incidence Mortality; RUN; DATA work.SRR; SET work.SRR; DIAG27=DIAGNOSIS; RUN; PROC SORT data=work.SRR; BY DIAG27; RUN; PROC SORT data=work.inpt; BY DIAG27; RUN; DATA work.inpt; MERGE work.inpt (IN=InSet) work.SRR; BY DIAG27; IF InSet=1; SRR27=SRR; DROP DIAGNOSIS Incidence Mortality; RUN; DATA work.SRR; SET work.SRR; DIAG28=DIAGNOSIS; RUN; PROC SORT data=work.SRR; BY DIAG28; RUN; PROC SORT data=work.inpt; BY DIAG28; RUN; DATA work.inpt; MERGE work.inpt (IN=InSet) work.SRR; BY DIAG28; IF InSet=1; SRR28=SRR; DROP DIAGNOSIS Incidence Mortality; RUN; DATA work.SRR; SET work.SRR; DIAG29=DIAGNOSIS; RUN; PROC SORT data=work.SRR; BY DIAG29; RUN; PROC SORT data=work.inpt; BY DIAG29; RUN; DATA work.inpt; MERGE work.inpt (IN=InSet) work.SRR; BY DIAG29; IF InSet=1; SRR29=SRR; DROP DIAGNOSIS Incidence Mortality; RUN; DATA work.SRR; SET work.SRR; DIAG30=DIAGNOSIS; RUN; PROC SORT data=work.SRR; BY DIAG30; RUN; PROC SORT data=work.inpt; BY DIAG30; RUN; DATA work.inpt; MERGE work.inpt (IN=InSet) work.SRR; BY DIAG30; IF InSet=1; SRR30=SRR; DROP DIAGNOSIS Incidence Mortality; RUN; DATA work.SRR; SET work.SRR; DIAG31=DIAGNOSIS; RUN; PROC SORT data=work.SRR; BY DIAG31; RUN; PROC SORT data=work.inpt; BY DIAG31; RUN; DATA work.inpt; MERGE work.inpt (IN=InSet) work.SRR; BY DIAG31; IF InSet=1; SRR31=SRR; DROP DIAGNOSIS Incidence Mortality; RUN; /***Calculate ICISS score***/ DATA work.inpt; SET work.inpt; array new_diag {31} DIAG01-DIAG31; array survival {31} SRR01-SRR31; ICISS=1; do i=1 to 31; IF new_diag{i}=' ' THEN survival{i}=1; IF survival{i}=. THEN survival{i}=1; ICISS=ROUND(ICISS*survival{i}, 0.001); end; drop diag01-diag31 prindiag OTHDIAG1-OTHDIAG30 POA_PRIN_D POA1-POA30 SRR01-SRR31 i; RUN; DATA work.inpt; SET work.inpt; length facility_county $2. TSA $2.; /***Segment records into severely injured and moderate/mild***/ IF ICISS GE 0.85 THEN Severity='Moderate/Mild'; ELSE IF ICISS LT 0.85 THEN Severity='Severe'; /***Re-format facility county to character value***/ IF FAC_COUNTY=1 THEN facility_county='01'; else if FAC_COUNTY=2 THEN facility_county='02'; else if FAC_COUNTY=3 THEN facility_county='03'; else if FAC_COUNTY=4 THEN facility_county='04'; else if FAC_COUNTY=5 THEN facility_county='05'; else if FAC_COUNTY=6 THEN facility_county='06'; else if FAC_COUNTY=7 THEN facility_county='07'; else if FAC_COUNTY=8 THEN facility_county='08'; else if FAC_COUNTY=9 THEN facility_county='09'; else if FAC_COUNTY=10 THEN facility_county='10'; else if FAC_COUNTY=11 THEN facility_county='11'; else if FAC_COUNTY=12 THEN facility_county='12'; else if FAC_COUNTY=13 THEN facility_county='13'; else if FAC_COUNTY=14 THEN facility_county='14'; else if FAC_COUNTY=15 THEN facility_county='15'; else if FAC_COUNTY=16 THEN facility_county='16'; else if FAC_COUNTY=17 THEN facility_county='17'; else if FAC_COUNTY=18 THEN facility_county='18'; else if FAC_COUNTY=19 THEN facility_county='19'; else if FAC_COUNTY=20 THEN facility_county='20'; else if FAC_COUNTY=21 THEN facility_county='21'; else if FAC_COUNTY=22 THEN facility_county='22'; else if FAC_COUNTY=23 THEN facility_county='23'; else if FAC_COUNTY=24 THEN facility_county='24'; else if FAC_COUNTY=25 THEN facility_county='25'; else if FAC_COUNTY=26 THEN facility_county='26'; else if FAC_COUNTY=27 THEN facility_county='27'; else if FAC_COUNTY=28 THEN facility_county='28'; else if FAC_COUNTY=29 THEN facility_county='29'; else if FAC_COUNTY=30 THEN facility_county='30'; else if FAC_COUNTY=31 THEN facility_county='31'; else if FAC_COUNTY=32 THEN facility_county='32'; else if FAC_COUNTY=33 THEN facility_county='33'; else if FAC_COUNTY=34 THEN facility_county='34'; else if FAC_COUNTY=35 THEN facility_county='35'; else if FAC_COUNTY=36 THEN facility_county='36'; else if FAC_COUNTY=37 THEN facility_county='37'; else if FAC_COUNTY=38 THEN facility_county='38'; else if FAC_COUNTY=39 THEN facility_county='39'; else if FAC_COUNTY=40 THEN facility_county='40'; else if FAC_COUNTY=41 THEN facility_county='41'; else if FAC_COUNTY=42 THEN facility_county='42'; else if FAC_COUNTY=43 THEN facility_county='43'; else if FAC_COUNTY=44 THEN facility_county='44'; else if FAC_COUNTY=45 THEN facility_county='45'; else if FAC_COUNTY=46 THEN facility_county='46'; else if FAC_COUNTY=47 THEN facility_county='47'; else if FAC_COUNTY=48 THEN facility_county='48'; else if FAC_COUNTY=49 THEN facility_county='49'; else if FAC_COUNTY=50 THEN facility_county='50'; else if FAC_COUNTY=51 THEN facility_county='51'; else if FAC_COUNTY=52 THEN facility_county='52'; else if FAC_COUNTY=53 THEN facility_county='53'; else if FAC_COUNTY=54 THEN facility_county='54'; else if FAC_COUNTY=55 THEN facility_county='55'; else if FAC_COUNTY=56 THEN facility_county='56'; else if FAC_COUNTY=57 THEN facility_county='57'; else if FAC_COUNTY=58 THEN facility_county='58'; else if FAC_COUNTY=59 THEN facility_county='59'; else if FAC_COUNTY=60 THEN facility_county='60'; else if FAC_COUNTY=61 THEN facility_county='61'; else if FAC_COUNTY=62 THEN facility_county='62'; else if FAC_COUNTY=63 THEN facility_county='63'; else if FAC_COUNTY=64 THEN facility_county='64'; else if FAC_COUNTY=65 THEN facility_county='65'; else if FAC_COUNTY=66 THEN facility_county='66'; else if FAC_COUNTY=67 THEN facility_county='67'; /***Assign counties to TSA***/ IF facility_county IN ('17' '46' '57' '66') THEN TSA='01'; ELSE IF facility_county IN ('03' '23' '30' '67') THEN TSA='02'; ELSE IF facility_county IN ('07' '19' '20' '32' '33' '37' '39' '40' '62' '65') THEN TSA='03'; ELSE IF facility_county IN ('01' '04' '12' '15' '21' '24' '34' '38' '54' '61' '63') THEN TSA='04'; ELSE IF facility_county IN ('02' '10' '16' '45' '55') THEN TSA='05'; ELSE IF facility_county IN ('09' '27' '42') THEN TSA='06'; ELSE IF facility_county IN ('18' '64') THEN TSA='07'; ELSE IF facility_county IN ('35' '48' '49' '59' '60') THEN TSA='08'; ELSE IF facility_county IN ('51' '52') THEN TSA='09'; ELSE IF facility_county IN ('29') THEN TSA='10'; ELSE IF facility_county IN ('25' '28' '53') THEN TSA='11'; ELSE IF facility_county IN ('05' '31') THEN TSA='12'; ELSE IF facility_county IN ('14' '41' '58') THEN TSA='13'; ELSE IF facility_county IN ('43' '47' '56') THEN TSA='14'; ELSE IF facility_county IN ('08' '11' '22' '26' '36') THEN TSA='15'; ELSE IF facility_county IN ('50') THEN TSA='16'; ELSE IF facility_county IN ('06') THEN TSA='17'; ELSE IF facility_county IN ('13' '44') THEN TSA='18'; RUN; /***Assign trauma center status to hospitals***/ DATA work.inpt; SET work.inpt; IF FACLNBR IN ( 100001/* Shands Jaxonville */, 100226/* Orange Park Medical Center */, 23960157 /* Wolfson Chilcrens Hospital */, 100131/*Aventura*/, 100093/*Baptist*/, 100026/*Bay*/, 100032/*Bayfront*/, 100213/*Blake*/, 100039/*Broward*/, 100086/*Broward North*/, 100161/*Central Regional*/, 100258/*Delray*/, 100223/*Ft. Walton Beach*/, 100017/*Halifax*/, 100019/*Holmes*/, 100022/*Jackson*/, 100208/*Jackson South*/, 100250/*All Childrens*/, 100209/*Kendall*/, 100157/*Lakeland*/, 100246/*Lawnwood*/, 100220/*GULF COAST Medical Center Lee Memorial - note change from previous years */, 100179/*Memorial Jacksonville*/, 100038/*Memorial Regional*/, 110199/*Nicklaus Children*/, 100212/*Ocala*/, 100006/*Orlando*/, 100110/*Osceola*/, 100256/*Bayonet Point*/, 100113/*Shands*/, 100025/*Sacred Heart*/, 100087/*Sarasota*/, 100075/*St Joseph*/, 100010/*St Marys*/, 100135/*TMH*/, 100128/*Tampa*/ ) THEN Trauma_Center="Yes"; ELSE Trauma_Center="No"; if faclnbr in ( 100001, 100002, 100004, 100007, 100008, 100009, 100012, 100014, 100015, 100018, 100020, 100021, 100023, 100024, 100028, 100029, 100030, 100034, 100035, 100040, 100043, 100044, 100045, 100046, 100047, 100048, 100049, 100050, 100051, 100052, 100053, 100054, 100055, 100056, 100057, 100061, 100062, 100063, 100067, 100069, 100070, 100071, 100072, 100073, 100074, 100077, 100078, 100080, 100081, 100084, 100088, 100089, 100092, 100098, 100099, 100102, 100103, 100105, 100106, 100107, 100109, 100112, 100114, 100117, 100118, 100121, 100122, 100124, 100125, 100126, 100127, 100130, 100132, 100134, 100137, 100140, 100142, 100147, 100151, 100153, 100154, 100156, 100159, 100160, 100162, 100165, 100166, 100167, 100168, 100169, 100173, 100175, 100176, 100177, 100180, 100181, 100183, 100187, 100189, 100191, 100195, 100200, 100204, 100206, 100210, 100211, 100217, 100219, 100220, 100224, 100225, 100226, 100228, 100230, 100231, 100232, 100234, 100236, 100238, 100240, 100241, 100242, 100243, 100244, 100248, 100249, 100252, 100253, 100254, 100255, 100259, 100260, 100263, 100264, 100282, 104026, 110001, 110003, 110004, 110006, 110008, 110010, 110019, 110044, 110049, 110403, 111525, 111527, 120001, 120002, 120003, 120004, 120005, 120006, 120007, 120009, 120013, 23960017, 23960025, 23960032, 23960034, 23960039, 23960041, 23960046, 23960050, 23960051, 23960052, 23960057, 23960064, 23960084, 23960088, 23960092, 23960096, 23960098, 23960099, 23960100, 23960105, 23960108, 23960111, 23960117, 23960121, 23960123, 23960125, 23960157 ) then acute_care='Yes'; else acute_care='No'; RUN; /***Produce tables***/ ods rtf; proc freq data=work.inpt; where Severity='Severe'; tables TSA/list nopercent nocum; title 'All severely injured patients by TSA 2022'; run; quit; title 'Severely Injured treated at acute care by TSA, 2022'; proc freq data=work.inpt; where Severity='Severe' and acute_care='Yes'; tables TSA/list nopercent nocum; run; quit; ods rtf close; proc sort data=inpt; by TSA; run; /* --------------------------------------------- Hospital names obtained from AHCA table. --------------------------------------------- */ proc format; value hospitalStr 100001='UF HEALTH JACKSONVILLE' 100002='BETHESDA HOSPITAL EAST' 100004='MADISON COUNTY MEMORIAL HOSPITAL' 100006='ORLANDO HEALTH ORLANDO REGIONAL MEDICAL CENTER' 100007='ADVENTHEALTH ORLANDO' 100008='BAPTIST HOSPITAL OF MIAMI' 100009='UNIVERSITY OF MIAMI HOSPITAL AND CLINICS-UHEALTH TOWER' 100010='ST MARYS MEDICAL CENTER' 100012='LEE MEMORIAL HOSPITAL' 100014='ADVENTHEALTH NEW SMYRNA BEACH' 100015='HCA FLORIDA LARGO WEST HOSPITAL A PART OF HCA FLORIDA LARGO' 100016='KINDRED HOSPITAL-NORTH FLORIDA' 100017='HALIFAX HEALTH MEDICAL CENTER' 100018='NAPLES COMMUNITY HOSPITAL' 100019='HOLMES REGIONAL MEDICAL CENTER' 100020='DOCTORS HOSPITAL' 100021='ADVENTHEALTH EAST ORLANDO' 100022='JACKSON MEMORIAL HOSPITAL' 100023='HCA FLORIDA CITRUS HOSPITAL' 100024='FISHERMENS COMMUNITY HOSPITAL' 100025='ASCENSION SACRED HEART PENSACOLA' 100026='ASCENSION SACRED HEART BAY' 100028='PARRISH MEDICAL CENTER' 100029='STEWARD NORTH SHORE MEDICAL CENTER' 100030='ORLANDO HEALTH - HEALTH CENTRAL HOSPITAL' 100032='BAYFRONT HEALTH ST PETERSBURG' 100034='MOUNT SINAI MEDICAL CENTER OF FLORIDA' 100035='MANATEE MEMORIAL HOSPITAL' 100038='MEMORIAL REGIONAL HOSPITAL' 100039='BROWARD HEALTH MEDICAL CENTER' 100040='ASCENSION ST VINCENTS RIVERSIDE' 100042='KINDRED HOSPITAL-SOUTH FLORIDA-HOLLYWOOD' 100043='MEASE DUNEDIN HOSPITAL' 100044='CLEVELAND CLINIC MARTIN NORTH HOSPITAL' 100045='ADVENTHEALTH DELAND' 100046='ADVENTHEALTH ZEPHYRHILLS' 100047='SHOREPOINT HEALTH PUNTA GORDA' 100048='JAY HOSPITAL' 100049='HCA FLORIDA HIGHLANDS HOSPITAL' 100050='LARKIN COMMUNITY HOSPITAL PALM SPRINGS CAMPUS' 100051='ORLANDO HEALTH SOUTH LAKE HOSPITAL' 100052='WINTER HAVEN HOSPITAL' 100053='STEWARD HIALEAH HOSPITAL' 100054='HCA FLORIDA TWIN CITIES HOSPITAL' 100055='ADVENTHEALTH NORTH PINELLAS' 100056='CLEVELAND CLINIC HOSPITAL' 100057='ADVENTHEALTH WATERMAN' 100061='HCA FLORIDA MERCY HOSPITAL' 100062='ADVENTHEALTH OCALA' 100063='MORTON PLANT NORTH BAY HOSPITAL' 100067='ST ANTHONYS HOSPITAL' 100069='ADVENTHEALTH CARROLLWOOD' 100071='BRAVERA HEALTH BROOKSVILLE' 100072='ADVENTHEALTH FISH MEMORIAL' 100073='HOLY CROSS HOSPITAL' 100074='ORLANDO HEALTH ST CLOUD HOSPITAL' 100075='ST JOSEPHS HOSPITAL' 100076='CHILDREN AND FAMILY HOSPITAL OF SOUTH FLORIDA' 100077='SHOREPOINT HEALTH PORT CHARLOTTE' 100078='DOCTORS MEMORIAL HOSPITAL' 100079='UNIVERSITY OF MIAMI HOSPITAL AND CLINICS-SYLVESTER COMPREHENSIVE' 100080='HCA FLORIDA JFK HOSPITAL' 100081='HEALTHMARK REGIONAL MEDICAL CENTER' 100084='UF HEALTH LEESBURG HOSPITAL' 100086='BROWARD HEALTH NORTH' 100087='SARASOTA MEMORIAL HOSPITAL' 100088='BAPTIST MEDICAL CENTER JACKSONVILLE' 100089='ADVENTHEALTH KISSIMMEE' 100092='ROCKLEDGE REGIONAL MEDICAL CENTER' 100093='BAPTIST HOSPITAL' 100098='HENDRY REGIONAL MEDICAL CENTER' 100099='ADVENTHEALTH LAKE WALES' 100103='HCA FLORIDA STARKE EMERGENCY A PART OF HCA FLORIDA NORTH FLORIDA' 100105='CLEVELAND CLINIC INDIAN RIVER HOSPITAL' 100106='DOCTORS MEMORIAL HOSPITAL' 100107='LEHIGH REGIONAL MEDICAL CENTER' 100109='ADVENTHEALTH SEBRING' 100110='HCA FLORIDA OSCEOLA HOSPITAL' 100112='CALHOUN-LIBERTY HOSPITAL' 100113='UF HEALTH SHANDS HOSPITAL' 100114='JACKSON NORTH MEDICAL CENTER' 100115='KINDRED HOSPITAL-BAY AREA-TAMPA' 100117='BAPTIST MEDICAL CENTER - BEACHES' 100118='ADVENTHEALTH PALM COAST' 100120='KINDRED HOSPITAL-SOUTH FLORIDA-FT LAUDERDALE' 100121='BARTOW REGIONAL MEDICAL CENTER' 100122='NORTH OKALOOSA MEDICAL CENTER' 100124='SANTA ROSA MEDICAL CENTER' 100125='HOMESTEAD HOSPITAL' 100126='HCA FLORIDA PASADENA HOSPITAL' 100127='MORTON PLANT HOSPITAL' 100128='TAMPA GENERAL HOSPITAL' 100129='ASPIRE HEALTH PARTNERS' 100130='LAKESIDE MEDICAL CENTER' 100131='HCA FLORIDA AVENTURA HOSPITAL' 100132='SOUTH FLORIDA BAPTIST HOSPITAL' 100134='ED FRASER MEMORIAL HOSPITAL' 100135='TALLAHASSEE MEMORIAL HOSPITAL' 100137='ADVENTHEALTH HEART OF FLORIDA' 100138='CAMPBELLTON-GRACEVILLE HOSPITAL' 100140='BAPTIST MEDICAL CENTER NASSAU' 100142='JACKSON HOSPITAL' 100143='KINDRED HOSPITAL-CENTRAL TAMPA' 100146='HCA FLORIDA SUWANNEE EMERGENCY A PART OF HCA FLORIDA LAKE CITY' 100147='NORTHWEST FLORIDA COMMUNITY HOSPITAL' 100150='DEPOO HOSPITAL' 100151='MAYO CLINIC' 100152='KINDRED HOSPITAL-SOUTH FLORIDA-CORAL GABLES' 100153='GEORGE E WEEMS MEMORIAL HOSPITAL' 100154='SOUTH MIAMI HOSPITAL' 100156='HCA FLORIDA LAKE CITY HOSPITAL' 100157='LAKELAND REGIONAL MEDICAL CENTER' 100159='HCA FLORIDA GADSDEN EMERGENCY' 100160='MARINERS HOSPITAL' 100161='HCA FLORIDA LAKE MONROE HOSPITAL' 100162='ADVENTHEALTH WINTER PARK' 100165='KERALTY HOSPITAL' 100166='HCA FLORIDA SARASOTA DOCTORS HOSPITAL' 100167='HCA FLORIDA UNIVERSITY HOSPITAL' 100168='BOCA RATON REGIONAL HOSPITAL' 100169='ADVENTHEALTH DAYTONA BEACH' 100173='ADVENTHEALTH TAMPA' 100175='DESOTO MEMORIAL HOSPITAL' 100176='PALM BEACH GARDENS MEDICAL CENTER' 100177='CAPE CANAVERAL HOSPITAL' 100179='HCA FLORIDA MEMORIAL HOSPITAL' 100180='HCA FLORIDA ST PETERSBURG HOSPITAL' 100181='LARKIN COMMUNITY HOSPITAL' 100183='STEWARD CORAL GABLES HOSPITAL' 100184='BROOKS REHABILITATION HOSPITAL UNIVERSITY CAMPUS' 100187='STEWARD PALMETTO GENERAL HOSPITAL' 100189='HCA FLORIDA NORTHWEST HOSPITAL' 100191='HCA FLORIDA TRINITY HOSPITAL' 100195='LOWER KEYS MEDICAL CENTER' 100196='PAM HEALTH SPECIALTY HOSPITAL OF JACKSONVILLE' 100197='DOUGLAS GARDENS HOSPITAL' 100200='BROWARD HEALTH IMPERIAL POINT' 100204='HCA FLORIDA NORTH FLORIDA HOSPITAL' 100206='HCA FLORIDA SOUTH TAMPA HOSPITAL' 100208='JACKSON SOUTH MEDICAL CENTER' 100209='HCA FLORIDA KENDALL HOSPITAL' 100210='STEWARD FLORIDA MEDICAL CENTER - A CAMPUS OF NORTH SHORE' 100211='ADVENTHEALTH DADE CITY' 100212='HCA FLORIDA OCALA HOSPITAL' 100213='HCA FLORIDA BLAKE HOSPITAL' 100217='SEBASTIAN RIVER MEDICAL CENTER' 100219='FLAGLER HOSPITAL' 100220='GULF COAST MEDICAL CENTER LEE MEMORIAL HEALTH SYSTEM' 100223='HCA FLORIDA FORT WALTON-DESTIN HOSPITAL' 100224='HCA FLORIDA WOODMONT HOSPITAL' 100225='MEMORIAL REGIONAL HOSPITAL SOUTH' 100226='HCA FLORIDA ORANGE PARK HOSPITAL' 100228='HCA FLORIDA WESTSIDE HOSPITAL' 100230='MEMORIAL HOSPITAL PEMBROKE' 100231='HCA FLORIDA WEST HOSPITAL' 100232='HCA FLORIDA PUTNAM HOSPITAL' 100234='HCA FLORIDA JFK NORTH HOSPITAL A PART OF HCA FLORIDA JFK HOSP' 100236='HCA FLORIDA FAWCETT HOSPITAL' 100238='HCA FLORIDA NORTHSIDE HOSPITAL' 100240='UNIVERSITY OF MIAMI HOSPITAL AND CLINICS-BASCOM PALMER EYE INST' 100241='LAKE BUTLER HOSPITAL' 100242='HCA FLORIDA GULF COAST HOSPITAL' 100243='HCA FLORIDA BRANDON HOSPITAL' 100244='CAPE CORAL HOSPITAL' 100246='HCA FLORIDA LAWNWOOD HOSPITAL' 100248='HCA FLORIDA LARGO HOSPITAL' 100249='BRAVERA HEALTH SEVEN RIVERS' 100250='JOHNS HOPKINS ALL CHILDRENS HOSPITAL' 100252='HCA FLORIDA RAULERSON HOSPITAL' 100253='JUPITER MEDICAL CENTER' 100254='HCA FLORIDA CAPITAL HOSPITAL' 100255='HCA FLORIDA WEST TAMPA HOSPITAL PART OF HCA FLORIDA SOUTH TAMPA' 100256='HCA FLORIDA BAYONET POINT HOSPITAL' 100258='DELRAY MEDICAL CENTER' 100259='HCA FLORIDA SOUTH SHORE HOSPITAL' 100260='HCA FLORIDA ST LUCIE HOSPITAL' 100263='ORLANDO HEALTH SOUTH SEMINOLE HOSPITAL' 100264='HCA FLORIDA OAK HILL HOSPITAL' 100282='ADVENTHEALTH WAUCHULA' 103004='ST CATHERINES REHABILITATION HOSPITAL' 103027='ST ANTHONYS REHABILITATION HOSPITAL' 103028='ENCOMPASS HEALTH REHABILITATION HOSPITAL OF SUNRISE' 103038='ENCOMPASS HEALTH REHABILITATION HOSPITAL OF MIAMI' 104000='FLORIDA STATE HOSPITAL' 104001='SOUTH FLORIDA STATE HOSPITAL' 104007='NORTHEAST FLORIDA STATE HOSPITAL' 104015='LARKIN COMMUNITY HOSPITAL BEHAVIORAL HEALTH SERVICES' 104016='RIVER POINT BEHAVIORAL HEALTH' 104017='WINDMOOR HEALTHCARE OF CLEARWATER' 104018='LIFESTREAM BEHAVIORAL CENTER INC' 104024='CIRCLES OF CARE' 104026='FORT LAUDERDALE BEHAVIORAL HEALTH CENTER' 110001='MEASE COUNTRYSIDE HOSPITAL' 110003='GULF BREEZE HOSPITAL' 110004='HCA FLORIDA ENGLEWOOD HOSPITAL' 110006='HCA FLORIDA PALMS WEST HOSPITAL' 110008='WEST BOCA MEDICAL CENTER' 110009='H LEE MOFFITT CANCER CENTER & RESEARCH INSTITUTE HOSPITAL' 110010='WELLINGTON REGIONAL MEDICAL CENTER' 110013='ENCOMPASS HEALTH REHABILITATION HOSPITAL OF SARASOTA' 110016='HALIFAX PSYCHIATRIC CENTER-NORTH' 110017='ENCOMPASS HEALTH REHABILITATION HOSPITAL OF TREASURE COAST' 110019='BROWARD HEALTH CORAL SPRINGS' 110021='ENCOMPASS HEALTH REHABILITATION HOSPITAL OF TALLAHASSEE' 110022='PORT ST LUCIE HOSPITAL' 110025='UF HEALTH REHAB HOSPITAL' 110027='SEA PINES REHABILITATION HOSPITAL AFFILIATE OF ENCOMPASS HEALTH' 110028='CENTERSTONE OF FLORIDA INC' 110034='EMERALD COAST BEHAVIORAL HOSPITAL' 110036='DEVEREUX FLORIDA' 110040='SOUTHERN WINDS' 110041='WEST GABLES REHABILITATION HOSPITAL' 110043='WILLOUGH AT NAPLES THE' 110044='EASTSIDE PSYCHIATRIC HOSPITAL' 110045='ENCOMPASS HEALTH REHABILITATION HOSPITAL OF LARGO' 110047='UNIVERSITY BEHAVIORAL CENTER' 110049='SUNCOAST BEHAVIORAL HEALTH CENTER' 110051='LA AMISTAD RESIDENTIAL TREATMENT CENTER' 110054='SPRINGBROOK HOSPITAL' 110183='RECEPTION AND MEDICAL CENTER HOSPITAL' 110199='NICKLAUS CHILDRENS HOSPITAL' 110403='GOOD SAMARITAN MEDICAL CENTER' 111520='GULF COAST TREATMENT CENTER' 111525='BRAVERA HEALTH SPRING HILL' 111527='MEMORIAL HOSPITAL WEST' 120001='ARNOLD PALMER MEDICAL CENTER' 120002='ORLANDO HEALTH DR P PHILLIPS HOSPITAL' 120003='ADVENTHEALTH APOPKA' 120004='ADVENTHEALTH ALTAMONTE SPRINGS' 120005='HEALTHPARK MEDICAL CENTER' 120006='NCH HEALTHCARE SYSTEM NORTH NAPLES HOSPITAL CAMPUS' 120007='PALM BAY HOSPITAL' 120009='CLEVELAND CLINIC MARTIN SOUTH HOSPITAL' 120010='WINTER HAVEN WOMENS HOSPITAL' 120011='UF HEALTH PSYCHIATRIC HOSPITAL' 120013='ADVENTHEALTH LAKE PLACID' 120014='SOUTH FLORIDA EVALUATION AND TREATMENT CENTER' 23960011='KINDRED HOSPITAL-BAY AREA-ST PETERSBURG' 23960013='ENCOMPASS HEALTH REHABILITATION HOSPITAL OF PANAMA CITY' 23960017='ADVENTHEALTH CELEBRATION' 23960025='PHYSICIANS REGIONAL MEDICAL CENTER - PINE RIDGE' 23960028='SELECT SPECIALTY HOSPITAL-MIAMI' 23960032='UF HEALTH THE VILLAGES HOSPITAL' 23960034='MELBOURNE REGIONAL MEDICAL CENTER' 23960039='HCA FLORIDA WEST MARION HOSPITAL A PART OF HCA FL OCALA HOSPITAL' 23960041='ASCENSION SACRED HEART EMERALD COAST' 23960042='ENCOMPASS HEALTH REHABILITATION HOSPITAL OF SPRING HILL' 23960043='SELECT SPECIALTY HOSPITAL - ORLANDO (NORTH CAMPUS)' 23960045='SELECT SPECIALTY HOSPITAL - PANAMA CITY' 23960046='LAKEWOOD RANCH MEDICAL CENTER' 23960049='PAM SPECIALTY HOSPITAL OF SARASOTA' 23960050='MEMORIAL HOSPITAL MIRAMAR' 23960051='HALIFAX HEALTH MEDICAL CENTER- PORT ORANGE' 23960052='BAPTIST MEDICAL CENTER SOUTH' 23960057='PHYSICIANS REGIONAL MEDICAL CENTER - COLLIER' 23960059='SELECT SPECIALTY HOSPITAL - TALLAHASSEE' 23960060='KINDRED HOSPITAL OCALA' 23960061='WEKIVA SPRINGS CENTER' 23960064='WEST KENDALL BAPTIST HOSPITAL' 23960068='SELECT SPECIALTY HOSPITAL - ORLANDO (SOUTH CAMPUS)' 23960071='SELECT SPECIALTY HOSPITAL GAINESVILLE' 23960072='SELECT SPECIALTY HOSPITAL- PALM BEACH' 23960073='VINES HOSPITAL THE' 23960074='KINDRED HOSPITAL THE PALM BEACHES' 23960076='SELECT SPECIALTY HOSPITAL PENSACOLA' 23960082='ADVENTHEALTH CONNERTON' 23960083='CENTRAL FLORIDA BEHAVIORAL HOSPITAL' 23960084='ASCENSION SACRED HEART GULF' 23960085='BAYCARE ALLIANT HOSPITAL' 23960086='SELECT SPECIALTY HOSPITAL-THE VILLAGES INC' 23960088='ASCENSION ST VINCENTS SOUTHSIDE' 23960090='KINDRED HOSPITAL MELBOURNE' 23960092='VIERA HOSPITAL' 23960094='SELECT SPECIALTY HOSPITAL-MIAMI LAKES' 23960096='NEMOURS CHILDRENS HOSPITAL FLORIDA' 23960097='ST CATHERINES WEST REHABILITATION HOSPITAL' 23960098='BETHESDA HOSPITAL WEST' 23960099='ADVENTHEALTH WESLEY CHAPEL' 23960100='ST JOSEPHS HOSPITAL NORTH' 23960102='MORTON PLANT NORTH BAY HOSPITAL RECOVERY CENTER' 23960103='PARK ROYAL HOSPITAL' 23960105='ST JOSEPHS HOSPITAL SOUTH' 23960106='HCA FLORIDA NORTHWEST REHABILITATION CENTER' 23960107='SELECT SPECIALTY HOSPITAL-FORT MYERS' 23960108='CLEVELAND CLINIC TRADITION HOSPITAL' 23960109='ENCOMPASS HEALTH REHABILITATION HOSPITAL OF OCALA' 23960110='HCA FLORIDA TRINITY WEST HOSPITAL A PART OF HCA FLORIDA TRINITY' 23960111='HCA FLORIDA POINCIANA HOSPITAL' 23960112='ENCOMPASS HEALTH REHAB HOSPITAL AN AFFILIATE OF MARTIN HEALTH' 23960113='ST JOSEPHS HOSPITAL BEHAVIORAL HEALTH CENTER' 23960114='NORTH TAMPA BEHAVIORAL HEALTH' 23960115='ENCOMPASS HEALTH REHABILITATION HOSPITAL OF ALTAMONTE SPRINGS' 23960116='LANDMARK HOSPITAL OF SOUTHWEST FLORIDA' 23960117='ASCENSION ST VINCENTS CLAY COUNTY' 23960120='SELECT SPECIALTY HOSPITAL - DAYTONA BEACH' 23960121='OVIEDO MEDICAL CENTER' 23960123='UF HEALTH NORTH' 23960125='CORAL SHORES BEHAVIORAL HEALTH' 23960129='BLACKBERRY CENTER' 23960144='JACKSON WEST MEDICAL CENTER' 23960152='HALIFAX HEALTH UF HEALTH MEDICAL CENTER OF DELTONA' 23960153='PALM POINT BEHAVIORAL HEALTH' 23960157='WOLFSON CHILDRENS HOSPITAL' 23960158='UCF LAKE NONA HOSPITAL' 23960161='SARASOTA MEMORIAL HOSPITAL - VENICE' 23960162='ENCOMPASS HEALTH REHABILITATION HOSPITAL OF NORTH TAMPA' 23960165='ENCOMPASS HEALTH REHABILITATION HOSPITAL OF PENSACOLA' 23960167='TAMPA GENERAL REHABILITATION HOSPITAL' 23960168='BAPTIST MEDICAL CENTER CLAY' 23960171='ENCOMPASS HEALTH REHABILITATION HOSPITAL OF ST AUGUSTINE' 23960173='ENCOMPASS HEALTH REHABILITATION HOSPITAL OF LAKELAND' 23960175='ENCOMPASS HEALTH REHABILITATION HOSPITAL OF CAPE CORAL' 23960176='ENCOMPASS HEALTH REHABILITATION HOSPITAL OF JACKSONVILLE' 23960177='REHABILITATION HOSPITAL OF NAPLES' 23960180='ORLANDO HEALTH HORIZON WEST HOSPITAL' 23960181='ASCENSION ST VINCENTS ST JOHNS COUNTY' 23960189='NEUROBEHAVIORAL HOSPITAL OF THE PALM BEACHES-SOUTH' 23960190='PAM REHABILITATION HOSPITAL OF TAVARES' 23960195='BAPTIST HEALTH HOSPITAL AT DORAL' 23960199='PHYSICIANS REGIONAL MEDICAL CENTER - NORTH' 23960204='ADVENTHEALTH WINTER GARDEN' 23960206='GENESIS REHABILITATION HOSPITAL' 23960207='NEUROBEHAVIORAL HOSPITAL OF THE PALM BEACHES-NORTH'; run; /* Get a summary of the number of injury cases by TSA */ proc freq data=inpt; title 'Number of observations (injury cases - all severity levels) by TSA'; table TSA; run; title; /* Run the code below to view number of episodes in trauma centers, severe cases only */ proc freq data=inpt; title 'Severely injured patients by TSA and trauma center, 2022'; table FACLNBR; where Trauma_Center='Yes' and Severity='Severe'; format FACLNBR HospitalStr.; run; /* Debugging purposes: run the code below to view number of episodes by quarter for trauma centers, severe cases only. Look for anomalies/unexpected fluctuation. */ proc freq data=inpt; title 'Severely injured patients by TSA and trauma center, 2022'; table QTR; where Trauma_Center='Yes' and Severity='Severe'; format FACLNBR HospitalStr.; run; /* Run the code below for each TSA; Change the TSA number manually, each time, in the where statement (or use a by TSA statement, or copy the block 18 times). */ proc freq data=inpt; title 'Severely injured patients by TSA (18)and trauma center, 2022'; table FACLNBR; where Trauma_Center='Yes' and Severity='Severe' and TSA='18'; format FACLNBR HospitalStr.; run; /* Run the code below for each TSA; Change the TSA number manually, each time, in the where statement (or use a by TSA statement, or copy the block 18 times) */ proc freq data=inpt; title 'Severely injured patients by TSA (18) and NON-trauma center, 2022'; table FACLNBR; where Trauma_Center='No' and acute_care='Yes' and Severity='Severe' and TSA='18'; format FACLNBR HospitalStr.; run;