Remove the last 2 zeros

[Emma2021]

I have a numeric integer variable. If last 2 digits are zeros, then I want to remove those zeros. How can I do that?
For example, 100 should be 1, 101 should be 101, 3300 should be 33.
Thank you!

[japelin · Accepted solution]

How about this?

data have;
  do num=100, 101, 3300;
    output;
  end;
run;

data want;
  set have;
  temp=mod(num,100);
  new=ifn(temp=0,num/100,num);
  drop temp;
run;

/* If you want to store the result in the same variable again, the following data step is simpler. */
data want;
  set have;
  if mod(num,100)=0 then num=num/100;
run;