×
The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.
What you want, I believe, is:
Arr(Position) = WkValue;
This is the same as
Eval Arr(Position) = WkValue;
You can even try this in fixed format with Eval as the opcode.
-Kurt
-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Robert Munday
Sent: Tuesday, June 26, 2012 8:16 AM
To: RPG400
Subject: Use Of %SubArr
Greetings from the sunny south.
One of my fellow programmers is trying to move a character field to the interior of an array. This is being attempted in /Free and is not generating the correct result.
In fixed format, this is the expression which works (as it always has):
Position = 11
WkValue = 'UN2367, '
MoveA WkValue Arr(Position)
It yields the desired result: ' UN2367, '
This does not work:
WkLength = 8
%SubArr(Array: Position: WkLength) = WkValue
It yields: ' UUUUUUUU '
The array is receiving only the first character of the character field `UN2367`. What is causing this to occur and how can it be fixed to obtain the correct result?
Thanks,
Robert Munday
Munday Software Consultants
Montgomery, AL
--
This is the RPG programming on the IBM i / System i (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.
midrange.com
