Converting a character value into a numeric value
How do I convert a character value into numeric value within a CL program?
Just use the chgvar command as this example illustrates. Just make sure that your alpha value does contain all numbers.
PGM DCL VAR(&ALPHA) TYPE(*CHAR) LEN(3) VALUE('003') DCL VAR(&NUM) TYPE(*DEC) LEN(3 0) CHGVAR VAR(&NUM) VALUE(&ALPHA) ENDPGM
==================================
MORE INFORMATION ON THIS TOPIC
==================================
The Best Web Links: tips, tutorials and more.
Ask your programming questions--or help out your peers by answering them--in our live discussion forums.
Ask the Experts yourself: Our application development gurus are waiting to answer your programming questions.