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
 

 

sort data conversion

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

New User


Joined: 10 Mar 2006
Posts: 4

PostPosted: Fri Mar 10, 2006 2:02 am    Post subject: sort data conversion
Reply with quote

I am trying to extract a portion of a record using sort. The record layout is as follows: sd0904050698001c1c,,,,,
I need to copy the data in postion 3-12 to the outrec, change the data in position 13 which is comp-3 and position 15 which is comp-3 to 001 and 1 resepectively to the outrec.
I can manage 3-12 fine, but cannot find the correct syntax for the remaining positions.
Any assistance is appreciated
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: Fri Mar 10, 2006 2:33 am    Post subject:
Reply with quote

Quote:
the data in position 13 which is comp-3 and position 15 which is comp-3 to 001 and 1 resepectively


Not sure what you mean. It looks like 13-14 has X'001C' (2 bytes) and 15 has X'1C' (1 byte), but you say you want to change them to '001' (3 bytes) and '1' (1 byte), so you're adding a byte. If you want '001' and '1' regardless of what's in 13-14 and 15, you could use C'001',C'1'. If you want to convert the PD value in those fields to ZD values, you could use 13,2,PD,TO=ZD,LENGTH=3,15,1,PD,TO=ZD,LENGTH=1 or 13,2,PD,EDIT=(TTT),15,1,PD,EDIT=(T).

If none of that helps, you need to explain more clearly what you want to do.
Back to top
View user's profile Send private message
iggy

New User


Joined: 10 Mar 2006
Posts: 4

PostPosted: Fri Mar 10, 2006 2:42 am    Post subject: Used 13,2,PD,EDIT=(TTT),15,1,PD,EDIT=(T) and got,,,
Reply with quote

Seems it lost the field that is in postion 15.
New Outrec:
0820385479001
0860498952002
0820469274002
many more records follow,,,
Inrec
SD0820385479...
ECFFFFFFFFFF011
2408203854790CC
--------------
SD0860498952...
ECFFFFFFFFFF022
2408604989520CC
--------------
SD0820469274...
ECFFFFFFFFFF022
2408204692740CC
Back to top
View user's profile Send private message
iggy

New User


Joined: 10 Mar 2006
Posts: 4

PostPosted: Fri Mar 10, 2006 2:46 am    Post subject: Thanks Frank,
Reply with quote

I found the problem, was the size of the output file
THank you very much.
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 Export flat file data into excel sheet murali.andaluri DFSORT/ICETOOL 2 Mon Mar 20, 2017 5:39 pm
No new posts Append data from two files into a sin... Praveen04 DFSORT/ICETOOL 5 Thu Mar 16, 2017 7:29 pm
No new posts Innovations in Your Mainframe Sort Arun Raj PC Guides & IT News 4 Wed Mar 15, 2017 10:38 pm
No new posts SORT VSAM file with each field one by... maxsubrat DFSORT/ICETOOL 6 Tue Mar 14, 2017 1:07 pm
No new posts SORT requirement sjiraga COBOL Programming 6 Thu Mar 09, 2017 9:11 pm


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