data test;
input x1 $ x2 $ x3 $ x4 $;
cards;
a        b        c        d
e        f        g        h
a        b        c        d
a        b        c        d
w        q        t        j
a        b        c        d
e        f        g        h
;

proc sql;
create table wanted(drop=var) as
select *, cats(x1,x2,x3,x4) as var from test
group by var
having count(var)>1;
quit;

data test;
input x1 $ x2 $ x3 $ x4 $;
cards;
a        b        c        d
e        f        g        h
a        b        c        d
a        b        c        d
w        q        t        j
a        b        c        d
e        f        g        h
;
run;

proc sort data=test out=test_nod dupout=test_d nodup;
by x1;
run;
输出有点不一样，但是挺方便的