@sahoositaram555 wrote: Thanks @Tom for your generous advice. I've used %do as it is inside (%macro--%mend). Glad you said me about DIM. didn't know tha. So instead of using DIM any other function/ways can you suggest? I have no idea what number it is that you expect your macro %DO loop to loop over.  What code is it that you want the %DO loop to generate?   Just because you have wrapped your code into a macro so you can conditionally generate some of the statements does not mean that immediately start putting percent signs everywhere. You only use macro code when you want to use macro code. Most of the code in a macro is just going to be the regular SAS code that you want to macro to emit so that SAS can compile it and run it.  It is only for the parts of the CODE that you need the macro processor to help you generate where need to start thinking how you can program the macro logic to generate that code.   For you original problem here is simplistic approach you could follow. 1) Write a macro that takes as input one DATASET name and one character VARIABLE name and generates the summary you want for character variables. 2) Write a second macro that takes as input one DATASET name and one number VARIABLE name and generates the summary you want for numeric variables. 3) Write code to get a list of the datasets and variables you want to summarize into a dataset.   4) Write code that takes that list and generates a call to one of the two macro based on the variable type.   Here is one way to do steps 3 and 4.  Assume the two macro are names %CHAR_SUMMARY and %NUM_SUMMARY. proc contents data=mylib.mydataset out=contents noprint; run; data _null_; set contents; if type=1 then call execute(cats('%nrstr(%num_summary)(dataset=',libname,'.',memname,',variable=',name,')')); else call execute(cats('%nrstr(%char_summary)(dataset=',libname,'.',memname,',variable=',name,')')); run; ... View more

Note that system macro is ancient.  You can use %SYSFUNC() now and avoid those macro loops.  To get similar results to %CMPRES() use %SYSFUNC(COMPBL()).  To remove all spaces use %SYSFUNC(COMPRESS()). 152 %let a= abcd efgh ijkl ; 153 154 %put a |&a| ; a |abcd efgh ijkl| 155 %put cmpress |%cmpres(&a)| ; cmpress |abcd efgh ijkl| 156 %put compbl |%sysfunc(compbl(&a))| ; compbl |abcd efgh ijkl| 157 %put compress |%sysfunc(compress(&a))| ; compress |abcdefghijkl|   If you want to see how CMPRES works you can read the code. %macro cmpres(text); %*********************************************************************; %* *; %* MACRO: CMPRES *; %* *; %* USAGE: 1) %cmpres(argument) *; %* *; %* DESCRIPTION: *; %* This macro returns the argument passed to it in an unquoted *; %* form with multiple blanks compressed to single blanks and also *; %* with leading and trailing blanks removed. *; %* *; %* Eg. %let macvar=%cmpres(&argtext) *; %* *; %* NOTES: *; %* The %LEFT and %TRIM macros in the autocall library are used *; %* in this macro. *; %* *; %*********************************************************************; %local i; %let i=%index(&text,%str( )); %do %while(&i ne 0); %let text=%qsubstr(&text,1,&i)%qleft(%qsubstr(&text,&i+1)); %let i=%index(&text,%str( )); %end; %left(%qtrim(&text)) %mend; Of course you will also need the code for the %LEFT() and %QTRIM() macros. %macro left(text); %*********************************************************************; %* *; %* MACRO: LEFT *; %* *; %* USAGE: 1) %left(argument) *; %* *; %* DESCRIPTION: *; %* This macro returns the argument passed to it without any *; %* leading blanks in an unquoted form. The syntax for its use *; %* is similar to that of native macro functions. *; %* *; %* Eg. %let macvar=%left(&argtext) *; %* *; %* NOTES: *; %* The %VERIFY macro is used to determine the first non-blank *; %* character position. *; %* *; %*********************************************************************; %local i; %if %length(&text)=0 %then %let text=%str( ); %let i=%verify(&text,%str( )); %if &i %then %substr(&text,&i); %mend; %macro qtrim(value); %*********************************************************************; %* *; %* MACRO: QTRIM *; %* *; %* USAGE: 1) %qtrim(argument) *; %* *; %* DESCRIPTION: *; %* This macro returns the argument passed to it without any *; %* trailing blanks in a quoted form. The syntax for its use *; %* is similar to that of native macro functions. *; %* *; %* Eg. %let macvar=%qtrim(&argtext) *; %* *; %* NOTES: *; %* None. *; %* *; %*********************************************************************; %local i; %do i=%length(&value) %to 1 %by -1; %if %qsubstr(&value,&i,1) ne %str( ) %then %goto trimmed; %end; %trimmed: %if &i>0 %then %qsubstr(&value,1,&i); %mend; Which to understand you will have to read the VERIFY macro. %macro verify(text,target); %*********************************************************************; %* *; %* MACRO: VERIFY *; %* *; %* USAGE: 1) %verify(argument,target) *; %* *; %* DESCRIPTION: *; %* This macro returns the position of the first character in the *; %* argument that is not in the target value. If every character *; %* that is in the argument is also in the target value then this *; %* fuction returns a value of 0. The syntax for its use is *; %* is similar to that of native macro functions. *; %* *; %* Eg. %let i=%verify(&argtext,&targtext) *; %* *; %* SUPPORT: sassmo *; %* NOTES: *; %* Both values to this function must have non-zero lengths or an *; %* error message will be produced. *; %* *; %*********************************************************************; %local i; %if %length(&text)=0 OR %length(&target)=0 %then %do; %put ERROR: ARGUMENT TO VERIFY FUNCTION MISSING.; %goto errout; %end; %do i=1 %to %length(&text); %if NOT %index(&target,%qsubstr(&text,&i,1)) %then %goto verfnd; %end; %verfnd: %if &i>%length(&text) %then 0; %else &i; %errout: %mend;   ... View more

