SASで乱数を発生させる(1から99まで)

DATA ransu;
 DO i=1 to 1000;
   x=INT(RANUNI(2118)*99+1);
   OUTPUT;
 END;
PROC PRINT;
 VAR x;
PROC UNIVARIATE NORMAL FREQ PLOT;
 VAR x;
RUN;