RE: RNX0356 Document for DATA-INTO does not match RPG Variable

Jon,

I appreciate the response... I created prototypes for QMHRCVPM and tried to use it.

The ErrorMsg is formatted odd.

RcvPgmMsg( ErrorMsg
: %len(ErrorMsg)
: psds.ErrCde
: '*'
: 0
: '*ESCAPE'
: ' '
: 0
: '*SAME'
: QUSEC);

In debug it looks like this:
Ò Ò RNX035315 ?í  ?? ' ' ? hdr ?hdr(14).shiptomethod ádoc=file case=any allowextra=yes countprefix=count_ path=orders/order /gwilburn/bad.xml

What am I missing?

Greg

-----Original Message-----
From: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxxxxxxxx] On Behalf Of Jonathan Wilson
Sent: Wednesday, July 17, 2019 12:51 PM
To: rpg400-l@xxxxxxxxxxxxxxxxxx
Subject: Re: RNX0356 Document for DATA-INTO does not match RPG Variable

On Tue, 2019-07-16 at 15:42 +0000, Greg Wilburn wrote:

Just wondering if there is a relatively easy way to retrieve the
message "Cause" from within the RPG program?
The "Cause" is usually where the issue is described - "the exact
subfield for which the error was detected is..."

I would like to use this as output in my text logs.

Example:

Additional Message Information

Message ID . . . . . . : RNX0356 Severity . . . . . . .
: 50
Message type . . . . . : Escape
Date sent . . . . . . : 07/16/19 Time sent . . . . . .
: 11:35:04

Message . . . . : The document for the DATA-INTO operation does not
match
the RPG variable; reason code 4.
Cause . . . . . : While parsing a document for the DATA-INTO
operation, the
parser found that the document does not correspond to RPG variable
"json"
and the options do not allow for this. The reason code is 4. The
exact
subfield for which the error was detected is
"json.orders(1).promotions.applied_promotions". The options are
"doc=file
case=convert allowextra=yes countprefix=count_". The document name
is
/apis/Mirakl/046/GetOrdersReady_Response_0.json; *N indicates that
the
document is not an external file. The parser is 'YAJLINTO'. *N
indicates
that the parser is a procedure pointer.

From within RPG the best way is to use the IBM supplied message API's.

More specifically the QMHRCVPM (receive program message) which can be used to not only get the message ID but also the message data. After that, you can use it however you feel.

If you wanted to use the actual message text, and the message data that is shown for the message you would need to probably use the QMHRTVM API along with the data returned in QMHRCVPM as that can retrieve the message text and do the substitution at the same time.

I often use the QMHRCVPM API, but have never used the QMHRTVM API.

This is a fairly good article on using the API's in conjunction - https://www.itjungle.com/2009/10/14/fhg101409-story01/

Jon.


--
This is the RPG programming on IBM i (RPG400-L) mailing list To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives at https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxx for any subscription related questions.

Help support midrange.com by shopping at amazon.com with our affiliate link: https://amazon.midrange.com