|
-----Original Message-----at
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-
bounces@xxxxxxxxxxxx] On Behalf Of rob@xxxxxxxxx
Sent: dinsdag 6 mei 2008 16:42
To: RPG programming on the AS400 / iSeries
Subject: Re: Reading large parm
Two different ways come to light. Assumption is that the six places
you
need are character and one field. Change to datastructure if they
aren't.
One:
For x = 1 to 115 by 6;
GoProcess(%substr(Big:x:6));
EndFor;
Two:
D MyChar based(pMyChar)
For x=0 to 119 by 6;
pMychar=%address(Big) + x;
GoProcess(Mychar);
EndFor;
Rob Berendt
--
Group Dekko Services, LLC
Dept 01.073
Dock 108
6928N 400E
Kendallville, IN 46755
http://www.dekko.com
Steve Jones <sjones@xxxxxxxxxxxxxx>
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
05/06/2008 10:24 AM
Please respond to
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
To
rpg400-l@xxxxxxxxxxxx
cc
Subject
Reading large parm
Group:
I am looking for a good way to break apart a large parm passed to my
program. The parm will be 120 in length, but I need to read 6 places
a time & use that later in the program. Instead of creating a data
structure which breaks it down, can I somehow just read 6 places at a
time, use that info, then read the next 6?
Thank in advance
Steve Jones
--
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.
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.