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;