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
 

 

To replace low values by spaces using ICETOOL

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

New User


Joined: 16 Nov 2006
Posts: 10

PostPosted: Fri Nov 24, 2006 4:40 pm    Post subject: To replace low values by spaces using ICETOOL
Reply with quote

Is there a way to take a large file and replace all low values from the file with spaces instead ( using icetool/dfsort plz)
Back to top
View user's profile Send private message

subhasis_50

Moderator


Joined: 09 Mar 2005
Posts: 363
Location: Earth

PostPosted: Fri Nov 24, 2006 5:22 pm    Post subject: Re: to replace low values by spaces using icetool
Reply with quote

Hi,
Yes you can do this by using ALTSEQ in sort.

Code:

//STEP1   EXEC  PGM=SORT             
//SYSOUT   DD SYSOUT=*               
//SORTIN   DD DSN=INPUTFILE, 
//            DISP=SHR               
//SORTOUT  DD DSN=OUTPUTFILE, 
//            DISP=(NEW,CATLG,DELETE),
//            UNIT=SYSDA,
//            SPACE=(TRK,(1,1),RLSE) 
//SYSIN DD *                         
  OPTION COPY                         
  ALTSEQ CODE=(0040)                 
  OUTREC FIELDS=(1,RECORDLENGTH,TRAN=ALTSEQ)   
/*                 


change the recordlength based on your file. For details
see
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/ICE1CA10/3.4?DT=20050222160456

Hope it helps!
Back to top
View user's profile Send private message
fuadk84

New User


Joined: 16 Nov 2006
Posts: 10

PostPosted: Fri Nov 24, 2006 6:16 pm    Post subject: Re: to replace low values by spaces using icetool
Reply with quote

Thnk you.... i tried de same but stil
am left with one or two low values in the ps...
Back to top
View user's profile Send private message
William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 3158
Location: Tucson AZ

PostPosted: Fri Nov 24, 2006 6:39 pm    Post subject:
Reply with quote

Maybe Frank might have an answer, but it's 5am for him now.... icon_eek.gif
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 Nov 24, 2006 9:56 pm    Post subject:
Reply with quote

fuadk84,

The technique shown above will do what you want for an FB file. If the input file has RECFM=FB and all of the X'00' values were not changed to X'40' values, then I can only guess that you did not set the recordlength in the OUTREC statement correctly. If the input file has RECFM=VB, then you need this OUTREC statement:

Code:

  OUTREC FIELDS=(1,4,5,TRAN=ALTSEQ)


For more details, see the "Change all zeros in your records to spaces" Smart DFSORT Trick at:

http://www.ibm.com/servers/storage/support/software/sort/mvs/tricks/

If that doesn't help, then you need to tell me the RECFM and LRECL of your input file, show me the job you used, and give me an example of an input record and output record where all of the X'00' values were not changed to X'40' values.
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 BI,TO=ZD Changing Values Tyler Dunbar DFSORT/ICETOOL 1 Tue Jul 25, 2017 12:12 am
No new posts Sorting of hex values Saurabh_mi DFSORT/ICETOOL 11 Thu May 25, 2017 3:49 pm
No new posts Fileaid Update Replace with null string descann Compuware & Other Tools 4 Mon May 15, 2017 3:00 pm
No new posts Replace values in the input data Vikas Maharnawar DFSORT/ICETOOL 10 Thu May 11, 2017 2:18 pm
No new posts Using ICETOOL, how we can seperate th... bshkris SYNCSORT 5 Tue May 09, 2017 8:33 pm


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