I did. There was no note about INDEX but 25% of the execution time was shaved off. ... View more

EDITED.   data have; input id reason_1-reason_3; cards; 1 1 1 0 2 1 0 0 3 0 1 0 4 0 1 1 5 . . . 6 1 0 0 7 1 1 0 8 0 1 1 9 0 0 1 10 1 1 0 ;;;; proc sql; create table want as select 'reason_1 ' as reason, sum(reason_1=0) as no_count,calculated no_count/count(reason_1) as no_percent , sum(reason_1=1) as yes_count,calculated yes_count/count(reason_1) as yes_percent from have union select 'reason_2 ' as reason, sum(reason_2=0) as no_count,calculated no_count/count(reason_2) as no_percent, sum(reason_2=1) as yes_count,calculated yes_count/count(reason_2) as yes_percent from have union select 'reason_3 ' as reason, sum(reason_3=0) as no_count,calculated no_count/count(reason_3) as no_percent, sum(reason_3=1) as yes_count,calculated yes_count/count(reason_3) as yes_percent from have; quit; ... View more

It would help if you could show a data snippet, or at least provide some dummy data in a cards/datalines statement.   You've mentioned that for "Lung_followup" the row number for each subject corresponds to the follow-up year. Are you sure you can rely on this property to always be true?   In that case, you can probably count the row number per subject, and just keep where this counter equals 3. This code may need a bit of tweaking, I just did it off the top of my head.   proc sort data=lung_followup out=lf_sorted; by subjid; run; data lf_with_counter; set lf_sorted; by subjid; if first.subjid then counter = 1; else counter + 1; run; data Lung_Merge; merge Lung (IN=in1) lf_with_counter (IN=in2 where=(counter = 3)); by subjid; if in1 and in2; run; ... View more

Enterprise Guide always runs on Windows. But the SAS code you submit via EG could be running on some other operating system.  You probably need to make sure that the machine where SAS is running can run Excel. ... View more

Hello,    The SAS Global Certification team just recently produced a webinar about the Base and Advanced Programming credentials.  I posted a notification about the On-Demand version to the top of our board on our Community site.  Here is the link for your reference:  https://www.sas.com/en_us/webinars/overview-base-and-advanced-programming-exams.html.     The webinar covers what to expect and where to find the best study resources.  Make sure you download the exam content guide from the certification website as it is the complete description of what is tested on the exam from a topic perspective.  Finally, check out the library article on tips and strategies for the A00-231 SAS Base Programming Performance-Based Certification Exam.  On the certification community site it is listed under the box "From the Library".      Time and practice are also important so be sure to allow yourself time to practice everything you learn and study.    Hope this helps.  Thank you for your interest in becoming SAS certified!   Best of luck to you in your studies.    Kindest regards,    Becky        ... View more

Is it reported as "locked by another process", or "locked by you in environment ..."? Please post the whole log of all these steps. ... View more