%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