Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

How to display warning message in JESMSGLG

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
Purna Shankar

New User


Joined: 25 May 2010
Posts: 7
Location: Bangalore

PostPosted: Tue May 25, 2010 5:44 pm    Post subject: How to display warning message in JESMSGLG
Reply with quote

Hi

I have a requirement as below.

Step1 will run a program and sets a return code accordingly.

Step2 has to check for Step1.RC = 4 and display a warning message in the JESMSGLG accordingly.

Can someone help me in coding Step2 please?
Back to top
View user's profile Send private message

expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Tue May 25, 2010 5:46 pm    Post subject:
Reply with quote

And whic program / utility exactly did you have in mind for issuing the warning message.

What do you need halp with, the JCL for the utility / program that you wish to use or the conditional execution part.

Please try to give some detail of what it is that you want - psychic day was yesterday this week.
Back to top
View user's profile Send private message
Garry Carroll

Active Member


Joined: 08 May 2006
Posts: 990
Location: Dublin, Ireland / Edinburgh, Scotland

PostPosted: Tue May 25, 2010 5:48 pm    Post subject:
Reply with quote

I believe what you need is a WTO (Assembler), or a DISPLAY (Cobol/PL/1) in the program in Step2.

Garry.
Back to top
View user's profile Send private message
Purna Shankar

New User


Joined: 25 May 2010
Posts: 7
Location: Bangalore

PostPosted: Tue May 25, 2010 6:13 pm    Post subject:
Reply with quote

I want to know, if we have a utility program that can be used in STEP2, which can display the message in JESMSGLG, and wont abend.

The below example program NUPARM (this is exclusive for our mainframe) will display the message "WARNING WARNING WARNING " in
JESMSGLG, but it abends the JOB.

// IF (STEP2.SCPROC.RC = 4) THEN
//SNUPARM EXEC PGM=NUPARM,
// PARM=',004, WARNING WARNING WARNING '
//SYSABEND DD SYSOUT=*
// ENDIF
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Tue May 25, 2010 6:16 pm    Post subject:
Reply with quote

Purna Shankar wrote:
I want to know, if we have a utility program that can be used in STEP2, which can display the message in JESMSGLG, and wont abend.

How do you expect forum members thousands of miles away to have any conception of what is and is not installed at the site you are at.

Please ask your site support people as they are probably the only ones who know
Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Tue May 25, 2010 6:52 pm    Post subject: Re: How to display warning message in JESMSGLG
Reply with quote

Purna Shankar wrote:
Step2 has to check for Step1.RC = 4 and display a warning message in the JESMSGLG accordingly.
Did you really mean JESMSGLG and not SYSOUT?
Back to top
View user's profile Send private message
Phrzby Phil

Active Member


Joined: 31 Oct 2006
Posts: 961
Location: Richmond, Virginia

PostPosted: Tue May 25, 2010 8:05 pm    Post subject:
Reply with quote

I think he was asking is there some IBM feature that would do this.

A nifty idea, except that the JESlogs get quite crowded with all sorts of junk we usually don't need to see.

Isn't the RC setting enough of a clue? That could then direct you to look at the SYSOUT of some step to which you wuold have written messages.
Back to top
View user's profile Send private message
CICS Guy

Senior Member


Joined: 18 Jul 2007
Posts: 2150
Location: At my coffee table

PostPosted: Tue May 25, 2010 10:59 pm    Post subject:
Reply with quote

Purna Shankar wrote:
The below example program NUPARM (this is exclusive for our mainframe) will display the message "WARNING WARNING WARNING " in JESMSGLG, but it abends the JOB.
I think your best bet would to find the source of NUPARM and create another version that does not abend.
Or, modify the existing version to allow another parm or the first value of the existing parm to decide not to abend.
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Tue May 25, 2010 11:28 pm    Post subject:
Reply with quote

Hello,

Look at the source for NUPARM. Possibly the first parameter of the PARM (which is not used in the posted example) controls if the process is to abend or not. . .

If "noabend" is not an option in the current program, do as CG suggests - write a new module or change the existing one.
Back to top
View user's profile Send private message
PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2422
Location: Netherlands, Amstelveen

PostPosted: Wed May 26, 2010 11:19 am    Post subject:
Reply with quote

You could use the following step if the rc of the previous step = 4

Code:

