Re: Help with %Dec

Thanks Paul,
That was the method I ended up using.
I now have a better understanding of how the %dec bif works.

Thanks to all who responded.
 
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

  
 






________________________________
From: "paultherrien@xxxxxxxxxxxxxxxxxx" <paultherrien@xxxxxxxxxxxxxxxxxx>
To: RPG programming on the IBM i / System i <rpg400-l@xxxxxxxxxxxx>
Sent: Thu, March 24, 2011 11:04:13 AM
Subject: RE: Help with %Dec

One way would be to use a data structure:

Thedata  DS
Char                  11 a
Zone                  11 s 0 4  overlay(char)

Or :

    New_value = %dec(char : 11 : 4) / 10000

Paul Therrien
Andeco Software, LLC
932 Saint Johns Dr
Maryville, TN 37801
225-229-2491
paultherrien@xxxxxxxxxxxxxxxxxx
www.andecosoftware.com

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of Jeff Young
Sent: Thursday, March 24, 2011 10:30 AM
To: rpg400-l@xxxxxxxxxxxx
Subject: Help with %Dec

Given an 11 char field with the value of '00000639000', I am attempting to
use
%Dec to convert it to an 11.4 position numeric field.
new_value = %dec(char : 11 : 4).
I *want* the result to be 63.9000, but am getting 639000.0000 as my result.
What am I not understanding about how this works, and what would be the best
way
to get the desired result.

TIA,
 
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