没错的，你贴出来的程序可以达到你要的效果的

前三栏是对的，最后products栏只有一项，没有包括三项目。麻烦看看到底出错在哪里了

DATA TEST;
INPUT (univ        startdate        expdate        products) ($);
CARDS;
清华   4月1        9月1         A
清华           4月1        9月1         B
清华           4月1        9月1         C
北大           5月1        10月1        D
北大   5月1        10月1        E
北大   5月1        10月1        F
;
RUN;
PROC SORT;
BY notsorted univ startdate expdate;

data want(rename=(pro=products));
set test;
by notsorted univ startdate expdate;
retain pro;
if first.univ then pro=products;
else pro=COMPRESS(pro!!products);
drop products;
if last.univ;
run;

PROC PRINT NOBS;
RUN;
X结果不正是你要求的吗？

univ        startdate        expdate        products
清华        4月1        9月1        C
北大        5月1        10月1        F

上面的CODE运行的结果如上，一二行没有AB和DE项

额，你加个LENGTH 语句吧，LENGTH pro $6.;