SAS(R) 9.1.3 Companion for z/OS

Directing SAS Log and SAS Procedure Output Sending Procedure Output as E-Mail 141
/* Specify the URLs to have the .html extension. */
/* Specify the PATH to be the PDSE. */
/* Specify RS=NONE to write one line of HTML per record. */
/* This is necessary when e-mailing the HTML output. */
/* ----------------------------------------------------- */
ods html frame=’shoes1f’
contents=’shoes1c’ (url=’shoes1c.html’)
body=’shoes1b’ (url=’shoes1b.html’)
path=odsout
rs=none;
data newshoes;
set sashelp.shoes;
where Region in (’Canada’ ’Central America/Caribbean’
’South America’ ’United States’);
run;
/* ----------------------------------------- */
/* sort the data set and generate the report */
/* ----------------------------------------- */
proc sort data=newshoes;
by Region Subsidiary Product;
run;
options nobyline;
title1 ’Sales for Regions #byval(Region)’;
proc report data=newshoes nowindows;
by Region;
column Region Product Subsidiary Sales;
define Region / noprint group;
define Product / display group;
define Subsidiary / display group;
define Sales / display sum format=dollar8.;
compute after Region;
Product=’Total’;
endcomp;
break after Region / summarize style=rowheader;
run;
/* ------------------------------------------------------ */
/* Close the HTML destination and open the listing output */
/* ------------------------------------------------------ */
ods html close;
ods listing;
/* ----------------- */
/* E-mail the report */
/* ----------------- */
filename email email ’fred@bedrock.com’
subject="Shoe report 1"
type="text/plain"
attach=(".mvsmail1.pdse(shoes1f)" content_type=’text/html’ extension=’html’
".mvsmail1.pdse(shoes1c)" content_type=’text/html’ extension=’html’
".mvsmail1.pdse(shoes1b)" content_type=’text/html’ extension=’html’) ;