FUNCTION zfm_raizcuadrada.
*"----------------------------------------------------------------------
*"*"Local Interface:
*"  IMPORTING
*"     REFERENCE(I_NUM) TYPE  I DEFAULT 0
*"  EXPORTING
*"     REFERENCE(O_RESULT) TYPE  I
*"----------------------------------------------------------------------

  COMPUTE o_result = SQRT( i_num ).

ENDFUNCTION.