2006 HCSDB Adult Sampling Report - Tricare

DATA FINAL;SET STEP9;STATUS3=30+FIN;NHF3=NHF;VH=POPSIZE**2*((POPSIZE-NHF)/(POPSIZE-1))*&SSQUARE/NHF;RUN;*---------------------------------------------------------------------------CHECK IF THE FINAL SAMPLE SIZES MEET ALL PRECISION REQUIREMENTS----------------------------------------------------------------------------;PROC SORT DATA=FINAL;BY DOM1;RUN;PROC MEANS NOPRINT DATA=FINAL;VAR VH;BY DOM1;OUTPUT OUT=FDATA1 SUM=V1;RUN;DATA FINAL;MERGE FINAL FDATA1;BY DOM1;run;PROC SORT DATA=FINAL;BY DOM2;RUN;PROC MEANS DATA=FINAL NOPRINT;VAR VH;BY DOM2;OUTPUT OUT=FDATA2 SUM=V2;RUN;DATA FINAL;MERGE FINAL FDATA2;BY DOM2;run;PROC SORT data=final;BY DOM3;RUN;PROC MEANS DATA=FINAL NOPRINT;VAR VH;BY DOM3;OUTPUT OUT=FDATA3 SUM=V3;RUN;DATA FINAL;MERGE FINAL FDATA3;BY DOM3;run;DATA FINAL;IF _N_ = 1 THEN SET FDATA3;SET FINAL;P0=SQRT(((POPSIZE-NHF)/(POPSIZE-1))*&SSQUARE/NHF)*1.96;P1=SQRT((V1/DSUM1**2)*1.96**2);P2=SQRT((V2/DSUM2**2)*1.96**2);P3=SQRT((V3/DSUM3**2)*1.96**2);RUN;********************************************************* ACCOUNT FOR EXPECTED RESPONSE RATES* NOTE THAT THIS SECTION IS CHANGED Q1 of EACH YEAR*******************************************************;DATA RESP;SET FINAL;IF DOM2=1 THEN NHFF=INT(NHF/0.175)+1;IF DOM2=2 THEN NHFF=INT(NHF/0.29)+1;IF DOM2=3 THEN NHFF=INT(NHF/0.25)+1;IF DOM2=4 THEN NHFF=INT(NHF/0.53)+1;IF DOM2=5 THEN NHFF=INT(NHF/0.425)+1;IF DOM2=6 THEN NHFF=INT(NHF/0.72)+1;RUN;DATA LAST;SET RESP;nhf = int(nhf)+1;nhff = min(nhff, popsize);nhzero = int(nhzero)+1;BWT00 = POPSIZE/NHFF;PROC SORT data=LAST;BY DOM0;run;PROC MEANS DATA=LAST min max mean n sum;VAR NHZERO nhf NHFF BWT00;RUN;F-6