求高人啊。。。要悬赏论坛币么？我不知道我还有没有……

can not understand your question.

看了好几遍，也没看太懂你要说什么。
如果想retain一个变量，而且又避免起初的只是空值的话，可以通过对其设置默认的初始值来实现，如 retain n 0; 意思是retain n，而且把它的初始值设置为0.

我把代码贴出来吧。。
data pain;
    input   subjid :$8. score colldate : yymmdd8.;
    informat colldate;
    cards;
   10011001     7        20061004
   10011001     6        20061005
   10011001     6        20061006
   10011001     6        20061007
   10011001     9        20061010
   10011001     6        20061011
   10011001     3        20061012
   10011001     5        20061013
   10011001     6        20061014
   10011001     6        20061015
   10011001     6        20061016
   10011001     6        20061017
   10011001     3        20061018
   10011001     6        20061019
   10011001     6        20061020
   10011001     6        20061021
   10011001     6        20061022
   10011001     6        20061023
   10011001     6        20061024

;
run;

data drug;
    input   subjid :$8.  firstdosedt : yymmdd8.;
    informat firstdosedt;
    cards;
   10011001           20061014
;
   
run;


proc sort data=pain out=patient;
   by colldate;
run;

data newpatient;
   set drug;
   colldate=firstdosedt;
run;

data newpatient1;
   merge patient newpatient;
   by colldate;
   if firstdosedt=colldate  then do n=_N_;
     
     retain n;
     
   end;
  
   if n then i ="E";
   
         else
     if _N_>=n-7 and n ne . then do i="B";
end;
   if firstdosedt=colldate then do i="B";  end;
   format colldate mmddyy10.;
  
  
run;
----------
其实就是要把某个first dose日期以后的全部mark为E，之前的7天（包括当天）mark为B..
first dose date的_N_=9，但是取到9之后重新set数据才可以开始mark的流程，_N_就又变成0，1，2，3了……不知道这里要怎么操作……

@ 一下。。