zoukankan      html  css  js  c++  java
  • 表likp新增第一次过账输入日期字段,vl02n/vl01n/vl03n/vl06o的增强

    在程序:MV50AFZ1的

    FORM USEREXIT_SAVE_DOCUMENT_PREPARE.

    *begin of ADD CRQ000000012135  CAIZJIAN 2014/3/25(更新第一次交货日期likp-zzsysdat)*
      IF SY-TCODE = 'VL02N' OR SY-TCODE = 'VL03N' OR SY-TCODE = 'VL01N'.   "ADD 'VL03N ' CRQ000000012135 caizjian 2014/5/8  add  CRQ000000022053 vl01n caizjian 2015/3/19
        MOVE SY-UCOMM TO OKCODE.
        IF OKCODE = 'WABU_T'.
          LOOP AT XLIKP.
            IF XLIKP-ZZSYSDAT = '00000000'.
              XLIKP-ZZSYSDAT =  SY-DATUM.
              MODIFY XLIKP TRANSPORTING ZZSYSDAT .
            ENDIF.
          ENDLOOP.
        ENDIF.
        CLEAR OKCODE.
        INCLUDE Z_CHECK_MFRGR.                     " ADD 检查 物料运输组/生产日期的修改  CRQ000000018704/CRQ000000018226   caizjian 20141202
      ENDIF.
    *endof ADD CRQ000000012135  CAIZJIAN 2014/3/25(更新第一次交货日期likp-zzsysdat)---*

     

    ENDFORM

  • 相关阅读:
    pikachu靶场-File Inclusion(文件包含漏洞)
    pikachu靶场-RCE(远程代码、命令执行漏洞)
    pikachu靶场-Sql Inject(SQL 注入)
    pikachu靶场-CSRF
    pikachu靶场-XSS
    pikachu靶场-暴力破解
    OSPF 高级配置
    OSPF 多区域配置
    动态路由 RIP
    Linux PXE + Kickstart 自动装机
  • 原文地址:https://www.cnblogs.com/caizjian/p/4350014.html
Copyright © 2011-2022 走看看