RE: Record size limitation in RPG - MQ Series

OK, you smart guys are confusing me.  Passing parms by value, reference etc,
are things I learned way back in the early 80s in college.  Granted, my
coding is a little rusty.  I don't code very often anymore.
Tell me if this is doable.  I am doing this in RPG/400 (non ILE, but I guess
I could do it in ILE if I need to).  I don't remember much about pointers.

I want to read the contents of a file (lets say 100 80 byte records), and
store in a user space.  After I initially use the QUSCRTUS API to create the
user space, I assume I will use the QUSCHGUS API to add my data to the user
space, changing the beginning offset by 80 each time and keeping track of
how many 80 byte records I have written to the user space (to calculate the
buffer length).

Once my entire file is in the user space, I then will user the Retrieve User
Space API to retrieve it and then call the MQ API (QMQM) to do the MQPUT.
Does this sound right?
cjg

Carl J. Galgano
EDI Consulting Services, Inc.
600 Kennesaw Avenue, Suite 400
Marietta, GA  30060
(770) 422-2995 - voice
(419) 730-8212 - fax
mailto:cgalgano@xxxxxxxxxxxxxxxxx
http://www.ediconsulting.com
AS400 EDI, Networking, E-Commerce and Communications Consulting and
Implementation 
http://www.icecreamovernight.com
Premium Ice Cream Brands shipped Overnight

Visit our website to subscribe to our FREE AS/400 Timesharing Service

-----Original Message-----
From: Keith Carpenter [mailto:CarpCon@xxxxxxx] 
Sent: Monday, March 22, 2004 1:45 PM
To: Midrange Systems Technical Discussion
Subject: Re: Record size limitation in RPG - MQ Series


If you're talking external program calls then you're basically correct.  MI
is the exception as it can pass/receive parms by value.

It sounds like MQ series uses an ILE procedure interface.   I would expect
large parameters like a buffer to be passed as a pointer.  Not very
efficient to pass a buffer by value.   The buffer parm is likely defined as
either a "pointer by value" or a "varsize field by reference".   Actually
both of these are the effectively the same (pointer to data).


Keith


----- Original Message ----- 
From: "jt" <jt@xxxxxx>
To: "Midrange Systems Technical Discussion" <midrange-l@xxxxxxxxxxxx>
Sent: Monday, March 22, 2004 8:35 AM
Subject: RE: Record size limitation in RPG - MQ Series


> If doing this in RPG, when RPG passes a parm it is actually passing a 
> pointer TO the parm.  This is because RPG passes parms "by reference"
rather
> than "by value", normally.  (I don't recall, right now, if RPG even 
> CAN
pass
> by value, but think that mebbe was added with CONST or some such.)  I
dunno
> MQ, however, but sounds like you just pass the variable-name and it'll
work.
>
> | -----Original Message----- 
> | [mailto:midrange-l-bounces@xxxxxxxxxxxx]On Behalf Of Carl Galgano
> | Sent: Monday, March 22, 2004 10:58 AM
>
> | How do you pass the
> | pointer to a user
> | space to the MQPUT?  There is an API to call to do the MQPUT, but I
don't
> | know how to pass the pointer.
>
>
> _______________________________________________
> This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list
> To post a message email: MIDRANGE-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/midrange-l
> or email: MIDRANGE-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives at 
> http://archive.midrange.com/midrange-l.
>
>

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