RE: User space, outfile or workfile

["Bill Hopkins" <BHopkins@xxxxxxxxxxxxxxxxxxx>]

Sorry copy sent the wrong one to list. Please ignore.
Bill Hopkins





"Bill Hopkins" <BHopkins@xxxxxxxxxxxxxxxxxxx>
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
09/15/2003 09:33 AM
Please respond to RPG programming on the AS400 / iSeries

 
        To:     RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
        cc: 
        Subject:        RE: User space, outfile or workfile


 * 
D               E DS                  EXTNAME(FXDTL) Inz 
D @FXQS           S               *   Inz(%addr(FXQS01)) 
D FXQS            S                   like(FXQS01) based(@FXQS)
D                                      dim(48) 

Something like this maybe.
Bill Hopkins





ttufankj@xxxxxxxxx
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
09/12/2003 09:27 AM
Please respond to RPG programming on the AS400 / iSeries

 
        To:     RPG programming on the AS400 / iSeries 
<rpg400-l@xxxxxxxxxxxx>
        cc: 
        Subject:        RE: User space, outfile or workfile


>>> In V5R1 they added support for the DIM() keyword to data structures.
This gives you the ability to use the data structure in code as an array.

Bob, Can you give a quick example of this?


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



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