%SQRT(numeric expression)
%SQRT returns the square root of the specified numeric expression. If the operand is of type float, the result is of type float; otherwise, the result is packed decimal numeric. If the parameter has a value less than zero, exception 00101 is issued.
For more information, see Arithmetic Operations or Built-in Functions.
*..1....+....2....+....3....+....4....+....5....+....6....+....7...+....
D n S 10I 0
D p S 9P 2
D f S 4F
/FREE
n = %SQRT(239874);
// n = 489
p = %SQRT(239874);
// p = 489.76
f = %SQRT(239874);
// f = 489.7693
/END-FREE