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

Replacing PDSMAN with PDSFAST


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

New User


Joined: 07 Jun 2021
Posts: 15
Location: India

PostPosted: Mon Apr 04, 2022 3:08 pm
Reply with quote

Hi..
As part of Mainframe simplification initiative, PDSMAN (from Broadcom), is being replaced with SEAs product known as PDSFast.

IEBCOPY is getting replaced with PDSFAST for copy operations. Similarly in PDSMAN, there is something called PDSM32 and PDSM10. I need to replace PDSM32/PDSM10 JCLs with utility equivalent in PDSFAST. There is no manual/info available. Anyone using PDSFAST, could you please guide me what needs to be replaced ?

Below is the JCL I tried but didnt work:

//JS010 EXEC PDSFAST
//IN1 DD DSN=XXXX.YYY.ZZZ,DISP=SHR
//SYSOUT DD SYSOUT=*
//SYSIN DD *
DELETE X71996
/*
Back to top
View user's profile Send private message
Joerg.Findeisen

Active Member


Joined: 15 Aug 2015
Posts: 905
Location: Bamberg, Germany

PostPosted: Mon Apr 04, 2022 3:18 pm
Reply with quote

Use Code Tags when presenting Code/Data, please!
Code:
//JS010 EXEC PDSFAST

is a Procedure call. Let us know the resolved Procedure.
Back to top
View user's profile Send private message
appu9jain

New User


Joined: 07 Jun 2021
Posts: 15
Location: India

PostPosted: Mon Apr 04, 2022 3:31 pm
Reply with quote

Sorry, here is the updated one:

As part of Mainframe simplification initiative, PDSMAN (from Broadcom), is being replaced with SEAs product known as PDSFast.

IEBCOPY is getting replaced with PDSFAST for copy operations. Similarly in PDSMAN, there is something called PDSM32 and PDSM10. I need to replace PDSM32/PDSM10 JCLs with utility equivalent in PDSFAST. There is no manual/info available. Anyone using PDSFAST, could you please guide me what needs to be replaced ?

Below is the JCL I tried but didnt work:

Code:

//JS010 EXEC PDSFAST
//IN1         DD DSN=XXXX.YYY.ZZZ,DISP=SHR
//SYSOUT  DD SYSOUT=*
//SYSIN     DD *
 DELETE X71996
/*
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10833
Location: italy

PostPosted: Mon Apr 04, 2022 4:31 pm
Reply with quote

Quote:
PDSFAST is a Procedure call. Let us know the resolved Procedure.


what is that you did not understand in the above request

it would have been easier for people willing to answer if ...
instead of a useless did not work
yuo had posted a copy of the sysout or at least the error message you received

it's topics like this one that make people less willing to spend time answering
Back to top
View user's profile Send private message
appu9jain

New User


Joined: 07 Jun 2021
Posts: 15
Location: India

PostPosted: Mon Apr 04, 2022 4:50 pm
Reply with quote

I just want to know what is used in PDSFAST, instead of PDSMAN's PDSM32/PDSM10.

Below is the PDSMAN code which works fine:
Code:

//JS010    EXEC  PDSM32,                             
//PDSMPDS DD   DSN=XXXX.YYY.ZZZ,DISP=SHR
//SYSOUT   DD  SYSOUT=*       
//SYSIN    DD  *                                     
 DELETE X71996                                         
/*     
                       

Below is PDSFAST version created which is not working:
Code:

//JS010    EXEC  PDSFAST                                 
//IN1     DD   DSN=XXXX.YYY.ZZZ,DISP=SHR
//SYSOUT   DD  SYSOUT=*   
//SYSIN      DD *             
DELETE X71996                                               
/*           

And below is error message:
Code:

-DATASET CANNOT BE OPENED; AUTHORIZATION IS REQUIRED. 
INSTFAST JS010 - COMPLETION CODE - SYSTEM=913 USER=0000 REASON=00000038

Not sure if its still using PDSMAN utility.
Back to top
View user's profile Send private message
Joerg.Findeisen

Active Member


Joined: 15 Aug 2015
Posts: 905
Location: Bamberg, Germany

PostPosted: Mon Apr 04, 2022 5:24 pm
Reply with quote

appu9jain wrote:
And below is error message:
Code:

-DATASET CANNOT BE OPENED; AUTHORIZATION IS REQUIRED. 
INSTFAST JS010 - COMPLETION CODE - SYSTEM=913 USER=0000 REASON=00000038

S913 means NO ACCESS. Check SYSLOG/Joblog. Provide that (ICH408I msgs) to whoever is Responsible for Data Security at your site.
Back to top
View user's profile Send private message
Pete Wilson

Active Member


Joined: 31 Dec 2009
Posts: 541
Location: London

PostPosted: Mon Apr 04, 2022 5:44 pm
Reply with quote

found some ancient JCL I have from the 80's with PDSFAST examples. (IEBCOPY here is aliased to PDSFAST) But also easy enough to find using Google

Code:

//ODD DD DSN=PDS.CNTL,DISP=SHR
//SYSUT3 DD
//SYSUT4 DD
//PDSFAST DD
//SYSIN DD *
DIRSIZE OUTDD=ODD,BLOCKS=+20
/*
//**********************************************************************
//* INCREASES THE NUMBER OF DIRECTORY BLOCKS IN A PDS.(IT MUST HAVE *
//* SOME FREESPACE IN THE DATASET TO BE ABLE TO DO THIS THOUGH.)
//**********************************************************************
DIRSIZE OUTDD=ODD,BLOCKS=+20
//**********************************************************************
//* ALTERS A LOAD MODULE IN PLACE.IT READS THE DATASET AND CORRECTS *
//* ERRONEOUS RLOCATION DICTIONARY (RLD) COUNTS IN THE DIRECTORY AND *
//* CONTROL RECORDS.CAN ASSIST MVS PERFORMANCE.
//**********************************************************************
ALTERMOD OUTDD=ODD,LIST=NO
//**********************************************************************
//* ZEROS OUT A PDS DIRECTORY TO MAKE IT EMPTY.
//**********************************************************************
ZERODIR OUTDD=ODD
//**********************************************************************
//* EDITS THE PDS DIRECTORY,ALLOWING RENAME/DELETE RETAIN OF INDIVIDUAL
//* OR GROUPS OF MEMBERS.
//**********************************************************************
DIREDIT OUTDD=ODD
RENAME MEMBER=XYZ,ABC
RENAME GROUP=XYZ/,ABC/
RETAIN GROUP=XYZX/
DELETE GROUP=XYZ/
//**********************************************************************
//* RECOVERS MEMBERS OF A PDS THAT HAVE ACCIDENTLY BEEN UPDATED AS LONG
//* AS THE PDS HASNT BEEN COMPRESSED SINCE THE UPDATE.
//**********************************************************************
RECOVER OUTDD=ODD
Back to top
View user's profile Send private message
appu9jain

New User


Joined: 07 Jun 2021
Posts: 15
Location: India

PostPosted: Tue Apr 05, 2022 8:12 am
Reply with quote

Thank you for sharing this.
I tried as you shown above, but still facing the same error. However the same dataset is accessed and DELETE is performed for PDSMAN, but for PDSFAST its throwing
ACF90913 -DATASET CANNOT BE OPENED; AUTHORIZATION IS REQUIRED.
Code:

//JS010    EXEC  PDSFAST                                                 
//OUT1     DD  DSN=XXXX.YYY.ZZZ,DISP=SHR           
//SYSOUT   DD  SYSOUT=*                                                 
//PDSFAST  DD  *                                                         
//SYSIN    DD  *                                                         
 DELETE MEMBER=X71996                                                   
/*                                                                       
Back to top
View user's profile Send private message
Joerg.Findeisen

Active Member


Joined: 15 Aug 2015
Posts: 905
Location: Bamberg, Germany

PostPosted: Tue Apr 05, 2022 11:44 am
Reply with quote

appu9jain wrote:
However the same dataset is accessed and DELETE is performed for PDSMAN, but for PDSFAST its throwing
ACF90913 -DATASET CANNOT BE OPENED; AUTHORIZATION IS REQUIRED.

Nothing will be thrown ever in z/OS. icon_rolleyes.gif

Check for an ACF99913 Msg to find the DSN you do not have access to.
Back to top
View user's profile Send private message
Pete Wilson

Active Member


Joined: 31 Dec 2009
Posts: 541
Location: London

PostPosted: Tue Apr 05, 2022 11:44 am
Reply with quote

Talk to your local ACF2 security team. There must be some rule in ACF2 that allows PDSMAN program the access and that needs to be set up for PDSFAST. There's nothing this forum can do to help you with that.
Back to top
View user's profile Send private message
appu9jain

New User


Joined: 07 Jun 2021
Posts: 15
Location: India

PostPosted: Tue Apr 05, 2022 11:52 am
Reply with quote

Pete Wilson wrote:
Talk to your local ACF2 security team. There must be some rule in ACF2 that allows PDSMAN program the access and that needs to be set up for PDSFAST. There's nothing this forum can do to help you with that.


ok got it, I will check with ACF2 team. Thank you.
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 Finding record and replacing with val... DFSORT/ICETOOL 3
No new posts Replacing character string in file th... JCL & VSAM 9
No new posts JCL for replacing code in Cobol JCL & VSAM 7
No new posts special characters pipes "|"... COBOL Programming 1
No new posts replacing junk with hyphen DFSORT/ICETOOL 10
Search our Forums:

Back to Top