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
 

 

Rearrange group of colums to one record.

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

New User


Joined: 08 Jan 2013
Posts: 6
Location: india

PostPosted: Tue Jan 08, 2013 3:29 pm    Post subject: Rearrange group of colums to one record.
Reply with quote

Hi All,

I am new to this forum. I have one requirement which I would like to do using DFSORT instead of COBOL program. I have checked in DFSORT material to get the solution but I can able to see only Transpose related solutions. I have mentioned the requirement below. Please let me know if any solutions. Thanks in advance.

Input file: Rec length -80, Type-Fixed Block

Code:

ABC DEF GHI COMMENT1
ABC DEF GHI COMMENT2
ABC DEF GHI COMMENT3
ABC DEF GHI COMMENT4
JKL MNO PQR COMMENT1
JKL MNO PQR COMMENT2
STU VWX YZA COMMENT3
STU VWX YZA COMMENT2
STU VWX YZA COMMENT3
BCD EFG HIJ COMMENT2
KLM NOP QRS COMMENT2
KLM NOP QRS COMMENT1
KLM NOP QRS COMMENT2
KLM NOP QRS COMMENT3
KLM NOP QRS COMMENT5
TUV WXY ZAB COMMENT1
TUV WXY ZAB COMMENT2
TUV WXY ZAB COMMENT3
TUV WXY ZAB COMMENT4
TUV WXY ZAB COMMENT5
TUV WXY ZAB COMMENT6
TUV WXY ZAB COMMENT7


Expected output: Rec length -500, Type-Fixed Block
(Should be take the maximum COMMENTS from input file is 5)
Code:

ABC DEF GHI COMMENT1 COMMENT2 COMMENT3 COMMENT4
JKL MNO PQR COMMENT1 COMMENT2
STU VWX YZA COMMENT3 COMMENT2 COMMENT3
BCD EFG HIJ COMMENT2
KLM NOP QRS COMMENT2 COMMENT1 COMMENT2 COMMENT3 COMMENT5
TUV WXY ZAB COMMENT1 COMMENT2 COMMENT3 COMMENT4 COMMENT5
Back to top
View user's profile Send private message

pradeean

New User


Joined: 08 Jan 2013
Posts: 6
Location: india

PostPosted: Tue Jan 08, 2013 6:58 pm    Post subject:
Reply with quote

Hi,

I have founded the same post in this forum which is similar to my requirement. it is available in http://ibmmainframes.com/about58061.html. Thanks
Back to top
View user's profile Send private message
Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7315

PostPosted: Tue Jan 08, 2013 7:13 pm    Post subject: Reply to: Rearrange group of colums to one record.
Reply with quote

Good searching. I believe there are a couple of more recent examples as well.
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Tue Jan 08, 2013 10:02 pm    Post subject: Reply to: Rearrange group of colums to one record.
Reply with quote

Hello and welcome to the forum,

Good job looking for and finding what you needed icon_smile.gif

Enjoy the forum!

d
Back to top
View user's profile Send private message
pradeean

New User


Joined: 08 Jan 2013
Posts: 6
Location: india

PostPosted: Wed Jan 09, 2013 9:05 am    Post subject:
Reply with quote

Thank you 'Bill Woodger' and 'dick scherrer'.
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 find RACF group for access to spooled... jzhardy JCL & VSAM 1 Mon May 08, 2017 11:46 am
No new posts Adding big TEXT lines to each record ... bshkris SYNCSORT 4 Sat May 06, 2017 1:40 am
This topic is locked: you cannot edit posts or make replies. Merge two files and update Trailer re... Yashashri JCL & VSAM 1 Thu May 04, 2017 12:54 pm
No new posts Group Data based on a key Arun Raj DFSORT/ICETOOL 7 Thu Apr 27, 2017 11:29 pm
No new posts Need Help with : IFTHEN(WHEN=GROUP) Sumanta_89 DFSORT/ICETOOL 1 Wed Apr 19, 2017 5:23 pm


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