PROC SURVEYSELECT DATA=B OUT=C(DROP=SelectionProb SamplingWeight) METHOD=SRS SEED=100 SAMPSIZE=1; STRATA FLAG;RUN;
PROC PRINT DATA=C; VAR CERIDNUM;RUN;