Re: Size of a SQL result set

[rob@xxxxxxxxx]

If I use multiple fields instead of trying to store it as one big field I
don't get any problems.

Basically I changed from:
     D Parm1           DS                  Occurs(1)
     D  Valid                         1a
     D  Exception                     7a
     D  vLogin                      380a
...
     D login         e ds                  extname(login)

To defining each field which appears in the DS login, underneath Parm1 and
removed vLogin.
And why didn't I define vLogin as like(login) instead of 380a?  Ask the
@#$%ing precompiler!


Rob Berendt
--
"They that can give up essential liberty to obtain a little temporary
safety deserve neither liberty nor safety."
Benjamin Franklin



                    "Simon Coulter"
                    <shc@flybynight.c       To:     rpg400-l@midrange.com
                    om.au>                  cc:
                    Sent by:                Fax to:
                    rpg400-l-admin@mi       Subject:     Re: Size of a SQL 
result set
                    drange.com


                    03/22/2002 08:25
                    PM
                    Please respond to
                    rpg400-l







Hello Rob,

You wrote:
>My problem was a packed number in the middle.  Seems that x'00' can
>determine the end of the field in a result set.

No.  That's sounds wrong.  If that's what is happening someone deserves an
APAR.  What about an integer field containing the value zero (e.g.,
x'0000') in the middle of a record?

It would seem that the Domino application is treating the array parameter
as a C-string, hence the x'00' terminator effect.

Why aren't you using real result sets (i.e., SET RESULT SETS CURSOR xxx)?

Write a small Java application that invokes the same stored procedure and
see if that also suffers the truncation.  If I get time I might play with
this.

Regards,
Simon Coulter.

--------------------------------------------------------------------
   FlyByNight Software         AS/400 Technical Specialists
   http://www.flybynight.com.au/

   Phone: +61 3 9419 0175   Mobile: +61 0411 091 400        /"\
   Fax:   +61 3 9419 0175   mailto: shc@flybynight.com.au   \ /
                                                             X
                 ASCII Ribbon campaign against HTML E-Mail  / \
--------------------------------------------------------------------

_______________________________________________
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: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l
or email: RPG400-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.