Use macro/do-loop to create incremental date variables

[di_niu0]

Hello all, I have the below code and would like to make it more concise. It could be macro, do-loop or other ways. Thank you in advance. 

data abc;

set abc;

date1 = intnx('day', start_date, 20);

date2 = intnx('day', date1, 20);

date3 = intnx('day', date2, 20);

date4 = intnx('day', date3, 20);

date5 = intnx('day', date4, 20);

date6 = intnx('day', date5, 20);

date7 = intnx('day', date6, 20);

run;

[Reeza · Accepted solution]

data abc_new;

set abc;
array _dates(*) date1-date7;

do i=1 to dim(_dates);
    _dates(i) = intnx('day', start_date, 20*i);
end;

run;

Here's a tutorial on using Arrays in SAS
https://stats.idre.ucla.edu/sas/seminars/sas-arrays/

---

@di_niu0 wrote:

Hello all, I have the below code and would like to make it more concise. It could be macro, do-loop or other ways. Thank you in advance. 

data abc;

set abc;

date1 = intnx('day', start_date, 20);

date2 = intnx('day', date1, 20);

date3 = intnx('day', date2, 20);

date4 = intnx('day', date3, 20);

date5 = intnx('day', date4, 20);

date6 = intnx('day', date5, 20);

date7 = intnx('day', date6, 20);

run;

---

[di_niu0]

That's AMAZING. Thank you!!!