各位大大,以下是在下写的程式内容,利用index来作索引,但是加上do while end 后,会变成无穷回圈
,结果我检查之后,才发现,索引的功能只有第一次有效果,回圈之后就没有在去索引,请问我的程式
有什么问题吗

data fileb;
input group_id $ cnt dudate
cards;
a1 1 4/5
a1 1 4/9
a1 2 4/25
a1 3 4/30
;
group_id_cnt=group_id || cnt;
run;

data b4(keep=group_id_cnt dudatb);
input group_id cnt  dudatb
cards;
a1 1 4/10
a1 2 4/27
a1 3 4/29;
group_id_cnt=group_id || cnt;
run;

DATA DAT3 (INDEX=(GROUP_ID_CNT));
SET B4;
RUN;

DATA DAT4;
SET fileb;
  DK = group_id_cnt;
  DO WHILE (DUDATE > DUDATB)  ;
        set dat3 key=group_id_cnt;
        IF _ERROR_ EQ 0 THEN
    DO;
      IF DK NE group_id_cnt THEN
        DO;
           DUDATB=" ";
        END;
    END;
     IF DUDATE > (DUDATB) THEN BOF_CNT=BOF_CNT+1;
       DK=GROUP_ID || BOF_CNT;
END;
RUN;