OPTIONS LINESIZE=70;
TITLE 'Standardization example';
DATA A;
INPUT STUDENT SECTION TEST1-TEST3;
   STEST1=TEST1;
   STEST2=TEST2;
   STEST3=TEST3;
   CARDS;
238900545  1  94  91  87
254701167  1  95  96  97
238806445  2  91  86  94
999002527  2  80  76  78
263924680  1  92  40  85
459700886  2  75  76  80
416724915  2  66  69  72
999001230  1  82  84  80
242760674  1  75  76  70
990001252  2  51  66  91
;
RUN;

PROC SORT;
   BY SECTION;
RUN;

/* Standardize with mean of 80 points and std.   */
/* dev. of 5 points                              */

PROC STANDARD MEAN=80 STD=5 OUT=NEW;
   BY SECTION;
   VAR STEST1-STEST3;
RUN;

PROC PRINT DATA=NEW;
   BY SECTION;
   TITLE 'STANDARDIZED TEST SCORES';
RUN;

PROC MEANS DATA=NEW(DROP=STUDENT) MAXDEC=2 N MEAN STD;
   BY SECTION;
RUN;