Substr

[PurushReddy]

I am not understanding below program how it resolved
Data a;
Input string 7.;
Reverse=reverse (string);
pos=indexc(reverse,"., ");
Last_word=substr (string,7-pos+2);
Cards;
ABC.DEF
JHG GHTY
HYT,XYZ
;
RUN;
HERE LAST_WORD STATEMENT HOW IT WILL RESOLVE, PLEASE EXPLAIN

[LinusH]

Insert a put _all_; statement 

Run the program.

Examine log.

[PurushReddy]

Thanks for your response,
I want to know how this is working,means flow
Last _word=Substr(string,7-pos+2);

[Rick_SAS · Accepted solution]

The doc is your friend. Here is a link to the SUBSTR doc.

• pos = the location of a delimiter in the reverse string. The delimiters are '.' or ',' or ' '.
• Each string in your data is 7 characters long, so 7-pos gives the position of the character BEFORE the delimiter.
• Therefore 7-pos+2 gives the position of the character AFTER the delimiter.
• The SUBSTR function copies all characters from that position until the end of the string.

[Rick_SAS]

I think you want to declare String to be a CHARACTER variable. Currently, it is a numeric variable. To declare a character variable, put a '$' symbol after the name of the variable on the INPUT statement, like this:

Input string $ 7.;

After making that change, rerun the program and examine the output. Let us know if you still have questions!

[PurushReddy]

flow of work
Last _word=Substr(string,7-pos+2);
*7-pos+2(here pos value:4)*

[maguiremq]

What determines `pos`? Please provide some example data.

[PurushReddy]

Actually this is total dataset, I want to know how(Last_word=substr (string,7-pos+2);).

Data a;
Input string 7.;
Reverse=reverse (string);
pos=indexc(reverse,"., ");
Last_word=substr (string,7-pos+2);
Cards;
ABC.DEF
JHG GHTY
HYT,XYZ
;
RUN;

[Kurt_Bremser]

@Rick_SAS has already provided your answer.

[PaigeMiller]

---

@PurushReddy wrote:
flow of work
Last _word=Substr(string,7-pos+2);
*7-pos+2(here pos value:4)*

---

What is your question?

[PurushReddy]

Substr(string,7-pos+2),
How this is working, I am not getting, what is the flow of.

[Kurt_Bremser]

I moved your erroneous post in here.

[Kurt_Bremser]

Your task can be much easier solved by using the right tool (Maxim 14), which is the SCAN function:

data a;
input string $7.;
last_word = scan(string,-1,"., ");
cards;
ABC.DEF
JHG GHTY
HYT,XYZ
;