View previous topic :: View next topic
|
Author |
Message |
mrar_160
New User
Joined: 14 Sep 2005 Posts: 48
|
|
|
|
Hi guys..
I made a JCL to create a PDS and 1 member.. My JCL is like this ..
//****
//STEP1 EXEC PGM=IEFBR14
//DXX DD DSN=TSOMJ.ES07TES(MEM1),DISP=(,CATLG),
// UNIT=SYSDA,SPACE=(TRK,(1,1,1)),
// DCB=(LRECL=100,RECFM=FB,BLKSIZE=8000)
//****
When i run this, i got RC0..But when i want to edit dataset TSOMJ.ES07TES, it say "No members in data set".. Why it did not create the MEM1??
One more question,
For ulitities, anybody know what is new utilities in Z/os??Any new from OS/390?? |
|
Back to top |
|
|
gokuldass
New User
Joined: 18 Mar 2005 Posts: 48 Location: india
|
|
|
|
Are you sure with the return code 0.
I think the problem is with the disp parameter which should be (NEW,CATLG). Check for the directory blocks allocated for the PDS.
Regards,
Gokul |
|
Back to top |
|
|
mrar_160
New User
Joined: 14 Sep 2005 Posts: 48
|
|
|
|
yes..
the RC = 0.. |
|
Back to top |
|
|
superk
Global Moderator
Joined: 26 Apr 2004 Posts: 4652 Location: Raleigh, NC, USA
|
|
|
|
mrar_160 wrote: |
For ulitities, anybody know what is new utilities in Z/os??Any new from OS/390?? |
Some enhancements (FTP especially) but I haven't seen any new ones announced.
In order to create a new PDS with a member, you have to actually open the member and write something, even if its an empty record. A better method would be:
Code: |
//STEPXXXX EXEC PGM=SORT
//SORTIN DD *
/*
//SORTOUT DD DSN=TSOMJ.ES07TES(MEM1),DISP=(,CATLG),
// UNIT=SYSDA,SPACE=(TRK,(1,1,1))
//SYSOUT DD SYSOUT=*
//SYSIN DD *
OPTION COPY
OUTREC FIELDS=(100:X)
/*
|
|
|
Back to top |
|
|
mrar_160
New User
Joined: 14 Sep 2005 Posts: 48
|
|
|
|
Hi superk..
Tq for reply.. It's work!!..
Tq.. |
|
Back to top |
|
|
|