|
View previous topic :: View next topic
|
| Author |
Message |
fuadk84
New User
Joined: 16 Nov 2006
Posts: 10
|
|
|
|
| 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 |
|
 |
subhasis_50
Moderator
Joined: 09 Mar 2005
Posts: 363
Location: Earth
|
|
|
|
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
publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/ICE1CA10/3.4?DT=20050222160456
Hope it helps! |
|
| Back to top |
|
|
fuadk84
New User
Joined: 16 Nov 2006
Posts: 10
|
|
|
|
Thnk you.... i tried de same but stil
am left with one or two low values in the ps... |
|
| Back to top |
|
|
William Thompson
Global Moderator
Joined: 18 Nov 2006
Posts: 3156
Location: Tucson AZ
|
|
|
|
Maybe Frank might have an answer, but it's 5am for him now....  |
|
| Back to top |
|
|
Frank Yaeger
DFSORT Developer
Joined: 15 Feb 2005
Posts: 7129
Location: San Jose, CA
|
|
|
|
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:
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 |
|
|
|
|
