我大致写了一个程序，你看看对不对，希望对你有帮助。
data work.a;
        input jia $ id $ tezheng;
        datalines;
1 1 0
1 2 1
1 3 -1
2 1 1
2 2 3
2 3 3
3 1 1
3 2 3
3 3 5
3 4 1
;
run;

proc sort data = work.a out = work.b;
        by jia tezheng;
run;

data work.c(keep = jia shibie);
        set work.b;
        if tezheng <= 0 then do;
                shibie = 'c';
        end;else if tezheng = 1 or tezheng = 3 then do;
                shibie = 'a';
        end;else if tezheng = 5 then do;
                shibie = 'b';
        end;else do;
                shibie = 'c';
        end;
run;

proc sort data = work.c;
        by jia shibie;
run;

data work.c;
        set work.c;
        by jia shibie;
        if last.jia;
run;

proc sql noprint;
        create table work.d as
                select a.jia,
                        a.id,
                        a.tezheng,
                        b.shibie
                from work.a as a ,work.c as b
                where a.jia = b.jia;
quit;

非常感谢！我试试看哈

沙发的程序是错误的。可以多用几个ID测试一下。Try this code: