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

How to rename a PDS in JCL invoking ISPF ?


IBM Mainframe Forums -> TSO/ISPF
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
Searchman

New User


Joined: 28 Dec 2006
Posts: 80
Location: France

PostPosted: Fri Jun 18, 2010 4:16 pm
Reply with quote

In JCL, I use IEBCOPY to rename PDS but i's too long, whereas it's instantaneous with ISPF online.
Is it possible to do the same in JCL (invoking ISPF) ?
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales

PostPosted: Fri Jun 18, 2010 4:20 pm
Reply with quote

Please explain how you use IEBCOPY to perform a rename operation.

Look at IDCAMS ALTER.
Back to top
View user's profile Send private message
superk

Global Moderator


Joined: 26 Apr 2004
Posts: 4652
Location: Raleigh, NC, USA

PostPosted: Fri Jun 18, 2010 4:21 pm
Reply with quote

Won't a TSO RENAME or IDCAMS ALTER work just as well without all of the excess that comes along with using ISPF services in batch?
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne

PostPosted: Fri Jun 18, 2010 5:38 pm
Reply with quote

Searchman

Have a co-worker edit a member of a PDS
and at the same time, you try to rename it in an interactive TSO session
(what you incorrectly term ISPF online).

how instantaneous is it now?
Back to top
View user's profile Send private message
Searchman

New User


Joined: 28 Dec 2006
Posts: 80
Location: France

PostPosted: Fri Jun 18, 2010 6:14 pm
Reply with quote

Code:

000005 //RENAMU13  EXEC PGM=IEBCOPY
000006 //SYSPRINT  DD  SYSOUT=*
000007 //SYSOUT    DD  SYSOUT=*
000008 //SYSOUA    DD  SYSOUT=*
000009 //I1        DD  DSN=DUEX.EXPL.PREPU.PARMVSAM,DISP=(OLD,DELETE)
000010 //O1        DD  DSN=DUEX.EXPL.PREPU.PARMVSAM.JMOINS1,
000011 //          LIKE=DUEX.EXPL.PREPU.PARMVSAM,
000012 //          DSNTYPE=LIBRARY,DISP=(NEW,CATLG)
000013 //SYSUT3    DD  UNIT=SYSDA,SPACE=(TRK,(1,1))
000014 //SYSIN     DD  *
000015 RENAMU13   COPYGRP  INDD=((I1,R)),OUTDD=O1
000016 //*
Back to top
View user's profile Send private message
PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2481
Location: Netherlands, Amstelveen

PostPosted: Fri Jun 18, 2010 6:18 pm
Reply with quote

As far as i see it, this a pds copy with a member replace option.
Why you do that for a new dataset is not quite clear to me.
Back to top
View user's profile Send private message
Searchman

New User


Joined: 28 Dec 2006
Posts: 80
Location: France

PostPosted: Fri Jun 18, 2010 6:24 pm
Reply with quote

So, is there another option that just renames PDS, like "Rename" of ISPF ("R" in 3.4) ?
Back to top
View user's profile Send private message
Pedro

Global Moderator


Joined: 01 Sep 2006
Posts: 2547
Location: Silicon Valley

PostPosted: Fri Jun 18, 2010 7:25 pm
Reply with quote

Quote:
So, is there another option that just renames PDS

Please read the posts from Superk and Expat.
Back to top
View user's profile Send private message
Searchman

New User


Joined: 28 Dec 2006
Posts: 80
Location: France

PostPosted: Fri Jun 18, 2010 8:07 pm
Reply with quote

Code:

000005 //RENAMU13  EXEC PGM=IDCAMS
000006 //SYSPRINT  DD  SYSOUT=*
000007 //SYSOUT    DD  SYSOUT=*
000008 //SYSOUA    DD  SYSOUT=*
000009 //SYSIN     DD  *
000010  ALTER DUEX.EXPL.PREPU.PARMVSAM -
000011  NEWNAME(DUEX.EXPL.PREPU.PARMVSAM.JMOINS1)
000012 //*
****** **************************** Bottom of Data ****************************


Thank you, Superk, it's exactly what I was looking for : IDCAMS RENAME
Back to top
View user's profile Send private message
nevilh

Active User


Joined: 01 Sep 2006
Posts: 262

PostPosted: Sat Jun 19, 2010 8:47 pm
Reply with quote

Quote:
Have a co-worker edit a member of a PDS
and at the same time, you try to rename it in an interactive TSO session
(what you incorrectly term ISPF online).
how instantaneous is it now?

Still instantaneous if you have sufficient RACF authorization and the dataset is non SMS managed
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne

PostPosted: Sat Jun 19, 2010 10:30 pm
Reply with quote

nevilh wrote:
Still instantaneous if you have sufficient RACF authorization and the dataset is non SMS managed


could you explain to me,
what
  • RACF authority
  • non-sms managed dsns
has to do with the inability to obtain exclusive on the ds.
(somebody else is already editing a member).

but then I
  • am just an old fart
  • have faulty memory
  • basic inability to read and comprehend
  • probably have other ailments that impairs proper brain function
and is the cause of why I don't understand your post.
Back to top
View user's profile Send private message
nevilh

Active User


Joined: 01 Sep 2006
Posts: 262

PostPosted: Sat Jun 19, 2010 10:47 pm
Reply with quote

If you have access to RACF profile STGADMIN.DPDSRN.xxx you can rename non-sms datasets that are in use. If someone is using the dataset it is not recommended but it can be done
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne

PostPosted: Sun Jun 20, 2010 4:31 am
Reply with quote

nevilh wrote:
If you have access to RACF profile STGADMIN.DPDSRN.xxx you can rename non-sms datasets that are in use. If someone is using the dataset it is not recommended but it can be done


gaulllie, did I fall for that one, or what?
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 -> TSO/ISPF

 


Similar Topics
Topic Forum Replies
No new posts Looking for a little history of ISPF ... TSO/ISPF 5
No new posts Adding QMF and SPUFI to the ISPF menu DB2 20
No new posts Issue after ISPF copy to Linklist Lib... TSO/ISPF 1
No new posts Is there a way to close VSAM files us... CICS 8
No new posts step by step trace 4 ISPF dialog call... TSO/ISPF 17
Search our Forums:

Back to Top