Re: dynamic sql - receive fetched row values into host variables

so since namesValuesDS.value is a pointer, i'd need %addr(g_hostData(i)) to
assign the pointer of g_hostData(i) correct?

but what if that g_hostData value should be returned as char or numeric
depending on the column that namesValuesDS.value is representing?
g_hostData is simply a char value.


On Tue, Oct 17, 2017 at 1:11 PM, <dlclark@xxxxxxxxxxxxxxxx> wrote:

"RPG400-L" <rpg400-l-bounces@xxxxxxxxxxxx> wrote on 10/17/2017 12:43:49
PM:

i really don't think i'm assigning value (or sqlda.data) correctly...
here's the confusion...

This is the OAR DS that contains value (which is returned to the calling
rpg pgm)...

namesValueDS.field(i).value - which is a pointer...

i need to assign our g_hostData(i) data value to that pointer.

These pointers are killing me. How do i get the
namesValueDS.field(i).value set to value in g_hostData(i)?

The answer depends upon whether you need the value of
g_hostData(i):

namesValueDS.field(i).value = g_hostData(i);

or you need the address of g_hostData(i).

namesValueDS.field(i).value = %addr(g_hostData(i));


"RPG400-L" <rpg400-l-bounces@xxxxxxxxxxxx> wrote on 10/17/2017 01:00:27
PM:

and look at figure 23 of below link...
http://m.iprodeveloper.com/rpg-programming/create-dynamic-sql-
handlers-using-rpg-open-access

what is (r * row lengh)? in the %str assignment?

I guess you mean figure 24. You only need that calculation of you
are fetching multiple rows in a single call and then returning only one
row at a time to the caller..


Sincerely,

Dave Clark
--
int.ext: 91078
direct: (937) 531-6378
home: (937) 751-3300

Winsupply Group Services
3110 Kettering Boulevard
Dayton, Ohio 45439 USA
(937) 294-5331




************************************************************
*********************************
This email message and any attachments is for use only by the named
addressee(s) and may contain confidential, privileged and/or proprietary
information. If you have received this message in error, please
immediately notify the sender and delete and destroy the message and all
copies. All unauthorized direct or indirect use or disclosure of this
message is strictly prohibited. No right to confidentiality or privilege
is waived or lost by any error in transmission.
************************************************************
*********************************
--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L)
mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: http://amzn.to/2dEadiD