1
0
mirror of https://github.com/sasjs/core.git synced 2026-01-05 00:20:05 +00:00

fix: enabling ms_testservice() without inputs

This commit is contained in:
Allan Bowe
2022-05-02 13:56:22 +00:00
parent 039ec397dd
commit 35a6dede6f
2 changed files with 18 additions and 14 deletions

16
all.sas
View File

@@ -20432,13 +20432,15 @@ options &optval;
%let ds1=%mf_getuniquename(); %let ds1=%mf_getuniquename();
data &ds1; data &ds1;
length fileref $8 name $32 filename $256 var $300; length fileref $8 name $32 filename $256 var $300;
webcount=countw("&inputfiles"); if "&inputfiles" ne "0" then do;
do i=1 to webcount; webcount=countw("&inputfiles");
var=scan("&inputfiles",i,' '); do i=1 to webcount;
fileref=scan(var,1,':'); var=scan("&inputfiles",i,' ');
name=scan(var,2,':'); fileref=scan(var,1,':');
filename=cats(name,'.csv'); name=scan(var,2,':');
output; filename=cats(name,'.csv');
output;
end;
end; end;
run; run;

View File

@@ -82,13 +82,15 @@
%let ds1=%mf_getuniquename(); %let ds1=%mf_getuniquename();
data &ds1; data &ds1;
length fileref $8 name $32 filename $256 var $300; length fileref $8 name $32 filename $256 var $300;
webcount=countw("&inputfiles"); if "&inputfiles" ne "0" then do;
do i=1 to webcount; webcount=countw("&inputfiles");
var=scan("&inputfiles",i,' '); do i=1 to webcount;
fileref=scan(var,1,':'); var=scan("&inputfiles",i,' ');
name=scan(var,2,':'); fileref=scan(var,1,':');
filename=cats(name,'.csv'); name=scan(var,2,':');
output; filename=cats(name,'.csv');
output;
end;
end; end;
run; run;