topic Re: extract code written in SAS EG 7.1 in SAS Enterprise Guide

extract code written in SAS EG 7.1

sliou — Tue, 06 Sep 2016 19:00:30 GMT

I need to get to some code that I'd written in SAS EG 7.1 using EG 5.1

Is there a way to extract the code and run it in an earlier version of EG?

Re: extract code written in SAS EG 7.1

TomKari — Tue, 06 Sep 2016 19:28:26 GMT

It's actually easy, but laborious.

An EG project is simply a .zip file. If you rename your xyz.egp to xyz.zip, you can browse it with anything that looks at .zip files. Among the included objects will be your code objects.

Tom

Re: extract code written in SAS EG 7.1

SASKiwi — Tue, 06 Sep 2016 19:45:35 GMT

An alternative to @TomKari's approach is to open the project in EG 7.1 and do a File - Export - Export All Code in Project.

Re: extract code written in SAS EG 7.1

sliou — Tue, 06 Sep 2016 21:21:00 GMT

Unfortunately don't have EG 7.1 installed (inadvertently reverted back to 5.1 when trying to restore older VM version). Downloading SAS 9.4, which comes with EG 7.1, in the VM takes forever 😞 so was looking for an easy solution for a quick turnaround on a project.

Re: extract code written in SAS EG 7.1

sliou — Tue, 06 Sep 2016 21:21:46 GMT

Thanks, will give it a shot.

Re: extract code written in SAS EG 7.1

SASKiwi — Tue, 06 Sep 2016 23:22:37 GMT

I guess its the @TomKari solution then...please confirm if this works for you.

Re: extract code written in SAS EG 7.1

TomKari — Wed, 07 Sep 2016 01:10:15 GMT

Here's a piece of code I threw together a while ago...my apologies, but I don't have time to dive back into it and certify it. If you find it useful, I can tell my wife I wasn't wasting my time for once!

%let ProcessDir = C:\Users\directories;

%let DSN = DataSetName.egp;

%macro GetZipCode(ProcessDir, DSN, ZIPMember, SASMember);

filename inzip zip "&ProcessDir.\&DSN." member="&ZIPMember.";

data _null_;

infile inzip;

file "&ProcessDir.\&SASMember.";

input;

put _infile_;

run;

%mend; /* GetZipCode */

/* Assign a fileref wth the ZIP method */

filename inzip zip "&ProcessDir.\&DSN.";

/* Read the "members" (files) from the ZIP file */

data _null_;

length memname $200;

fid=dopen("inzip");

if fid=0 then

abort;

memcount=dnum(fid);

do i=1 to memcount;

memname=dread(fid,i);

if scan(memname, 2, "/") = "code.sas"

then call execute("%"||"GetZipCode(&ProcessDir., &DSN., "||trim(left(memname))||", "||trim(left(scan(memname, 1, "/")))||".sas);");

end;

rc=dclose(fid);

run;

Re: extract code written in SAS EG 7.1

sliou — Wed, 07 Sep 2016 01:53:40 GMT

You're right, a bit laborious trying to figure out what the flies are as names are not the same. However, works like a charm! Thanks much!!

--Sonia

Re: extract code written in SAS EG 7.1

sliou — Wed, 07 Sep 2016 01:55:14 GMT

Yup, @TomKari's solution worked well.

Re: extract code written in SAS EG 7.1

sliou — Wed, 07 Sep 2016 01:58:37 GMT

Thanks! I'll definitely let you (your wife) know no time was wasted if this proves to work 🙂
As with pending deadline of project, might not be able to dive into this for a little while.
cheers,
--Sonia