Boy! That pasted goofy...let me reformat it...
NOTIFY Message Results
-----------------------------------------------------------------------------------------------------------------------------------------------------------------
|Receiving Call Stack Entry | Sending Call Stack Entry |Default Reply | Action Taken after Notify Message Is Sent |
|Monitor defined with external handler | Does not end |Not sent |External handler is called |
|Monitor defined and no external handler | Ends |Not sent | Control is returned to receiving call stack entry |
|No monitor defined | Does not end | Sent |Control is returned to sending call stack entry |
-----------------------------------------------------------------------------------------------------------------------------------------------------------------+
Not much better...but hopefully it shows up readable.
Steve Needles
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Needles,Stephen J
Sent: Wednesday, November 06, 2013 12:32 PM
To: RPG programming on the IBM i (AS/400 and iSeries)
Subject: RE: forced execution of ILE condition handler
I tried *NOTIFY as well because I found this info in IBM's 7.1 website:
NOTIFY Message Results
Receiving Call Stack Entry
Sending Call Stack Entry
Default Reply
Action Taken after Notify Message Is Sent
Monitor defined with external handler
Does not end
Not sent
External handler is called
Monitor defined and no external handler
Ends
Not sent
Control is returned to receiving call stack entry
No monitor defined
Does not end
Sent
Control is returned to sending call
But the condition handler didn't grab it for this example either:
callp SendEscMsg ('CPF9898':
'QCPFMSG QSYS':
FredSays:
%len(FredSays):
'*NOTIFY':
'*':
2:
Esc_MsgKey:
Steve Needles
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Needles,Stephen J
Sent: Wednesday, November 06, 2013 12:22 PM
To: RPG programming on the IBM i (AS/400 and iSeries)
Subject: RE: forced execution of ILE condition handler
Jack,
I tried:
callp SendEscMsg ('CPF9898':
'QCPFMSG QSYS':
FredSays:
%len(FredSays):
'*ESCAPE':
'*':
2:
Esc_MsgKey:
Without success. The registered conditional handler was not invoked.
Tried...
callp SendEscMsg ('CPF9898':
'QCPFMSG QSYS':
FredSays:
%len(FredSays):
'*ESCAPE':
'*':
1:
Esc_MsgKey:
And it fails with a CEE9901 error because it didn't get deep enough back into the stack. It also did not make it into the handler as it couldn't find it.
Steve Needles
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx<mailto:rpg400-l-bounces@xxxxxxxxxxxx> [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Jack Callahan
Sent: Wednesday, November 06, 2013 11:09 AM
To: rpg400-l@xxxxxxxxxxxx<mailto:rpg400-l@xxxxxxxxxxxx>
Subject: re: forced execution of ILE condition handler
Shouldn't you be sending the message up the program stack, rather than to *EXT?
callp SendEscMsg ('CPF9898':
'QCPFMSG QSYS':
Msg:
%len(Msg):
'*ESCAPE':
'*EXT':
2:
Esc_MsgKey:
callp SendEscMsg ('CPF9898':
'QCPFMSG QSYS':
Msg:
%len(Msg):
'*ESCAPE':
*'*': 1:*
Esc_MsgKey:
--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L) mailing list To post a message email: RPG400-L@xxxxxxxxxxxx<mailto:RPG400-L@xxxxxxxxxxxx<mailto:RPG400-L@xxxxxxxxxxxx%3cmailto:RPG400-L@xxxxxxxxxxxx>> To subscribe, unsubscribe, or change list options,
visit:
http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx<mailto:RPG400-L-request@xxxxxxxxxxxx<mailto:RPG400-L-request@xxxxxxxxxxxx%3cmailto:RPG400-L-request@xxxxxxxxxxxx>>
Before posting, please take a moment to review the archives at
http://archive.midrange.com/rpg400-l.
________________________________
This communication, including attachments, is confidential, may be subject to legal privileges, and is intended for the sole use of the addressee. Any use, duplication, disclosure or dissemination of this communication, other than by the addressee, is prohibited. If you have received this communication in error, please notify the sender immediately and delete or destroy this communication and all copies.
TRVDiscDefault::1201
--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L) mailing list To post a message email: RPG400-L@xxxxxxxxxxxx<mailto:RPG400-L@xxxxxxxxxxxx> To subscribe, unsubscribe, or change list options,
visit:
http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx<mailto:RPG400-L-request@xxxxxxxxxxxx>
Before posting, please take a moment to review the archives at
http://archive.midrange.com/rpg400-l.
--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L) mailing list To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit:
http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives at
http://archive.midrange.com/rpg400-l.
midrange.com
