Options for generating and viewing JCL for executing an Energizer report
The following example shows JCL generated from input to the Journal Report options panel:
File Edit Edit_Settings Menu Utilities Compilers Test Help
ssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssss
EDIT BOLPXV.IMSA.IPR#JRND.JCL Columns 00001 00080
****** ********************************* Top of Data *********************************
000001 //JOBNAME JOB NNNN,NAME,
000002 // NOTIFY=&SYSUID,
000003 // MSGLEVEL=(1,1)
000004 //*--------------------------------------------------------------*
000005 //* MEMBER : IPR#JRND *
000006 //* *
000007 //* PURPOSE : LOCATE AND PRINT THE JOURNAL DATA SETS CREATED BY *
000008 //* ENERGIZER FOR IMS CONNECT. *
000009 //* *
000010 //* THIS JCL WILL FIND THE JOURNAL DATA SETS CREATED *
000011 //* BY THE IMS CONNECT SYSTEM DESIGNATED BY THE *
000012 //* JOURNAL_PREFIX AND A START_DATE/START_TIME PAIR. *
000013 //* *
000014 //* SPECIFIC JOURNAL DATA SETS MAY BE TARGETED *
000015 //* BY THE USE OF THE JOURNAL DD STATEMENT *
000016 //* AND OMISSION OF THE JOURNAL_PREFIX KEYWORD. *
000017 //* *
000018 //* THIS JCL MAY BE USED TO SELECT AND PRINT THE *
000019 //* RECORDS IN JOURNAL DATA SETS. *
000020 //*--------------------------------------------------------------*
000021 //REP0 EXEC PGM=IPAJREP0
000022 //STEPLIB DD DSN=IPR.V18.LOAD,
000023 // DISP=SHR
000024 //SYSOUT DD SYSOUT=* (MESSAGES)
000025 //SYSPRINT DD SYSOUT=* (REPORTS)
000026 //SYSUDUMP DD SYSOUT=*
000027 //SYSIN DD *
000028 *
000029 * <- AN ASTERISK IN COLUMN ONE INDICATES A COMMENT
000030 *
000031 *--- VALID TYPE = EVNT/TRAN/STAT/HIST/ALL
000032 TYPE =TRAN,
000033 *
000034 *--- VALID REPORT = DUMP/RESP/EXCP/TRNR/CMDS/EVNT/HIST/
000035 * CONH/I2IR/MSCR/ODBR
000036 REPORT=TRNR,
000037 *
000038 *--- VALID SORT VALUE = USER/TRAN/EXIT/DS/CLIENT/RESPTIME
000039 SORT=RESPTIME,
000040 *
000041 *--- FILTER SPECIFICATION
000042 TRAN=PART,
000043 USERID=USER?ID,
000044 * IP_ADDRESS=123.1.1.1,
000045 EXIT=EXITNA*,
000046 * DS=DSVPXXX,
000047 * CLIENT=,
000048 * MSG_TYPE =SENDONLY,
000049 * RESPONSE_TIME=0099,
000050 * EVENT=(),
000051 *
000052 *--- JOURNAL_PREFIX (REQUIRED IF JOURNAL DD NOT SPECIFIED)
000053 JOURNAL_PREFIX=BOLPXV.VP5B.ICON,
000054 *
000055 START_DATE=2017021,
000056 START_TIME=00000001,
000057 END_DATE=2017243,
000058 END_TIME=23595999,
000059 *
000060 ZONE=LOCAL,
000061 CARRIAGE_CONTROL=Y,
000062 LINES_PER_PAGE=60
000063 *
000064 /*
000065 //
ssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssssss
EDIT BOLPXV.IMSA.IPR#JRND.JCL Columns 00001 00080
****** ********************************* Top of Data *********************************
000001 //JOBNAME JOB NNNN,NAME,
000002 // NOTIFY=&SYSUID,
000003 // MSGLEVEL=(1,1)
000004 //*--------------------------------------------------------------*
000005 //* MEMBER : IPR#JRND *
000006 //* *
000007 //* PURPOSE : LOCATE AND PRINT THE JOURNAL DATA SETS CREATED BY *
000008 //* ENERGIZER FOR IMS CONNECT. *
000009 //* *
000010 //* THIS JCL WILL FIND THE JOURNAL DATA SETS CREATED *
000011 //* BY THE IMS CONNECT SYSTEM DESIGNATED BY THE *
000012 //* JOURNAL_PREFIX AND A START_DATE/START_TIME PAIR. *
000013 //* *
000014 //* SPECIFIC JOURNAL DATA SETS MAY BE TARGETED *
000015 //* BY THE USE OF THE JOURNAL DD STATEMENT *
000016 //* AND OMISSION OF THE JOURNAL_PREFIX KEYWORD. *
000017 //* *
000018 //* THIS JCL MAY BE USED TO SELECT AND PRINT THE *
000019 //* RECORDS IN JOURNAL DATA SETS. *
000020 //*--------------------------------------------------------------*
000021 //REP0 EXEC PGM=IPAJREP0
000022 //STEPLIB DD DSN=IPR.V18.LOAD,
000023 // DISP=SHR
000024 //SYSOUT DD SYSOUT=* (MESSAGES)
000025 //SYSPRINT DD SYSOUT=* (REPORTS)
000026 //SYSUDUMP DD SYSOUT=*
000027 //SYSIN DD *
000028 *
000029 * <- AN ASTERISK IN COLUMN ONE INDICATES A COMMENT
000030 *
000031 *--- VALID TYPE = EVNT/TRAN/STAT/HIST/ALL
000032 TYPE =TRAN,
000033 *
000034 *--- VALID REPORT = DUMP/RESP/EXCP/TRNR/CMDS/EVNT/HIST/
000035 * CONH/I2IR/MSCR/ODBR
000036 REPORT=TRNR,
000037 *
000038 *--- VALID SORT VALUE = USER/TRAN/EXIT/DS/CLIENT/RESPTIME
000039 SORT=RESPTIME,
000040 *
000041 *--- FILTER SPECIFICATION
000042 TRAN=PART,
000043 USERID=USER?ID,
000044 * IP_ADDRESS=123.1.1.1,
000045 EXIT=EXITNA*,
000046 * DS=DSVPXXX,
000047 * CLIENT=,
000048 * MSG_TYPE =SENDONLY,
000049 * RESPONSE_TIME=0099,
000050 * EVENT=(),
000051 *
000052 *--- JOURNAL_PREFIX (REQUIRED IF JOURNAL DD NOT SPECIFIED)
000053 JOURNAL_PREFIX=BOLPXV.VP5B.ICON,
000054 *
000055 START_DATE=2017021,
000056 START_TIME=00000001,
000057 END_DATE=2017243,
000058 END_TIME=23595999,
000059 *
000060 ZONE=LOCAL,
000061 CARRIAGE_CONTROL=Y,
000062 LINES_PER_PAGE=60
000063 *
000064 /*
000065 //
Tip: For faster searching, add an asterisk to the end of your partial query. Example: cert*