|
|
| Author |
Message |
jjacome266
New User
Joined: 26 Jan 2006 Posts: 12
|
|
|
|
:oops: Hi everyone
I am getting this error everytime that I am running one of my JCL. Please I heard any ideas what to do.
Thanks The message is as follows
-JOBNAME STEPNAME PROCSTEP PROGRAM RC EXCP CONN
-A143516C JS10 PASSMP GIMSMP 00 254 373
+ERROR: OPTION NOT RECOGNIZED - *
BPXP018I THREAD 0B278D9000000000, IN PROCESS 16777440, ENDED
WITHOUT BEING UNDUBBED WITH COMPLETION CODE 000003E7, AND REA
00000000.
IEF450I A143516C PASSAS JS10 - ABEND=S000 U0999 REASON=000000
TIME=12.07.52 |
|
| Back to top |
|
 |
References
|
Posted: Thu Jan 11, 2007 12:40 am Post subject: Re: Error in my output: ABEND=S000 U0999 |
 |
|
|
 |
William Thompson
Global Moderator
Joined: 18 Nov 2006 Posts: 2975 Location: Tucson AZ
|
|
|
|
That's a good one, the best I can get is the BPX msg but the last one listed in the latest manual I could find is one short....
| Quote: |
BPXP017I DEBUGGER IS UNTRUSTED AND IS NOT ALLOWED TO DEBUG A PROGRAM CONTROLLED ENVIRONMENT.
Explanation: The debugger is untrusted (not permitted to BPX.DEBUG) and attempted to debug an environment that must stay program controlled, but is not allowed.
System Action: The request is denied.
User Response: Report the message to your security administrator.
Operator Response: None.
Source: OS/390 UNIX System Services kernel (BPX)
Detecting Module: BPXPRECP
Security Administrator Response: The untrusted user attempted to debug a program controlled environment. Determine if the debugger should be allowed to debug a program controlled environment and if so permit them to the BPX.DEBUG facility class profile with READ access. |
|
|
| Back to top |
|
 |
PeD
Active User
Joined: 26 Nov 2005 Posts: 268 Location: Belgium
|
|
|
|
| Where did you find message BPXP017I in question? |
|
| Back to top |
|
 |
William Thompson
Global Moderator
Joined: 18 Nov 2006 Posts: 2975 Location: Tucson AZ
|
|
|
|
| PeD wrote: |
| Where did you find message BPXP017I in question? |
GC28-1785-14 |
|
| Back to top |
|
 |
superk
Moderator Team Head
Joined: 26 Apr 2004 Posts: 3098 Location: Charlotte,NC USA
|
|
| Back to top |
|
 |
PeD
Active User
Joined: 26 Nov 2005 Posts: 268 Location: Belgium
|
|
|
|
| Sorry, I know that, but I mean in jjacome266's question? |
|
| Back to top |
|
 |
dick scherrer
Global Moderator
Joined: 23 Nov 2006 Posts: 7505 Location: 221 B Baker St
|
|
|
|
Hellp,
Please post your jcl. We'll be better able to help if we can see what you submitted. |
|
| Back to top |
|
 |
