SAS - Import Statistics Canada Table Numbers

SAS_import_statcan_data.sas

%macro importStatCan(tableNum = , dset= );

filename out "%sysfunc(getoption(work))/&tableNum.-eng.zip";

proc http
 url="https://www150.statcan.gc.ca/n1/tbl/csv/&tableNum.-eng.zip"
 method="get"
 out=out;
run;

filename out;

filename ext "%sysfunc(getoption(work))/&tableNum..csv";

filename inzip ZIP "%sysfunc(getoption(work))/&tableNum.-eng.zip";
 
data _null_;
   /* using member syntax here */
   infile inzip(&tableNum..csv) 
       lrecl=256 recfm=F length=length eof=eof unbuf;
   file ext lrecl=256 recfm=N;
   input;
   put _infile_ $varying256. length;
   return;
 eof:
   stop;
run;


proc import out=&dset. datafile=ext dbms=csv replace; 
guessingrows=max;
run;

filename ext clear;
filename inzip clear;

%mend;