if a1=1 then do; a2=0;a3=0;a4=0;end;

谢谢您，可是我需要处理的a变量，有一百多个，如果全是这么写，我要累死的，不知道您还知不知道其他更高效的方法

array num_a a2-a100;
do i=2 to dim(num_a);
if a1=1 then a{i}=0;
end;

可以用数组做。

data test;
        input a1 a2 a3 a4;
        cards;
        1 0 1 1
        0 1 1 1
        0 1 1 0
        1 0 0 1
        ;
run;
data result;
        set test;
        array a[4] a1-a4;
        if a[1]=1 then do i=2 to 4;
        a[i]=0;
        end;
        drop i;
run;

大神，谢谢您的回答，但是我的数据中存在这样的情况（如下图中id=2的观测）它的a1为0，但a2和a5为1，我想把a2之后的所有变量都变为0，所以用您刚刚这个程序就无法实现了