问如何以编程方式获得SAS中数据集的大小/重量(MB)

EN

%let libds=WORK.SAMPLE;
/* create demo data */
data &libds;
  retain string 'blaaaaaaaah';
  do x=1 to 10000;
    output;
  end;
run;
/* extract library and datasaet from libds variable */
%let lib=%scan(&libds,1,.);
%let ds =%scan(&libds,2,.);
/* set up filename to point directly at the dataset */
/* note - if you have indexes you also need to do   */
/* this for the .sas7bndx extension                 */
filename fref "%sysfunc(pathname(&lib))/&ds..sas7bdat";
/* query dictionary view for file attributes        */
data _null_;
  set sashelp.vextfl(where=(fileref='FREF'));
  filesize=filesize/(1024**2); /* size in MB */
  putlog filesize= 'MB';
run;
/* clear libref */
filename fref clear;