Hi Guru's,
Requirement:- Need to Format an input file with LRECL=200 to Another file with LRECL=133 which can be used as an input to next step.
Search Result:- Similar tailoring can be done thru ICETOOL
Question:- Is there any other simpler way which i may not know of??
Thanks in Advance,
Gopal Prashad
Copying a File with LRECL=200 to LRECL=132.
Moderators: Frank Yaeger, DikDude, Moderator Group
- Frank Yaeger
- Moderator
- Posts: 812
- Joined: Sat Feb 18, 2006 5:45 am
- Location: San Jose, CA
- Contact:
What do you mean by "format". Do you mean you just want the first 133 bytes of the 200 byte input file for output? If so, this is quite easy to do with ICEGENER or DFSORT copy, both of which can truncate the output records based on the LRECLs.
Or do you mean something else (what exactly)?
Or do you mean something else (what exactly)?
Frank Yaeger - DFSORT Development Team (IBM) - yaeger@us.ibm.com
Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration
=> DFSORT/MVS is on the Web at http://www.ibm.com/storage/dfsort
Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration
=> DFSORT/MVS is on the Web at http://www.ibm.com/storage/dfsort
Thanks Guru For Responding,
I have tried to give more details of my Running Issue. Let me know if you need more. Correct me if i am wrong. Guide my directions as i need.
Subject--> Need to send a mail with attached notepad. This notepad has copy of GDG(0). The GDG itself is a load of a Table.
Details-->
GDG -->IS00711.E.MC00JCL5.LCX4.T705LOD(+0) which has load of a table.
I want this to mail to my XXXX@Headstrong.com ID in notepad attachment.
----------------------------------------------------------------------------------------
My JCL for Email-->
//JS000010 EXEC PGM=IEBGENER
//OUTPUT DD SYSOUT=*
//SYSIN DD DUMMY
//SYSUT1 DD DISP=SHR,
// DSN=IS00711.E.AUTOMCL5.TEST200 -->MIME to send notepad in mail
// DD DISP=SHR,
// DSN=IS00711.E.AUTOMCL5.DATA200 -->Actual Data to send in notepd
//SYSUT2 DD SYSOUT=(B,SMTP)
//SYSOUT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//*
//*****************************************************************
BOTH THE ABOVE DSN HAS LRECL =200, & I think when u do SMTP it only consider LRECL up to 133.
Correct me if i am wrong??
Is this the reason i am not able to receive Emial to my My Email Id.
What if my DSN has length greater then 133. Would i be able to get a mail attachment of that or not???
Problem 2: This JCL is not able to send me mail even if i reduce LRECL of both DSN to 133.
//******************************************************************
IS00711.E.AUTOMCL5.TEST200 is as follows.
2xx.xx.x.1xx
TO: gopal.prashad@headstrong.com
DATA
SUBJECT: automation testing
MIME-VERSION: 1.0
CONTENT-TYPE: MULTIPART/MIXED;
BOUNDARY="----_=_NEXTPART_000_01C0DFAD.3EF4A2D0"
------_=_NEXTPART_000_01C0DFAD.3EF4A2D0
HI GOPAL
PLEASE FIND THE ATTACHED MEDS704 BACKUP
THANKS,
AUTOMATION TEAM.
------_=_NEXTPART_000_01C0DFAD.3EF4A2D0
0000000445042MEDSBMEVNO2011-05-03I530161 00010000000000000 0000000000000 00
This is what i am getting in SYSUT2. but its not coming to my mail Id....
Sorry for the long post. Guru please help.
I have tried to give more details of my Running Issue. Let me know if you need more. Correct me if i am wrong. Guide my directions as i need.
Subject--> Need to send a mail with attached notepad. This notepad has copy of GDG(0). The GDG itself is a load of a Table.
Details-->
GDG -->IS00711.E.MC00JCL5.LCX4.T705LOD(+0) which has load of a table.
I want this to mail to my XXXX@Headstrong.com ID in notepad attachment.
----------------------------------------------------------------------------------------
My JCL for Email-->
//JS000010 EXEC PGM=IEBGENER
//OUTPUT DD SYSOUT=*
//SYSIN DD DUMMY
//SYSUT1 DD DISP=SHR,
// DSN=IS00711.E.AUTOMCL5.TEST200 -->MIME to send notepad in mail
// DD DISP=SHR,
// DSN=IS00711.E.AUTOMCL5.DATA200 -->Actual Data to send in notepd
//SYSUT2 DD SYSOUT=(B,SMTP)
//SYSOUT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//*
//*****************************************************************
BOTH THE ABOVE DSN HAS LRECL =200, & I think when u do SMTP it only consider LRECL up to 133.
Correct me if i am wrong??
Is this the reason i am not able to receive Emial to my My Email Id.
What if my DSN has length greater then 133. Would i be able to get a mail attachment of that or not???
Problem 2: This JCL is not able to send me mail even if i reduce LRECL of both DSN to 133.
//******************************************************************
IS00711.E.AUTOMCL5.TEST200 is as follows.
2xx.xx.x.1xx
TO: gopal.prashad@headstrong.com
DATA
SUBJECT: automation testing
MIME-VERSION: 1.0
CONTENT-TYPE: MULTIPART/MIXED;
BOUNDARY="----_=_NEXTPART_000_01C0DFAD.3EF4A2D0"
------_=_NEXTPART_000_01C0DFAD.3EF4A2D0
HI GOPAL
PLEASE FIND THE ATTACHED MEDS704 BACKUP
THANKS,
AUTOMATION TEAM.
------_=_NEXTPART_000_01C0DFAD.3EF4A2D0
0000000445042MEDSBMEVNO2011-05-03I530161 00010000000000000 0000000000000 00
This is what i am getting in SYSUT2. but its not coming to my mail Id....
Sorry for the long post. Guru please help.
- Frank Yaeger
- Moderator
- Posts: 812
- Joined: Sat Feb 18, 2006 5:45 am
- Location: San Jose, CA
- Contact:
I can't help you with this. I'm an expert on DFSORT, not SMTP or e-mail attachments. Perhaps somebody else will be able to help.
Frank Yaeger - DFSORT Development Team (IBM) - yaeger@us.ibm.com
Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration
=> DFSORT/MVS is on the Web at http://www.ibm.com/storage/dfsort
Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration
=> DFSORT/MVS is on the Web at http://www.ibm.com/storage/dfsort
This topic from earlier this week:
http://www.mainframegurukul.com/ibmmain ... highlight=
is almost exactly the same issue.
http://www.mainframegurukul.com/ibmmain ... highlight=
is almost exactly the same issue.
FREE TUTORIALS
Tutorials
Free tutorials from mainframegurukul
- JCL Tutorial
Covers all important JCL concepts. - Cobol Tutorial
This tutorials covers all Cobol Topics from STRING to COMP-3. - DB2 Tutorial
DB2 Tutorial focuses on DB2 COBOL Programming. - SORT Tutorial
This Tutorial covers all important aspects of DFSORT with examples - CICS Tutorial
This CICS tutorial covers CICS concepts and CICS Basics, CICS COBOL Programming.
Interview
Mainframe Interview questions
- Cobol Interview Questions
50+ Interview Questions - JCL Interview Questions
50+ Interview Questions - DB2 Interview Questions
100+ Interview Questions - CICS Interview Questions
70+ Interview Questions - VSAM Interview Questions
27 Interview Questions
Other References
Mainframe Tools and others
- XPEDITER Reference
Explains how we can debug a program - FILEAID Reference
Explains how to browse , edit and delete datasets - Change Man Reference
Quick Start tutorial on Changeman - Abend Reference
Important Abend codes explained - FaceBook Page
MainframeGurukul FaceBook Page - LinkedIn Page
MainframeGurkul Linkedin Page