View previous topic :: View next topic
|
Author |
Message |
mijanurit Currently Banned New User
Joined: 26 Aug 2005 Posts: 33 Location: bangalore
|
|
|
|
How to rename a set of files in one shot ?
Rahman |
|
Back to top |
|
|
expat
Global Moderator
Joined: 14 Mar 2007 Posts: 8797 Location: Welsh Wales
|
|
|
|
Read the IDCAMS manual - ALTER command |
|
Back to top |
|
|
superk
Global Moderator
Joined: 26 Apr 2004 Posts: 4652 Location: Raleigh, NC, USA
|
|
|
|
Read the TSO manual, or online help, for the RENAME command. |
|
Back to top |
|
|
guptae
Moderator
Joined: 14 Oct 2005 Posts: 1208 Location: Bangalore,India
|
|
|
|
Hello Rahman,
You can use idcams /Dfsort for this
Idcams JOb
Code: |
//STEP030 EXEC PGM=IDCAMS
//SYSUDUMP DD SYSOUT=Z
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
SET MAXCC=0
ALTER A40661.£K.DB2.CNTL -
NEWNAME(A40661.DB2.CNTL )
ALTER A40661.£K.DB2.JCLLIB -
NEWNAME(A40661.DB2.JCLLIB ) |
Dfsort job
Code: |
//FILTER3 EXEC PGM=ICETOOL
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//IN1 DD DSN=A40661.£K.DB2.CNTL ,DISP=SHR
//IN2 DD DSN=A40661.£K.DB2.JCLLIB,DISP=SHR
//OUT1 DD DSN=A40661.DB2.CNTL ,
// DISP=SHR
//OUT2 DD DSN=A40661.DB2.JCLLIB , DISP=SHR
//TOOLIN DD *
COPY FROM(IN1) TO(OUT1) USING(CTL1)
COPY FROM(IN2) TO(OUT2) USING(CTL1)
//CTL1CNTL DD *
SORT FIELDS=COPY
/* |
hope it helps |
|
Back to top |
|
|
mijanurit Currently Banned New User
Joined: 26 Aug 2005 Posts: 33 Location: bangalore
|
|
|
|
thank you all .. thanka so much
Regards
Rahman |
|
Back to top |
|
|
|