Merge pull request #8 from macropeople/development

Development
macropeople · Mar 13, 2020 · 84f244c · 84f244c
2 parents a20c49e + 922185c
commit 84f244c
Show file tree

Hide file tree

Showing 3 changed files with 9 additions and 6 deletions.
diff --git a/macrocore.sas b/macrocore.sas
@@ -4773,14 +4773,15 @@ run;
 %local work tmpfile;
 %let work=%sysfunc(pathname(work));
 %let tmpfile=__mm_createwebservice.temp;
-%local x fref freflist;
+%local x fref freflist mod;
 %let freflist= &adapter &precode &code ;
 %do x=1 %to %sysfunc(countw(&freflist));
+  %if &x>1 %then %let mod=mod;
 
   %let fref=%scan(&freflist,&x);
   %put &sysmacroname: adding &fref;
   data _null_;
-    file "&work/&tmpfile" lrecl=3000 mod;
+    file "&work/&tmpfile" lrecl=3000 &mod;
     infile &fref;
     input;
     put _infile_;

diff --git a/mc_all.sas b/mc_all.sas
@@ -4774,14 +4774,15 @@ run;
 %local work tmpfile;
 %let work=%sysfunc(pathname(work));
 %let tmpfile=__mm_createwebservice.temp;
-%local x fref freflist;
+%local x fref freflist mod;
 %let freflist= &adapter &precode &code ;
 %do x=1 %to %sysfunc(countw(&freflist));
+  %if &x>1 %then %let mod=mod;
 
   %let fref=%scan(&freflist,&x);
   %put &sysmacroname: adding &fref;
   data _null_;
-    file "&work/&tmpfile" lrecl=3000 mod;
+    file "&work/&tmpfile" lrecl=3000 &mod;
     infile &fref;
     input;
     put _infile_;

diff --git a/meta/mm_createwebservice.sas b/meta/mm_createwebservice.sas
@@ -269,14 +269,15 @@ run;
 %local work tmpfile;
 %let work=%sysfunc(pathname(work));
 %let tmpfile=__mm_createwebservice.temp;
-%local x fref freflist;
+%local x fref freflist mod;
 %let freflist= &adapter &precode &code ;
 %do x=1 %to %sysfunc(countw(&freflist));
+  %if &x>1 %then %let mod=mod;
 
   %let fref=%scan(&freflist,&x);
   %put &sysmacroname: adding &fref;
   data _null_;
-    file "&work/&tmpfile" lrecl=3000 mod;
+    file "&work/&tmpfile" lrecl=3000 &mod;
     infile &fref;
     input;
     put _infile_;