Re: Convert Alpha to Numeric

["End of the Trail" <endofthetrail@xxxxxxxxxxx>]

Title: Convert Alpha to Numeric

This assumes that alpha field is already right justified.  Most alpha fields are left justified.

-----Original Message-----
From: Gary Monnier <GaryMon@powertechgroup.com>
To: RPG400-L@midrange.com <RPG400-L@midrange.com>
Date: Friday, April 14, 2000 8:25 PM
Subject: Re: Convert Alpha to Numeric

Have you tried the Move op-code?  It should do what you want to do.

 

    MOVE     AlphaField            NumericFld

 

Another way is to define a data structure

 

DSName        DS

  AlphaField                 1   20

  NumericFld              11   20  3

 

or

 

DSName        DS

  AlphaField                 1   20

  NumericFld                     10  3      Overlay(AlphaField:11)

----- Original Message -----

From: Baltus, Kevin

To: 'RPG400-L@midrange.com'

Sent: Friday, April 14, 2000 2:00 PM

Subject: Convert Alpha to Numeric

Hello.  I may be asking a basic question but what is the best way to convert an alpha field into a numeric?  In my situation I have a 20-Alpha where the values are whole numbers.  I need to get that whole number into a 10.3 field.

Any suggestions would be greatly appreciated!  Thanks!

--------------------------------------------------------
Kevin Baltus - Programmer/Analyst
(651) 290-6179   kbaltus@automaticproducts.com
Gross-Given Mfg/Automatic Products International
http://www.automaticproducts.com

Blatant Band Plug
http://www.twitch.org