ABAP-BP创建供应商增强 需求:供应商和客户加"名称+税号"强校验,防止同一客商重复录入 供应商名称重复校验:SE18->BADI->BUPA_ADDR_CHECK(地址及一般信息检查) METHODif_ex_bupa_addr_check~check.DATA:ev_ok_codeTYPEbu_fcode.CALLFUNCTION'BUS_LOCATOR_OKCODE'IMPORTINGev_ok_code=ev_ok_code.IF( ev_ok_code...
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 FUNCT...
bdc_field 'BDC_OKCODE' '=BUS_MAIN_ENTER'. bdc_field 'BDC_CURSOR' 'BUS_JOEL_MAIN-OPEN_NUMBER'. bdc_field 'BUS_JOEL_MAIN-OPEN_NUMBER' <fs_check>-lifnr. * IF lines MOD 2 NE 0. * bdc_dynpro 'SAPLBUS_LOCATOR' '3000'. * bdc_field 'BDC_OKCODE' '=SCREEN_1000_ACTIVITY'. * bdc_...