9.170 NUMERIC_STRING
Þ Note: Built-In Function Rules.
Converts a number to a string.
For use with
|
Arguments
|
Return Values
|
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 >