如果是这种如何写呢？
我觉得最好要确定A第一次出现1的_N_值
然后在大于A第一次出现_N_的值的B的_N_值，这样就好界定

data crackman;
input a b;
obs=_n_;
datalines;
0 0       
0 1       
1 0       
0 0       
1 0       
0 1       
0 0       
1 0       
1 0       
0 1       
;
run;
proc sort data=crackman;
by a b;
run;
data _null_;
set crackman;
by a;
if first.a=1 and a=1 then call symput("a",obs);
run;
data b;
set crackman(where=(obs>=&a.));
if b=1;
run;
%macro crackman;
data _null_;
set b;
call symput("b"||left(_n_),obs);
run;
proc sql noprint;
select count(*) as obsnum into: obsnum from b;
quit;
data crackman;
set crackman;
%do i=1 %to &obsnum.;
if obs<&a. OR obs=&&b&i. then c=0;
%end;
if c=. then c=1;
run;
proc sort data=crackman;
by obs;
run;
%mend crackman;
%crackman;









写的很复杂很不流畅
但是可以看得出我的思路来

6# lyricette
A和B交换一下
其实是一样的 不难的

好的，实在是谢谢版主了！
我先研究研究，待会不懂的还想请教一下版主。

还是认为a=1 b=1是两个动作的话，试试这个那么原来那个问题就简化成

11# soporaeternus
你老又出现了