Re: MultiRow Fetch

[MWalter@xxxxxxxxxxxxxxx]

No Cigar. Same message when changing it to a MODS.


Thanks,

Mark


Mark Walter
Sr. Programmer/Analyst
Hanover Wire Cloth a div of CCX, Inc.
mwalter@hanoverwire.com
http://www.hanoverwire.com
717.637.3795 Ext.3040



                    "Rolf Mittag"
                    <mailing-lists@r-m        To:     <rpg400-l@midrange.com>
                    -e-d-v.de>                cc:
                    Sent by:                  Subject:     Re: MultiRow Fetch
                    rpg400-l-admin@mid
                    range.com


                    04/08/02 10:18 AM
                    Please respond to
                    rpg400-l






unfortunately the precompiler is right this time ;-)

DdsCtryMast     e Ds                  extname(CtryMast) prefix(o_)
occurs(100)

 ...

c+ FETCH cur FOR :count ROWS INTO :dsCtryMast

should work. the dsArry only has one field per row, which your table
most likely has not

hth Rolf

*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~*
! Dipl.Inf.(FH) Rolf P Mittag  IBM Partner in Development     !
! Leipziger Str. 50            D-69214 Eppelheim              !
! Fon: +49 (6221) 76 78 60     Fax: +49 (6221) 76 80 26   /"\ !
! eMl: rm@r-m-e-d-v.de                                    \ / !
!                                                          X  !
!              ASCII Ribbon campaign against HTML E-Mail  / \ !
*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~*


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