Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
Error in the JCL which is used to send Email

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> ABENDS & Debugging
View previous topic :: :: View next topic  
Author Message
ajishvijay
Warnings : 1

New User


Joined: 02 Aug 2006
Posts: 9

PostPosted: Thu Aug 03, 2006 10:40 am    Post subject: Error in the JCL which is used to send Email
Reply with quote

What changes should i make in the jcl to send email properly?
Code:

//ESCUB01E JOB NOTIFY=&SYSUID                                           
//S1 EXEC PGM=IEBGENER                                                 
//SYSIN DD DUMMY                                                       
//*                                                                     
//SYSUT1 DD *                                                           
HELO N1                                                                 
MAIL FROM: <ESCUB01@N1.XYZ.COM>                                         
RCPT TO: <AJISHVIJAY@GMAIL.COM>                                         
DATA                                                                   
TO: <AJISHVIJAY@GMAIL.COM>                                             
FROM: "AJISH"<ESCUB01@N1.XYZ.COM>>                                     
SUBJECT: TCP/IP MAIL FROM MVS BATCH ON SYSA                             
THIS IS A TEST MESSAGE FROM BATCH.                                     
/*                                                                     
// DD DISP=SHR,DSN=MORE.EMAIL.DATA                                     
//*                                                                     
//SYSUT2 DD SYSOUT=(B,SMTP)                                             
//*
Back to top
View user's profile Send private message

donevin

New User


Joined: 07 Jun 2005
Posts: 70
Location: South Africa

PostPosted: Thu Aug 03, 2006 7:45 pm    Post subject: Re: Error in the JCL which is used to send Email
Reply with quote

What is the errors that you get?
Back to top
View user's profile Send private message
ajishvijay
Warnings : 1

New User


Joined: 02 Aug 2006
Posts: 9

PostPosted: Fri Aug 04, 2006 10:08 am    Post subject:
Reply with quote

The error i got is

DATA SET CANNOT FOUND
Back to top
View user's profile Send private message
donevin

New User


Joined: 07 Jun 2005
Posts: 70
Location: South Africa

PostPosted: Fri Aug 04, 2006 1:24 pm    Post subject:
Reply with quote

I would like to see the job output, but for now add after the SYSIN statement
Code:
//SYSPRINT DD SYSOUT=*
Back to top
View user's profile Send private message
ajishvijay
Warnings : 1

New User


Joined: 02 Aug 2006
Posts: 9

PostPosted: Fri Aug 04, 2006 2:00 pm    Post subject:
Reply with quote

Following is the IESJCL mesg


1 //ESCUB01E JOB NOTIFY=&SYSUID
IEFC653I SUBSTITUTION JCL - NOTIFY=ESCUB01
2 //S1 EXEC PGM=IEBGENER
3 //SYSIN DD DUMMY
4 //SYSPRINT DD SYSOUT=*
//*
5 //SYSUT1 DD *
6 // DD DISP=SHR,DSN=MORE.EMAIL.DATA
//*
7 //SYSUT2 DD SYSOUT=(B,SMTP)
//*



The JESYSMSG is

ICH70001I ESCUB01 LAST ACCESS AT 02:39:17 ON FRIDAY, AUGUST 4, 2006
IEF212I ESCUB01E S1 SYSUT1 +001 - DATA SET NOT FOUND
IEF272I ESCUB01E S1 - STEP WAS NOT EXECUTED.
IEF373I STEP/S1 /START 2006216.0257
IEF374I STEP/S1 /STOP 2006216.0257 CPU 0MIN 00.00SEC SRB 0MIN 00.00S
IEF375I JOB/ESCUB01E/START 2006216.0257
IEF376I JOB/ESCUB01E/STOP 2006216.0257 CPU 0MIN 00.00SEC SRB 0MIN 00.00S
Back to top
View user's profile Send private message
shreevamsi

Active User


Joined: 23 Feb 2006
Posts: 305
Location: Hyderabad,India

PostPosted: Fri Aug 04, 2006 2:11 pm    Post subject:
Reply with quote

I don;t find any wrong with the JCL.

Please check whether MORE.EMAIL.DATA is existing or not.

Even thougt it is existing, record format should be FB.

~Vamsi
Back to top
View user's profile Send private message
ajishvijay
Warnings : 1

New User


Joined: 02 Aug 2006
Posts: 9

PostPosted: Sat Aug 05, 2006 2:11 pm    Post subject:
Reply with quote

Now no errors, but email is not received to the specified email-id
Back to top
View user's profile Send private message
pattabiraman.baskaran

New User


Joined: 10 Aug 2006
Posts: 23

PostPosted: Fri Aug 18, 2006 10:05 am    Post subject:
Reply with quote

No comment (//*) statment should be included inside the SYSIN parameter. If any such thing is included then it will not read the SYSIN values. Try removing the comment line next to DSN=MORE.EMAIL.DATA.
Code:
//ESCUB01E JOB NOTIFY=&SYSUID                                           
//S1 EXEC PGM=IEBGENER                                                 
//SYSIN DD DUMMY                                                       
//*                                                                     
//SYSUT1 DD *                                                           
HELO N1                                                                 
MAIL FROM: <ESCUB01@N1.XYZ.COM>                                         
RCPT TO: <AJISHVIJAY@GMAIL.COM>                                         
DATA                                                                   
TO: <AJISHVIJAY@GMAIL.COM>                                             
FROM: "AJISH"<ESCUB01@N1.XYZ.COM>>                                     
SUBJECT: TCP/IP MAIL FROM MVS BATCH ON SYSA                             
THIS IS A TEST MESSAGE FROM BATCH.                                     
/*                                                                     
// DD DISP=SHR,DSN=MORE.EMAIL.DATA   
//SYSUT2 DD SYSOUT=(B,SMTP)                                             
//*


Correct me if i am wrong icon_biggrin.gif
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> ABENDS & Debugging All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts FUSE - IBM MQ - CICS integration error Kevin Vaz CICS 1 Mon Sep 18, 2017 4:31 pm
No new posts Reply MQ open error Vignesh Sid COBOL Programming 5 Thu Sep 07, 2017 6:02 pm
No new posts Error in SQL-PLIST3 'Above value tru... rikdeb DB2 4 Wed Sep 06, 2017 1:34 pm
No new posts WER268A OUTREC STATEMENT : SYNTAX E... frozenblood87 SYNCSORT 12 Sat Aug 26, 2017 9:45 pm
No new posts DB2 Program abending without giving a... rahulgarg14 DB2 7 Mon May 29, 2017 8:10 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us