jjacome266
New User
Joined: 26 Jan 2006 Posts: 12
|
|
|
|
| Code: |
//*
//* USE ENTRY 'SAS' FOR SAS VERSION 9.0 OR CHECK WITH YOUR SAS SUPPORT
//PASTEST PROC PREFIX=, HI-LEVEL INDEX OF PROWL DATA SETS
// YYMM=, YEAR & MONTH OF TAPE DISTRIBUTION
// ENTRY='SASXAL', SAS ENTRY POINT NAME
// TUNIT=, UNIT NAME FOR TAPE DEVICE
// TVOL=, VOLSER OF PROWL DISTRIBUTION TAPE
// WUNIT=, UNIT NAME FOR DASD WORK DATA SETS
// SASLIB=, SAS LOAD LIBRARY
// SASAUTO=, SAS MACAUTOS LIBRARY
// SASHELP=, SAS SASHELP LIBRARY
// SASMSG= SAS SASMSG LIBRARY
//* LOUT='*' SAS LOG SYSOUT CLASS
//*
//*********************************************************************
//* *
//* P A S T E S T *
//* *
//* THIS INSTREAM PROCEDURE: *
//* *
//* 1) PRODUCES PROWL REPORTS THAT MATCH THE SAMPLES *
//* IN THE PROWL USER'S GUIDE. *
//* *
//* NOTES: THIS PROCEDURE, WHEN EXECUTED SUCCESSFULLY, *
//* VALIDATES THE INSTALLATION OF THE PROWL SYSTEM. *
//* *
//* FILES 16 AND 18 OF THE DISTRIBUTION TAPE ARE READ *
//* BY THIS JOB. *
//* *
//*********************************************************************
//*
//* PRODUCE SAMPLE REPORTS USING THE PROWL IVP DATA SETS
//*
//PASSAS EXEC PGM=&ENTRY,REGION=4096K,DYNAMNBR=10
//*
//STEPLIB DD DISP=SHR,DSN=&SASLIB
//* USE DD STATEMENT BELOW IF USING SAS V8.1 LIBRARIES
// DD DISP=SHR,DSN=&PREFIX..PAS8.SAS810.LOAD /*PROWL LIB*/
//* USE DD STATEMENT BELOW IF USING SAS V8.2 LIBRARIES
// DD DISP=SHR,DSN=&PREFIX..PAS8.SAS820.LOAD
//* USE DD STATEMENT BELOW IF USING SAS V9.0 LIBRARIES
//* DD DISP=SHR,DSN=&PREFIX..SAS900.LOAD /* PROWL LIB */
//* USE DD STATEMENT BELOW IF USING SAS V9.1.3 LIBRARIES
//* DD DISP=SHR,DSN=&PREFIX..SAS913.LOAD /* PROWL LIB */
//*
//LIBRARY DD DISP=SHR,DSN=&PREFIX..PAS.FORMATS /* PROWL FMTS. */
//*
//CONFIG DD DISP=SHR,DSN=&PREFIX..PAS.PARMS(CONFIG)
//*
//WORK DD UNIT=&WUNIT,SPACE=(CYL,(100,20),,,ROUND)
//*
//SASAUTOS DD DISP=SHR,DSN=&SASAUTO
//SASHELP DD DISP=SHR,DSN=&SASHELP
//SASMSG DD DISP=SHR,DSN=&SASMSG
//SASLOG DD SYSOUT=*
//SASLIST DD SYSOUT=*
//*
//*SASLOG DD SYSOUT=&LOUT,
//* DCB=(RECFM=VBA,LRECL=137,BLKSIZE=141)
//*SASLIST DD SYSOUT=&LOUT,
//* DCB=(RECFM=VBA,LRECL=137,BLKSIZE=141)
//SASPARMS DD UNIT=&WUNIT,SPACE=(400,(100,300)),
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=400,BUFNO=1)
//FT15F002 DD UNIT=&WUNIT,SPACE=(400,(100,300)),
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=400,BUFNO=1)
//*
//SORTWK01 DD UNIT=&WUNIT,SPACE=(TRK,(100,300))
//SORTWK02 DD UNIT=&WUNIT,SPACE=(TRK,(100,300))
//SORTWK03 DD UNIT=&WUNIT,SPACE=(TRK,(100,300))
//SORTWK04 DD UNIT=&WUNIT,SPACE=(TRK,(100,300))
//*
//FT96F001 DD UNIT=&WUNIT,SPACE=(TRK,(10,30))
//FT97F001 DD UNIT=&WUNIT,SPACE=(TRK,(10,30))
//FT98F001 DD UNIT=&WUNIT,SPACE=(TRK,(10,30))
//FT99F001 DD UNIT=&WUNIT,SPACE=(TRK,(10,30))
//*
//SOURCE DD DISP=SHR,DSN=&PREFIX..PAS&YYMM..SOURCE
//*
//VENDFMID DD DISP=SHR,DSN=&PREFIX..PAS.PARMS(VENDFMID)
//*
//USRFMID DD DISP=SHR,DSN=&PREFIX..PAS.PARMS(USRFMID)
//*
//PARMS DD DISP=SHR,DSN=&PREFIX..PAS.PARMS
//*
//SYSUDUMP DD SYSOUT=*
//*
//MASTER DD DSN=&&PAS, * TEMP TEST DATA BASE*
// DISP=(,PASS),
// UNIT=&WUNIT,
// DCB=(RECFM=FS,LRECL=6144,BLKSIZE=6144),
// SPACE=(TRK,(350,50),RLSE)
//*
//PASIVPI DD DSN=AI.PAS&YYMM..PASIVP, * TAPE -TEST PROWL DATA*
// DISP=OLD,
// UNIT=&TUNIT,
// LABEL=(18,SL,EXPDT=98000),
// VOL=(,RETAIN,SER=&TVOL)
//*
//RUNOPTS DD DUMMY * RUN TIME OPTIONS *
//*
//PROBLEMS DD DSN=&&TEMP, * EXTRACTED PROBLEMS *
// DISP=(,PASS),
// UNIT=&WUNIT,
// DCB=(RECFM=FS,LRECL=6144,BLKSIZE=6144),
// SPACE=(TRK,(30,30))
//*
//SMPPUNCH DD DSN=AI.PAS&YYMM..SMPIVP, * TAPE -TEST SMP DATA*
// DISP=OLD,
// UNIT=AFF=PASIVPI,
// LABEL=(20,SL,EXPDT=98000),
// VOL=SER=&TVOL
// PEND
//*
//* EXECUTE THE PASTEST INSTREAM PROCEDURE
//*
//JS10 EXEC PASTEST,PREFIX=SYS2.PROWL,
// YYMM=0610, YEAR & MONTH OF TAPE DISTRIBUTION
// TUNIT=CART, UNIT NAME FOR TAPE DEVICE
// TVOL=PW0610, VOLSER OF PROWL DISTRIBUTION TAPE
// WUNIT=SYSDA, UNIT NAME FOR DASD WORK DATA SETS
// SASLIB=SYS1.SAS.LIBRARY,
// SASAUTO=SYS1.SAS.AUTOLIB,
// SASHELP=SYS1.SAS.SASHELP,
// SASMSG=SYS1.SAS.SASMSG
//* LOUT='*' SAS LOG SYSOUT CLASS
//*
//PASSAS.RUNOPTS DD *
%PASOPTS(TITLE='PROWL RELEASE 6 VALIDATION DATA',
REPORTS=1 2 3 4 6 7
)
/*
//PASSAS.SYSIN DD *
PROC CIMPORT LIBRARY=MASTER INFILE=PASIVPI TAPE;
RUN;
%INCLUDE SOURCE(#PASMAC);
OPTIONS NOSOURCE;
%INCLUDE SOURCE(PASSMP);
%INCLUDE SOURCE(PASSMA);
%LET RPTDATA=PROBLEMS.APARS;
%PASRPTS(&PASRPTS); /* VARIABLE SET BY %PASOPTS */
RUN;
/*
|
*******NOW COMES THE LOG************
| Code: |
STMT NO. MESSAGE
3 IEFC001I PROCEDURE PASTEST WAS EXPANDED USING INSTREAM PROCEDURE DEFIN
33 IEF604I EXPDT SUBPARAMETER OF LABEL KEYWORD SPECIFIES ZERO DAYS VALUE
36 IEF604I EXPDT SUBPARAMETER OF LABEL KEYWORD SPECIFIES ZERO DAYS VALUE
ICH70001I ARCHIVE LAST ACCESS AT 10:14:09 ON FRIDAY, JANUARY 12, 2007
IEF236I ALLOC. FOR A143516C PASSAS JS10
IEF237I 05AA ALLOCATED TO STEPLIB
IEF237I 0520 ALLOCATED TO
IEF237I 0520 ALLOCATED TO
IEF237I 0520 ALLOCATED TO LIBRARY
IEF237I 0520 ALLOCATED TO CONFIG
IGD100I 0597 ALLOCATED TO DDNAME WORK DATACLAS ( )
IEF237I 05AA ALLOCATED TO SASAUTOS
IEF237I 05AA ALLOCATED TO SASHELP
IEF237I 05AA ALLOCATED TO SASMSG
IEF237I JES2 ALLOCATED TO SASLOG
IEF237I JES2 ALLOCATED TO SASLIST
IGD100I 0557 ALLOCATED TO DDNAME SASPARMS DATACLAS ( )
IGD100I 054F ALLOCATED TO DDNAME FT15F002 DATACLAS ( )
IGD100I 0517 ALLOCATED TO DDNAME SORTWK01 DATACLAS ( )
IGD100I 05B7 ALLOCATED TO DDNAME SORTWK02 DATACLAS ( )
IGD100I 051C ALLOCATED TO DDNAME SORTWK03 DATACLAS ( )
IGD100I 05B7 ALLOCATED TO DDNAME SORTWK04 DATACLAS ( )
IGD100I 0517 ALLOCATED TO DDNAME FT96F001 DATACLAS ( )
IGD100I 054F ALLOCATED TO DDNAME FT97F001 DATACLAS ( )
IGD100I 0517 ALLOCATED TO DDNAME FT98F001 DATACLAS ( )
IGD100I 0557 ALLOCATED TO DDNAME FT99F001 DATACLAS ( )
IEF237I 0520 ALLOCATED TO SOURCE
IEF237I 0520 ALLOCATED TO VENDFMID
IEF237I 0520 ALLOCATED TO USRFMID
IEF237I 0520 ALLOCATED TO PARMS
IEF237I JES2 ALLOCATED TO SYSUDUMP
IGD100I 051C ALLOCATED TO DDNAME MASTER DATACLAS ( )
IEF237I 0405 ALLOCATED TO PASIVPI
IEF237I JES2 ALLOCATED TO RUNOPTS
IGD100I 0517 ALLOCATED TO DDNAME PROBLEMS DATACLAS ( )
IEF237I 0405 ALLOCATED TO SMPPUNCH
IEF237I JES2 ALLOCATED TO SYSIN
ERROR: OPTION NOT RECOGNIZED - *
BPXP018I THREAD 0B27F70000000000, IN PROCESS 50331822, ENDED
WITHOUT BEING UNDUBBED WITH COMPLETION CODE 000003E7, AND REASON CODE
00000000.
IEF472I A143516C PASSAS JS10 - COMPLETION CODE - SYSTEM=000 USER=0999 REASON=000
IEF285I SYS1.SAS.LIBRARY KEPT
IEF285I VOL SER NOS= MIC005.
IEF285I SYS2.PROWL.PAS8.SAS810.LOAD KEPT
IEF285I VOL SER NOS= MVS003.
IEF285I SYS2.PROWL.PAS8.SAS820.LOAD KEPT
IEF285I VOL SER NOS= MVS003.
IEF285I SYS2.PROWL.PAS.FORMATS KEPT
IEF285I VOL SER NOS= MVS003.
IEF285I SYS2.PROWL.PAS.PARMS KEPT
IEF285I VOL SER NOS= MVS003.
IEF285I SYS07012.T113742.RA000.A143516C.R0148700 DELETED
IEF285I VOL SER NOS= PUB003.
IEF285I SYS1.SAS.AUTOLIB KEPT
IEF285I VOL SER NOS= MIC005.
IEF285I SYS1.SAS.SASHELP KEPT
IEF285I VOL SER NOS= MIC005.
IEF285I SYS1.SAS.SASMSG KEPT
IEF285I VOL SER NOS= MIC005.
IEF285I ARCHIVE.A143516C.JOB06461.D0000103.? SYSOUT
IEF285I ARCHIVE.A143516C.JOB06461.D0000104.? SYSOUT
IEF285I SYS07012.T113742.RA000.A143516C.R0148701 DELETED
IEF285I VOL SER NOS= PUB002.
IEF285I SYS07012.T113742.RA000.A143516C.R0148702 DELETED
IEF285I VOL SER NOS= PUB006.
IEF285I SYS07012.T113742.RA000.A143516C.R0148703 DELETED
IEF285I VOL SER NOS= PUB001.
IEF285I SYS07012.T113742.RA000.A143516C.R0148704 DELETED
IEF285I VOL SER NOS= PUB004.
IEF285I SYS07012.T113742.RA000.A143516C.R0148705 DELETED
IEF285I VOL SER NOS= PUB005.
IEF285I SYS07012.T113742.RA000.A143516C.R0148706 DELETED
IEF285I VOL SER NOS= PUB004.
IEF285I SYS07012.T113742.RA000.A143516C.R0148707 DELETED
IEF285I VOL SER NOS= PUB001.
IEF285I SYS07012.T113742.RA000.A143516C.R0148708 DELETED
IEF285I VOL SER NOS= PUB006.
IEF285I SYS07012.T113742.RA000.A143516C.R0148709 DELETED
IEF285I VOL SER NOS= PUB001.
IEF285I SYS07012.T113742.RA000.A143516C.R0148710 DELETED
IEF285I VOL SER NOS= PUB002.
IEF285I SYS2.PROWL.PAS0610.SOURCE KEPT
IEF285I VOL SER NOS= MVS003.
IEF285I SYS2.PROWL.PAS.PARMS KEPT
IEF285I VOL SER NOS= MVS003.
IEF285I SYS2.PROWL.PAS.PARMS KEPT
IEF285I VOL SER NOS= MVS003.
IEF285I SYS2.PROWL.PAS.PARMS KEPT
IEF285I VOL SER NOS= MVS003.
IEF285I ARCHIVE.A143516C.JOB06461.D0000105.? SYSOUT
IEF285I AI.PAS0610.PASIVP KEPT
IEF285I VOL SER NOS= PW0610.
IEF285I ARCHIVE.A143516C.JOB06461.D0000101.? SYSIN
IEF285I AI.PAS0610.SMPIVP KEPT
IEF285I VOL SER NOS= PW0610.
IEF285I ARCHIVE.A143516C.JOB06461.D0000102.? SYSIN
IEF373I STEP/PASSAS /START 2007012.1137
IEF374I STEP/PASSAS /STOP 2007012.1137 CPU 0MIN 00.16SEC SRB 0MIN 00.04
IEF285I SYS07012.T113744.RA000.A143516C.R0148713 KEPT
IEF285I VOL SER NOS= PUB005.
IEF285I SYS07012.T113742.RA000.A143516C.PAS.H01 DELETED
IEF285I VOL SER NOS= PUB005.
IEF237I 0517 ALLOCATED TO SYS00002
IEF285I SYS07012.T113744.RA000.A143516C.R0148714 KEPT
IEF285I VOL SER NOS= PUB001.
IEF285I SYS07012.T113742.RA000.A143516C.TEMP.H01 DELETED
IEF285I VOL SER NOS= PUB001.
IEF375I JOB/A143516C/START 2007012.1137
IEF376I JOB/A143516C/STOP 2007012.1137 CPU 0MIN 00.16SEC SRB 0MIN 00.04S
|
|
|
| Back to top |
|
 |
dick scherrer
Global Moderator
Joined: 23 Nov 2006 Posts: 7505 Location: 221 B Baker St
|
|
|
|
Hello,
You might try removing the comment info from this line
| Code: |
| %PASRPTS(&PASRPTS); /* VARIABLE SET BY %PASOPTS */ |
If you want to keep the comment, place it on a separate line.
In additon to the
| Code: |
ERROR: OPTION NOT RECOGNIZED - *
BPXP018I THREAD 0B27F70000000000, IN PROCESS 50331822, ENDED |
that was placed in the deallocation info, there may also be something in one of the SYSOUT datasets. |
|
| Back to top |
|
 |
