You're mixing up data types in both ACEDIVRC and TEST.  Be sure to know what is numeric and what is character.  Also the IN operator would make this a bit easier to read: data temp3;     length acedivrc $20;     acedivrc = '1'; output;     acedivrc = 'No'; output;     acedivrc = "Don't know/Unsure"; output;     acedivrc = 'Parents not married'; output;     acedivrc = 'Refused'; output; run; data probably;     set temp3;     if acedivrc = '1' then test = 1;     else if acedivrc in ('No',"Don't know/Unsure",'Parents not married', 'Refused') then test = 2;     else if missing(acedivrc) then test = .; run; Hope this helps. ... View more

Hi, This is not the whole answer but it will get you started. data co1;     length coid $4 year  profit  rndex 8;     input coid year profit rndex; datalines; 123 1998 -100 15 123 1999 -100 10 123 2000 150 15 123 2001 200 20 456 1999 50 10 456 2000 10 . 456 2001 -25 15 789 1999 150 . 789 2000 -100 . 789 2001 50 . 789 2002 100 . ; run; proc sql;     create table co2 as     select *, mean(rndex) as rndexavg     from co1     group by coid; quit; You can't use an ampersand in a SAS variable name. ... View more

From one variable or more?  You could probably use the count() function with proc sql, get counts of your values then sort them. ... View more

data x1;     length var1 var2 var3 var4 var5 8;     input var1 var2 var3 var4 var5; datalines; 23    87    94      59   54 36    23    19      23   57 87    63     87    51    99      35    38     87    87     23 68    49     23    78     87 run; %let nvars=5; %macro check; %do i = 01 %to 99;     %let found = N;     %global found&i;     data found&i;         set x1 end = at_end;         retain flag1-flag5 0;  /* set to 0 for each record */         array vars {*} var1-var&nvars;         array flags {*} flag1-flag&nvars;         checkvar = &i;         do i = 1 to &nvars; /* for the first value in the first record, 23, check this against the var2, 3, 4 and 5 in the same record */             if checkvar = vars{i} then flags{i} = 1;  /* do not sum, just flag if any */         end;         if at_end and sum(of flag1-flag5) = &nvars then  /* if found in all, then each flag will be 1 and the total will be 5 */         do;             put checkvar ' EXISTS IN ALL COLUMNS. ';             in_all = checkvar;             output found&i;             call symputx("found&i", 'Y');  /* macro variable set to Y if found in all vars */         end;         else call symputx("found&i",'N');     run;     %put found&i=&&found&i; %end; %mend; %check;     %macro put_together;     data all_found;  /* create empty dataset */         stop;     run;     %do j = 01 %to 99;         %*put found&j=&&found&j;         %if &&found&j = Y %then          /* append if there are any */         %do;             data all_found;                 set all_found found&j;              run;         %end;      %end;  %mend; %put_together;   data _null_;     set all_found;     if _n_ = 1 then put 'These values exist in all variables: ';     put in_all; run; ... View more

Hi, I find the question a little unclear too, because the desired results don't seem to match the data in the rows you provided.  Nonetheless, something like this might work: data a;                   input x $ 30.; cards; 28,16c2b8c4l8n 28,16cb8c4l8n 28,cbc4l24n ; run; data b (drop = position letter temp i);     set a;     original_record = _n_;     do i = 1 to 10;  /* guessing max here, can use other types of loops or get out of loop once temp is empty */         if i = 1 then temp = x;         call missing(no_activity, contact, lunch, break, nonactivitiy);         position = findc(temp,',clbn');  /* find location of , c l b n */         *put temp= position=;         if position ne 0 then         do;             letter = substr(temp, position, 1);  /* which letter is it? */             *put letter=;                                                              /* output 0 if no number before the letter */                                                                                        /* should correct for automatic conversion */             if letter = ','      then do; if position = 1 then no_activity = 0; else no_activity = substr(temp, 1, position-1); output; end;             else if letter = 'c' then do; if position = 1 then contact = 0; else contact = substr(temp, 1, position-1);        output; end;             else if letter = 'l' then do; if position = 1 then lunch = 0; else lunch = substr(temp, 1, position-1);          output; end;             else if letter = 'b' then do; if position = 1 then break = 0; else break = substr(temp, 1, position-1);          output; end;             else if letter = 'n' then do; if position = 1 then nonactivity = 0; else nonactivity = substr(temp, 1, position-1);    output; end;             temp = substr(temp, position+1);  /*  re-assign temp as the rest of the string */         end;     end; run;       proc sort data = b; by original_record; run; data c (keep = original_record total:) ;     set b;     by original_record;     retain  total_no_activity             total_contact             total_lunch              total_break             total_nonactivity ;     if first.original_record then     do;         total_no_activity = 0;     /* set to zero at the beginning of each group */         total_contact = 0;         total_lunch = 0;         total_break = 0;         total_nonactivity = 0;     end;     if not missing(no_activity) then total_no_activity = total_no_activity + no_activity;  /* add them up */     if not missing(contact) then total_contact = total_contact + contact;     if not missing(lunch) then total_lunch = total_lunch + lunch;     if not missing(break) then total_break = total_break + break;     if not missing(nonactivity) then total_nonactivity = total_nonactivity + nonactivity;     if last.original_record then output;  /* only keep totals */ run;            proc print data = c; run; Output:        original_    total_no_     total_    total_    total_       total_ Obs      record      activity    contact     lunch     break    nonactivity 1         1            28          24         4         2            8 2         2            28          24         4         0            8 3         3            28           0         4         0           24 ... View more