Sending email with HTML report

[nickb]

I'm looking to send an HTML email only when the dataset has records.  This is what I have:

data _null_;

   if _n_ eq 1 and eof then stop;

   file out email

        subject="Grade check results as of %sysfunc(date(),mmddyy10.)"

        from='RAR@test.edu'

        to = 'me@test.edu'

        type="text/html";

   stop;

   set WORK.grade_check(drop=_all_) end=eof;

   run;

    ods html body=out;

   proc print data=WORK.grade_check noobs label;

   run;

    ods html close;

   run;

Thanks,

Nick

[Ksharp]

Or you can use macro variable to make a condition.

%let dsid=%sysfunc(open(work.class));

%let nobs=%sysfunc(attrn(&dsid,nobs));

%let dsid=%sysfunc(close(&dsid));

.........

%if &nobs gt 0 %then %do;

..............

Ksharp