[Last Call] Learn about multicloud storage options and how to improve your company's cloud strategy. Register Now

x
?
Solved

as400/cobol  batch display's

Posted on 2002-05-06
9
Medium Priority
?
724 Views
Last Modified: 2008-02-01
I am converting Wang Cobol to AS400/cobol, On wang display are alway's promped to the workstation, but in AS400 if job is submitted in batch the messages are not prompted

 How can I make my messages displayed on workstation for batch jobs


Thanks

Eli
0
Comment
Question by:mshomi
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
9 Comments
 
LVL 13

Expert Comment

by:samic400
ID: 6997170
Could you give more detail please?

Are you calling a job interactively at the workstation and want the same type of messages when you submit it?

0
 

Author Comment

by:mshomi
ID: 7000158
Sam,

I submit the jobs in batch , by using cmd SBMJOB, so i am not calling the programs interactively

Thanks

Eli
0
 
LVL 13

Expert Comment

by:samic400
ID: 7001025
All batch submitted jobs have their job messages submitted to QSYSOPR message queue. You could put some code in your program to send messages to a different message queue.

Jobs run interactively will break their messages on your display.

Give me more detail on what it is you are trying to do and maybe I can help you out!
0
Fill in the form and get your FREE NFR key NOW!

Veeam® is happy to provide a FREE NFR server license to certified engineers, trainers, and bloggers.  It allows for the non‑production use of Veeam Agent for Microsoft Windows. This license is valid for five workstations and two servers.

 

Author Comment

by:mshomi
ID: 7005202
I am converting Wang/cobol to As400/cobol, On wang we have like 500 programs with different kind of display's , which give the operator information, Like the program now is aborting due to ......, but what is happening now the message is not dislayed and the operator he/she is not in a position to know  that the program has aborted

How can I make my Cobol Program work(display's) , like should i call a CL program or What

Thanks
0
 
LVL 1

Expert Comment

by:aaronkempf
ID: 7011270
id call BEI. 425 644 4000.  I think.  maybe its 6000.

they are one of the last WANG vendors that I know.
0
 
LVL 2

Expert Comment

by:olidel
ID: 7040299
Hi,

   As Samic400 said, I think you should send your message to a user MSGQ and of course the interactive job must be in break mode if you want to see the message. This parameters is in the user profile it is called "Message queue delivery".

    Of course, you maybe have to create a CLP before you run your Cobol program. You can also do some AS/400 programming.

Hope this hep.

Bye.
0
 

Author Comment

by:mshomi
ID: 7040469
Olidel,

If the job is submitted in batch (SBMJOB) will the break mode work(prompt the message to the workstation while the job runs )?

Eli
0
 
LVL 3

Accepted Solution

by:
P_S_Price earned 300 total points
ID: 7143165
You have a couple of choices.

You can write a CL program that displays messages on either QSYSOPR, or the submitting user Message Queue (or in fact any other message Queue then have your cobol program call this.

Another alternative is to use a call to QCMDEXC to issue a SNDMSG to QSYSOPR or SNDBRKMSG to a workstation.

One option that is not often considered is that Batch programs CAN be interactive You just have to acquire a workstation device. However this is quite complicated  and probably not worth the effort.


Most developers however usually go for the Call to a CL program. Here is a quick example of a CL program that Might Help get you started

PGM PARM (&MSG &QUEUE)
DCL &MSG *CHAR 80
DCL &QUEUE *CHAR 10
IF (&QUEUE *EQ ' ') (CHGVAR &QUEUE 'QSYSOPR')
SNDPGMMSG MSG(&MSG) TOMSGQ(&MSGQ)
MONMSG CPF0000
ENDPGM

0
 

Expert Comment

by:SpideyMod
ID: 8279306
Force Accepted

SpideyMod
Community Support Moderator @Experts Exchange
0

Featured Post

Free Tool: Subnet Calculator

The subnet calculator helps you design networks by taking an IP address and network mask and returning information such as network, broadcast address, and host range.

One of a set of tools we're offering as a way of saying thank you for being a part of the community.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

An overview of cyber security, cyber crime, and personal protection against hackers. Includes a brief summary of the Equifax breach and why everyone should be aware of it. Other subjects include: how cyber security has failed to advance with technol…
Are you looking for the options available for exporting EDB files to PST? You may be confused as they are different in different Exchange versions. Here, I will discuss some options available.
In this video, Percona Director of Solution Engineering Jon Tobin discusses the function and features of Percona Server for MongoDB. How Percona can help Percona can help you determine if Percona Server for MongoDB is the right solution for …
Are you ready to place your question in front of subject-matter experts for more timely responses? With the release of Priority Question, Premium Members, Team Accounts and Qualified Experts can now identify the emergent level of their issue, signal…

650 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question