Replace low values with spaces



Support for NetApp SyncSort for z/OS, Visual SyncSort, SYNCINIT, SYNCLIST and SYNCTOOL

Replace low values with spaces

Postby karthikchn » Fri May 28, 2010 9:33 am

Hi,
I used an icetool job to merge 11 files with different LRECL(80, 100 and 133) using INREC OVERLAY=(133:X).
The 133 lrecl records came fine, but the records having lesser lrecl came out with padded low values.
Since this is a report, it looks very bad and I want to replace with spaces only where low values are there.
Can someone suggest an idea?


Thanks in advance,
Karthikeyan.
karthikchn
 
Posts: 5
Joined: Thu Apr 29, 2010 6:02 pm
Has thanked: 0 time
Been thanked: 0 time

Re: Replace low values with spaces

 

Re: Replace low values with spaces

Postby dick scherrer » Fri May 28, 2010 9:41 am

Hello,

When you have a question, please start a new topic for your question rather than replying to a topic that has been inactive for more than a year.

It will help someone help you if you post the jcl and control statements you used.
Hope this helps,
d.sch.
User avatar
dick scherrer
Global moderator
 
Posts: 6304
Joined: Sat Jun 09, 2007 8:58 am
Has thanked: 3 times
Been thanked: 91 times

Re: Replace low values with spaces

Postby Frank Yaeger » Fri May 28, 2010 10:05 pm

Can someone suggest an idea?


Not unless you do a much better job of telling/showing us what you did.

MERGE means that the records in each file are already sorted - is that what you mean by MERGE? If not, what do you mean?

Did you really MERGE the files using the MERGE operator, or did you do something else using another operator - which one? How are we to know unless you tell/show us what you did? Show your complete JCL and JES log including the //TOOLMSG and //DFSMSG messages you received.
Frank Yaeger - DFSORT Development Team (IBM) - yaeger@us.ibm.com
Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration
=> DFSORT/MVS is on the Web at http://www.ibm.com/storage/dfsort
User avatar
Frank Yaeger
Global moderator
 
Posts: 1080
Joined: Sat Jun 09, 2007 8:44 pm
Has thanked: 0 time
Been thanked: 14 times

Re: Replace low values with spaces

Postby karthikchn » Sat May 29, 2010 2:12 pm

This is the JCL is used .
//ZEFT80  EXEC PGM=SYNCTOOL                                     
//SYSPRINT  DD  SYSOUT=*                                         
//IN1       DD  DSN=PROD.BATCH.CNTLCRDS(GZSBAN46),DISP=SHR       
//IN2       DD  DSN=PROD.BATCH.CNTLCRDS(GZEFBAN1),DISP=SHR       
//IN3       DD  DSN=PROD.BATCH.CNTLCRDS(GZEFBAN2),DISP=SHR       
//IN4       DD  DSN=PROD.GZSF.JV77.EFTCDNG.ERROR(0),DISP=SHR     
//IN5       DD  DSN=PROD.GZSF.JV77.JVEFT14.PRJVME1(0),DISP=SHR   
//IN6       DD  DSN=PROD.GZSF.JV77.ADDRPG(0),DISP=SHR           
//IN7       DD  DSN=PROD.GZSF.JV77.JVEFT17.ERJVME1(0),DISP=SHR   
//IN8       DD  DSN=PROD.BATCH.CNTLCRDS(GZEFBAN3),DISP=SHR       
//IN9       DD  DSN=PROD.GZSF.JV77.GCAC.ERCK1(0),DISP=SHR       
//IN10      DD  DSN=PROD.BATCH.CNTLCRDS(GZEFBAN4),DISP=SHR       
//IN11      DD  DSN=PROD.GZSF.JV77.EFTCDMP.ERROR(0),DISP=SHR     
//OUT       DD  DSN=TEST.GZSF.JV77.EFTREP.MERGE,                 
//            DATACLAS=SMSALLOC,DISP=(MOD,CATLG,DELETE)         
//TOOLIN    DD  DSN=TEST.TEST.KSUBRA.CNTLCRDS(GZEFT80A),DISP=SHR
//TOOLMSG   DD  SYSOUT=*                                         
//SSMSG     DD  SYSOUT=*     
//DFSMSG    DD  SYSOUT=*                                       
//CTL1CNTL  DD  DSN=TEST.TEST.KSUBRA.CNTLCRDS(GZEFT80B),DISP=SHR



Where TOOLIN is

********************************* Top of
COPY FROM(IN1) TO(OUT) USING(CTL1)
COPY FROM(IN2) TO(OUT) USING(CTL1)
COPY FROM(IN3) TO(OUT) USING(CTL1)
COPY FROM(IN4) TO(OUT) USING(CTL1)
COPY FROM(IN5) TO(OUT)
COPY FROM(IN6) TO(OUT) USING(CTL1)
COPY FROM(IN7) TO(OUT) USING(CTL1)
COPY FROM(IN8) TO(OUT) USING(CTL1)
COPY FROM(IN9) TO(OUT) USING(CTL1)
COPY FROM(IN10) TO(OUT) USING(CTL1)
COPY FROM(IN11) TO(OUT) USING(CTL1)
******************************** Bottom


and CTL1 is

  INREC OVERLAY=(133:X)



Thanks in advance,
Karthikeyan
karthikchn
 
Posts: 5
Joined: Thu Apr 29, 2010 6:02 pm
Has thanked: 0 time
Been thanked: 0 time

Re: Replace low values with spaces

Postby dick scherrer » Sat May 29, 2010 9:30 pm

Hello,

When posting a question, you need to post in the proper part of the forum. You are using Syncsort not DFSORT.

Topic moved to correct part of the forum.

d
User avatar
dick scherrer
Global moderator
 
Posts: 6304
Joined: Sat Jun 09, 2007 8:58 am
Has thanked: 3 times
Been thanked: 91 times

Re: Replace low values with spaces

Postby Alissa Margulies » Fri Jun 04, 2010 12:23 am

I submitted the following job:
//STEP1  EXEC PGM=SYNCTOOL                   
//TOOLMSG  DD SYSOUT=*                       
//DFSMSG   DD SYSOUT=*                       
//IN1 DD DSN=IN1.FB8,DISP=SHR               
//IN2 DD DSN=IN2.FB10,DISP=SHR             
//IN3 DD DSN=IN3.FB13,DISP=SHR             
//OUT DD DSN=TOOL.OUT,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)                     
//CTL1CNTL DD *                             
  OUTREC OVERLAY=(13:X) 

Where IN1 is:
11111111

IN2 is:
2222222222

IN3 is:
3333333333333

And here is the output produced:
11111111
2222222222   
3333333333333

As you can see, the padding values are blanks (X'40').
Alissa Margulies
Syncsort Mainframe Product Services
201-930-8260
zos_tech@syncsort.com
Alissa Margulies
Global moderator
 
Posts: 369
Joined: Tue Feb 26, 2008 11:15 pm
Location: USA
Has thanked: 1 time
Been thanked: 1 time


Return to Syncsort/Synctool

 


  • Related topics
    Replies
    Views
    Last post