replace the last digit 2 with 1

[Smitha9]

Hi I want to delete the last digit and replace with 1

ID

000342

000562

001342

001452

000322

I want:

000341

000561

001341

001451

000321

thanks in advance.

[Tom · Accepted solution]

Seems extremely trivial.  Are you sure that is what you want to do?  Perhaps your real data is more complex?

data want;
  set have;
  substr(id,length(id))='1';
run;

[ballardw]

Assuming your variable is character this is one way:

data have;
  input id $;
datalines;
000342
000562
001342
001452
000322
;

data want;
   set have;
   id = cats(substr(id,1,length(id)-1),'1');
run;

---

@Smitha9 wrote:

Hi I want to delete the last digit and replace with 1

ID

000342

000562

001342

001452

000322

I want:

000341

000561

001341

001451

000321

thanks in advance.

---