Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Code a jcl with the following conditions

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL
View previous topic :: :: View next topic  
Author Message
rohit jaiswal
Warnings : 2

New User


Joined: 09 Mar 2006
Posts: 36
Location: hyderabad,A.P

PostPosted: Thu Apr 10, 2008 11:58 am    Post subject: Code a jcl with the following conditions
Reply with quote

hi

I have to code a jcl with the following conditions. need help


Write the Records from one Input File in to 3 Output Files in the following Fashion.


All the Three Output Files are of Length 100.


While copying the Records of the Input File to the Output file use below conditions.


· First 30 Bytes of the Output Record will be copied directly from first 30 Bytes of Input Record.

· 31-40 Bytes of the Output Record should be spaces.

· 41-70 Bytes of the Output Record will be copied directly from 31-60 Bytes of Input Record.

· 71-80 Bytes of the Output Record should be spaces.

· 81-100 Bytes of the Output Record will be copied directly from 61-80 Bytes of Input Record.



1st 3 Records of the Input File should be written to First Output file, 2nd 3 Records of the Input File should be written to Second Output file, 3rd 3 Records of the Input File should be written to Third Output file and then again 4th 3 Records of the Input File should be written to First Output file again and soon this cycle continues till all the Records of the Input File are copied.
Back to top
View user's profile Send private message

expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Thu Apr 10, 2008 12:00 pm    Post subject:
Reply with quote

Seems to me that homework could be getting more challenging these days icon_wink.gif
Back to top
View user's profile Send private message
sril.krishy

Active User


Joined: 30 Jul 2005
Posts: 182
Location: hyderabad

PostPosted: Thu Apr 10, 2008 12:31 pm    Post subject:
Reply with quote

Rohit jaiswal,
We can provide the JCL for you.But the question seems to be an exercise given to you to learn the SORT.Here are the hints to achive it.

1)Use the OUTREC option to get records as per the first 5 conditions.
2)Use the SPLITBY option to get the records placed in diffrent files randomly.

You can serch the forum to get the examples on the above 2 options.


Thanks
Krishy
Back to top
View user's profile Send private message
rohit jaiswal
Warnings : 2

New User


Joined: 09 Mar 2006
Posts: 36
Location: hyderabad,A.P

PostPosted: Thu Apr 10, 2008 12:57 pm    Post subject: Reply to: JCL REquired
Reply with quote

hi krishy

Can you let me know what utility will be useful in doing it and can u let me know the site from where i can get the document and research on the topics mentioned by you.
Back to top
View user's profile Send private message
Aaru

Senior Member


Joined: 03 Jul 2007
Posts: 1288
Location: Chennai, India

PostPosted: Thu Apr 10, 2008 2:23 pm    Post subject: Reply to: JCL REquired
Reply with quote

Rohit,

Quote:
Can you let me know what utility will be useful in doing it and can u let me know the site from where i can get the document and research on the topics mentioned by you.


DFSORT can be used for this reqt. Please check the DFSORT GETTING STARTED.pdf available in the manuals section. It is an excellant tutorial.
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Moderator


Joined: 15 Feb 2005
Posts: 7130
Location: San Jose, CA

PostPosted: Thu Apr 10, 2008 8:56 pm    Post subject:
Reply with quote

Rohit,

You can use the BUILD operand of DFSORT's INREC or OUTREC statement and the SPLITBY operand of DFSORT's OUTFIL statement to do what you asked for.

You can access all of the DFSORT books from:

www.ibm.com/servers/storage/support/software/sort/mvs/srtmpub.html
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 -> DFSORT/ICETOOL All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts How to Capture the Max return code of... anilkumar922 All Other Mainframe Topics 0 Thu Jan 12, 2017 12:02 pm
This topic is locked: you cannot edit posts or make replies. Calling REXX code from ISPF panel sanchita dey TSO/ISPF 4 Mon Jan 02, 2017 5:13 pm
No new posts PL/I code tuning/Performance improvement Virendra Shambharkar PL/I & Assembler 4 Mon Dec 05, 2016 11:57 am
No new posts What is the code in CLIST to enable t... jackzhang75 CLIST & REXX 1 Fri Dec 02, 2016 3:02 am
No new posts IDEAL - Code Retrieval yugendran CA Products 0 Fri Nov 25, 2016 3:27 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us