Comparing vars against three values and then creating new var if there’s a match

[K_S]

Hello!

i have a database that looks like this:

idnum  text1   text2   text3   text4   text5   text6   text7.....text35

1          bsf       ttg      Hht     Hht      Hhp.   Ppj      Ggt       Tty

2           Yyy.     Hjs.   Hht     Tty       Hgy.    Xyz.    Yyu.     Kio 

.

.

what i want to do is this, but in a practical way:

if text1 in (‘Hht’, ‘Tty’, ‘kyo’)  or text2 in  (‘Hht’, ‘Tty’, ‘kyo’)  or text3 in  (‘Hht’, ‘Tty’, ‘kyo’)  ......or text35 in  (‘Hht’, ‘Tty’, ‘kyo’)  then new_var=1;

else new_var=0;

any tips?

[novinosrin · Accepted solution]

data want;
 set have;
 array j text:;
 do t='Hht', 'Tty', 'kyo';
  new_var= t in j ;
  if new_var then leave;
 end;
 drop t;
run;

[s_lassen]

There are many ways to skin a cat. The shortest code is probably this:

data want;
  set have;
  new_var=whichc('Hht',of text1-text35) or whichc('Tty',of text1-text35) or whichc('kyo',of text1-text35);
run;

[K_S]

Thank you!