Re: Moving data into dynamic storage -- RPG400-L

Ick.  While it's certainly possible, and many API's use them, I greatly
prefer the idea of just allocating some space with ALLOC and going to
town.  I think it's much less cumbersome than creating a special
object.  The user space idea doesn't seem to scale well in my mind as  I
can easily have 100 or 1000 pointers in my program.  It would be weird (to
me) to have 1000 user spaces in qtemp.

BTW: My solution is to use the C api memcpy to move data into the allocated
storage area.

The only restriction on this method is the same as the restriction on a
user space - 16MB appears to be the allocation limit.

At 12:39 PM 11/23/02, you wrote:

--

I wonder whether a 'User Space' may be an answer for dynamic storage.
Anyone have some experience with RPG and User Spaces?

(Embedded image moved to file: pic01474.pcx)



                    Rich Duzenbury
                    <rduz@westernmidr        To:     rpg400-l@midrange.com
                    ange.com>                cc:
                    Sent by:                 Subject:     Moving data
into dynamic storage
                    rpg400-l-admin@mi
                    drange.com


                    11/22/2002 11:10
                    AM
                    Please respond to
                    rpg400-l






Hello,

I've ALLOC'd some variable amount of storage, and now I want to move some
data into it.  I currently use the following idiom to base a character
variable onto a pointer:

D pentry          s               *
D entry           s            100    based(pentry)

Now, I can MOVEL some data into entry (up to 100 bytes), and it goes where
the pointer is pointing to quite nicely.

My problem is that since the amount of storage is variable, I don't want to
have to declare a fixed length for the 'entry' variable.

How can I copy data into the contents of pentry while avoiding a fixed
length restriction?

Regards,
Rich

_______________________________________________
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.



--
[ pic01474.pcx of type application/octet-stream deleted ]
--

_______________________________________________
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.

Regards,
Rich