Re: 32767 limit

Jon,

I'm running af powerEXT Test

the first part of the test when okay

xmlNode('xml');
for i = 1 to 30000000;
xmlNode('thisIsAVeryBigNode':'':'abcdefghijklmnopqrstu');
endfor;
xmlEndNode();

Now I'm waiting to get the result of the reading


The server is - lets be polite - warm ;-)




On Tue, Apr 9, 2013 at 6:39 PM, Jon Paris <jon.paris@xxxxxxxxxxxxxx> wrote:

On Tue, 9 Apr 2013, at 13:32:42, Andy Thompson <
Andy.Thompson@xxxxxxxxxxxxxx> wrote:

For writing XML I've managed to live with the 32k field size limit, but

reading XML written by someone else ... we have no control over what they
send. We could read it in VB and export shortened XML ... but it's an
extra process, and we like RPG.

I thought you said earlier that you were on V7? The 32K limit in RPG
actually disappeared back in ... hmmmm ... V4Rsomthing and went up to 64K.
In V6 it went up to 16Mb.

That said - I suspect it may not help you with your problem because there
may still be an underlying limit in the underlying interfaces that would
preclude you from receiving the data.

This works for me at V7 and the XML-INTO completes with 80,000+ characters
in the field.

D progStatus SDS
D xmlElements 20i 0 Overlay(progStatus: 372)

D outer DS
D bigField 100000a

d xml_doc s 100000a Varying
d i s 10i 0

/free
xml_doc = '<Outer><bigField>';
for i = 1 to 30000;
xml_doc += 'More data entry #' + %Char(i) + ':';

if %len(xml_doc) > 80000; // Too lazy to work out exact limit!!
leave;
endif;

endfor;
xml_doc += '</bigField></Outer>';
Xml-Into outer
%XML(xml_doc :
'case=any');

*InLr = *On;

Jon Paris

www.partner400.com
www.SystemiDeveloper.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.