Page 1 of 2

step return codes in JESMSGLG

PostPosted: Sun Mar 24, 2019 6:52 am
by poojithas
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.

Re: step return codes in JESMSGLG

PostPosted: Sun Mar 24, 2019 7:07 am
by steve-myers
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.

Re: step return codes in JESMSGLG

PostPosted: Sun Mar 24, 2019 4:25 pm
by willy jensen
In ADCD V1.13 the SMF exit is in SYS1.SAMPLIB(IEEACTRT) and can be installed thus:

//   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

Re: step return codes in JESMSGLG

PostPosted: Sun Mar 24, 2019 6:26 pm
by poojithas
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.

Re: step return codes in JESMSGLG

PostPosted: Sun Mar 24, 2019 7:02 pm
by enrico-sorichetti
IIRC also the SMF parms need to be adjusted.

Re: step return codes in JESMSGLG

PostPosted: Sun Mar 24, 2019 7:31 pm
by poojithas
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:
                      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
 

Re: step return codes in JESMSGLG

PostPosted: Sun Mar 24, 2019 8:16 pm
by willy jensen
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.

Re: step return codes in JESMSGLG

PostPosted: Mon Mar 25, 2019 6:23 am
by poojithas
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.

Re: step return codes in JESMSGLG

PostPosted: Mon Mar 25, 2019 1:59 pm
by willy jensen
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.

Re: step return codes in JESMSGLG

PostPosted: Mon Mar 25, 2019 6:21 pm
by poojithas
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.