Hi, So I have multiple datasets in SAS that I want to put on individual tabs in Excel and get the file sent to my email address. Currently I have the below code... /*CIRC BY CAMPAIGN SINCE MAR 2016*/
PROC SQL;
CREATE TABLE CAMPAIGN_CIRCULATION AS
SELECT DISTINCT (CAMPAIGN_NAME), DATEPART(PLANNED_DROP_DATE) FORMAT DDMMYY10. AS PLANNED_DROP_DATE ,
COUNT(*) AS CIRCULATION, PRODUCT, CELL_MANAGER, LINE_OF_BUSINESS, MARKETING_TEAM, CHANNEL, CELL_NAME
FROM MART.DN_ATR_METADATA_CIRC_1
WHERE PLANNED_DROP_DATE >= TODAY()-14
GROUP BY CAMPAIGN_NAME, PLANNED_DROP_DATE, CELL_MANAGER, LINE_OF_BUSINESS, MARKETING_TEAM, CHANNEL, CELL_NAME
;QUIT;
/*ALL OF 2016 & 17 TRANSACTIONS*/
PROC SQL;
CREATE TABLE TRANSACTIONS AS
SELECT DISTINCT(PRODUCT_GROUP_1),PRODUCT_NAME, DATEPART(DATE_TRANS) FORMAT DDMMYY10. AS DATE_TRANS , COUNT(*) AS TOTAL
FROM MART.DN_ATR_TRANS_2016_2017_NEW
WHERE DATE_TRANS >= TODAY()-14
GROUP BY PRODUCT_GROUP_1,PRODUCT_NAME, DATE_TRANS
ORDER BY PRODUCT_GROUP_1
;QUIT;
/*UNIQ CAMPAIGNS*/
PROC SQL;
CREATE TABLE CAMPAIGNS_UNIQ AS
SELECT DISTINCT CAMPAIGN_NAME, PLANNED_DROP_DATE
FROM CAMPAIGN_CIRCULATION
GROUP BY CAMPAIGN_NAME, PLANNED_DROP_DATE
;QUIT;
/*preparing the files for email distribution*/
%let user = tul0cba;
%let dataset=CAMPAIGN_CIRCULATION;
%let dataset1=/user/&user/CAMPAIGN_CIRCULATION.txt;
%let dataseta=TRANSACTIONS;
%let dataset2=/user/&user/TRANSACTIONS.txt;
%let datasetb=CAMPAIGNS_UNIQ;
%let dataset3=/user/&user/CAMPAIGNS_UNIQ.txt;
/*dataset 1*/
Data &dataset;
set CAMPAIGN_CIRCULATION;
run;
proc export data=&dataset
outfile="&dataset1"
dbms=tab
replace;
run;
/*dataset 2*/
Data &dataseta;
set TRANSACTIONS;
run;
proc export data=&dataseta
outfile="&dataset2"
dbms=tab
replace;
run;
/*dataset 3*/
Data &datasetb;
set CAMPAIGNS_UNIQ;
run;
proc export data=&datasetb
outfile="&dataset3"
dbms=tab
replace;
run;
***update email recipients here***;
filename mymail email
To=("mr.cam.ruthers@abc.com" )
subject="SAS TREND REPORT EXPORT"
attach=("&dataset1" "&dataset2" "&dataset3");
data _null_;
file mymail;
put 'Hi there,';
put "Please see the attached files";
put"Thanks,";
put"CWR automated message";
run;
... View more
