Description: Calculates the square root of factor 2 and stores it in the result field.
Legacy RPG400 Example:
C SQRT Number Root 50
Modern RPGLE Example:
dcl-s Root packed(5:0);
Root = %sqrt(Number);
Root = %sqrt(Number);
Root = %sqrt(Number);