× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



Just a suggestion. How about a pop-up window with this particular message, rather than using the message subfile?

You could go the whole hog and call a separate program (procedure?) to display this pop-up window - more flexibility?

Brian.

On 13/05/2021 17:30, dfreinkel@xxxxxxxxxxxxxxxxx wrote:
I have not done this before and so it trial and error to get this to work.


Situation:

At night, a user is updating shipments. There is a record lock. It causes
the program to crash. I have added code so that is does not crash.


Problem:

Whilst still in the program, I need to send a message to the program so that
a message will appear on the screen showing who has the record locked.


Done so far:

* Changed the WAITRCD(3).
* SNDPGMSG to the program queue with status(*STATUS).
* The message is not displayed until the next EXFMT.


What I want to do:

* Have the message display in the message subfile immediately, before
the EXFMT.
* Whilst the lock is only 3 seconds, the delays are too long and so
the user needs to see it immediately.
* When this happens at midnight, I get a call to fix the problem. Now
I will not get the call, but because the message is not shown immediately,
the users will simply cancel the program clicking on the red X and trying to
start again. That will make it more of a mess to fix.
* I do, do a EXFMT again but the message is not always displayed.
* The SNDPGMMSG could be called from a program that is called by the
program doing the EXFMT.


Any suggestions?


Thanks


Darryl Freinkel

A4G

Telephone: 770.321.8562 Mobile: 678.355.8562




As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:
Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.