%Macro Sendemail; %do i=1 %to &n; FILENAME mail EMAIL; DATA _NULL_; SET &&channel&i END=eof ; FILE mail; PUT '!EM_TO!' email1 PUT '!EM_SUBJECT!' 'New price information for ' ; PUT "These are the fares as valid on &SYSDATE"; %PUT &&&channel&i; PUT '!EM_SEND!' / '!EM_NEWMSG!'; IF eof THEN PUT '!EM_ABORT!'; run; %end; %mend sendemail; %sendemail;
... View more
