Re: Convert Character to Numeric

[Albert York <alfromme@xxxxxxxxx>]

If i understand you correctly, you have something like this: '
1234567' and it might be defined as 7 digits and 2 decuimal places in
the file. You want to put it in a field that is defined as 15.5 (for
example).

Convert the character field to a numeric field with no decimal points
using %dec.
Divide the number by 10 raised to the number of decimal places (eg 2
would be 100, 3 would be 1000)

Albert


On Wed, Mar 2, 2011 at 11:00 AM, Mike Wills <mike@xxxxxxxxxxxx> wrote:
> %dec should work for you.
>
> --
> Mike Wills
> http://mikewills.me
>
> Sent from my mobile
>
> On Mar 2, 2011, at 12:58 PM, Jeff Young <cooljeff913@xxxxxxxxx> wrote:
>
> > I have a character field where the number of digits and decimal places is stored
> > in a file.
> > I need to convert this to a fixed length numeric field that is defined in my
> > program.
> > It appears that the %Dec BIF required a literal or a value that is known at
> > compile time.
> > What is the best way to do this?
> >
> > Thanks,
> >
> > Jeff Young
> > Sr. Programmer Analyst
> > IBM -e(logo) server Certified Systems Exper - iSeries Technical Solutions V5R2
> > IBM  Certified Specialist- e(logo) server i5Series Technical Solutions
> > Designer V5R3
> > IBM  Certified Specialist- e(logo)server i5Series Technical
> > Solutions Implementer V5R3
> > --
> > 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.
> --
> 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.