Re: Alternatives to MOVEL - just curious

[Vernon Hamberg <vhamberg@xxxxxxxxxxxxxxx>]

Well put, Jon - in mainline, it's a single purpose-driven line of code. 
The DS, if that's the approach, can be hidden.

On 12/9/2013 12:47 PM, Jon Paris wrote:
> Nothing will perform better than doing nothing - if you see what I mean. Personally if I had to do this I'd wrap it in a nicely named subproc.
>
>   
> On 2013-12-09, at 11:31 AM, Vernon Hamberg <vhamberg@xxxxxxxxxxxxxxx> wrote:
>
> > Hi y'all
> >
> > I'm looking at some code - the purpose is to put the 1st 4 digits of a
> > 6-digit variable into a 4-digit numeric variable.
> >
> > It is being done with the MOVEL opcode now.
> >
> > I'm wondering about efficient alternative methods. One I can think of is
> > to use a data structure -
> >
> > dcl-ds dsMoveL qualified;
> >    num4 zoned(4);
> >    num6 zoned(6) pos(1);
> > end-ds;
> >
> > Anything simpler? Better performing?
> >
> > I hope the syntax is right!! But you get the idea, right?
> >
> > Vern
> > --
> > This is the RPG programming on the IBM i (AS/400 and 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.
> Jon Paris
>
> www.partner400.com
> www.SystemiDeveloper.com