/***************************************************************************** * SASload_NEDS_2010_Hospital.SAS * This program will load the 2010 NEDS csv Hospital File into SAS. *****************************************************************************/ /* Create SAS informats for missing values */ PROC FORMAT; INVALUE N2PF '-9' = . '-8' = .A '-6' = .C '-5' = .N OTHER = (|2.|) ; INVALUE N3PF '-99' = . '-88' = .A '-66' = .C OTHER = (|3.|) ; INVALUE N4PF '-999' = . '-888' = .A '-666' = .C OTHER = (|4.|) ; INVALUE N4P1F '-9.9' = . '-8.8' = .A '-6.6' = .C OTHER = (|4.1|) ; INVALUE N5PF '-9999' = . '-8888' = .A '-6666' = .C OTHER = (|5.|) ; INVALUE N5P2F '-9.99' = . '-8.88' = .A '-6.66' = .C OTHER = (|5.2|) ; INVALUE N6PF '-99999' = . '-88888' = .A '-66666' = .C OTHER = (|6.|) ; INVALUE N6P2F '-99.99' = . '-88.88' = .A '-66.66' = .C OTHER = (|6.2|) ; INVALUE N7P2F '-999.99' = . '-888.88' = .A '-666.66' = .C OTHER = (|7.2|) ; INVALUE N8PF '-9999999' = . '-8888888' = .A '-6666666' = .C OTHER = (|8.|) ; INVALUE N8P2F '-9999.99' = . '-8888.88' = .A '-6666.66' = .C OTHER = (|8.2|) ; INVALUE N8P4F '-99.9999' = . '-88.8888' = .A '-66.6666' = .C OTHER = (|8.4|) ; INVALUE N10PF '-999999999' = . '-888888888' = .A '-666666666' = .C OTHER = (|10.|) ; INVALUE N10P4F '-9999.9999' = . '-8888.8888' = .A '-6666.6666' = .C OTHER = (|10.4|) ; INVALUE N10P5F '-999.99999' = . '-888.88888' = .A '-666.66666' = .C OTHER = (|10.5|) ; INVALUE DATE10F '-999999999' = . '-888888888' = .A '-666666666' = .C OTHER = (|MMDDYY10.|) ; INVALUE N11P7F '-99.9999999' = . '-88.8888888' = .A '-66.6666666' = .C OTHER = (|11.7|) ; INVALUE N12P2F '-99999999.99' = . '-88888888.88' = .A '-66666666.66' = .C OTHER = (|12.2|) ; INVALUE N12P5F '-99999.99999' = . '-88888.88888' = .A '-66666.66666' = .C OTHER = (|12.5|) ; INVALUE N13PF '-999999999999' = . '-888888888888' = .A '-666666666666' = .C OTHER = (|13.|) ; INVALUE N15P2F '-99999999999.99' = . '-88888888888.88' = .A '-66666666666.66' = .C OTHER = (|15.2|) ; RUN; /* Data Step to load the file */ DATA NEDS_2010_Hospital; INFILE 'NEDS_2010_Hospital.csv' dsd dlm=',' LRECL = 95; /* Define data element attributes */ ATTRIB DISCWT LENGTH=8 LABEL="Weight to ED Visits in AHA universe" HOSPWT LENGTH=8 LABEL="Weight to hospitals in AHA universe" HOSP_CONTROL LENGTH=3 FORMAT=1. LABEL="Control/ownership of hospital" HOSP_ED LENGTH=4 FORMAT=Z5. LABEL="HCUP ED hospital identifier" HOSP_REGION LENGTH=3 FORMAT=1. LABEL="Region of hospital" HOSP_TRAUMA LENGTH=3 LABEL="Trauma level designation" HOSP_URCAT4 LENGTH=3 LABEL="Hospital urban-rural designation" HOSP_UR_TEACH LENGTH=3 FORMAT=1. LABEL="Teaching status of hospital" NEDS_STRATUM LENGTH=4 FORMAT=5. LABEL="Stratum used to sample hospital" N_DISC_U LENGTH=5 LABEL="Number of AHA universe ED visits in NEDS_STRATUM" N_HOSP_U LENGTH=3 LABEL="Number of AHA universe hospitals in NEDS_STRATUM" S_DISC_U LENGTH=5 LABEL="Number of sample discharges in NEDS_STRATUM" S_HOSP_U LENGTH=4 LABEL="Number of sample hospitals in NEDS_STRATUM" TOTAL_EDVISITS LENGTH=5 LABEL="Total number of ED visits from this hospital in the NEDS" YEAR LENGTH=3 LABEL="Calendar Year" ; /* Read data elements from the CSV file */ INPUT DISCWT :N11P7F. HOSPWT :N11P7F. HOSP_CONTROL :N2PF. HOSP_ED :5. HOSP_REGION :N2PF. HOSP_TRAUMA :N2PF. HOSP_URCAT4 :N2PF. HOSP_UR_TEACH :N2PF. NEDS_STRATUM :N5PF. N_DISC_U :N8PF. N_HOSP_U :N4PF. S_DISC_U :N8PF. S_HOSP_U :N6PF. TOTAL_EDVISITS :N8PF. YEAR :N4PF. ; RUN;