OPTION(COMMENTACCESSNONE) not working for ACF2/DB2

Products

• Cleanup

Issue/Introduction

Cleanup for ACF2 provides the OPTION(COMMENTACCESSNONE).

This option causes all ACCESS NONE permissions to appear as commented commands.

However, this does not work for CA ACF2/DB2

With OPTION(COMMENTACCESSNONE) the rule entries with ACCESS NONE permission(PREVENT) should appear as commented commands and should not be deleted.         

For example:

//STEP1      EXEC PGM=AT5#RPT,REGION=8M,PARM='UNREF=200'   
//*******************************************************
//DBASE     DD DISP=SHR,DSN=PROD.ABCD.DBPROD           
//DBASE1    DD DISP=SHR,DSN=DEV.ABCD.DBDEV           
//*                                                     
//SYSPRINT  DD SYSOUT=*                                 
//SYSOUT    DD DUMMY                                    
//CMDS     DD DSN=PROD.COMDS.A010122,DISP=(,CATLG,DELETE),         
//   SPACE=(CYL,(200,50),RLSE)                         
//BACKOUT  DD DSN=PRD.BACKOUT.P010122, DISP=(,CATLG,DELETE),   
//   SPACE=(CYL,(200,50),RLSE)                       
//SORTWK01  DD UNIT=3390,SPACE=(CYL,15)                 
//SORTWK02  DD UNIT=3390,SPACE=(CYL,15)                 
//INCLUDE DD *                                          
OPTION(COMMENTACCESSNONE)                               
CLASS(DTBL) NAME(D*T2ABCDXY.Z*******************)       
CLASS(DTBL) NAME(D*T2ABCDXY*.Z******************)     
---
---

For this ACCESSNONE definition the utility generates the following:

 

AT5NRUL  KEY(ABCDXY.Z*******************) TYPE(TBL) -                    
CLASS(D) SYSID(D*T2) -                                                   
DEL( -                                                                   
UID(************USER1) SERVICE(ALTER,DELETE,INDEX,INSERT,,REFER,) PREVENT-                                                 
) NOLIST NOVERIFY                    

            

But these lines should appear after a comment section that is missing.

 

For example:

 

 /* PREVENT rule line follows: -     

AT5NRUL  KEY(ABCDXY.Z*******************) TYPE(TBL) -                    
CLASS(D) SYSID(D*T2) -                                                   
DEL( -                                                                   
UID(************USER1) SERVICE(ALTER,DELETE,INDEX,INSERT,,REFER,) PREVENT-                                                 
) NOLIST NOVERIFY                    

            

 

Environment

Release : 12.1

Component : Cleanup for ACF2

Cause

The Report options (Like COMMENTACCESSNONE) must be in the SYSIN file and not in the //INCLUDE DD *  

For example:

//SYSIN DD * 
OPTION(COMMENTACCESSNONE)
/*

 

Resolution

Move OPTION(COMMENTACCESSNONE)  from //INCLUDE DD *  to the //SYSIN DD.

 

From: 

//INCLUDE DD *                                          
OPTION(COMMENTACCESSNONE)
---
---
                     

To:

//SYSIN DD * 
OPTION(COMMENTACCESSNONE)
/*

 

Additional Information

There is more information about the report options at the following link:

 

SYSIN Options for Cleanup for RACF