Writer instructions | |
|---|---|
Page title | For most spaces, this page must be titled Space announcements. For spaces with localized content, this page must be titled Space announcements l10n. |
Purpose | Provide an announcement banner on every page of your space. |
Location | Move this page outside of your home branch. |
Guidelines | |
IMFLEDIT execution
To execute IMFLEDIT, use the JCL statements in the following table.
Statement | Use |
|---|---|
EXEC | Specifies the name of the Log Edit program (PGM=IMFLEDIT) The region requirement could be affected by the:
You can add the PARM=’nn’ parameter to the EXEC statement to designate an alternate member name. For example, to designate IMFLEP01, you would include PARM='01' in the EXEC statement. If the nn value is not two characters long, the 00 default value is used. If the resulting member is not found, IMFLEDIT stops with a return code of 32. |
STEPLIB DD | Defines the program library containing the IMFLEDIT program load module |
SORTLIB DD | Defines the sort program library (such as DFSORT) This statement is used only when IMFLEDIT is being run for shared message queues (SMQ=YES). |
LOGFILE DD | Defines IMS log data set to be processed by program IMFLEDIT If several log files are concatenated, they must be in chronological order, unless IMFLEDIT is being run for shared message queues. When IMFLEDIT is being run for shared message queues (SMQ=YES in IMFLEP00), logs from all IMS systems are concatenated to the LOGFILE DD. When SMQ=YES, logs do not have to be concatenated in chronological order, but the execution will perform better if they are. If the log is in VBS format, specify the following: DCB=RECFM=VBS |
RESUTIL DD | Defines the IRUF to be created |
AUDITS DD | Defines the message data set containing the Log Edit Audit Report |
RTAUDIT DD | If the SELREC input parameter is specified, defines the data set to which selected records are written |
FAUTIL DD | Contains all transaction (X'FA') records encountered in the LOGFILE Before writing the transaction records, IMFLEDIT adjusts the timestamps in the transaction records so that they remain consistent with the corresponding timestamps in the transaction accounting records (TARs) written to the IRUF (including the timestamp related to MSGSWIQT). The following attributes are required: |
IMFPARM DD | Defines the BMC AMI Ops Monitor for IMS Offline parameter (BBPARM) library |
ERRORS DD | Defines the data set containing the Log Edit Error Report |
SYSOUT DD | Defines the data set where DFSORT writes its error messages and performance statistics This statement is used only when IMFLEDIT is being run for shared message queues (SMQ=YES). |
SORTDIAG DD | Specifies that the IMFLEDIT internal call to DFSORT will cause the sorting performance statistics to be printed on the SYSOUT DD The statistics are useful for tuning SORTWK01, SORTWK02, and SORTWK03 to improve DFSORT performance. This statement is used only when IMFLEDIT is being run for shared message queues (SMQ=YES). |
SORTWK01 SORTWK02 SORTWK03 | Defines work data sets for sorting shared message queue logs when SMQ=YES is set in IMFLEP00 Space should always be allocated in cylinders and set so that no secondary allocation is used. These statements should be put on different channel paths, and they should be allocated on the same type of device. |
IMFLEDIT JCL example
//STEP1 EXEC PGM=IMFLEDIT,REGION=4096K
//STEPLIB DD DSN=IMF.LOAD,DISP=SHR
//SORTLIB DD DSN=&SORTLIB,DISP=SHR
//LOGFILE DD DSN=IMSLOG,VOL=SER=......,DISP=OLD,UNIT=tape
//RESUTIL DD DSN=IRUF.DAYS(+1),DISP=(NEW,CATLG),UNIT=tape,
// DCB=(RECFM=VBS,LRECL=30970,BLKSIZE=30974,BUFNO=100)
//AUDITS DD SYSOUT=A,DCB=(RECFM=FBA,LRECL=133,BLKSIZE=1330)
//RTAUDIT DD DSN=XO7REC,DISP=(NEW,CATLG),UNIT=SYSDA,
// SPACE=(CYL,(2,1)),
// DCB=(RECFM=VB,LRECL=2400,BLKSIZE=4524)
//IMFPARM DD DSN=IMF.BBPARM,DISP=SHR
//ERRORS DD SYSOUT=A,DCB=(RECFM=FBA,LRECL=133,BLKSIZE=1330)
//SYSUDUMP DD SYSOUT=A
IMFLEDIT JCL example when SMQ=YES
//STEP1 EXEC PGM=IMFLEDIT,REGION=4096K
//STEPLIB DD DSN=IMF.LOAD,DISP=SHR
//SORTLIB DD DSN=&SORTLIB,DISP=SHR
//LOGFILE DD DSN=IMSLOG,VOL=SER=......,DISP=OLD,UNIT=tape
//RESUTIL DD DSN=IRUF.DAYS(+1),DISP=(NEW,CATLG),UNIT=tape,
// DCB=(RECFM=VBS,LRECL=30970,BLKSIZE=30974,BUFNO=100)
//AUDITS DD SYSOUT=A,DCB=(RECFM=FBA,LRECL=133,BLKSIZE=1330)
//IMFPARM DD DSN=IMF.BBPARM,DISP=SHR
//ERRORS DD SYSOUT=A,DCB=(RECFM=FBA,LRECL=133,BLKSIZE=1330)
//SYSUDUMP DD SYSOUT=A
//SYSOUT DD SYSOUT=*
//SORTDIAG DD DUMMY
//SORTWK01 DD UNIT=SYSDA,SPACE=(CYL,(50))
//SORTWK02 DD UNIT=SYSDA,SPACE=(CYL,(50))
//SORTWK03 DD UNIT=SYSDA,SPACE=(CYL,(50))
IMFLEDIT JCL example when FAUTIL=YES
//STEP1 EXEC PGM=IMFLEDIT,REGION=4096K
//STEPLIB DD DSN=IMF.LOAD,DISP=SHR
//SORTLIB DD DSN=&SORTLIB,DISP=SHR
//LOGFILE DD DSN=IMSLOG,VOL=SER=......,DISP=OLD,UNIT=tape
//RESUTIL DD DSN=IRUF.DAYS(+1),DISP=(NEW,CATLG),UNIT=tape,
// DCB=(RECFM=VBS,LRECL=30970,BLKSIZE=30974,BUFNO=100)
//AUDITS DD SYSOUT=A,DCB=(RECFM=FBA,LRECL=133,BLKSIZE=1330)
//RTAUDIT DD DSN=XO7REC,DISP=(NEW,CATLG),UNIT=SYSDA,
// SPACE=(CYL,(2,1)),
// DCB=(RECFM=VB,LRECL=2400,BLKSIZE=4524)
//FAUTIL DD DSN=&INDEX..IMF.FAUTIL,DISP=(NEW,CATLG),
// UNIT=&DASUNIT,SPACE=(TRK,(5,1)),
// DCB=(RECFM=VB,LRECL=2400,BLKSIZE=4524)
//IMFPARM DD DSN=IMF.BBPARM,DISP=SHR
//ERRORS DD SYSOUT=A,DCB=(RECFM=FBA,LRECL=133,BLKSIZE=1330)
//SYSUDUMP DD SYSOUT=A