simple coding with load any array

195 pts.
Tags:
AS/400
RPG/400
Hi, Please tell me how to read the records from a file with load an array of size with error conditions

Answer Wiki

Thanks. We'll let you know when a new response is added.

Hi,

If you mean to load an array from a file, something like this should work (RPG/400) :-

ARR is array of 99 elements

Z-ADD 0 IDX
*LOVAL SETLL FILE
READ FILE 99
*IN99 DOWEQ *OFF
IDX ANDLT 99
ADD 1 IDX
MOVE FIELD ARR,IDX
READ FILE 99
ENDDO

Regards,

Martin Gilbert.

Discuss This Question:  

 
There was an error processing your information. Please try again later.
Thanks. We'll let you know when a new response is added.
Send me notifications when members answer or reply to this question.

Forgot Password

No problem! Submit your e-mail address below. We'll send you an e-mail containing your password.

Your password has been sent to:

To follow this tag...

There was an error processing your information. Please try again later.

Thanks! We'll email you when relevant content is added and updated.

Following

Share this item with your network: