Is there a batch job that will list approved users in the control file or dump the control file records to a flat file?
In the CABYJCL library there is a member called APJJ5103 that will produce a APCS5103-01 report.
This report will list the following records for the PanApt Control File.
- ACTIVITY RECORDS
- SYSTEM INFORMATION RECORD
- USER ID RECORDS
Sample JCL:
//APJJ5103 JOB (),'CTL FILE PRINT',NOTIFY=&SYSUID,CLASS=A,MSGCLASS=J
//JOBLIB DD DISP=SHR,DSN=<SPFX>.LOADLIB <<<<< Your PanApt Load Library >>>>>
//APJP5103 EXEC APJP5103,
// REPORTS=X,
// VSAMPFX='<VPFX>' <<<<< Your PanApt VSAM File Prefix >>>>>
Sample Ouput:
APCS5103-01 Rel 03.2 Automated Production Turnover Page 1
Run date: 15/07/10 --- CA-PANAPT Field Installation ---
Run time: 13:23:35 Access Methods System: XXXX
Access Exit specifications
Method Description Type Program Parameter
______ __________________________________________________ _________ ________ __________________________________________________
GO Gener/ol
L CA-Librarian EXISTENCE APCS0221
MSL APAS0620
EDIT APCS1422
BROWSE APCS1412
LW CA-Librarian wide record EXISTENCE APCS0221
MSL APAS0620
EDIT APCS1422
BROWSE APCS1412
PK DB2 Packages EXISTENCE APCS0227 APCS0227
PL DB2 Plans EXISTENCE APCS0225 APCS0225
PO Partitioned data sets EXISTENCE APAS0200
MSL APAS0610
EDIT APCS1420
BROWSE APCS1410
PV CA-Panvalet EXISTENCE APAS0222 APAS0222 IS THE REAL EXIT
MSL APAS0600
EDIT APCS1421
BROWSE APCS1411
PX CA-Panexec EXISTENCE APAS0223
APCS5103-01 Rel 03.2 Automated Production Turnover Page 2
Run date: 15/07/10 --- CA-PANAPT Field Installation ---
Run time: 13:23:35 Activity Records System: XXXX
Allow Allow Allow Allow Allow Allow Security
Activity Anyone Same Group Owner Grp Admin Operations Groups/Users Status
_________________ __________ __________ __________ __________ __________ ___________________________________________ ________
CTL /ENTRY YES YES YES YES YES N/A
CTLACT /CHG N/A
CTLACT /INQ YES YES YES YES YES N/A
CTLSYS /ADD N/A
CTLSYS /CHG N/A
CTLSYS /DEL N/A
CTLSYS /INQ YES YES YES YES YES N/A
CTLUSER /ADD YES N/A
CTLUSER /CHG N/A
CTLUSER /DEL N/A
CTLUSER /INQ YES YES YES YES YES N/A
DEV /ENTRY N/A
DEV /MM N/A
DEV /PRINTTBL N/A
DEVADMIN/ENTRY YES N/A
INVENTRY/ADD YES YES YES YES YES N/A
INVENTRY/APP N/A
INVENTRY/ASN YES YES YES YES YES N/A
INVENTRY/CHG YES YES YES N/A
INVENTRY/DEL YES YES YES N/A
INVENTRY/ENTRY YES YES YES YES YES N/A
INVENTRY/INQ YES YES YES YES YES N/A
INVENTRY/REL YES YES YES YES N/A
INVENTRY/RET YES YES YES YES YES N/A
INVENTRY/TRN YES YES YES YES N/A
LIBCODE /ADD N/A
LIBCODE /CHG N/A
LIBCODE /COP N/A
LIBCODE /DEL N/A
LIBCODE /ENTRY YES YES YES YES YES N/A
LIBCODE /INQ YES YES YES YES YES N/A
LIBCODE /SECURITY N/A
MEMBER /BROWSE Inactive
MEMBER /CHECKIN Inactive
MEMBER /CHECKOUT YES Inactive
MEMBER /COMPARE Inactive
MEMBER /COMPILE Inactive
MEMBER /EDIT Inactive
MEMBER /HISTORY Inactive
MEMBER /LISTING Inactive
MEMBER /MERGE Inactive
MEMBER /OUTPUTCP Inactive
APCS5103-01 Rel 03.2 Automated Production Turnover Page 3
Run date: 15/07/10 --- CA-PANAPT Field Installation ---
Run time: 13:23:35 Activity Records System: XXXX
Allow Allow Allow Allow Allow Allow Security
Activity Anyone Same Group Owner Grp Admin Operations Groups/Users Status
_________________ __________ __________ __________ __________ __________ ___________________________________________ ________
MEMBER /OUTPUTMG Inactive
MEMBER /UTILITY Inactive
MEMBER /XIR Inactive
APCS5103-01 Rel 03.2 Automated Production Turnover Page 4
Run date: 15/07/10 --- CA-PANAPT Field Installation ---
Run time: 13:23:35 Activity Records System: XXXX
Allow Allow Allow Allow Allow Allow Security
Activity Anyone Same Group Owner Grp Admin Operations Groups/Users Status
_________________ __________ __________ __________ __________ __________ ___________________________________________ ________
MOVEREQ /ADD YES YES YES YES YES N/A
MOVEREQ /APB-PROD YES Inactive
MOVEREQ /APB-QA Inactive
MOVEREQ /APB-QA2 Inactive
MOVEREQ /APM-PROD YES YES Inactive
MOVEREQ /APM-QA Inactive
MOVEREQ /APM-QA2 Inactive
MOVEREQ /BAK N/A
MOVEREQ /BRO YES YES YES YES YES N/A
MOVEREQ /CHG YES YES YES YES Groups *GROUPA *GROUPB *GROUPC *GROUPD N/A
MOVEREQ /CHGAWAPP YES N/A
MOVEREQ /CLO YES YES YES YES N/A
MOVEREQ /CLOASSGN YES YES YES YES N/A
MOVEREQ /COP YES YES YES YES YES N/A
MOVEREQ /CR N/A
MOVEREQ /DAT YES N/A
MOVEREQ /DEL YES YES YES YES N/A
MOVEREQ /DELCLOSD YES N/A
MOVEREQ /ENTRY YES YES YES YES YES N/A
MOVEREQ /INQ YES YES YES YES YES N/A
MOVEREQ /MEMBER YES YES YES Active
MOVEREQ /MEMCHG YES YES YES YES YES Inactive
MOVEREQ /MEMDEL YES Active
MOVEREQ /MEMPURGE YES YES YES YES YES Inactive
MOVEREQ /PRT YES YES YES YES YES N/A
MOVEREQ /RVP YES YES YES YES N/A
MOVEREQ /STA YES N/A
PROJECT /ADD Groups GROUPA N/A
PROJECT /CHG Groups GROUPA N/A
PROJECT /DEL Groups GROUPA N/A
PROJECT /INQ Groups GROUPA N/A
REPORT /APCS5104 YES YES YES YES YES N/A
REPORT /APCS5105 YES YES YES YES YES N/A
REPORT /APCS6111 YES YES YES YES YES N/A
REPORT /ENTRY YES YES YES YES YES N/A
USERLIB /CHG YES YES N/A
USERLIB /INQ N/A
APCS5103-01 Rel 03.2 Automated Production Turnover Page 5
Run date: 15/07/10 --- CA-PANAPT Field Installation ---
Run time: 13:23:35 Configuration Manager Record System: XXXX
Profile Dataset Name: LIBSYS.PANLCM.COMMON.ADMIN
Project Dataset Name: LIBSYS.APT.R031ABS.ADMIN
Dependency File Member: APT31A
Global Options Member: APT31OPT
AMKLIST ARGUMENT:
MSL Verifications
___ _____________
Warning Level: 1 3 0=ignore,1=display,2=prompt,3=fatal
Suppress errors: N N Y,N
APCS5103-01 Rel 03.2 Automated Production Turnover Page 6
Run date: 15/07/10 --- CA-PANAPT Field Installation ---
Run time: 13:23:35 System Information Record System: XXXX
System ID: XXXX
Company Name: --- CA-PANAPT Field Installation ---
Date Format: YYMMDD
Date Separator: /
Time Separator: :
Default Library Codes: JCL / PROC/ DOC / SRCE/PAN
LOAD/ OBJ / LIST/ PARM/
SRCE/ PEX1/
Expanded Description: N - Not Required
Approval Comments: N - Not Required
Disapproval Comments: N - Not Required
Allow * and ? in Service Request: N - Prohibited
Close-Assignment Option: 1 - Assigned to anyone
MR-Assignment Option: 3 - Assignment to Move Request required,
Unit: SYSDA
Report File Options: BLKSIZE 8100 PRIMARY 100 SECONDARY 100
Checkout Submit Option: TSO Submit
TSO Submit File Options: BLKSIZE 8000 PRIMARY 20 SECONDARY 20
Utility Listing Dsname: LIBSYS.APTDEV.UTILITY.LISTING.PANLIB
Access Method: PV
Reassign/Transfer Flag: 2 - User assignment will not change
Security Exit Status: I - Inactive
Security Exit Name:
DB2 Option: N - Disabled
Concurrent Development options for the Development Facility:
Notify User -doing a Checkout who else has the member: YES
Notify Others-of User doing a Checkout of a member: NO
Notify Others-of User Cancelling Development of a member: NO
Notify Others-of User doing a Checkin of a member: NO
Notify Others-of User doing a Checkin for Migration of a member: YES
Set Concurrent Development flag upon Checkins for Migration: YES
APCS5103-01 Rel 03.2 Automated Production Turnover Page 7
Run date: 15/07/10 --- CA-PANAPT Field Installation ---
Run time: 13:23:35 System Information Record System: XXXX
Approval Category Descriptions:
1. Production Control Supervisor 11.
2. Project Leaders 12.
3. Payroll Supervisor 13.
4. Documentation Coordinator 14.
5. 15.
6. 16.
7. 17.
8. 18.
9. 19.
10. 20.
Verification Procedure Descriptions:
1. CA-JCLCheck 11.
2. dummy 12.
APCS5103-01 Rel 03.2 Automated Production Turnover Page 8
Run date: 15/07/10 --- CA-PANAPT Field Installation ---
Run time: 13:23:35 Control File Level Record System: XXXX
Level Long Name: WORK Short Name: WORK Abbr: W DD Suffix: W
Description: DEVELOPMENT WORK
Level Long Name: VERIFY Short Name: VRFI Abbr: VR DD Suffix: V
Description: DEVELOPMENT INTEGRATION TEST
Level Long Name: BASE Short Name: BASE Abbr: BS DD Suffix: B
Description: DEFAULT TEST LEVEL
Level Long Name: QA ONE Short Name: QA Abbr: Q1 DD Suffix: 1
Description: DEFAULT QUALITY ASSURANCE LEVEL
Level Long Name: QA TWO Short Name: QA2 Abbr: Q2 DD Suffix: 2
Description: QUALITY ASSURANCE LEVEL 2
Level Long Name: PRODUCTION Short Name: PROD Abbr: P DD Suffix: P
Description: DEFAULT PRODUCTION LEVEL
APCS5103-01 Rel 03.2 Automated Production Turnover Page 9
Run date: 15/07/10 --- CA-PANAPT Field Installation ---
Run time: 13:23:35 User ID Records System: XXXX
User ID Admin? Oper? Signon? Approvals Group Information
________ _______ _______ _______ ____________________ _______________________________________________________________
*DEFAULT YES
USERID1 YES YES YES YYYY................
USERID2 YES YES YES YYYYYYYY............ SUPPORT (Y)
USERID3 YES YES YES
USERID4 YES Y.Y................. FTLIT
USERID5 *APPLPGM
USERID6 YES YES YYYYYYYYYYYYYYYYYYYY
USERID7 YES YES YES YYYY................
USERID8 YES YES
USERID9 YES GROUP2 GROUP3 GROUP4 GROUP5
***** END OF REPORT *****