data temp;
   input a a1 a2  ;
   cards;
1 2 3
4 5 1
;

data temp2;
set temp ;
   value_is_1_in_allvar = ( in(1,of  a:) =1 );
   value_is_1_in_a         = (in(1,a) =1);
   value_is_5_ina2a3     = (in(5,of  a1 a2) =1);
run;

proc print;run;