IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

How to create a new member in a PDS through a Job


IBM Mainframe Forums -> JCL & VSAM
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
biswajitjena

New User


Joined: 20 Apr 2006
Posts: 4

PostPosted: Mon Jul 31, 2006 4:03 pm
Reply with quote

Hi .. Can any one please tell me how to create a new member in a PDS through a Job or JCL
Back to top
View user's profile Send private message
biswajitjena

New User


Joined: 20 Apr 2006
Posts: 4

PostPosted: Mon Jul 31, 2006 4:07 pm
Reply with quote

I forgot to mention the My PDS has record length od 133 so I can't use IEBUPDTE
Back to top
View user's profile Send private message
ofer71

Global Moderator


Joined: 27 Dec 2005
Posts: 2358
Location: Israel

PostPosted: Mon Jul 31, 2006 5:22 pm
Reply with quote

If the PDS already exists, you just need to allocate it with DISP=SHR.

If it doesn't exists, you will have to allocate it first using IEFBR14 or somethis similar.

O.
Back to top
View user's profile Send private message
biswajitjena

New User


Joined: 20 Apr 2006
Posts: 4

PostPosted: Mon Jul 31, 2006 6:11 pm
Reply with quote

Thanks Man.. Actually I had tried Did But When I did the JCL check it was giving a RC of 8, so I had Not summited the Job, but now Even with RC of 8 in JCL Check I summited it and It created the New member.

Thanks for the Quick reply
Back to top
View user's profile Send private message
vijayamadhuri

Active User


Joined: 06 Apr 2005
Posts: 180

PostPosted: Mon Jul 31, 2006 8:10 pm
Reply with quote

go to u r edit option -2 in ispf

fgive the name of the pds
Edit Entry Panel
Command ===>

ISPF Library:
Project . . . Txxxxxx
Group . . . . PDS . . . . . . . . .
Type . . . . SOURCE
Member . . . (Blank or pattern for member selection list)

give the name of the member u want to create...
Back to top
View user's profile Send private message
nileshp

New User


Joined: 25 Feb 2006
Posts: 31

PostPosted: Wed Aug 16, 2006 11:05 am
Reply with quote

biswajitjena wrote:
Hi .. Can any one please tell me how to create a new member in a PDS through a Job or JCL


//jobname JOB ...
//EXEC PGM=IEFBR14
//D1 DD DSN=data-set-name(member),
// DISP=(NEW,CATLG,DELETE),
// SPACE=(TRK,0),
// UNIT=unit,VOL=SER=volume,
// DCB=(whatever sub-parameters you want)
Back to top
View user's profile Send private message
stly
Warnings : 1

New User


Joined: 25 Jul 2005
Posts: 93

PostPosted: Thu Aug 17, 2006 4:09 pm
Reply with quote

hi nilesh n offer both of ur logics are not working.i have checked them.
if u keep new,catlg,delete u will get JCL error that duplictae data set n
disp=shr is giving maxcc=0 but member is not created.

HERE IS MY JCL


//a1234 JOB (TDEV,TST),'a1234,MSGCLASS=9,
// CLASS=C,NOTIFY=a1234
//*
//Z0327074 EXEC PGM=IEFBR14
//SYSIN DD *
//SYSUT1 DD DSN=A1234.SIMP.JCL(JCL2),
// DISP=SHR
//* SPACE=(TRK,0),
//* SPACE=(CYL,(1,1,2),RLSE),
//* UNIT=SYSDA,
//* DCB=(RECFM=FB,LRECL=80,BLKSIZE=0)
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
/*
//
Back to top
View user's profile Send private message
pspreddy

New User


Joined: 14 Mar 2006
Posts: 24
Location: Chicago

PostPosted: Sun Aug 20, 2006 4:54 am
Reply with quote

Two other simple texhniques are
1) enter any member of that PDS in view mode and select one or more line of that member to copy (use 'c' or 'cc' option to select a line or more than one line), go to command line ans say 'CREATE MEMBERNAME'.
This will create a member with MEMBERNAME in the same PDS

2) Go to any member of any PDS, then select one or more line of that member to copy , go to command line ans say 'CREATE YOURPDS(MEMBERNAME)'.
This will create a member MEMBERNAME in YOURPDS

Just a crude method.. is it? icon_smile.gificon_smile.gificon_smile.gificon_smile.gif

Thanks
Shiva
Back to top
View user's profile Send private message
Marso

REXX Moderator


Joined: 13 Mar 2006
Posts: 1353
Location: Israel

PostPosted: Sun Aug 20, 2006 3:03 pm
Reply with quote

The best way, in a JCL, is to run:
Code:
//CRMEMBR  EXEC PGM=IEBGENER                       
//SYSPRINT DD   SYSOUT=*                           
//SYSUT1   DD   DUMMY                             
//SYSUT2   DD   DISP=SHR,DSN=A1234.SIMP.JCL(NEWJCL)
Back to top
View user's profile Send private message
sateyandra

New User


Joined: 14 Aug 2006
Posts: 2

PostPosted: Sun Aug 20, 2006 7:26 pm
Reply with quote

try to create member in pds through jcl with the help of catlog procedure
. I think it will work .
Back to top
View user's profile Send private message
stly
Warnings : 1

New User


Joined: 25 Jul 2005
Posts: 93

PostPosted: Tue Aug 29, 2006 2:50 pm
Reply with quote

Hi Marso,
i tries ur code and ended with MAXCC= 12 with the following message in SYSPRINT "CONFLICTING DCB PARAMETERS"
Back to top
View user's profile Send private message
surya_pathaus

Active User


Joined: 28 Aug 2006
Posts: 110

PostPosted: Tue Aug 29, 2006 5:53 pm
Reply with quote

Hi Stly,

JCL needs to modify little bit. It is working fine and creating the member in required PDS.

Please find the JCL:

Code:

//STEP01   EXEC PGM=IEBGENER                               
//SYSPRINT DD   SYSOUT=*                                   
//SYSUT1   DD   *                                         
/*                                                         
//SYSUT2   DD   DISP=SHR,DSN=HLQ.ABC.D123(NEWJCL)
//SYSIN    DD   DUMMY                                     
//SYSOUT   DD   SYSOUT=*                                   
//*                                                       
Back to top
View user's profile Send private message
stly
Warnings : 1

New User


Joined: 25 Jul 2005
Posts: 93

PostPosted: Wed Aug 30, 2006 10:40 am
Reply with quote

Hi in my previos post(JCL) repace dummy with *.it is working fine.

thanks surya
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> JCL & VSAM

 


Similar Topics
Topic Forum Replies
No new posts How to create a list of SAR jobs with... CA Products 3
No new posts How to copy the -1 version of a membe... TSO/ISPF 4
No new posts Searching for a member but don't know... TSO/ISPF 6
No new posts Looking For a PDS Member Without Open... PL/I & Assembler 10
No new posts create rexx edit Macro that edits the... CLIST & REXX 3
Search our Forums:

Back to Top