mmwife
Super Moderator
Joined: 30 May 2003 Posts: 1480
|
|
|
|
Hi Jose,
You might also want to verify that your STEPLIB requires libraries from 2 versions of SAS as the JCL indicates.
I can't see any direct bearing on your problem from this, but you never know. |
|
| Back to top |
|
 |
Paul Hunter
New User
Joined: 02 Apr 2008 Posts: 2 Location: Yonkers, NY
|
|
|
|
| Was there ever a resolution to this problem? I am encountering the same issue. |
|
| Back to top |
|
 |
dick scherrer
Global Moderator
Joined: 23 Nov 2006 Posts: 7505 Location: 221 B Baker St
|
|
|
|
Hello Paul and welcome to the forums,
Do you also recieve the same "* option not recognized" as the orignal post or do you have somethng different?
It may help if you post your jcl and the diagnostic info the system presented. |
|
| Back to top |
|
 |
Paul Hunter
New User
Joined: 02 Apr 2008 Posts: 2 Location: Yonkers, NY
|
|
|
|
| We found the solution to our abend: the SAS license had expired. Applying the renewal SETINIT resolved the issue. No SAS o/p appeared in the jobs that failed, just the abend. We looked at the last one that ran and saw that the license was expiring. |
|
| Back to top |
|
 |
