RE: Literal chopped off by varying when passed

["Bartell, Aaron L. (TC)" <ALBartell@xxxxxxxxxxxxxx>]

This is RPG calling RPG using a VARYING length field on the receiving end
and a character literal on the calling end.  You can disregard that it has
anything to do with XML also; shouldn't make a difference in this case.

Thanks for the response though,
Aaron Bartell

-----Original Message-----
From: DeLong, Eric [mailto:EDeLong@xxxxxxxxxxxxxxx]
Sent: Thursday, April 24, 2003 2:40 PM
To: 'RPG programming on the AS400 / iSeries'
Subject: RE: Literal chopped off by varying when passed


Aaron,

Haven't dabbled in XML, but I'd bet that the function is trying to do a null
terminated (C style) string.  Have a try with Options(*String) instead of
Varying......

Eric DeLong
Sally Beauty Company
MIS-Project Manager (BSG)
940-898-7863 or ext. 1863



-----Original Message-----
From: Bartell, Aaron L. (TC) [mailto:ALBartell@xxxxxxxxxxxxxx]
Sent: Thursday, April 24, 2003 2:31 PM
To: 'RPG programming on the AS400 / iSeries'
Subject: Literal chopped off by varying when passed


I must be missing something here.  I am executing the following line of
code:

gNode = DOMXPath_getElem(gRoot: 'company/product': *Omit);

...here is what the PI looks like...

     D DOMXPath_getElem...
     D                 PI              *
     D pNode                           *   Value
     D pXPath                     32767A   Value Varying
     D pElemIter                      4P 0 Options(*Omit)

and when I go into debug and display the value of pXPath it shows
'mpany/product'.  When I view it in hex it is:

> EVAL pxpath:x                                                       
     00000     83969497 8195A861 97999684 A483A340   - company/product

I am guessing this is because 'co' is getting put into the "length"
characters, but should it be?  

Thanks In Advance,
Aaron Bartell
_______________________________________________
This is the RPG programming on the AS400 / 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.cgi/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 AS400 / 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.cgi/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.