automating downloading and unzipping a file

texasmfp — Thu, 05 Sep 2024 03:03:25 GMT

I'd like to automate the downloading and unzipping of a zipped file from the web. I read Chris Hemedinger's blog post and can successfully download the file. However, it resides in the SAS Temporary folder. I need to unzip all files to a specific directory, such as W:\Data\2024-07. Does SAS have a function to extract everything in a zipped file? Note that I am not trying to use any of the extracted files, simply extracting all files to a library folder. Thanks

/* detect proper delim for UNIX vs. Windows */
%let delim=%sysfunc(ifc(%eval(&sysscp. = WIN),\,/));

/* create a name for our downloaded ZIP */
%let ziploc =
	%sysfunc(getoption(work))&delim.datafile.zip;
filename download "&ziploc";

/* Download the ZIP file from the Internet*/
proc http
	method='GET'
	url="https://www.census.gov/trade/downloads/2024/Textile_summary_m/TEXSUMM2401.ZIP"
	out=download;
run;

/* Assign a fileref wth the ZIP method */
filename inzip zip "&ziploc";

/* Read the "members" (files) from the ZIP file */
data contents(keep=memname);
	length memname $200;
	fid=dopen("inzip");

	if fid=0 then
		stop;
	memcount=dnum(fid);

	do i=1 to memcount;
		memname=dread(fid,i);
		output;
	end;

	rc=dclose(fid);
run;

Re: automating downloading and unzipping a file

rudfaden — Thu, 05 Sep 2024 10:21:08 GMT

I do not think SAS can unzip files directly. But you can run a x command to make the terminal unzip files and move them to another folder.

Re: automating downloading and unzipping a file

Tom — Thu, 05 Sep 2024 13:27:31 GMT

All you did so far was find the list of files inside the ZIP file. Now use that list to generate the code to copy out the files.

There are a lot of examples out there: https://www.google.com/search?q=%40sas.com+unzip+macro

topic Re: automating downloading and unzipping a file in SAS Programming

automating downloading and unzipping a file

Re: automating downloading and unzipping a file

Re: automating downloading and unzipping a file