%EDITFLT(numeric expression)
%EDITFLT converts the value of the numeric expression to the character external display representation of float. The result is either 14 or 23 characters. If the argument is a 4-byte float field, the result is 14 characters. Otherwise, it is 23 characters.
If specified as a parameter to a definition specification keyword, the parameter must be a numeric literal, float literal, or numeric valued constant name or built-in function. When specified in an expression, constant folding is applied if the numeric expression has a constant value.
For more information, see Conversion Operations or Built-in Functions.
*..1....+....2....+....3....+....4....+....5....+....6....+....7...+....
D*Name++++++++++ETDsFrom+++To/L+++IDc.Keywords+++++++++++++++++++++++++
D f8 s 8f inz (50000)
D string s 40a varying
/FREE
string = 'Float value is ' + %editflt (f8 - 4E4) + '.';
// Value of "string" is 'Float value is +1.000000000000000E+004. '
/END-FREE