The fix is shipped as file IBM.HHOP710.UK52634
The following fixes are prerequisites for this fix:
Steps required to install the fix:
A sequential data set must be allocated on the z/OS system to receive the fix that you will upload from your workstation. You can do this by submitting the job below. Add a job card and modify the parameters to meet your site's requirements before submitting.
//ALLOC EXEC PGM=IEFBR14 //* //UK52634 DD DSN=hlq.IBM.HHOP710.UK52634, // DISP=(NEW,CATLG,DELETE), // DSORG=PS, // RECFM=FB, // LRECL=80, // UNIT=SYSALLDA, //* VOL=SER=volser, //* BLKSIZE=6160, // SPACE=(TRK,(23,5)) //*
Upload the file in binary format from your workstation to the z/OS data set. On a Windows system, you can use FTP from a command prompt to upload the file. In the sample dialog shown below, commands or other information entered by the user are in bold, and the following values are assumed:
| User enters: | Values |
|---|---|
| mvsaddr | TC P/IP address of the z/OS system |
| tsouid | Your TSO user ID |
| tsopw | Your TSO password |
| d: | Your drive containing the fix files |
| hlq | High-level qualifier that you used for the data set that you allocated in the job above |
C:\>ftp mvsaddr Connected to mvsaddr. 220-FTPD1 IBM FTP CS %version% at mvsaddr, %time% on %date%. 220 Connection will close if idle for more than 60 minutes. User (mvsaddr:(none)): tsouid 331 Send password please. Password: tsopw 230 tsouid is logged on. Working directory is "tsouid.". ftp> cd .. 250 "" is the working directory name prefix. ftp> cd hlq 250 "hlq." is the working directory name prefix. ftp> binary 200 Representation type is Image ftp> put d:\IBM.HHOP710.UK52634 200 Port request OK. 125 Storing data set hlq.IBM.HHOP710.UK52634 250 Transfer completed successfully 1256800 bytes sent in 0.28 seconds ftp> quit 221 Quit command received. Goodbye.
++HOLD(UK52634) SYS FMID(HHOP710) REASON(ACTION) DATE(09341)
COMMENT
(****************************************************************
* Affected function: JES Job Monitor *
****************************************************************
* Description: incorrect time values *
****************************************************************
* Timing: post-APPLY *
****************************************************************
* Part: SFEKSAMP(FEJJJCL) *
****************************************************************
When using the _CEE_ENVFILE keyword to define environment
variables, LE pads these variables with blanks. This padding can
cause LE to ignore the settings of the TZ variable, in which
case it uses the GMT timezone.
LE provided a fix (z/OS 1.8 and higher) in the form of the
_CEE_ENVFILE_S keyword. Here no padding takes place, and the TZ
environment variable is interpreted correctly.
If need be, the _CEE_ENVFILE_S keyword can be used (instead of
_CEE_ENVFILE) in the startup JCL, as shown in the updated sample
JCL, FEK.SFEKSAMP(FEJJJCL).
//*
//* JES JOB MONITOR
//*
//JMON PROC PRM=, * PRM='-TV' TO START TRACING
// LEPRM='RPTOPTS(ON)',
// HLQ=FEK,
// CFG=FEK.#CUST.PARMLIB(FEJJCNFG)
//*
//JMON EXEC PGM=FEJJMON,REGION=0M,TIME=NOLIMIT,
// PARM=('&LEPRM,ENVAR("_CEE_ENVFILE_S=DD:ENVIRON")/&PRM')
//STEPLIB DD DISP=SHR,DSN=&HLQ..SFEKAUTH
//ENVIRON DD DISP=SHR,DSN=&CFG
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
// PEND
//*
****************************************************************
* Affected function: JES Job Monitor *
****************************************************************
* Description: embedded LE options *
****************************************************************
* Timing: post-APPLY *
****************************************************************
* Part: SFEKSAMP(FEJJJCL) *
****************************************************************
This maintenance adds embedded LE options to the JES Job
Monitor load module;
* ALL31(ON)
* HEAP(32K,32K,ANY,KEEP,8K,4K)
* POSIX(ON)
* STACK(128K,128K,ANYWHERE,KEEP)
* THREADHEAP(4K,4K,ANY,KEEP)
* THREADSTACK(OFF)
* STORAGE(NONE,NONE,NONE,0)
If need be, these options can be changed by providing alternate
values in the startup JCL, as shown in the updated sample JCL,
FEK.SFEKSAMP(FEJJJCL).
//*
//* JES JOB MONITOR
//*
//JMON PROC PRM=, * PRM='-TV' TO START TRACING
// LEPRM='RPTOPTS(ON)',
// HLQ=FEK,
// CFG=FEK.#CUST.PARMLIB(FEJJCNFG)
//*
//JMON EXEC PGM=FEJJMON,REGION=0M,TIME=NOLIMIT,
// PARM=('&LEPRM,ENVAR("_CEE_ENVFILE_S=DD:ENVIRON")/&PRM')
//STEPLIB DD DISP=SHR,DSN=&HLQ..SFEKAUTH
//ENVIRON DD DISP=SHR,DSN=&CFG
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
// PEND
//*).
SMP/E RECEIVE and APPLY the fix.