Re: Return Result Set - V5R4

[Scott Klement <rpg400-l@xxxxxxxxxxxxxxxx>]

Michael,

The DIM has to be on the DS definition (not on a subfield definition). 
IIRC, this support requires V5R3 (it was available in RPG in V5R2, but I 
don't think it worked in SQL until V5R3)

DIM on a subfield won't work in any release.


On 4/17/2012 1:35 PM, Michael Ryan wrote:
> Do I need to use a MODS to return a result set from an RPG program
> (V5R4) or can I use arrays within a DS? IOW, if I use this:
>
> Exec SQL SET RESULT SETS ARRAY :MyReturnData FOR :MyCount ROWS;
>
> Can MyReturnData be this:
>
>       D myReturnData...
>       D                 DS
>       D   WOArray                           Dim(100)
>       D     WOTran                    16  0 Overlay(WOArray)
>       D     WOINVTH                    2  0 Overlay(WOArray:*Next)
>       D     WOMA                         1     Overlay(WOArray:*Next)
>
> Or does it have to be this:
>
>        DMyReturnData...
>        D                DS                  Occurs(100)
>       D     WOTran                    16  0
>       D     WOINVTH                    2  0
>       D     WOMA                         1
>       D     WOINVT                     2
>
> Thanks!