diff --git a/.gitignore b/.gitignore index 288005b..e958365 100644 --- a/.gitignore +++ b/.gitignore @@ -14,3 +14,4 @@ mc_* ~ +.claude \ No newline at end of file diff --git a/base/mp_assertscope.sas b/base/mp_assertscope.sas index 213b146..5e24c93 100644 --- a/base/mp_assertscope.sas +++ b/base/mp_assertscope.sas @@ -92,6 +92,7 @@ from dictionary.macros where scope="&scope" and upcase(name) not in (%mf_getquotedstr(&ilist)) order by name,offset; + quit; %end; %else %if &action=COMPARE %then %do; @@ -129,7 +130,6 @@ %let test_comments=%str(Mod:(&mod) Add:(&add) Del:(&del)); %end; - data ; length test_description $256 test_result $4 test_comments $256; test_description=symget('desc'); @@ -142,6 +142,7 @@ run; proc sql; drop table &ds; + quit; %end; %mend mp_assertscope;