SAP BP 分类与字段是不一样的

员工客商Z004

正常客商

客商重名校验机制

复制代码
  METHOD if_ex_bupa_addr_check~check.
    DATA:
      lv_id     TYPE ztexit-id,          "增强序列号
      lv_status TYPE char1,              "增强状态
      lv_str    TYPE string,
      ls_but000 TYPE but000,
      ls_return TYPE bapiret2.

*   客商名称存在性检查
    lv_id = 'ZSD102'.
    CALL FUNCTION 'ZABAP_CHECK_EXIT'
      EXPORTING
        id       = lv_id
      IMPORTING
        e_status = lv_status.
    IF lv_status <> 'S'.
      RETURN.
    ENDIF.

    IF is_but000-bu_group = '04' OR is_but000-bu_group = 'Z005'.
      RETURN.
    ENDIF.
    IF iv_activity <> '01' AND iv_activity <> '02'.
      RETURN.
    ENDIF.

    IF is_but000-partner+0(1) <> '#'.
      lv_str = ' PARTNER <> IS_BUT000-PARTNER '.
    ENDIF.
    IF is_but000-bu_group <> 'Z004'.
      CONCATENATE lv_str  ' AND  NAME_ORG4 = IS_BUT000-NAME_ORG4 ' INTO lv_str.
      SELECT SINGLE *
        INTO ls_but000
        FROM but000
       WHERE name_org1 = is_but000-name_org1   "组织名称 1
         AND name_org2 = is_but000-name_org2   "组织名称 2
         AND name_org3 = is_but000-name_org3   "组织名称 3
         AND (lv_str).
    ELSE.
      SELECT SINGLE *
      INTO LS_BUT000
      FROM BUT000
      WHERE NAME_FIRST = IS_BUT000-NAME_FIRST   "组织名称 1
      AND NAME_LAST = IS_BUT000-NAME_LAST   "组织名称 2
      AND (LV_STR).
    ENDIF.
    IF sy-subrc = 0.
      ls_return-type = 'E'.
      ls_return-id   = '00'.
      ls_return-number = '001'.
      ls_return-message_v1 = '名字与客商'.
      ls_return-message_v2 = ls_but000-partner.
      ls_return-message_v3 = '一致'.
      APPEND ls_return TO et_return.
    ENDIF.

  ENDMETHOD.
相关推荐
TeleostNaCl2 小时前
如何安装 Google 通用的驱动以便使用 ADB 和 Fastboot 调试(Bootloader)设备
android·经验分享·adb·android studio·android-studio·android runtime
月阳羊2 小时前
【硬件-笔试面试题-69】硬件/电子工程师,笔试面试题(知识点:电机驱动电路的反馈电路)
java·经验分享·嵌入式硬件·面试
会飞的小蛮猪6 小时前
Jenkins运维之路(初识流水线)
经验分享
晨非辰7 小时前
#C语言——刷题攻略:牛客编程入门训练(九):攻克 分支控制(三)、循环控制(一),轻松拿捏!
c语言·开发语言·经验分享·学习方法·visual studio
TeleostNaCl9 小时前
OpenWrt | 在 PPP 拨号模式下启用 IPv6 功能
网络·经验分享·智能路由器·ip
晓衣18 小时前
2025“獬豸杯”全国电子数据取证竞赛-k8s服务器取证wp
服务器·经验分享·程序人生·网络安全·容器·kubernetes·学习方法
老陈头聊SEO1 天前
人工智能优化SEO关键词的实战策略
其他
计算机小手1 天前
AI 驱动数据分析:开源 SQLBot 项目探索,基于大模型和 RAG 实现精准问数与图表挖掘
经验分享·docker·开源软件
echoarts1 天前
MATLAB R2025a安装配置及使用教程(超详细保姆级教程)
开发语言·其他·matlab
acc82261 天前
十四、IT 新技术
经验分享