函数创建用户并分配权限详解编程语言
2023-06-13 09:11:50 时间
IF SY-SUBRC = 0.
MESSAGE ID GW_RETURN-ID TYPE GW_RETURN-TYPE NUMBER GW_RETURN-NUMBER.
ELSE.
REFRESH:GT_RETURN.
GW_FILE-BAPIPROF = SAP_ALL.
GW_FILE-BAPITYPE = C.
GW_FILE-BAPIAKTPS = X.
APPEND GW_FILE TO GT_FILE.
GW_FILE-BAPIPROF = SAP_NEW.
GW_FILE-BAPITYPE = C.
GW_FILE-BAPIAKTPS = X.
APPEND GW_FILE TO GT_FILE.
"assign sap_all to user
CALL FUNCTION BAPI_USER_PROFILES_ASSIGN DESTINATION GV_DEST
EXPORTING
USERNAME = ANDY01
TABLES
PROFILES = GT_FILE
RETURN = GT_RETURN.
READ TABLE GT_RETURN INTO GW_RETURN WITH KEY TYPE = E.
IF SY-SUBRC = 0.
WRITE Assign Profile to User error.
ELSE.
ENDIF.
ENDIF.
18671.html
cgojava