RE: QUSRSPLA and operating system upgrade

["Leland, David" <dleland@xxxxxxxxxx>]

This message is in MIME format. Since your mail reader does not understand
this format, some or all of this message may not be legible.
--
[ Picked text/plain from multipart/alternative ]
I'm not following you here.  QUSRSPLA simply returns data to a variable, and
I'm using it in a CL program.  There isn't any "fetch data loop".

Dave

-----Original Message-----
From: Buck Calabro [mailto:Buck.Calabro@commsoft.net]
Sent: Tuesday, July 16, 2002 3:50 PM
To: midrange-l@midrange.com
Subject: RE: QUSRSPLA and operating system upgrade


>Does anyone have a good example of using QUSRSPLA
>- one that works even after OS upgrades.

The key is in understanding that the data structures can always shrink/grow
- even a PTF can cause this, not just an OS upgrade.  So when designing the
'fetch data' loop, you fetch the size of your data structure, but you offset
to the next structure by the returned size.

fetch_len = sizeof(QUSH0100)
call QUSRTVUS (space: position: fetch_len: DS: error)
position = position + QUSOHS

Hope that helps
  --buck
_______________________________________________
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/midrange-l
or email: MIDRANGE-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.