Re: rpgile strings > 65535

Hans,

That's un-named data structures that can be bigger than you'll
ever need them to be, right?


Crap!

Bob Cozzi


On Tue, 17 September 2002, Hans Boldt wrote:



>
> Bob Cozzi wrote:
> > Couldn't you just use a data structure?
> >
> > D myDS            DS               Based(pWhatever)
> > D Big1                       65535A
> > D Big2                       65535A
> >
> > Then use %SCAN and %SUBST on the MYDS "field".
>
> First, that particular data structure is not valid since it is
> bigger that 65535 bytes long.  Sure, you could use %SCAN to
> locate
> the x'00' character, which would then give you an index, which
> you
> would then add to the address of the field to get the location
of
> the null.  But incrementing a pointer in a DOW loop is a bit
> simpler
> (IMO), and it works for C strings longer than 65535 characters.
>
> Cheers!  Hans
>
>
>
> _______________________________________________
> This is the RPG programming on the AS400 / iSeries (RPG400-L)
> mailing list
> To post a message email: RPG400-L@midrange.com
> To subscribe, unsubscribe, or change list options,
> visit: <a
href="http://mail.rpgiv.com//jump/http://lists.midrange.com/cgi-bin/listinfo/rpg400-l";>http://lists.midrange.com/cgi-bin/listinfo/rpg400-l</a>
> or email: RPG400-L-request@midrange.com
> Before posting, please take a moment to review the archives
> at <a
href="http://mail.rpgiv.com//jump/http://archive.midrange.com/rpg400-l";>http://archive.midrange.com/rpg400-l</a>.