*&--- 获取公司代码 CALL FUNCTION 'VELO25_DETERM_BUKRS_FROM_WERKS' EXPORTING WERKS_IV = GS_MSEG_MKPF-WERKS IMPORTING BUKRS_EV = GS_ALV-BUKRS EXCEPTIONS NOT_FOUND = 1 OTHERS = 2. 没有直接的表,但是可
SELECT * FROM T001 INTO TABLE @DATA(LT_T001) WHERE BUKRS IN @S_BUKRS. LOOP AT LT_T001 INTO DATA(LS_T001). AUTHORITY-CHECK OBJECT 'F_BKPF_BUK' ID 'BUKRS' FIELD LS_T001-BUKRS. IF SY-SUBRC <> 0. MESSAG