Replace values in a column

[NewUsrStat]

Hi guys, 

how can I set to 0 all numbers in a column of a data-set that are negative?

Thank you in advance

[PeterClemmensen · Accepted solution]

How about

data have;
   do _N_ = 1 to 100;
      x = rand('integer', -10, 10);
      output;
   end;
run;

data have;
   modify have;
   x = max(x, 0);
run;

[NewUsrStat]

Thank you! It works perfectly!

[Astounding]

If you have missing values for some numbers, should they also be set to zero?  I'm going to assume the answer is no, only re-set the negative numbers.

data want;
   set have;
   array nums {*} _numeric_;
   do _n_=1 to dim(nums);
      if .Z < nums{_n_} < 0 then nums{_n_} = 0;
   end;
run;

If the intent is to set missing values to zero as well, the program becomes even easier.  Just remove the characters ".Z < "