DATA A;
ARRAY A{10};
DO J=1 TO 4;
DO I=1 TO DIM(A);
A(I)=RANUNI(I+J);
END;
OUTPUT;
END;
DROP I J;
RUN;
****以上为CASE****;
DATA B;
SET A;
ARRAY A A:;
MAX1=MAX(OF A{*});
MAX2=LARGEST(2,OF A{*});
DO OVER A;
IF A=MAX1 THEN VAR_MAX=VNAME(A);
ELSE IF A=MAX2 THEN VAR_MAX2=VNAME(A);
END;
RUN;