How to convert Alpha TO Decimal value.

  
-SET &VARIABLE1 = '258,123.25'

How to convert the above Value into Integer..?



WF 7.6
IIS
HTMl Excel, PDF

This message has been edited. Last edited by: Kerry,

Do a search on ATODBL..that should help you out.

-SET &ECHO=ALL;

SET DMPRECISION = 2
-RUN

-SET &VAR1 = 258123.25;
-SET &VAR2 =  &VAR1 * 1;

-TYPE &VAR1 &VAR2

Look at WebFOCUS/iWay New Features > Reporting Language > Specifying Precision for Dialogue Manager Calculations

Thank you for response..
I guess my question was interpretted wrong.

Variable has Alpha value ie:25,258.12

&VAR/A15 = '25,258.12' ;
I want to convert this comma seperated Alpha value to Decimal, so that I perform some computations.

Conversion from alpha to Decimal
'25,258.12' --> 25258.12

Thanks

Prarie gave you the answer, however you will have to preprocess the alpha value to remove commas.

However, by the time you've stripped (hint) out the comma(s) you could then just use Francis' suggestion as it is a variable (which doesn't really have a format).

T

Always an interesting one this. For calculations in DM, always done in double precision, but displayed truncated unless DMPRECISION is used.

ATODBL, which seems to be needed and cannot take commas in the input string, is not needed. &variables are what they contain(ish).

So get rid of the commas, using STRREP, then the variable can be used in calculations.

The redisplay is then an issue, as 123456.70 displays as 123456.7, so use FTOA to get a full 2 decimal point display.

THEN decide how you want the result of a calculation displayed. Using F10.2 truncates the decimals and D10.2 rounds the decimals, but then D10.2 will also add the comma in and F10.2 doesn't. Go figure which you want.

SET DMPRECISION = 2
-RUN

-SET &VAR1 = '258,123.25';
-SET &LEN1 = &VAR1.LENGTH;
-SET &VAR2 = STRREP(&LEN1,&VAR1,1,',',0,'X',&LEN1,'A&LEN1.EVAL');
-SET &VAR3 = &VAR2*1.23;
-SET &VAR4 = FTOA(&VAR3,'(F10.2)','A16');
-SET &VAR5 = FTOA(&VAR3,'(D10.2)','A16');

-TYPE &VAR2 &VAR3 &VAR4 &VAR5 

gives
258123.25 317491.6 317491.59 317,491.60

The actual full precision result is 317491.5975

Exactly Alan, but I would have used STRIP instead of STRREP -

-SET &VAR2 = STRIP(&VAR1.LENGTH, '&VAR1.EVAL', ',', 'A&VAR1.LENGTH');

T

Thanks Alan B
Your solution is crystal clear.

Thanks