data SAMPLE (drop=i);
      select = ceil(ranuni(0)*total);
      set POP point=select nobs=total;
      i + 1;
      if i > 100 then stop;
   run;