Re: Editcode

Ahhhh, that makes more sense
Instead of using MOVEL, use MOVE
MOVEL means move to the left



Alan Shore

NBTY, Inc
(631) 244-2000 ext. 5019
AShore@xxxxxxxx
"If you're going through Hell, keep going" - Winston Churchill

rpg400-l-bounces@xxxxxxxxxxxx wrote on 05/31/2007 01:50:40 PM:

Alan,

XYZ is numeric - so the initial value is 00. I want to handle this XYZ

field

and clear it of Zeros, before i pass the value 1 to it.
or else when do a MOVEL ABC XYZ
the result of XYZ is 10.(Is there any way i can get rid of the Zeros in

XYZ

before moving a value to it?)

From: Alan Shore <AlanShore@xxxxxxxx>
Reply-To: RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
To: RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
Subject: Re: Editcode
Date: Thu, 31 May 2007 13:37:28 -0400

Sorry Derek, I'm not following your thought procedure here.
You say that ABC contains the value 1. That is - '1 ' (the
character 1 followed by 9 spaces.
So how can you trim the trailing 0's if there are none.
However, the following web page may be of interest to you.

http://www.mcpressonline.com/mc/.6aed2c11



Alan Shore

NBTY, Inc
(631) 244-2000 ext. 5019
AShore@xxxxxxxx
"If you're going through Hell, keep going" - Winston Churchill

rpg400-l-bounces@xxxxxxxxxxxx wrote on 05/31/2007 01:30:01 PM:

Hi,

I have to move a value from a 10 character field to a 2 decimal

ABC 10
xyz 2 0

I am doing a MOVEL operation to move this value to the numeric field.
Now if i have the value of ABC = 1, then the value passed on to XYZ

is

10(Since it moves 1 from left, and initial value of XYZ is 00)
What is the edit code that i can use to remove the trailing Zeros

before

i

move the character field to the numeric field.?

Thanks in advance

Derek

_________________________________________________________________
More photos, more messages, more storage—get 2GB with Windows Live

Hotmail.

http://imagine-windowslive.com/hotmail/?locale=en-
us&ocid=TXT_TAGHM_migration_HM_mini_2G_0507

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

_________________________________________________________________
Like the way Microsoft Office Outlook works? You’ll love Windows Live
Hotmail.
http://imagine-windowslive.com/hotmail/?locale=en-
us&ocid=TXT_TAGHM_migration_HM_mini_outlook_0507

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