Is what you want as simple as this?   %let macvar = test%sysfunc(repeat(+, 3)); %put &=macvar;   The repeat function takes the first parameter and repeats it n times. ... View more

Thanks, Reeza! Nicely done. I was thinking along those lines but had been putting it off. Having it a library level would be handy though.   In a perfect world I'd get metadata to control it...oh well. ... View more

It's too much to go through. Can you edit it down to just the bits around the error? say the data/proc steps either side? ... View more

(Edited) log please? ... View more

Here's something I prepared earlier. I ran it over my macros directory looking for putmsg, because it's a macro that my macros themselves call a lot.   %search_directory(path=\\my\macro\directory\path, string=putmsg); String putmsg found in collapse.sas. String putmsg found in count.sas. String putmsg found in countobs.sas. String putmsg found in csv.sas. String putmsg found in dup.sas. String putmsg found in freq.sas. String putmsg found in genfmt.sas. String putmsg found in lrb.sas. String putmsg found in mixcase.sas. String putmsg found in putmsg.sas. String putmsg found in varexp.sas. 11 entries found in path for putmsg.   The output ain't flash, because for me it doesn't need to be   Here's the code: %macro search_directory(path=, string=, suffix=sas); %local did fid rc infocnt fileref i found strlen count mprint notes; %let fileref = source; %let rc = %sysfunc(filename(fileref, &path)); %if &rc ne 0 %then %put %sysfunc(sysmsg()); %do i = 1 %to 20; %let did = %sysfunc(dclose(&i)); %end; %let did = %sysfunc(dopen(&fileref)); %let i = 0; %let notes = %sysfunc(getoption(notes)); %let mprint = %sysfunc(getoption(mprint)); option nonotes nomprint; %let strlen = %length(&string); %let count = 0; %do %until(&dname = ); %let i = %eval(&i + 1); %let dname = %qsysfunc(dread(&did, &i)); %if %nrbquote(&dname) ne and %qsysfunc(indexc(%superq(dname), %bquote(&))) = 0 %then %do; %if %lowcase(%scan(&dname, -1, %str(.))) = &suffix %then %do; %let found = 0; data _null_; infile "&path.\&dname"; input @"&string" +(-&strlen) string $char&strlen..; if string = "&string" then call symput('found', '1'); run; %if %eval(&found ne 0) %then %do; %let count = %eval(&count + 1); %put String &string found in &dname..; %end; %end; %end; %end; %put &count entries found in path for &string..; %let rc = %sysfunc(dclose(&did)); %put %sysfunc(sysmsg()); %let rc = %sysfunc(filename(fileref)); %put %sysfunc(sysmsg()); option &mprint &notes; %mend search_directory; ... View more