proc sql;
create
view
EMDATA._SMPY4ZG as select distinct BAD from EMDATA.VIEW_AYL
;
data EMDATA._SMPDGUI(label="Sample of EMDATA._SMPY4ZG.");
set EMDATA._SMPY4ZG;
drop _sample_count_;
if _sample_count_ < 1 then do;
if ranuni(12345)*(3 - _N_) <= (1 - _sample_count_) then do;
_sample_count_ + 1;
output;
end;
end;
run;
quit;
data EMDATA._SMPDGUI(label="Sample of EMDATA._SMPY4ZG.");
set EMDATA._SMPY4ZG;
drop _sample_count_;
if _sample_count_ < 1 then do;
if ranuni(12345)*(3 - _N_) <= (1 - _sample_count_) then do;
_sample_count_ + 1;
output;
end;
end;
run;
quit;
proc sql;
create table EMDATA.SMPMPIYN(
label="Cluster sample for data set EMDATA.VIEW_AYL.") as select
*
from EMDATA.VIEW_AYL where
BAD
in(select BAD from EMDATA._SMPDGUI);
quit;