Re: QYAPSOL api and filter data problem - GUI0141 error code

you are right. dataSize should be the size of the filterData field.

and as i said: it's really a pain to work with the os400 api. every time it 
works, you can hear a sigh of relief from me =)

thanx for the help from everyone. this list is really great.

mk


On Tue, 6 Jul 2004 10:52:24 -0500 (CDT)
Scott Klement <rpg400-l@xxxxxxxxxxxxxxxx> wrote:

> 
> 
> Hi Mihael,
> 
> There are also a few places in your prototype where I'd code
> options(*varsize) -- but that's not why you're getting an error.  The
> error is in the contents of your filterData data structure:
> 
> > DFilterData       DS                  QUALIFIED
> > D  data                         16A
> > D  overallSize                  10I 0 OVERLAY(data:1)
> > D  filterKey                    10I 0 OVERLAY(data:5)
> > D  dataSize                     10I 0 OVERLAY(data:9)
> > D  filterData                   10I 0 OVERLAY(data:13)
> [SNIP]
> > FilterData.filterKey = 1;
> > FilterData.filterData = -1;
> > FilterData.dataSize = 16;
> > FilterData.overallSize = %size(FilterData.data);
> 
> There are two sizes involved here... The one you called "overallSize" is
> the size of the entire data structure, the one that you called "dataSize"
> is the size of just the "filterData" field.
> 
> You have the overallSize correct, but the dataSize is wrong -- it should
> be set to %size(FilterData.filterData) -- which, since it's a 10I 0 will
> be 4.
> 
> Good Luck
> 
> --
> 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/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.
> 


-----------------------------------------------------------------

   /"\
   \ /
    X            ASCII Ribbon campaign against HTML E-Mail
   / \

-----------------------------------------------------------------