RE: Can SQL recognize a nested data structure?

I think I figured it out... I didn't need to create a nested data structure
after all.  I simply added the field I needed for RRN at the END of the
external data structure:

d JPP010        e ds                  occurs(10)
d   RRN                         10s 0

Then I just switched the order I selected the fields in SQL:

c/exec SQL
c+ declare C1 cursor for
c+   select A.*, rrn(A)
c+     from JRP010 A
c+    where R1COM = :Company and R1IYR * 100 + R1IWK between
c+                  :FromIYRIWK and :ToIYRIWK
c/end-exec

And it works when fetch into the data structure JPP010 like I wanted it to.
SQLER3 returns the # of records actually fetched.  I guess I just assumed I
needed something complex...



                                                                                
                                                         
                      CWilt@xxxxxxxxxxxx                                        
                                                         
                      Sent by:                  To:       rpg400-l@xxxxxxxxxxxx 
                                                         
                      rpg400-l-bounces@m        cc:                             
                                                         
                      idrange.com               Subject:  RE: Can SQL recognize 
a nested data structure?                                 
                                                                                
                                                         
                                                                                
                                                         
                      08/17/2004 02:51                                          
                                                         
                      PM                                                        
                                                         
                      Please respond to                                         
                                                         
                      RPG programming on                                        
                                                         
                      the AS400 /                                               
                                                         
                      iSeries                                                   
                                                         
                                                                                
                                                         




Actually,

I take that back.  It was a single row fetch into a DS with a larger number
of fields ( I was trying to do some overlaid arrays).

Charles


> -----Original Message-----
> From: Wilt, Charles
> Sent: Tuesday, August 17, 2004 2:45 PM
> To: rpg400-l@xxxxxxxxxxxx
> Subject: RE: Can SQL recognize a nested data structure?
>
>
> Matt,
>
> Do you know for sure that this works?  I've had problems
> trying to return
> data into a MODS when the number of DS subfields didn't match
> what SQL was
> expecting.
>
> Charles
>
--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.