>> I have a PDS with configuration definitions in it and want to make it easy 
>> to configure.

Colin,

You could use DFSORT to do the substitution and generate the control cards 
which can be passed to the next steps that really execute the commands.
For example

// SET ID=COLIN
//*
//STEP0100 EXEC PGM=SORT,PARM='JP1"&ID"'
//SYSOUT   DD SYSOUT=*
//SORTIN   DD DISP=SHR,DSN=your.pds.with.racf.commands(member)
//SORTOUT  DD DSN=&&RCMD,DISP=(,PASS),SPACE=(TRK,(1,0),RLSE)
//SYSIN    DD *
  OPTION COPY
  INREC FINDREP=(INOUT=(C'&ID',JP1))
/*

This will create the new control cards with the ID substituted and write it to 
the temp file &&RCMD. Now you can use this file as input to the racf command 
processor.

//STEP0200 EXEC PGM=IKJEFT01
//SYSTSPRT DD SYSOUT=*,DCB=BLKSIZE=121
//SYSPRINT DD SYSOUT=*
//SYSTSIN  DD DISP=(OLD,DELETE,DELETE),DSN=&&RCMD


Thanks,
Kolusu
DFSORT Development
IBM Corporation



----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to