Date:         Wed, 17 Jan 2007 13:57:27 -0700
Reply-To:     "Barz, Ken" <Ken.Barz@INTRADO.COM>
Sender:       "SAS(r) Discussion" <SAS-L@LISTSERV.UGA.EDU>
From:         "Barz, Ken" <Ken.Barz@INTRADO.COM>
Subject:      Re: ExcelXP Tagset + Intrnet
Comments: To: Don Henderson <donaldjhenderson@hotmail.com>
Content-Type: text/plain; charset="us-ascii"

OK, yours works.  And my data works when I pull out the ods path
statement.  Something must be wrong there.
Thanks,
Ken

-----Original Message-----
From: Don Henderson [mailto:donaldjhenderson@hotmail.com]
Sent: Wednesday, January 17, 2007 1:27 PM
To: Barz, Ken; SAS-L@LISTSERV.UGA.EDU
Subject: RE: ExcelXP Tagset + Intrnet

Ken,

I did not have access to your data sets, but the following worked just
fine
for me using SAS 9.1.3 and Excel 2003 SP2. It created two tabs - one for
the
proc print and one for the proc tabulate.

%let rc =
%sysfunc(appsrv_header(Content-type,application/vnd.ms-excel));

ods listing close;
ods tagsets.ExcelXP file=_webout style=statistical;
proc print data=sashelp.shoes(obs=10) noobs label;
run;

proc tabulate data=sashelp.shoes;
 by region;
 var stores;
 class product;
 table product,stores*pctn;
 keyword all pctn;
 keylabel pctn='Percent';
run;

ods tagsets.ExcelXP close;

-don

> -----Original Message-----
> From: SAS(r) Discussion [mailto:SAS-L@LISTSERV.UGA.EDU] On Behalf Of
Barz,
> Ken
> Sent: Wednesday, January 17, 2007 12:35 PM
> To: SAS-L@LISTSERV.UGA.EDU
> Subject: ExcelXP Tagset + Intrnet
>
> I have the rare day to play around in SAS (as opposed to grinding out
a
> deadline) so I thought I'd finally look into tagsets and see if I can
> get something to work.  Following the examples in a couple of white
> papers, I was able to get SAS to produce output using the excelxp
> tagset.  However, when I try to use the same example using Intrnet,
> Excel 2003 tries to open, but then I get a message that it's unable to
> read the file.  The code is identical to the one that worked except
for
> the appsrv and the file=_webout bits.  Any thoughts on what else I
might
> need for this to work?  Thanks.
>
>
>
> libname myLib '\\inmet00\irs\Web_Server\Framework\Tagsets';
>
> libname pharma '\\inmet00\irs\temp\TagsetExample' access=read;
>
>
>
> ods path myLib.tmplmst(read) sashelp.tmplmst(read);
>
>
>
> %let rc = %sysfunc(appsrv_header(Content-type,
> application/vnd.ms-excel));
>
>
>
> ods listing close;
>
> ods tagsets.ExcelXP file=_webout style=statistical;
>
>
>
>   proc print data=pharma.phcae noobs label;
>
>     by protocol;
>
>     var patient visit aedate aecode aetext aesev frequency aesevc;
>
>   run; quit;
>
>
>
>   proc tabulate data=pharma.phcae;
>
>     by protocol;
>
>     var aesev;
>
>     class aetext aesevc;
>
>     classlev aetext aesevc;
>
>     table aetext*aesevc,aesev*pctn;
>
>     keyword all pctn;
>
>     keylabel pctn='Percent';
>
>   run; quit;
>
>
>
> ods tagsets.ExcelXP close;
>
>
>
> Ken Barz
>
> Software Engineer
>
> Intrado Metrics
>
>
>
> Intrado Inc.
>
> 1601 Dry Creek Drive
>
> Longmont, CO 80503
>
> direct: 720.494.5868
>
> pager: 303-581-7667
>
> fax: 720.494.6600
>
> email: ken.barz@intrado.com
>
>
>
> Intrado.(r)
>
> www.intrado.com
>
<file:///C:\Documents%20and%20Settings\kbarz\Application%20Data\Microsof
> t\Signatures\www.intrado.com>
>
>
>
> ATTENTION:
>
>
>
> The information contained in this electronic message and any
attachments
> to this message are intended for the exclusive use of the addressee(s)
> and may contain confidential or privileged information. If you are not
> the intended recipient, please notify Intrado Inc. immediately at
> 720.494.5800 and destroy all copies of this message and any
attachments.
>
>