如何在多个有序变量中寻找多个关键字

try this:

data wanted;
set test;
length bangong $20;
retain n;
array item{*} item:;
if mod(_n_,2)=1 then do;
  n=.;
  do i=1 to dim(item);
   if index(item{i},'AAA') then do;
     bangong=item{i};
         n=i;
   end;
  end;
end;
if mod(_n_,2)=0 and n ne . then bangong=item{n};
drop i n;
run;

wwang111 发表于 2016-8-14 22:21
try this:

data wanted;

可以，没问题，多谢您了。