update multiple columns

[me55]

i have some code here...

data weight;

     input IDNUMBER $ Week1 Week2;

     WeightLoss2=Week1-Week2;

     datalines;

2477 195 163

2431 220 198

2456 173 155

2412 135 116

;

proc sql;

alter table weight add DELETE char(2), DEL2  char(2);

quit;

data weight;

  set weight;

     if WeightLoss2>20 then DELETE='Y';

     else DELETE='N';

run;

proc print data=weight;

run;

okay, so this code clearly creates a table and conditionally updates it.  notice i create two tables.  when i run the update, is it possible to update two columns at once either to the same value or another?  so...

data weight;

  set weight;

     if WeightLoss2>20 then DELETE='Y' and DEL2='Y';

     else DELETE='N' and DEL2='N';

run;

[SuryaKiran · Accepted solution]

You can by using DO END;

data weight;

  set weight;

     if WeightLoss2>20 then DO;
                           DELETE='Y' ;
                            DEL2='Y';
                          END;

     else DO;
             DELETE='N' ;
             DEL2='N';
           END;

run;

[me55]

yeah, right. thanks...