Re: Why is there no value in GH0100?

[Rob Berendt <rob@xxxxxxxxx>]

My initial reply as to why QUSRTVUS was going to be 'pointer fear'.  
Something I need to get over.  Maybe an example of this, in this case.

In the FM there was a line that said
'If you are repeatedly accessing the contents of a user space and are 
using an HLL that supports pointers, see "Retrieve Pointer to User Space 
(QUSPTRUS) API" in topic 4.6; this API provides a pointer to the user 
space for improved performance.  When you have obtained a pointer, 
you use pointer arithmetic to access the contents of a user space.'

The link points to another API:
Retrieve Pointer to User Space (QUSPTRUS) API

Which has a link stating:
'Examples of the API are in "Examples" in the book OS/400 API Appendixes.'

This link contains some programming examples in other than ILERPG.

Now, since I've announced I have it working, overbudget, then I probably 
won't have time to change it to pointers.  But, what the hey, I can only
stand so much Freecell during lunch.





Jon.Paris@halinfo.it on 02/02/2000 03:23:53 PM
Please respond to RPG400-L@midrange.com@Internet
To:     RPG400-L@midrange.com@Internet
cc:      
Fax to: 
Subject:        Re: Why is there no value in GH0100?



Rob - this is off the top of my head 'cos I haven't time to test but .... are
you sure that QUSRTVUSP can be used with the QUSRTVUS API ?  From the snippet
you posted it appears to be a varying length field and that is not what the API
is expecting. So the API will place data in the first two bytes that should
contain the length.  If the proto defines the field correctly i.e. as nnnA and
you have the CONST keyword to allow the varying length field then no value will
come back to you anyway.

PS. Why on earth are you using the QUSRTVUS in RPG IV anyway?  Just get a
pointer to the space and address it directly, way faster and you probably
wouldn't be having these problems.


+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---


+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---