こんにちは。
SURVEYSELECTプロシジャを利用することが一案かと思われます。この場合、度数はあらかじめFREQプロシジャなどで算出しておき、指定することになります。
data test;
do i=1 to 570;
event=0;
output;
end;
do i=1 to 30;
event=1;
output;
end;
run;
proc freq data=test;
tables event;
run;
proc sort data=test;
by event;
run;
proc surveyselect data=test out=sample method=srs sampsize=30 noprint;
strata event;
run;
proc freq data=sample;
tables event;
run;
サンプリング後の調整については以下が参考になると思います。
Usage Note 22601: Adjusting for oversampling the event level in a binary logistic model
https://support.sas.com/kb/22/601.html