Joined: 26 Nov 2002 Posts: 12376 Topics: 75 Location: San Jose
Posted: Mon Sep 26, 2005 7:22 am Post subject:
Stalin,
Please do not address me personally requesting help . There are many people who help in here along with me. Also do not tag your questions to an already existing questions and which do not have any relation to your current question.
I am moving your question as seperate topic titled "Re-arrange columns using Sort"
As for your question, it is a simple task using OUTREC FIELDS.
Code:
//SYSIN DD *
SORT FIELDS=COPY
OUTREC FIELDS=(8,5, $ FIELD2 AT POS 8 FOR 6 BYTES
1,7, $ FIELD1 AT POS 1 FOR 7 BYTES
13,68) $ REST OF THE FIELDS
Joined: 02 Dec 2002 Posts: 1618 Topics: 31 Location: San Jose
Posted: Tue Jul 29, 2008 10:46 am Post subject:
In order to move 6 characters from column 68 to column 75, you would need to use:
75:68,6
75: gives the starting output column as 75.
68,6 gives the input field to move as 68,6.
It's not clear what you're trying to do with the rest of the record, so I can't show you the complete control statements.
If you need more help, show what you expect for the output record and explain the "rules" for getting from input to output.
If you're not familiar with DFSORT and DFSORT's ICETOOL, I'd suggest reading through "z/OS DFSORT: Getting Started". It's an excellent tutorial, with lots of examples, that will show you how to use DFSORT, DFSORT's ICETOOL and DFSORT Symbols. You can access it online, along with all of the other DFSORT books, from:
You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum