通过 SAP Router 进行 SAP 远程连接及其安全性
在使用SAPRouter时经常会碰到断线,其发生原因有很多,如:网络不稳定、操作间隔时间过长等。鉴于此,通过一个程序,来改良一下SAP GUI 通过SAP Router连接的稳定性。
原理:定时触发GUI与服务器的交互,保持router的连通性;
操作:SE38运行程序Z_DX即可,保持此session,另外打开session进行操作;
优点:可以比较好的改良GUI通过router连接SAP服务器的稳定性,同时防止超时导致session被SAP服务器断开或者被router断开;占用资源较少;
缺点:如果网络真的很差,会即刻断线,应该比QQ企鹅更敏感;多开一个session比较碍眼;
适用人群:通过sap router访问方式连接SAP 服务器。
程序如下:
REPORT ZGUI.
DATA : TEXT TYPE STRING,
CHR TYPE CHAR2,
TIME TYPE I.
DATA:SUM TYPE I,
HOUR TYPE I,
MIN TYPE I,
SEC TYPE I.
TIME = 0.
CONCATENATE 'Running(hh:mm:ss):' '00:00:00' INTO TEXT.
DO.
CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR'
EXPORTING
PERCENTAGE = TIME MOD 100
TEXT = TEXT
EXCEPTIONS
OTHERS = 1.
TIME = TIME + 1.
SUM = TIME * 5.
IF SUM MOD 3600 GE 1800.
HOUR = SUM / 3600 - 1.
ELSE.
HOUR = SUM / 3600.
ENDIF.
IF ( SUM MOD 3600 ) MOD 60 GE 30.
MIN = ( SUM MOD 3600 ) / 60 - 1.
ELSE.
MIN = ( SUM MOD 3600 ) / 60.
ENDIF.
SEC = SUM MOD 60.
CHR = HOUR.
IF HOUR < 10.
CONCATENATE 'Running(hh:mm:ss):0' CHR ':' INTO TEXT.
ELSE.
CONCATENATE 'Running(hh:mm:ss):' CHR ':' INTO TEXT.
ENDIF.
CHR = MIN.
IF MIN < 10.
CONCATENATE TEXT '0' CHR ':' INTO TEXT.
ELSE.
CONCATENATE TEXT CHR ':' INTO TEXT.
ENDIF.
CHR = SEC.
IF SEC < 10.
CONCATENATE TEXT '0' CHR INTO TEXT.
ELSE.
CONCATENATE TEXT CHR INTO TEXT.
ENDIF.
WAIT UP TO 5 SECONDS.
ENDDO.
实际使用中发现一个问题:如果因为某种原因导致断开,此程序可能一直在服务器中运行,导致持续的占用服务器资源,
故程序最好改成在一定时间范围内持续运行,比如持续运行6小时:while time LE 6h
我是老周,如果你喜欢我的文字,请记得点击⬇️关注我。
码字不易,文章下拉,右边点个【赞】和【在看】吧!!
猜您还喜欢合集:
猜您还喜欢文章: