RE: Occurs... I forgot how to handle these

["Wills, Mike N. (TC)" <MNWills@xxxxxxxxxxxxxx>]

Hey thanks... Scott helped me in the chat room on this that is what fixed
it. I know I did this in college, I just didn't remember how to do it.

-----Original Message-----
From: Richard B Baird [mailto:rbaird@xxxxxxxxxxxxxxxxxxxxx]
Sent: Thursday, March 13, 2003 9:15 PM
To: RPG programming on the AS400 / iSeries
Subject: Re: Occurs... I forgot how to handle these



Mike,
try the OCCUR opcode:

c     1             occur     PO120G
C                   Call      'CUCPO120'
C                   Parm                    Cmpny
C                   Parm                    F1MPRT
C                   Parm                    F1TLSM

position the MODS to the occurence you want and the field has the desired
data.

hth,

rick

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