Password protect a PDS

andycool · New User Joined: 12 Apr 2005 Posts: 64

Hi Guys,

1. I want to know is it possible to password protect a PDS or a dataset ?

2. I have a PDS containing some vital jobs, i wish to restrict its access only to some of the TSO ids. Is it possible to do so?

Please let me know,
Thanks.

somasundaran_k · Active User Joined: 03 Jun 2003 Posts: 134

Andy

ankyhunk · Posted: Mon May 09, 2005 10:02 am

Hope the following JCL is useful -

//REPLPASS JOB ...
//STEP1 EXEC PGM=IEHPROGM,PARM='NOPRINT'
//SYSPRINT DD SYSOUT=A
//DD1 DD UNIT=disk,VOLUME=SER=111111,DISP=OLD
//DD2 DD VOLUME=(PRIVATE,SER=(222222,333333)),
// UNIT=(disk,,DEFER),DISP=OLD
//SYSIN DD *
LIST DSNAME=A.B.C,PASWORD1=ABLE
REPLACE DSNAME=A.B.C,PASWORD1=ABLE,PASWORD2=ABLE,TYPE=3,
VOL=disk=(222222,333333),
DATA='NO SECONDARIES; ASSIGNED TO DEPT 31'
/*

The utility control statements are discussed below:
? LIST specifies that the access counter, protection mode, and user data from the entry for password ABLE
are listed. Listing the entry permits the content of the access counter to be recorded before the counter is
reset to zero by the REPLACE statement.
? REPLACE specifies that the protection mode of password ABLE is to be changed to allow both read and
write access and that the protection status of the data set is changed to write-only protection. The VOL
parameter is required because the protection status of the data set is changed and the data set, in this
example, is not cataloged. Because this is a control password, the CPASWORD parameter is not required.

gnagakishore · New User Joined: 26 Mar 2005 Posts: 25 Location: Hyderabad

IF IT IS A VSAM DATASET , then we can protect it by using
INHIBIT COMMAND IN COMBINATION WITH ALTER.

if it is a pds which is created by option 3.2 a then there will be an
option for password protection.