diff --git a/all.sas b/all.sas index 54a070b..7231db1 100644 --- a/all.sas +++ b/all.sas @@ -7178,13 +7178,13 @@ run; %local x curds; %if &flavour=SAS %then %do; - data _null_; - file &fref mod; - put "/* SAS Flavour DDL for %upcase(&libref).&curds */"; - put "proc sql;"; - run; %do x=1 %to %sysfunc(countw(&dsnlist)); %let curds=%scan(&dsnlist,&x); + data _null_; + file &fref mod; + put "/* SAS Flavour DDL for %upcase(&libref).&curds */"; + put "proc sql;"; + run; data _null_; file &fref mod; length lab $1024 typ $20; diff --git a/base/mp_getddl.sas b/base/mp_getddl.sas index 5adadfc..55fe4b1 100644 --- a/base/mp_getddl.sas +++ b/base/mp_getddl.sas @@ -130,13 +130,13 @@ run; %local x curds; %if &flavour=SAS %then %do; - data _null_; - file &fref mod; - put "/* SAS Flavour DDL for %upcase(&libref).&curds */"; - put "proc sql;"; - run; %do x=1 %to %sysfunc(countw(&dsnlist)); %let curds=%scan(&dsnlist,&x); + data _null_; + file &fref mod; + put "/* SAS Flavour DDL for %upcase(&libref).&curds */"; + put "proc sql;"; + run; data _null_; file &fref mod; length lab $1024 typ $20;