fix: macro param and extra log info in mp_csv2ds

all.sas

@@ -1935,7 +1935,7 @@ Usage:
   @author Allan Bowe
 **/
 
-%macro mp_csv2ds(inref=0,outds=0,baseds=0);
+%macro mp_csv2ds(inref=0,outds=0,baseds=0,view=NO);
 %if &inref=0 %then %do;
   %put %str(ERR)OR: the INREF variable must be provided;
   %let syscc=4;
@@ -1952,7 +1952,7 @@ Usage:
   %return;
 %end;
 %if %sysfunc(exist(&BASEDS)) ne 1 & %sysfunc(exist(&BASEDS,VIEW)) ne 1 %then %do;
-  %put %str(ERR)OR: the BASEDS dataset needs to be assigned, and to exist;
+  %put %str(ERR)OR: the BASEDS dataset (&baseds) needs to be assigned, and to exist;
   %let syscc=4;
   %return;
 %end;
@@ -2004,6 +2004,7 @@ data _null_;
     if type=1 then informat='best.';
     else informat=cats('$',length,'.');
   end;
+  else informat=cats(informat,'.');
   in=catx(' ',in,name,':',informat);
   if last then do;
     call symputx('instat',in,'l');

base/mp_csv2ds.sas

@@ -30,7 +30,7 @@
   @author Allan Bowe
 **/
 
-%macro mp_csv2ds(inref=0,outds=0,baseds=0);
+%macro mp_csv2ds(inref=0,outds=0,baseds=0,view=NO);
 %if &inref=0 %then %do;
   %put %str(ERR)OR: the INREF variable must be provided;
   %let syscc=4;
@@ -47,7 +47,7 @@
   %return;
 %end;
 %if %sysfunc(exist(&BASEDS)) ne 1 & %sysfunc(exist(&BASEDS,VIEW)) ne 1 %then %do;
-  %put %str(ERR)OR: the BASEDS dataset needs to be assigned, and to exist;
+  %put %str(ERR)OR: the BASEDS dataset (&baseds) needs to be assigned, and to exist;
   %let syscc=4;
   %return;
 %end;
@@ -99,6 +99,7 @@ data _null_;
     if type=1 then informat='best.';
     else informat=cats('$',length,'.');
   end;
+  else informat=cats(informat,'.');
   in=catx(' ',in,name,':',informat);
   if last then do;
     call symputx('instat',in,'l');