topic Re: macro variable resolves in SAS Programming

macro variable resolves

SRINIVAS_N — Thu, 18 Oct 2018 14:24:19 GMT

Hi ,

Can any one help me

i have a macro

%apps(month);

/*month format is yymmn6.*/;

...

%mend apps;

%apps(201301);

%apps(201302);

%apps(201303);

%apps(201304);

%apps(201305);

%apps(201306);

%apps(201307);

%apps(201308);

%apps(201309);

%apps(201310);

%apps(201311);

%apps(201312);

%apps(201401);

till today;

till now i am giving manual dates

now i have to do dynamically

when i pass macro in the month parameter then it has to create a dataset for each yearmonth till today

Re: macro variable resolves

RW9 — Thu, 18 Oct 2018 14:35:28 GMT

So what is the question? Maybe something like:

%macro apps (month);   /*  note the name is inconsistent as its not a month */
  data _null_;
    do year=input(substr("&month.",1,4),best.) to year(today);
      do month=input(substr("&month.",5,2),best.) to 12;
        call execute(cats('data want',put(year,z4.),put(month,z2.),'; set have; run;'));
      end;
    end;
  run;
%mend apps;

%apps(201301);

Re: macro variable resolves

cousineddie — Thu, 18 Oct 2018 14:51:14 GMT

%macro multiple_runs(N=,interval=,dateformat=);
 %do j=0 %to &N. %by 1;
  %let datestring&j. = %sysfunc(putn(%sysfunc(intnx(&interval,%sysfunc(today()),-&j.,beg)),&dateformat));
  %apps(&&datestring&j.);
 %end;
%mend;

/* Loops through the current month (datestr0) and 4 previous months. */
%multiple_runs(N=4,interval=month,dateformat=yymmn6.);

Re: macro variable resolves

cousineddie — Thu, 18 Oct 2018 14:56:29 GMT

Set N to equal as many months back as you need to go.

Re: macro variable resolves

Tom — Thu, 18 Oct 2018 15:55:42 GMT

Note there is no need for PUTN as %SYSFUNC() already accepts a format specification.

%sysfunc(intnx(&interval,%sysfunc(today()),-&j.,beg),&dateformat)

Re: macro variable resolves

SuryaKiran — Thu, 18 Oct 2018 16:23:26 GMT

Instead of several macro call you can change your %apps() macro code to loop through years if that possible. If not find the below code that might work.

%macro loop_years(yyyymm=);

%do i=%substr(&yyyymm,1,4) %to %sysfunc(year(%sysfunc(today())));
	%do 	j=%sysfunc(ifc(&i=%substr(&yyyymm,1,4),%substr(&yyyymm,5,2),01)) 
		%to   %sysfunc(ifc(&i=%sysfunc(year(%sysfunc(today()))),%sysfunc(month(%sysfunc(today()))),12));
%let month_j=%sysfunc(putn(&j,z2.));
%apps(&i&month_j);
	%end;
%end;
%mend loop_years;

%loop_years(yyyymm=201305);