Changing a text in a PDS for all the members.

ap_mainframes · Posted: Thu Jun 29, 2006 2:57 pm

Hi,
I need to change some information ( specifically, Accounting info in a job) for all the members in a PDS.

Can anybody tell how to do it???

ap_mainframes

ksk · Posted: Thu Jun 29, 2006 5:00 pm

We can change required information using "CHANGE" command from "FIND/CHANGE" utility in File Manager.

For Ex:

Process Options Help

File Manager Find/Change Utility
Command ===> CHANGE B A Scroll CSR

Input Partitioned, Sequential or VSAM Data Set:
Data set name . 'ABC.DEF.EFG'
Member . . . . . * (Blank - selection, pattern - process list)
Volume serial . (If not cataloged)
Record count . . ALL (Number of records to be searched)

Listing data set . SRCHFOR.LIST

Enter "/" to select option Listing Option ISPF Packing
JCL Source format / Immediate change 1 1. Long 1 1. Asis
Use REXX proc Batch execution 2. Summary 2. Pack
REXX no update Exclusive (DISP=OLD) 3. Unpack
Stats off 4. None
5. Skip
Process List:

In the above example, all "B"s will be chnaged to "A" in "ABC.DEF.EFG" PDS.

ksk

shreevamsi · Posted: Thu Jun 29, 2006 5:12 pm

If User Panel is available in the main menu

Try this option

U.P.1.3.6

This will takeyou to the global Update Option

~Vamsi

param_rajesh_2001 · New User Joined: 23 Jun 2006 Posts: 18 Location: Bangalore

Hi U can use FILEAID utility to update all the common chnages .
Please find the code for

//xxxxxxx JOB (3633,#500510),'FILEAID update',CLASS=R,
// MSGCLASS=U,
// NOTIFY=&SYSUID
//**
//STEP010 EXEC PGM=FILEAID
//SYSUDUMP DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSLIST DD SYSOUT=*
//SYSTOTAL DD SYSOUT=*
//DD03 DD DISP=SHR,DSN=TEST.JOBLIB YOUR SOURCE JCL pds
//SYSIN DD *
$$DD03 UPDATE ME=9999,
EA=(1,0,T"account1",C"acoount2")
//**

where account1 is orgional account info
account 2 - to be changed account info

ap_mainframes · Posted: Thu Jul 06, 2006 9:25 am

hi all,

Thanks for the help.

Will try and let you know.