View previous topic :: View next topic
|
Author |
Message |
neo_yodha
New User
Joined: 10 Apr 2006 Posts: 6
|
|
|
|
Hi,
can we create a PS in a PDS using IEFBR14, like this ;
//STEP1 EXEC PGM=IEFBR14
//DD1 DD DSN=RK.MYDIR.FILES(NEW1),DISP=(NEW,CATLG),
......
here, RK.MYDIR.FILES is a PDS which already exists, i want to create NEW1 in this PDS. but, i failed.
thank you,
rk |
|
Back to top |
|
|
mftrigger
New User
Joined: 18 Feb 2006 Posts: 23 Location: chennai
|
|
|
|
no chance .. u cant create a ps inside pds...
but instead u can use member in pds as ps... |
|
Back to top |
|
|
shreevamsi
Active User
Joined: 23 Feb 2006 Posts: 305 Location: Hyderabad,India
|
|
|
|
Yes...there is a way u can create the member of an PDS thru your JCL
But need to change your JCL.
//STEP1 EXEC PGM=IEFBR14
//NEW1 DD DSN=RK.MYDIR.FILES(NEW1),DISP=(SHR),
......
The step name and the Member name should be same and DISP should be SHR. i.e,
//MEMNAME DD DSN=YOUR.PDS.NAME(MEMNAME),DISP=SHR
~Vamsi |
|
Back to top |
|
|
superk
Global Moderator
Joined: 26 Apr 2004 Posts: 4652 Location: Raleigh, NC, USA
|
|
|
|
This
Code: |
//STEP1 EXEC PGM=IEFBR14
//NEW1 DD DSN=RK.MYDIR.FILES(NEW1),DISP=(SHR)
|
will not work, since a new member won't be created until the DD is opened for output.
This, however, will work:
Code: |
//STEP1 EXEC PGM=IEBGENER
//SYSUT1 DD DUMMY,RECFM=FB,LRECL=80
//SYSUT2 DD DSN=RK.MYDIR.FILES(NEW1),DISP=(SHR)
//SYSPRINT DD SYSOUT=*
//SYSIN DD DUMMY
|
as will this:
Code: |
//STEP1 EXEC PGM=IEBUPDTE,PARM=NEW
//SYSUT2 DD DSN=RK.MYDIR.FILES,DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
./ ADD NAME=NEW1
/*
|
|
|
Back to top |
|
|
shreevamsi
Active User
Joined: 23 Feb 2006 Posts: 305 Location: Hyderabad,India
|
|
|
|
Since the PDS is already created...we can open with oputput mode.
Even though the member which is to be created for the first time, the DISP is goign to be SHR.
~Vamsi |
|
Back to top |
|
|
|