PDV机制的一些求助

左顿

1. 
   

复制代码

在人大论坛看到的帖子，改程序表明：只要一个BY组里面，满足某条件（如代码中：type=0 then del_flag=1; ），则该BY组del_flag变量都=1？实在不解这里的PDV机制，请大侠指点迷津，群里我也发帖，无人问津，特立贴求助。

1. data a;
   
2. input ID$ Num type;
   
3. cards;
   
4. 001 1 1
   
5. 001 2 1
   
6. 001 3 1
   
7. 002 2 1
   
8. 002 1 0
   
9. 002 2 1
   
10. 003 1 1
    
11. 003 4 1
    
12. ;
    
13. data b;
    
14.    do _n_=1 by 1 until(last.id);
    
15.       set a;
    
16.       by id;
    
17.       if type=0 then del_flag=1;
    
18.    end;
    
19.    do _n_=1 to _n_;
    
20.       set a;
    
21.    output;
    
22.    end;
    
23. run;
    
24. proc print data=b;
    
25. run;

复制代码