Re: XML-INTO - new to this... -- RPG400-L

Vernon,

since I always are online to my IBM I it is actually faster for me to write
the code into a source file, test that it works and then copy/paste it back
into a mail.

XML-INTO is not something I normally use since I have my own sequential
xmlReader so in this case it was only for fun that I made the XML-INTO
snippet and tested it on V6R1 and V5R4.

XML-INTO tries to mimic the hierachical XML structure by using multi-
dimensional arrays while XML-SAX and my own xmlReader reads the
XML document sequential.

XML-INTO has its limitations, specially if you want to make code that
is backward compatible to earlier releases and support name spaces
or special characters in tag names or has complex XML documents.

But you may ask, why did Henrik write his own when there is XML-SAX?

The simple answer is by doing so I have much more control. For example I
can chop a XML document with 10 orders into 10 separate XML files in one
statement or I can bypass javascript and CSS sections when reading HTML
as XML son in combination with Scott's HTTPAPI I can make a webservice
where there are no webservice but only a HTML page.

In practice I uses this ability to sweep and extract EDIfact and X12
documentation
that are only available as HTML pages and to Google translate my framework
into a number of different languages.

On Mon, Mar 3, 2014 at 5:12 AM, Vernon Hamberg <vhamberg@xxxxxxxxxxxxxxx>wrote:

AH - have to leave something as an exercise for the reader!

I actually think it was enough to mention the allowextra, as I did in my
first post - - that's all that was needed to make Chris' code work
correctly.

Regards
Vern

On 3/2/2014 12:07 PM, Henrik Rützou wrote:

Vernon,

The real problem is that you never brings real wood to the fire!

On Sun, Mar 2, 2014 at 6:51 PM, Henrik Rützou <hr@xxxxxxxxxxxx> wrote:

Vernon

to help another will never be dull regardles of the weather ;-)

On Sun, Mar 2, 2014 at 5:07 PM, Vernon Hamberg <

vhamberg@xxxxxxxxxxxxxxx>wrote:

Sounds good, Chris.

As I read it, if you don't use the allowextra, you have to make your DS
account for every element or attribute from the nodes the path defines
and down. And if you have that "text-data" situation, you need the 6.1
PTF - but not for your situation, fortunately.

Henrik sent some nice examples of what should work for you - seems he
already tried them out!! It must be a dull day in Denmark!

I think trying both approaches is a good learning experience, as you

say

- this thing has taken a bit of practice, even for the limited use I've
made of it and the simple XML I've had to work with.

Cheers
Vern

On 3/2/2014 8:43 AM, Wyatt, Chris (FGWA-IL) wrote:

Thanks! I'm going to try this. I assumed that if it found the data I

specified, it would just load the DS and finish without having to go
further into the nesting.

XML totally makes sense to me, but the surrounding jargon is confusing

to an "only-occasionally" programmer like myself.

I'll try allowextra. ...or build more DS to get the sessionhandle

field. It'll be a learning experience.

To Peter...
Thank you!
We *are* at V6R1. Is that PTF more recent? I think we're up-to-date.

Thank you so much for taking the time to respond! I'm very grateful!

cw

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:

rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Vernon Hamberg

Sent: Sunday, March 02, 2014 3:40 AM
To: RPG programming on the IBM i (AS/400 and iSeries)
Subject: Re: XML-INTO - new to this...

To Chris - I don't think you have the issue Peter cites. The use of

datasubf is for elements with this form -

<tagname attr="value">text data</tagname>

Note that 'text data' has no name.

You LoginResponse element has another element within it -

SessionHandle

- this has to be part of your LocalResponse DS. Or you can try the

'allowextra=yes' option.

Here is something from the docs on XML-INTO options -

"If unexpected XML data is found, and 'allowextra=yes' is not

specified, the operation will fail with status 00353 (XML does not

match

RPG variable)."

HTH
Vern

On 3/2/2014 2:18 AM, Peter Dow wrote:

Hi Chris,

I ran into this problem myself - at the time I was on a v5r4 machine.
Are you on v6r1 yet? See this article:

https://www.ibm.com/developerworks/community/wikis/home?lang=en#/wiki/

We13116a562db_467e_bcd4_882013aec57a/page/Two%20new%20options%20for%20

XML-INTO%20with%20a%20V6R1%20PTF

(or http://preview.tinyurl.com/xml-into-datasubf-countprefix) which

says:

V6R1 PTF SI34938 adds two new %XML options for the XML-INTO

operation,

available for programs compiled with TGTRLS(V6R1M0) or greater. To
take advantage of this enhancement, RPG programs will have to be
recompiled with PTF SI34941.

The new options are

* datasubf
* countprefix

The/datasubf/option enables the XML-INTO operation to handle XML
elements in the following form:

<tagname attr="value">text data</tagname>

The/countprefix/option provides a way to detect the number of
subfields and subfield array elements which were set by the XML-INTO
operation. It reduces the need to specify the allowmissing=yes

option.

--
*Peter Dow* /
Dow Software Services, Inc.
909 793-9050
petercdow@xxxxxxxxx <mailto:petercdow@xxxxxxxxx> pdow@xxxxxxxxxxxxxx
<mailto:pdow@xxxxxxxxxxxxxx> /

On 3/1/2014 4:02 PM, Wyatt, Chris (FGWA-IL) wrote:

Hello all,

This has me tearing my hair out on a weekend... Boo.

I'm attempting to parse some XML. I'm trying to use the new(er)

opcodes as opposed to the old string methods. I thought it was/is the

most

straightforward you can imagine...

I'm trying to pull the 'true' value out of the LoginResponse

attribute.

Here's the XML... (Yes, it's MAPICS)

<?xml version='1.0' encoding='UTF-8'?> <System-Link version='1.0'
hostVersion='1.0'>
<LoginResponse actionSucceeded='true'>
<SessionHandle value='-3369e2f8:1445eea302e:-799f'/>
</LoginResponse>
<Response sessionHandle='-3369e2f8:1445eea302e:-799f'

workHandle='-3369e2f8:1445eea302e:-799e' systemTimestamp='2014-02-28
20:54:41.668' systemTimeZoneOffset='-6:00'>

<UpdateResponse name='updateObject_ItemRevision'

actionSucceeded='true'/>

</Response>
</System-Link>

Here's my code... (variable "rpns" is my xml)

D* Local fields
D retField S N inz(*off)
D LoginResponse DS qualified
D action...
D Succeeded 10

/FREE

// was the login request successful?
xml-into LoginResponse
%xml(rpns:'path=System-Link/LoginResponse +
case=any doc=string');
if LoginResponse.actionSucceeded='true';
retField = *on;
ENDIF;

I'm getting this error...

The XML document does not match the RPG variable; reason code 1.

Cause . . . . . : While parsing an XML document, the parser found

that the

XML document does not correspond to RPG variable loginresponse

and the

options do not allow for this. The reason code is 1. The exact

subfield for

which the error was detected is loginresponse. The options are
"path=System-Link/LoginResponse case=any doc=string". The XML

document name

is *N; *N indicates that the XML document was not an external

file.

In the process of trial and error, I've also received reason code 4

and 5.

What am I doing wrong?!? I've messed with the path, the options,

the

DS. It's making me crazy.

Thank you for your help.

Christopher Wyatt

---
This email is free from viruses and malware because avast! Antivirus

protection is active.

http://www.avast.com

--
This is the RPG programming on the IBM i (AS/400 and iSeries)

(RPG400-L) mailing list To post a message email:

RPG400-L@midrange.comTo 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.

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

--
Regards,
Henrik Rützou

http://powerEXT.com <http://powerext.com/>

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