× 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.



Chuck,

Well first off, I'm treading water. <g>

The DFTPGM/CHGMSGD thing, is this causing a program to be called
whenever a certain message is received/intercepted?

That aside, I think I'll read up on what I can google on dftpgm/chgmsgd
before I belabor you, or anyone else here, on inane questions. <g>
That may be next week as I'm off Thu and Fri.

John



.-.-.-.
That is actually a "nice" outcome to enable a coded intercept of the
condition; specific to the failing RPG however. That inquiry condition
is an indication that the default message handling transpired for an ILE
RPG statement [OPEN in this case] processing. Default handling is a side
effect of an "unmonitored exception" for which the message handling
feature provides an effective "user exit" via the DFTPGM() on the
CHGMSGD. That the message identifier CPF4128 appears in that inquiry
replacement text is a clear indication that the message was sent
directly to the program performing the OPEN, as was the effective
resignal of the condition by RNX1216.

To test in just one job, perform the following:

crtclpgm /* a CLP which RCVMSG from *PRV the RNX1216 then
the previous *EXCP message identified in that
if msgid=CPF4128 and "other" conditions met */
crtmsgf qtemp/myRNXmsgs
mrgmsgf frommsgf(qrnxmsg) tomsgf(qtemp/myRNXmsgs) select(rnx1216)
chgmsgd rnx1216 msgf(qtemp/myRNXmsgs) dftpgm(myDftPgm)
ovrmsgf qrnxmsg qtemp/myRNXmsgs

I thought the parameters for a Default Program were documented in the
DFTPGM() help text, but no... Let me know if more assistance required.

Regards, Chuck



IMPORTANT NOTICE: This message is intended only for the addressee and may contain confidential, privileged information.
If you are not the intended recipient, you may not use, copy or disclose any information contained in the message.
If you have received this message in error, please notify the sender by reply e-mail and delete the message.


As an Amazon Associate we earn from qualifying purchases.

This thread ...


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.