SAP解决长时间不操作掉线问题_SAP刘梦_新浪博客

SAP 解决长时间不操作掉线问题 

当GUI客户端长时间没有使用时，为了不占用SAP服务器的资源，

一般一段时间无操作后，SAP服务会将GUI自动挂断。 

设置：

 

　　RZ11：维护参数文件的参数。输入rdisp/gui_auto_logout 参数名后点击显示。

另外，开发可以使用下面的代码实现一直保持连接：

 

*&---------------------------------------------------------------------*
*& Report ZLMLINK
*&---------------------------------------------------------------------*
*& SAP干货铺
*&---------------------------------------------------------------------*
REPORT ZLMLINK.

DATA: TEXT TYPE STRING,
      TIME TYPE I.
TIME = 0.
IF SY-LANGU = '1'.
  CONCATENATE '请使用其他会话进行工作' '!' INTO TEXT.
ELSE.
  CONCATENATE 'Please use another session for working' '!' INTO TEXT.
ENDIF.

DATA:GT_INFO TYPE TABLE OF UINFO2,
     GV_NUM  TYPE I.

"获取当前用户的会话数
CALL FUNCTION 'TH_LONG_USR_INFO'
  EXPORTING
    USER      = SY-UNAME
  TABLES
    USER_INFO = GT_INFO.
DESCRIBE TABLE GT_INFO LINES GV_NUM.

"对当前打开的会话数进行判断，如果只打开了一个，那么再另外打开一个新的会话供用户使用
IF GV_NUM = 1.
  CALL FUNCTION 'TH_CREATE_FOREIGN_MODE'
    EXPORTING
      CLIENT           = SY-MANDT
      USER             = SY-UNAME
*     TCODE            =
*     RETURN_ERROR     = 1
*     CREATE_EXCLUSIVE = 0
    EXCEPTIONS
      USER_NOT_FOUND   = 1
      CANT_CREATE_MODE = 2
      OTHERS           = 3.
  IF SY-SUBRC <> 0.
* Implement suitable error handling here
  ENDIF.

ENDIF.

DO.
  CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR'
    EXPORTING
      PERCENTAGE = TIME
      TEXT       = TEXT
    EXCEPTIONS
      OTHERS     = 1.

  TIME = TIME   1.
  IF TIME = 101.
    TIME = 0.
  ENDIF.
  WAIT UP TO 10 SECONDS.
ENDDO.