首页 > 其他分享 >ABAP:ME51N,MB52N,MB53N采购申请保存增强

ABAP:ME51N,MB52N,MB53N采购申请保存增强

时间:2023-06-15 13:33:36浏览次数:33  
标签:INITIAL banfn ABAP ME51N ls zexit eban 采购 MB53N

SE18-BADI名称:ME_REQ_POSTED

 

  METHOD if_ex_me_req_posted~posted.


    "检查采购申请增强开关
    DATA ls_zexit TYPE zexit.

    "20221210  排除ITPORT的用户
*    IF sy-uname <> 'ITPORT'.
      .
      SELECT SINGLE * INTO CORRESPONDING FIELDS OF ls_zexit FROM zexit WHERE znum = '004'.
      IF ls_zexit-zflag = 'X'.
        "检查是否SAP事务创建
*      IF sy-tcode IS NOT INITIAL.”2022年10月25日10:56:12 ldh
        DATA ls_eban TYPE ueban.
        LOOP AT im_eban INTO ls_eban.
          "当有多行采购申请的时候,只传输一次
          AT NEW banfn.
            "判断是否需要审批
*        IF ils_eban-frggr IS INITIAL OR ( ls_eban-frggr IS NOT INITIAL AND ls_eban-frgrl IS INITIAL ).
            "SRMV8 PO同步增强
            CALL FUNCTION 'ZSRM_ISCM7S_EXIT'
              EXPORTING
                iv_banfn = ls_eban-banfn.
          ENDAT.
        ENDLOOP.



*      ENDIF.
    ENDIF.

  ENDMETHOD.

标签:INITIAL,banfn,ABAP,ME51N,ls,zexit,eban,采购,MB53N
From: https://www.cnblogs.com/ap-ad-java-abap/p/17482608.html

相关文章

  • ABAP 调用HTTP上传附件(二)之中文乱码
    1、这篇文章的由来之前已经发表了《ABAP调用HTTP上传附件》的文章,详细介绍了如何通过HTTP请求传输附件,可点击链接参考原有文档因为之前对传输文件的中文文件名处理上解释不够详细,也因为不够重视,导致又一次在相关问题上踩坑。而浪费一天时间的问题,最终原因竟然就是个这?哭笑不得!目瞪......
  • ABAP分批取数
    1.通过分包取数SELECT*FROMTABPACKAGESIZE1000“循环的操作放在中间ENDSELECT.2.用过游标取数DATA:LV_CURTYPECURSOR.OPENCURSOR:LV_CURFORSELECT*FROMTABFETCHNEXTCURSORLV_CURINTOTABLEGT_UPDATECLOSECURSORLV_CUR. ......
  • 每日一个 ChatGPT 使用小技巧系列之2 - 用 ChatGPT 研读 SAP ABAP BAPI 的实现源代码
    本系列之前的文章:与其整天担心AI会取代程序员,不如先让AI帮助自己变得更强大每日一个ChatGPT使用小技巧系列之1-给出提纲或者素材,让ChatGPT帮你写作正好昨天有朋友向我发起知乎咨询,询问关于SAPABAPBAPIbapi_vendor_create的使用问题,本文就来说一说:bapi_v......
  • ABAP——多表头ALV(单元格合并)
    参考:https://tricktresor.de/blog/zellen-verbinden效果:按照参考链接建立类ZCL_GUI_ALV_GRID:类方法ZCL_GUI_ALV_GRID~Z_SET_MERGE_HORIZMETHODZ_SET_MERGE_HORIZ.*ROW-ZeilederenSpaltenzusammengef�hrtwerdensollen*tab_col_merge-Spalten,diezusammen......
  • ABAP-ALV1111
    *&---------------------------------------------------------------------**&ReportZALV1*&*&---------------------------------------------------------------------**&*&*&-----------------------------------------------------......
  • 【ABAP】opensql 语法错误
    在使用case对金额字段进行操作时报错ThemaximumpossiblenumberofplacesintheexpressionstartingwithDMBTRis34placeswith2decimalplaces.Therecanbe,however,nomorethan31placesand14decimalplaces.selectCASEbsad~shkzgWHEN'H'THENbsad~......
  • 利用APIFOX对ABAP函数进行调用
    1.安装APIFOX,当然也可以使用在线版,无需下载官网地址:https://apifox.com/ 2.新建项目 3.为项目起一个名称,为相关开发测试人员授权 4.在根目录新增子目录 5.编辑开发/测试/生产环境的地址信息以及默认全局变量 6.将SAP提供的ABAPAPI地址配置进APIFOX,有关ABAP提......
  • ABAP 多线程
    Codelistingfor:ZTEST9010Description:12345*&---------------------------------------------------------------------**&ReportZTEST_ASYNC_RFC*&---------------------------------------------------------------------**&*&-----------......
  • ABAP 增强查找工具
    *&---------------------------------------------------------------------**&ReportZ_BARRY_FIND_EXIT_BADI*&---------------------------------------------------------------------**&*&---------------------------------------------------......
  • ABAP 用户批量导入
    REPORTZ_USER_IMPORT.TABLES:E070.DATA:BDCDATALIKEBDCDATAOCCURS0WITHHEADERLINE.DATA:MESSTABLIKEBDCMSGCOLLOCCURS0WITHHEADERLINE.DATA:P_SNTYPEI.****DATA:W_DOCIDTYPEDSVASDOCID,W_EXTENSIONTYPEDSVASDOCID,W......