Histórico da Página

#---------------------------------#
 FUNCTION RFI_getParamValue_test()
#---------------------------------#
  DEFINE l_token  CHAR(36)

  LET l_token = "94b29b4bfb7a40008D13434fe67c09c0"

  IF RFI_isValidToken(l_token) THEN
     LET l_parametro = RFI_getParamName(l_token,1) 
     IF l_parametro = "codEmpresa" THEN
        LET l_paramCodigoEmpresa = RFI_getParamValue(l_token,1) 
     END IF

     #... <regra negócio para token válido> ...
  ELSE
     CALL log0030_mensagem(RFI_getErrorMessage(),"stop")
  END IF
END FUNCTION