//STEP1    EXEC PGM=IEBGENER
//SYSIN    DD DUMMY
//SYSUT1   DD *
put your text here
//SYSUT2   DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
Back to top
View user's profile Send private message
Garry Carroll

Active Member


Joined: 08 May 2006
Posts: 990
Location: Dublin, Ireland / Edinburgh, Scotland

PostPosted: Wed May 26, 2010 12:06 pm    Post subject:
Reply with quote

Quote:
You could use the following step if the rc of the previous step = 4

Code:

//STEP1 EXEC PGM=IEBGENER
//SYSIN DD DUMMY
//SYSUT1 DD *
put your text here
//SYSUT2 DD SYSOUT=*
//SYSPRINT DD SYSOUT=*



but that won;t put the message in JESMSGLG, only in SYSPRINT.

Garry.
Back to top
View user's profile Send private message
PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2422
Location: Netherlands, Amstelveen

PostPosted: Wed May 26, 2010 12:15 pm    Post subject:
Reply with quote

Garry,

in this case it goes to SYSUT2 sysout.
That will put it in the JES2 joblog.
Is that different from JESMSGLG?
Back to top
View user's profile Send private message
Garry Carroll

Active Member


Joined: 08 May 2006
Posts: 990
Location: Dublin, Ireland / Edinburgh, Scotland

PostPosted: Wed May 26, 2010 12:27 pm    Post subject:
Reply with quote

Peter,

If you put '?' beside job in SDSF you will see that the JESMSGLG is separate to the individual steps' SYSOUT entries.

Garry.
Back to top
View user's profile Send private message
PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2422
Location: Netherlands, Amstelveen

PostPosted: Wed May 26, 2010 12:40 pm    Post subject:
Reply with quote

Garry,

i dont have any experience with SDSF (used to work with IOF).
I remember seeing all sysout output directed to the MSGCLASS
went to the JES2 joblog.
Back to top
View user's profile Send private message
Garry Carroll

Active Member


Joined: 08 May 2006
Posts: 990
Location: Dublin, Ireland / Edinburgh, Scotland

PostPosted: Wed May 26, 2010 1:10 pm    Post subject:
Reply with quote

Peter,

SDSF display for a job shows(e.g.)
Quote:
JESMSGLG JES2
JESJCL JES2
JESYSMSG JES2
SYSTERM DB2PC
SYSOUT PLKED
SYSPRINT SUCCESS
PRINT2 PRINT
SYSPRINT COMPLST
SYSPRINT ILODLST


Each of these corresponds with a separate output. JESMSGLG contains the job Start Time, JOBNAME STEPNAME PROCSTEP RC EXCP CPU and job End Time.

Garry.
Back to top
View user's profile Send private message
Purna Shankar

New User


Joined: 25 May 2010
Posts: 7
Location: Bangalore

PostPosted: Wed May 26, 2010 2:03 pm    Post subject:
Reply with quote

All,

Many thnx for the help.
Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Wed May 26, 2010 4:44 pm    Post subject:
Reply with quote

icon_eek.gif icon_confused.gif - pardon my ignorance but what's the final solution you've used!?
Back to top
View user's profile Send private message
Purna Shankar

New User


Joined: 25 May 2010
Posts: 7
Location: Bangalore

PostPosted: Wed May 26, 2010 7:58 pm    Post subject: Reply to: How to display warning message in JESMSGLG
Reply with quote

As I could not find any readymade utility for displaying warning messages in JESMSGLG, I have decided to display a warning message in SYSPRINT itself and did it using IEBGENER.

Then I noticed, PeterHolland also proposed the same solution.
icon_smile.gif
Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Thu May 27, 2010 4:04 pm    Post subject:
Reply with quote

Good, Thanks for the follow-up.

Good Luck icon_smile.gif
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts How to display value of an exit param... lind sh CICS 2 Sun Oct 09, 2016 12:28 pm
This topic is locked: you cannot edit posts or make replies. DSList (3.4) cannot display Chinese c... jacobdng TSO/ISPF 4 Wed Oct 05, 2016 2:51 pm
No new posts How to show message using batch jobs madprasy TSO/ISPF 7 Fri Sep 09, 2016 6:55 pm
No new posts Truncated error message after VERIFY ... David Sde TSO/ISPF 4 Mon Sep 05, 2016 11:26 pm
This topic is locked: you cannot edit posts or make replies. Get and display content of an address... lind sh CICS 1 Mon Aug 08, 2016 9:18 am


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us