9 170 NUMERIC_STRING

9.170 NUMERIC_STRING

Þ Note: Built-In Function Rules.

Converts a number to a string.

For use with

LANSA for i YES Visual LANSA for Windows YES Visual LANSA for Linux YES

 

Arguments

No Type Req/ Opt Description Min Len Max Len Min Dec Max Dec 1 N Req Number to be converted 1 29 0 9 2 A Opt Removes trailing zeroes from the decimal portion of the number. Y = Trim Default = Trim 1 1

 

Return Values

No Type Req/ Opt Description Min Len Max Len Min Dec Max Dec 1 A Req Number as a string 1 31

 

Example

Convert a number to a string for use in QRYSLT of OPEN command

DEFINE     FIELD(#SALARY)  TYPE(*DEC) LENGTH(20) DECIMALS(0)
DEFINE     FIELD(#SALCHR)  TYPE(*CHAR) LENGTH(20)
DEFINE     FIELD(#QRYSLT)  TYPE(*CHAR) LENGTH(256)
**********
REQUEST    FIELDS(#SALARY)
USE        BUILTIN(NUMERIC_STRING) WITH_ARGS(#SALARY) 
           TO_GET(#SALCHR)
CHANGE     FIELD(#QRYSLT) TO('''SALARY *GT''')
USE        BUILTIN(BCONCAT) WITH_ARGS(#QRYSLT #SALCHR) 
           TO_GET(#QRYSLT)
OPEN       FILE(PAYROLL) USE_OPTION(*OPNQRYF) QRYSLT(#QRYSLT)

      < some processing >