IBM Mainframe Forum

by **poojithas** » Sun Mar 24, 2019 6:52 am

Hi,
I am configuring ADCD z/OS 1.13 and I found that user's jobs are not displaying step return codes in JESMSGLG, this information is present in JESYSMSG. I have seen at some installations that JESMSGLG displays summary of each step return codes.
Could any one guide me how to setup this feature.

Thanks,
Poojithas.

by **steve-myers** » Sun Mar 24, 2019 7:07 am

Inserting this kind of information in JESMSGLG requires a z/OS exit, probably IEFACTRT. You might be able to obtain a satisfactory exit from the CBT "tape" or from several vendors. Unless you are an experienced Assembler programmer I cannot recommend attempting to write one yourself, from scratch. H***, I'm an experienced Assembler programmer and I'd be reluctant to try writing one myself!

Good luck.

by **willy jensen** » Sun Mar 24, 2019 4:25 pm

In ADCD V1.13 the SMF exit is in SYS1.SAMPLIB(IEEACTRT) and can be installed thus:

Select all

//   EXEC ASMACL,                                                  
//       PARM.L='NCAL,MAP,LIST,LET,RENT,REUS,RMODE(ANY),AMODE(31)' 
//C.SYSLIB  DD DISP=SHR,DSN=SYS1.MACLIB                            
//          DD DISP=SHR,DSN=SYS1.MODGEN                            
//C.SYSIN   DD DISP=SHR,DSN=SYS1.SAMPLIB(IEEACTRT)                 
//L.SYSLMOD DD DISP=SHR,DSN=SYS1.LPALIB(IEFACTRT)

Activate the exit after next ipl by adding this to your parmlib PROGxx member:
EXIT ADD EXITNAME(SYS.IEFACTRT) MODNAME(IEFACTRT)

You can activate the exit dynamically to test it....

Issue this command to dynamically load the module:
SETPROG LPA,ADD,MODNAME=IEFACTRT,DSNAME=SYS1.LPALIB

Issue this command to dynamically activate the exit:
SETPROG EXIT,ADD,EXITNAME=SYS.IEFACTRT,MODNAME=IEFACTRT

by **poojithas** » Sun Mar 24, 2019 6:26 pm

Thank you Willy, I have assembled the module and did SETPROG LPA & SETPROG EXIT,REPLACE (ADD says already exists). Yet to see the result in JESMSGLG in a job, may be it reflects after ipl, shall let you know after ipl.

by **enrico-sorichetti** » Sun Mar 24, 2019 7:02 pm

IIRC also the SMF parms need to be adjusted.

by **poojithas** » Sun Mar 24, 2019 7:31 pm

SYS1.PARMLIB(SMFPRM00) has below lines.
SYS(NOTYPE(14:19,62:69),EXITS(IEFU83,IEFU84,IEFACTRT,
IEFUSI,IEFUJI,IEFU29),NOINTERVAL,NODETAIL)

And IBM says
"The system invokes IEFACTRT only when the installation is collecting SMF record
types 4, 5, 30, 32, 34, or 35. IEFACTRT is invoked for:
- Record types 4, 5, and 30 for background jobs and started tasks.
- Record types 30, 32, 34, and 35 for TSO/E users."

So, SMFPRM00 covers all types except 14:19,62:69, is my interpretation correct ?

My JESMSGLG looks like:

Select all

                       J E S 2  J O B  L O G  --  S Y S T E M  A L E X  --  N O 
                                                                                
21.43.32 JOB04476 ---- SUNDAY,    24 MAR 2019 ----                              
21.43.32 JOB04476  IRR010I  USERID USER11   IS ASSIGNED TO THIS JOB.            
21.43.32 JOB04476  ICH70001I USER11   LAST ACCESS AT 21:38:32 ON SUNDAY, MARCH 2
21.43.32 JOB04476  $HASP373 USER11C  STARTED - INIT 1    - CLASS A - SYS ALEX   
21.43.32 JOB04476  IEF403I USER11C - STARTED - TIME=21.43.32                    
21.43.32 JOB04476  IEF404I USER11C - ENDED - TIME=21.43.32                      
21.43.32 JOB04476  $HASP395 USER11C  ENDED                                      
------ JES2 JOB STATISTICS ------                                               
  24 MAR 2019 JOB EXECUTION DATE                                                
            7 CARDS READ                                                        
           40 SYSOUT PRINT RECORDS                                              
            0 SYSOUT PUNCH RECORDS                                              
            2 SYSOUT SPOOL KBYTES                                               
         0.00 MINUTES EXECUTION TIME
 

by **willy jensen** » Sun Mar 24, 2019 8:16 pm

poojithas, you are correct. I knew about the SMF parm, just forgot it in my reply.
My SMF parm from my sandbox follows. I keep all records, just in case.
SYS(TYPE(0:255),EXITS(IEFU83,IEFU84,IEFACTRT,
IEFUSI,IEFUJI,IEFU29),NOINTERVAL,NODETAIL)
I think your problem is that the exit is already defined, you could try
SETPROG EXIT,REPLACE,EXITNAME=SYS.IEFACTRT,MODNAME=IEFACTRT
to use the new module without ipl.

by **poojithas** » Mon Mar 25, 2019 6:23 am

Willy, still the same result as above, do I have to change the source SYS1.SAMPLIB(IEEACTRT) to print step return codes in JESMSGLG, not sure as I am not familiar with assembly language.

by **willy jensen** » Mon Mar 25, 2019 1:59 pm

That source is good as it is, I am using it.
Did you ipl and if so, does your IEASYSxx specify CLPA? Did you install IEFACTRT in the 1st library in the LPALIB concatenation - check your LPALSTxx parmlib member ?
Though the SETPROG LPA,ADD,MODNAME=IEFACTRT,DSNAME=SYS1.LPALIB command should have copied the named module to the LPA.

by **poojithas** » Mon Mar 25, 2019 6:21 pm

We are using IEASYSCS which has CLPA, and IEFACTRT is installed in SYS1.LPALIB which is the first data set in LPALST01 member.
After IPL also no result. Anyway COND CODE information is present in JESYSMSG, I will inform users to look in JESYSMSG with FIND 'COND CODE'

Thank you Willy.

IBM Mainframe Forum

step return codes in JESMSGLG

step return codes in JESMSGLG

Re: step return codes in JESMSGLG

Re: step return codes in JESMSGLG

Re: step return codes in JESMSGLG

Re: step return codes in JESMSGLG

Re: step return codes in JESMSGLG

Re: step return codes in JESMSGLG

Re: step return codes in JESMSGLG

Re: step return codes in JESMSGLG

Re: step return codes in JESMSGLG