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
 
Merging file data using ICETOOL

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
kishpra

New User


Joined: 24 May 2010
Posts: 91
Location: Pune

PostPosted: Tue Aug 04, 2015 2:15 pm    Post subject: Merging file data using ICETOOL
Reply with quote

Hi All,

I have used ICETOOL to merge the files data.

Code:
S29TL   EXEC PGM=ICETOOL,COND=(8,LE)
TOOLMSG   DD  SYSOUT=*
DFSMSG    DD  SYSOUT=*

IN1       DD  DSN=WLB.TEST.EJR.AIH.OUTPUT.O3,DISP=SHR
IN2       DD  DSN=WLB.TEST.ACQ.AIH.OUTPUT.O3,DISP=SHR
IN3       DD  DSN=WLB.TEST.SAC.AIH.OUTPUT.O3,DISP=SHR
OUT       DD  DSN=WLB.TEST.OUTPUT,DISP=(MOD,CATLG,DELETE),

TOOLIN    DD  *
COPY FROM(IN1) TO(OUT) USING(CTL1)
COPY FROM(IN2) TO(OUT) USING(CTL1)
COPY FROM(IN3) TO(OUT) USING(CTL1)

CTL1CNTL  DD  *
OPTION COPY
/*



The output file has the below data with HEX ON:

Code:
wase.20150802.dat|20110802|3596808
AA888A84FFFFFFFF488A4FFFFFFFF4FFFFFFF4
3633125B20150802B413F20150802F35968080
--------------------------------------
watt.20150802.dat|20110802|2903    ,
A8A8AA4FFFFFFFF488A4FFFFFFFF4FFFF44440
346133B20150802B413F20150802F290300000
--------------------------------------
wsac.20150802.dat|20110802|5898213
AA88A884FFFFFFFF488A4FFFFFFFF4FFFFFFF4
3633213B20150802B413F20150802F58982130


The second row has the pipe delimiter which is one space to the left as compared to first and third record. So the second record is getting some hex '00' value at last.

Please elt me know how to squeeze the data or to have X(40) in the second record at last.

Thank you.

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

Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7315

PostPosted: Tue Aug 04, 2015 3:21 pm    Post subject: Reply to: Merging file data using ICETOOL
Reply with quote

In a SORT/ICETOOL context, MERGE has a specific meaning, and it is not what you think it is.

You want to concatenate your data. You have chosen a strange way. A simple SORT with a COPY operation will do you, with the three datasets concatenated on the SORTIN DD... if, that is, the datasets are the same RECFM (yes, they are) and LRECL (unclear).

What is the LRECL of your three input datasets and your output dataset?
Back to top
View user's profile Send private message
kishpra

New User


Joined: 24 May 2010
Posts: 91
Location: Pune

PostPosted: Tue Aug 04, 2015 3:38 pm    Post subject: Reply to: Merging file data using ICETOOL
Reply with quote

LRECL for firs and second dataset is 38 and second is 37.
Back to top
View user's profile Send private message
Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7315

PostPosted: Tue Aug 04, 2015 3:58 pm    Post subject: Reply to: Merging file data using ICETOOL
Reply with quote

Code:
TOOLIN    DD  *
COPY FROM(IN1) TO(OUT)
COPY FROM(IN2) TO(OUT) USING(CTL1)
COPY FROM(IN3) TO(OUT)

CTL1CNTL  DD  *
 INREC OVERLAY=(38:X)


You don't need a USING if you are doing nothing other than what the ICETOOL operator is doing.

For your short records, you need to make them longer. So you use a USING and in that USING set column 38 to blank.
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 -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts editting the file by inserting zeros ... pramodrsingh DFSORT/ICETOOL 9 Mon Aug 21, 2017 5:58 pm
No new posts Match two files using multiple keys a... santoshks1987 SYNCSORT 11 Fri Aug 18, 2017 10:50 am
No new posts Multiple VSAM files single output fil... Mohan Kothakota DFSORT/ICETOOL 11 Wed Aug 09, 2017 7:57 pm
This topic is locked: you cannot edit posts or make replies. rexx code to create a ps file Bharath Vikraman CLIST & REXX 4 Mon Aug 07, 2017 10:30 am
No new posts Unable to copy data from spool in a d... srikant314 JCL & VSAM 8 Fri Jul 28, 2017 9:10 pm


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