举例:
1.获取BP客户界面的客户名称数据
FIELD-SYMBOLS: <ZBP_NAME1> TYPE BUT000-NAME_ORG1.
ASSIGN ('(SAPLBUD0)BUT000-NAME_ORG1') TO <ZBP_NAME1>.
2.读取OKCODE.
DATA: ZBP_UCOMM TYPE BU_FCODE.
CALL FUNCTION 'BUS_LOCATOR_OKCODE'
IMPORTING
EV_OK_CODE = ZBP_UCOMM.
3.清空OKCODE.
CALL FUNCTION 'BUS_LOCATOR_CLEAR_OKCODE'.