Portal | IBM Manuals | Downloads | Products | Refer | Info | Programs | JCLs | Forum Rules*| Site Map | Mainframe CD 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index
 
Register
 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index FAQ Search Memberlist Usergroups Profile Log in to check your private messages Log in
 
how to send email through jcl

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL
Author Message
venkatsrib

New User


Joined: 20 Oct 2003
Posts: 3

PostPosted: Tue Jan 20, 2004 7:14 pm    Post subject: how to send email through jcl
Reply with quote

icon_question.gif
hi,

can any of you tell me how to send email through jcl.

venkat.
Back to top
View user's profile Send private message
References
sandip_datta

EXPERT


Joined: 02 Dec 2003
Posts: 152
Location: Tokyo, Japan

PostPosted: Thu Jan 22, 2004 6:45 pm    Post subject:
Reply with quote

Can you please try following code ?
Code:

//GL4MJOB1 JOB (6496,TECH),'SD',CLASS=T,         
// MSGCLASS=T,NOTIFY=&SYSUID                           
//*-------------------------------------------------- 
//* send as an attachment default name with html       
//*-------------------------------------------------- 
//MAIL2   EXEC PGM=IEBGENER                           
//SYSIN    DD DUMMY                                   
//SYSPRINT DD SYSOUT=*                                 
//SYSUDUMP DD SYSOUT=*                                 
//SYSUT1   DD *                                       
HELO SYSA                                             
MAIL FROM:<GL4M@TXU.COM>                               
RCPT TO:<gl4m@txu.com>                                 DATA                                                   
FROM:      <GL4M@TXU.COM>                             
TO:         gl4m@txu.com                               
SUBJECT: simple mime                                   
MIME-Version: 1.0                                     
Content-type: text/html;               
 <PRE> <FONT FACE="ARIAL" SIZE=1>                                             this is a test mime                   
nothing fancy                                                                 
.                                     
quit                                   
/*                                     
//SYSUT2   DD SYSOUT=(B,SMTP)         
//                                     


Regards,
Sandip.
Back to top
View user's profile Send private message
Display posts from previous:   
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL All times are GMT + 6 Hours
Page 1 of 1