JCL发送EMAIL

//IBMUSER JOB 0R                A1011000010TEST,CLASS=3,        
//        MSGCLASS=R,REGION=0M                                   
//*                                                              
//STEP01   EXEC PGM=IEBGENER  
//SYSOUT DD SYSOUT= *                                                                          
//SYSUT1   DD  *                                                 
HELO MVS                                                         
MAIL FROM:<54XIAOWONIU@SINA.CN>                               
RCPT TO:<54XIAOWONIU@SINA.CN>                                  
DATA                                                             
FROM:<54XIAOWONIU@SINA.CN>                                       
TO:<54XIAOWONIU@SINA.CN>                                         
SUBJECT: JOB IBMUSERJ HAS COMPLETED SUCCESSFULLY                      
START OF MESSAGE...                                              
   ***    DO NOT REPLY TO THIS MESSAGE    ***   
//SYSUT2   DD  SYSOUT=A,DEST=(YOURDEST,IPSMTP)                   
//SYSPRINT DD SYSOUT=*                                           
//SYSIN    DD DUMMY