IT Answers » MSGID

Is there ANY way to use MSGID in menu source?

BritishGent — Wed, 26 Sep 2012 19:04:35 +0000

New Answer by TomLiotta

Anyone know the monmsg msgid for (No active jobs to display)

lotofbad — Sat, 05 Feb 2011 07:33:09 +0000

I am doing command wrkactjob sbs(mysbs) job(myjob)

If the job is not active I will receive the work screen with message (No active jobs to display)

Reason: I have a cl that monitors (myjob) in (mysbs). I have the script set to send me an alert if there is no active job found/ or is down…

I just would like to know what mon msgid is being triggered when it returns the value back to my screen as (no active jobs to display)

part of the script:

myjob1: WRKACTJOB SBS(mysbs) JOB(myjob) OUTPUT(*PRINT) MONMSG MSGID(???????) EXEC(GOTO CMDLBL(alert1)) CMPDTA(*NONE) EXEC(GOTO CMDLBL(myjob2)) alert1: SNDMSG MSG(‘your job is down’) + TOUSR(*SYSOPR) MSGTYPE(*INQ) RPYMSGQ(QSYSOPR)

myjob2:

SNDPGMMSG, Creates the message as part of Job Log but does not display it all the time

RPG360IV — Tue, 26 Aug 2008 02:19:16 +0000

SNDPGMMSG MSGID(&MSGID) MSGF(ERRMSGC) MSGDTA(&MSGDATA)

I have added some new code to some old programs and am getting some strange things happening. I create a Cl as indicated above that I call in my RPG?? Program to display and added a Message subfile (*ind58, to control the display) to the Display File to handle the programmed controled messages, hard errors (*ind80 = *on) and soft errors (*ind80 = *off).

When the data entry program runs I sometimes see the messages on line 24 and sometimes Not. If the messages do not display I can force them to appear by creating a hard error? In all cases if I press Shift ESC to and 3 to work with job, then 10 to look at the job log, I always see the messages that should appear on line 24.

These old programs also have some screen controled error message handling, and these messages usually appear on a windows line below line 24. I’m not sure if the combination of message handling or improper code additions are causing my problem.

Thanks for any assistance