Special SubStr character column

[ileshem]

Hello,

I want to take a column withe expresions like:

column1

+$A1234

A4567

+#A7890

A9876

and creat a new colmun that will give me only the expression startin with "A" and the number after it"

column1

A1234

A4567

A7890

A9876

I tried to us a formula substr starting with "A": 

Substr(:colmun1, A, 5)

Any help will be appreciated. 

[Jagadishkatam]

data want;
set have;

id=prxparse('/\w\d+/');

call prxsubstr(id,column1,start,length);
column2=substr(column1,start,length);
run;

[kiranv_]

something like this

compress(col,'','kad')

[Shmuel]

If it is always starting with capital A you can use

 var = substr(var, indexc(var,'A'));

[ileshem]

Thanks, what is "var" and indexc should be only index, right?

[Shmuel]

replace var with any variable name.

indexc function looks for a character (or characters) while index function looks for a string.

in this case as the list is made of one character, you can use each of the functions.

[ChrisNZ]

Keep everything starting at uppercase A:

data WANT;
 STR='+$A1234';
 STR1=prxchange('s/.*(A.*)/$1/',1,STR);
 putlog STR1=;
run;