dick scherrer
Global Moderator
Joined: 23 Nov 2006 Posts: 7505 Location: 221 B Baker St
|
|
|
|
Hello,
| Quote: |
| We found the solution to our abend: |
Thank you for posting that your issue is resolved.
d |
|
| Back to top |
|
 |
doczee
New User
Joined: 28 Aug 2008 Posts: 1 Location: USA
|
|
|
|
| Code: |
---- WEDNESDAY, 27 AUG 2008 ----
$HASP971 OS/EM VER 6.1 - JCL CONVERTED BY JES2 ON PRD1
IEF677I WARNING MESSAGE(S) FOR JOB PCICWWBH ISSUED
ICH70001I BSYSID LAST ACCESS AT 12:00:06 ON WEDNESDAY, AUGUST 27, 2008
$HASP373 PCICWWBH STARTED - INIT 6 - CLASS P - SYS PRD1
E48E03I PCICWWBH production run 00385 gen cycle 00000 beginning
IEF403I PCICWWBH - STARTED - TIME=12.00.37
- --TIMINGS (MINS.)--
-JOBNAME STEPNAME PROCSTEP RC EXCP CONN TCB SRB CLOCK SERV
-PCICWWBH ZEKECTL FLUSH 0 0 .00 .00 .3 0
-PCICWWBH DELETE 00 4 69 .00 .00 .0 516
SVM0500I PCICWWBH,DEFINE,DD,PCICS.USAGE.CPU.HOURSTAT INITIALIZED
-PCICWWBH DEFINE 00 9 2 .00 .00 .0 2658
-PCICWWBH STEP01 PROC0010 00 159K 126K .60 .04 6.2 8913K
-PCICWWBH CICSPD01 STEP02 00 450 149 .04 .00 .0 559K
-PCICWWBH STEP01 PROC0010 00 4894 1643 .02 .00 .1 399K
-PCICWWBH CICSPD02 STEP02 00 71 12 .00 .00 .0 43207
BPXP018I THREAD 27A3679000000002, IN PROCESS 50331920, ENDED 267
WITHOUT BEING UNDUBBED WITH COMPLETION CODE 000003E7, AND REASON CODE
00000000.
BPXP018I THREAD 279EB29000000000, IN PROCESS 50331920, ENDED 268
WITHOUT BEING UNDUBBED WITH COMPLETION CODE 040003E7, AND REASON CODE
00000000.
SVM0500I PCICWWBH,STEP01,SASLIST,SYS08240.T120012.RA000.PCICWWBH.HOUR.H01 INIT
S ABENDMSG,P='PCICWWBH - ABEND=S000 U0999 TERMINATED ABNORMALLY'
IEF450I PCICWWBH PROC0010 STEP01 - ABEND=S000 U0999 REASON=00000000 271
TIME=12.07.17 |
JCL is as follows....
| Code: |
//PCICWWBH JOB (CPSI,,,IVP),'PCICWWBH',MSGCLASS=P,
// MSGLEVEL=(1,1),CLASS=P,USER=BSYSID
//*
//CPUHSTAT PROC PRMJOBN=,GDGLV=-1
//STEP01 EXEC SASPROD,
// PRMOPTN='MACRO MAUTOSOURCE S=72 S2=72 DQUOTE'
//SASAUTOS DD DISP=SHR,DSN=SYS2.OMEGA.CICS.JMFE.KC2SPROG,VOL=
//SOURCLIB DD DISP=SHR,DSN=SYS2.OMEGA.CICS.JMFE.KC2SPROG
//DAILY DD DISP=SHR,DSN=PCICS.OMEGCICS.&PRMJOBN..WEEKLY(&GDGLV)
//SASLIST DD DSN=&&HOUR,UNIT=TEMPDA,DISP=(NEW,PASS),
// SPACE=(CYL,(10,10)),DCB=(RECFM=FB,LRECL=133,DSORG=PS)
//SYSIN DD SUBSYS=(CCSS,
// '%KC2DRP1 (DAILYLO=01,DAILYHI=07,HRLO=00,HRHI=00)',
// '%KC2DRP1 (DAILYLO=01,DAILYHI=07,HRLO=01,HRHI=01)',
// '%KC2DRP1 (DAILYLO=01,DAILYHI=07,HRLO=02,HRHI=02)',
// '%KC2DRP1 (DAILYLO=01,DAILYHI=07,HRLO=03,HRHI=03)',
// '%KC2DRP1 (DAILYLO=01,DAILYHI=07,HRLO=04,HRHI=04)',
// '%KC2DRP1 (DAILYLO=01,DAILYHI=07,HRLO=05,HRHI=05)',
// '%KC2DRP1 (DAILYLO=01,DAILYHI=07,HRLO=06,HRHI=06)',
// '%KC2DRP1 (DAILYLO=01,DAILYHI=07,HRLO=07,HRHI=07)',
// '%KC2DRP1 (DAILYLO=01,DAILYHI=07,HRLO=08,HRHI=08)',
// '%KC2DRP1 (DAILYLO=01,DAILYHI=07,HRLO=09,HRHI=09)',
// '%KC2DRP1 (DAILYLO=01,DAILYHI=07,HRLO=10,HRHI=10)',
// '%KC2DRP1 (DAILYLO=01,DAILYHI=07,HRLO=11,HRHI=11)',
// '%KC2DRP1 (DAILYLO=01,DAILYHI=07,HRLO=12,HRHI=12)',
// '%KC2DRP1 (DAILYLO=01,DAILYHI=07,HRLO=13,HRHI=13)',
// '%KC2DRP1 (DAILYLO=01,DAILYHI=07,HRLO=14,HRHI=14)',
// '%KC2DRP1 (DAILYLO=01,DAILYHI=07,HRLO=15,HRHI=15)',
// '%KC2DRP1 (DAILYLO=01,DAILYHI=07,HRLO=16,HRHI=16)',
// '%KC2DRP1 (DAILYLO=01,DAILYHI=07,HRLO=17,HRHI=17)',
// '%KC2DRP1 (DAILYLO=01,DAILYHI=07,HRLO=18,HRHI=18)',
// '%KC2DRP1 (DAILYLO=01,DAILYHI=07,HRLO=19,HRHI=19)',
// '%KC2DRP1 (DAILYLO=01,DAILYHI=07,HRLO=20,HRHI=20)',
// '%KC2DRP1 (DAILYLO=01,DAILYHI=07,HRLO=21,HRHI=21)',
// '%KC2DRP1 (DAILYLO=01,DAILYHI=07,HRLO=22,HRHI=22)',
// '%KC2DRP1 (DAILYLO=01,DAILYHI=07,HRLO=23,HRHI=23)')
//*
//STEP02 EXEC PGM=IKJEFT01,REGION=8M,PARM='CICHOUR1'
//SYSEXEC DD DSN=SYS2.COMMON.SYSEXEC,DISP=SHR
//DATEREF DD DSN=PCICS.USAGE.HISTORY.DATE,DISP=SHR
//RESP DD DSN=&&HOUR,DISP=(OLD,DELETE)
//OUTTIME DD DSN=PCICS.USAGE.CPU.HOURSTAT,UNIT=SYSDA,
// SPACE=(CYL,(10,10)),DISP=(MOD,CATLG)
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD DUMMY
// PEND
//*
//DELETE EXEC PGM=IEFBR14
//DD DD DSN=PCICS.USAGE.CPU.HOURSTAT,DISP=(MOD,DELETE),
// DCB=(RECFM=FB,DSORG=PS,LRECL=133),UNIT=SYSDA,
// SPACE=(TRK,1)
//*
//DEFINE EXEC PGM=IEFBR14
//DD DD DSN=PCICS.USAGE.CPU.HOURSTAT,DISP=(NEW,CATLG),
// DCB=(RECFM=FB,DSORG=PS,LRECL=133),UNIT=SYSDA,
// SPACE=(CYL,(10,10),RLSE)
//*
//CICSPD01 EXEC CPUHSTAT,PRMJOBN=CICSPD01
//CICSPD02 EXEC CPUHSTAT,PRMJOBN=CICSPD02
//CICSPD04 EXEC CPUHSTAT,PRMJOBN=CICSPD04
//CICSPD05 EXEC CPUHSTAT,PRMJOBN=CICSPD05
//CICSPD06 EXEC CPUHSTAT,PRMJOBN=CICSPD06
//CICSPD07 EXEC CPUHSTAT,PRMJOBN=CICSPD07
//CICSPCPX EXEC CPUHSTAT,PRMJOBN=CICSPCPX
//CICSPCP2 EXEC CPUHSTAT,PRMJOBN=CICSPCP2
//CICSPD0A EXEC CPUHSTAT,PRMJOBN=CICSPD0A
//*ICSP4A1 EXEC CPUHSTAT,PRMJOBN=CICSP4A1
//CICSPKB0 EXEC CPUHSTAT,PRMJOBN=CICSPKB0
//*
//STEP03 EXEC PGM=SORT,PARM='DYNALLOC=(SYSDA,2)'
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SORTPRT DD SYSOUT=*
//SORTDIAG DD SYSOUT=*
//SORTIN DD DISP=SHR,DSN=PCICS.USAGE.CPU.HOURSTAT
//SORTOUT DD DISP=SHR,DSN=PCICS.USAGE.CPU.HOURSTAT
//SYSIN DD SUBSYS=(CCSS,
// ' SORT FIELDS=(12,8,CH,A,1,10,CH,A,21,4,CH,A,79,2,CH,A)')
//*
//STEP04 EXEC PGM=IKJEFT01,REGION=8M,PARM='CICHOUR2'
//SYSEXEC DD DSN=SYS2.COMMON.SYSEXEC,DISP=SHR
//DATEREF DD DSN=PCICS.USAGE.HISTORY.DATE,DISP=SHR
//INPUT DD DISP=SHR,DSN=PCICS.USAGE.CPU.HOURSTAT
//OUTPUT DD DSN=&&HOUR0,DISP=(NEW,PASS),
// SPACE=(CYL,(10,10)),DCB=(RECFM=FB,LRECL=530,DSORG=PS)
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD DUMMY
//*
//STEP05 EXEC PGM=SORT,PARM='DYNALLOC=(SYSDA,2)'
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SORTPRT DD SYSOUT=*
//SORTDIAG DD SYSOUT=*
//SORTIN DD DISP=SHR,DSN=&&HOUR0
//SORTOUT DD DSN=&&HOUR11,UNIT=TEMPDA,DISP=(NEW,PASS),
// SPACE=(CYL,(10,10)),DCB=*.SORTIN
//SYSIN DD *
SORT FIELDS=(12,13,CH,A)
//*
//STEP06 EXEC PGM=SORT,PARM='DYNALLOC=(SYSDA,2)'
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SORTPRT DD SYSOUT=*
//SORTDIAG DD SYSOUT=*
//SORTIN DD DISP=SHR,DSN=PCICS.USAGE.HISTORY.TRAN(00)
//SORTOUT DD DSN=&&HOUR12,UNIT=TEMPDA,DISP=(NEW,PASS),
// SPACE=(TRK,(10,10)),DCB=*.SORTIN
//SYSIN DD *
SORT FIELDS=(12,13,CH,A)
INCLUDE COND=(16,1,CH,EQ,C'P')
SUM FIELDS=NONE
//*
//STEP07 EXEC PGM=IKJEFT01,REGION=8M,PARM='CICRESP2'
//SYSEXEC DD DSN=SYS2.COMMON.SYSEXEC,DISP=SHR
//RESP DD DSN=&&HOUR11,DISP=(OLD,DELETE)
//RECD DD DSN=&&HOUR12,DISP=(OLD,DELETE)
//OUTPUT DD DSN=&&HOUR1,DISP=(NEW,PASS),
// DCB=(RECFM=FB,LRECL=530,DSORG=PS,BUFNO=30),
// UNIT=SYSDA,SPACE=(TRK,(240,240),RLSE)
//SYSTSPRT DD SYSOUT=*
//SYSTSIN DD DUMMY
//*
//STEP08 EXEC PGM=SORT,PARM='DYNALLOC=(SYSDA,2)'
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SORTPRT DD SYSOUT=*
//SORTDIAG DD SYSOUT=*
//SORTIN DD DISP=(SHR,PASS),DSN=&&HOUR1
// DD DISP=SHR,DSN=PCICS.USAGE.HISTORY.CPU.HOUR.DAILY(00)
//SORTOUT DD | | | |