How to repeat a symput function to multiple observations

[novinosrin]

@TLSAS Please test the below and let me know. I am here at my college lab for two more hours to  make any further changes if needed:

data a;
    input id mon $2. month11 $2. month12 $2. month13 $2. month14 $2. month15 $2. month16 $2.;
    datalines;
1 12 c c c c c n
2 10 c c n n c n
3 13 n n c c n n
4 12 c n c n c c
;
run;

data b;
set a;
array t(*) month:;
do _n_=1 to dim(t)-1;
if mon=substr(vname(t(_n_)),anydigit(vname(t(_n_))))  and t(_n_)='c' and t(_n_+1)='c' then enroll=1;
end;
run;

[TLSAS]

Thanks @novinosrin! This works well.

I was trying to use substr but it didn't work, and you always know what works. Amazing. Thanks!

[novinosrin]

@TLSAS We are a team. Have fun. I am gonna sleep.I have my finals exam for this quarter mon and wed next week. Might be slow in my response. But keep your questions coming. Have fun and take care

[AnnaBrown]

Hi @TLSAS,

I'm glad you found some useful info! If one of @novinosrin's replies was the exact solution to your problem, can you "Accept it as a solution"? Or if one was particularly helpful, feel free to "Like" it. This will help other community members who may run into the same issue know what worked.

Thanks!
Anna

[TLSAS]

@AnnaBrown

I marked the solution!

Thanks,

[TLSAS]

Hi Novinosrin,

Thank you for your reply.

I used the macro because I always got the error message with the %do statement (see bellow).

For output dataset b, I want to create a binary variable that equal to 1 whenever the variable "mon" has the value that equal to the suffix of the variable "month1-month2".

Is that clear to you?

ERROR: The %DO statement is not valid in open code.
240
241  %do i=1 %to &max.;
242      call symputx('mon1',"month"||compress(mon));
         ----
         180