View previous topic :: View next topic
|
Author |
Message |
Prathap Pillai P
New User
Joined: 08 Sep 2005 Posts: 16
|
|
|
|
I have a string (say AA)in a flat file(not fora PDS member) and i want to change all the string starting with AA to BB.Is there any JCL utility to do the same. |
|
Back to top |
|
|
guptae
Moderator
Joined: 14 Oct 2005 Posts: 1208 Location: Bangalore,India
|
|
Back to top |
|
|
Prathap Pillai P
New User
Joined: 08 Sep 2005 Posts: 16
|
|
|
|
Hi Ekta
I tried that but it didnt work,So if u have any JCl for Flat files. Please send it across me.
Thanks
Prathap |
|
Back to top |
|
|
shreevamsi
Active User
Joined: 23 Feb 2006 Posts: 305 Location: Hyderabad,India
|
|
|
|
IF there is FILEAID utility in your Shop, Try this JCL:
//**
//STEP010 EXEC PGM=FILEAID
//SYSUDUMP DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSLIST DD SYSOUT=*
//SYSTOTAL DD SYSOUT=*
//DD03 DD DISP=SHR,DSN=XXX.XXXX.XXXX
//SYSIN DD *
$$DD03 UPDATE ME=9999,
EA=(1,0,T"TAX",C"TAX1")
/*
~Vamsi |
|
Back to top |
|
|
Prathap Pillai P
New User
Joined: 08 Sep 2005 Posts: 16
|
|
|
|
Hey Vamsi,
Thanks its working |
|
Back to top |
|
|
Frank Yaeger
DFSORT Developer
Joined: 15 Feb 2005 Posts: 7129 Location: San Jose, CA
|
|
|
|
You can now use DFSORT's new FINDREP function available with z/OS DFSORT V1R5 PTF UK90013 (July, 2008) to do this kind of thing quite easily like this:
Code: |
//S1 EXEC PGM=ICEMAN
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=... input file
//SORTOUT DD DSN=... output file
//SYSIN DD *
OPTION COPY
INREC FINDREP=(IN=C'AA',OUT=C'BB')
/*
|
For complete details on the new FINDREP function and the other new functions available with PTF UK90013, see:
Use [URL] BBCode for External Links |
|
Back to top |
|
|
|