短缺未限制使用的SL  一般是 BAPI_GOODSMVT_CREATE的参数

GOODSMVT_ITEM 里面含有待移动数量为0的行项目

但是此次比较特殊

跟了很久 都是这样的问题,

解决方案:BAPI BAPI_GOODSMVT_CREATE的 GOODSMVT_ITEM的RES_TYPE 记录类型赋值

FUNCTION ZBOM_MM_CJLL.
*"----------------------------------------------------------------------
*"*"局部接口:
*"  IMPORTING
*"     VALUE(VBELN) TYPE  AUFNR
*"     VALUE(LGORT) TYPE  LGORT_D
*"     VALUE(WERKS) TYPE  DWERK
*"  EXPORTING
*"     VALUE(MATERIALDOCUMENT) TYPE  BAPI2017_GM_HEAD_RET-MAT_DOC
*"     VALUE(STATUS) TYPE  BAPI_MTYPE
*"     VALUE(MESSAGE) TYPE  BAPI_MSG
*"     VALUE(MARK) TYPE  BAPI_MTYPE
*"  TABLES
*"      G_ZTVRESB STRUCTURE  ZTVRESB OPTIONAL
*"      L_ZSCJKRETURN STRUCTURE  ZSCJKRETURN OPTIONAL
*"      ITAB STRUCTURE  BAPI2017_GM_ITEM_CREATE OPTIONAL
*"----------------------------------------------------------------------DATA:gmhead LIKE TABLE OF bapi2017_gm_head_01 WITH HEADER LINE,gmcode LIKE TABLE OF bapi2017_gm_code WITH HEADER LINE,lcnt TYPE i,lGOODSMVT_SERV_PART_DATA LIKE TABLE OF /SPE/BAPI2017_SERVICEPART_DATA WITH HEADER LINE,mthead LIKE BAPI2017_GM_HEAD_RET,t_num TYPE C LENGTH 4,mat_doc LIKE bapi2017_gm_head_ret-mat_doc,gmatke LIKE TABLE OF ZTVRESB WITH HEADER LINE,GLABST LIKE TABLE OF ZTVRESB WITH HEADER LINE,L_ZTVRESB LIKE TABLE OF ZTVRESB WITH HEADER LINE,L_MATNR TYPE MATNR,L_LGORT TYPE LGORT_D,matnr1 TYPE matnr,L_ENMNG TYPE ENMNG,L_BDMNG TYPE BDMNG,time TYPE CO_GLTRP,L_GSTRP TYPE PM_ORDGSTRP,temp1 TYPE C LENGTH 1,temp2 TYPE C LENGTH 5,NUM TYPE N LENGTH 2,timetemp TYPE C LENGTH 18,L_MBLNR TYPE MBLNR,temp TYPE TABLE OF ZTVCJLLMESSAGE WITH HEADER LINE,errmsg LIKE TABLE OF BAPIRET2 WITH HEADER LINE."查询订单开始日期SELECT GSTRP INTO L_GSTRP FROM AFKO WHERE AUFNR = vbeln.ENDSELECT.*----------移动代码赋值----------*gmcode-gm_code = '03'."事件APPEND gmcode.
*----------抬头数据赋值----------*gmhead-pstng_date = sy-datum."凭证中的过账日期gmhead-doc_date = sy-datum."凭证中的凭证日期gmhead-HEADER_TXT = L_GSTRP."凭证抬头文本APPEND gmhead.*----------创建物料凭证项目----------*CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'EXPORTINGinput  = VBELNIMPORTINGoutput = VBELN."查询预留号SELECT RSNUM FROM RKPF INTO CORRESPONDING FIELDS OF gmatke WHERE AUFNR = vbeln.APPEND gmatke.ENDSELECT."查询库存数量等信息select RESB~MATNR RESB~BDMNG RESB~ENMNG RESB~RSPOS RESB~RSNUM MARD~LABST RESB~KZEAR resb~werks RESB~LGORT RESB~KZAUS resb~RSART
INTO (G_ZTVRESB-matnr,G_ZTVRESB-bdmng,G_ZTVRESB-enmng,G_ZTVRESB-rspos,G_ZTVRESB-rsnum,G_ZTVRESB-labst,G_ZTVRESB-kzear,G_ZTVRESB-werks,G_ZTVRESB-lgort,G_ZTVRESB-kzaus,G_ZTVRESB-RSART)FROM RESB JOIN MARD ON RESB~MATNR = MARD~MATNR and RESB~LGORT = MARD~LGORT and resb~werks = mard~werksWHERE RSNUM = gmatke-rsnum andXWAOK = 'X' and DUMPS <> 'X' and BDMNG > '0.000' and  " dumps虚件不领料 终止的不要KZEAR <> 'X' AND XLOEK <> 'X'.APPEND G_ZTVRESB.ENDSELECT."查询订单的所有要领料的物料号select MATNR lgort INTO CORRESPONDING FIELDS OF L_ZTVRESB FROM RESBWHERE RSNUM = gmatke-rsnum and XWAOK = 'X' and DUMPS <> 'X' and BDMNG > '0.000' and  " dumps虚件不领料 终止的不要KZEAR <> 'X' AND XLOEK <> 'X'.APPEND L_ZTVRESB.ENDSELECT."判断物料是否在指定库位LOOP AT L_ZTVRESB.SELECT MATNR LGORT INTO (L_MATNR,L_LGORT) FROM MARD WHERE MARD~MATNR = L_ZTVRESB-MATNR AND LGORT = L_ZTVRESB-LGORT.ENDSELECT.IF L_MATNR IS INITIAL.CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'EXPORTINGinput  = VBELNIMPORTINGoutput = VBELN.CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'EXPORTINGinput  = L_ZTVRESB-MATNRIMPORTINGoutput = L_ZTVRESB-MATNR.L_ZSCJKRETURN-AUFNR = VBELN.L_ZSCJKRETURN-MATNR = L_ZTVRESB-MATNR.L_ZSCJKRETURN-STATUS = 'E'.L_ZSCJKRETURN-MESSAGE = '物料不在库位' && L_ZTVRESB-LGORT && ' 中'.APPEND L_ZSCJKRETURN.CLEAR L_ZSCJKRETURN.ENDIF.ENDLOOP.*-------------执行程序-------------*LOOP AT G_ZTVRESB.LOOP AT itab.IF itab-material = G_ZTVRESB-MATNR.IF temp2 IS INITIAL.temp2 = temp2 + itab-entry_qnt + G_ZTVRESB-BDMNG.ELSE.temp2 = temp2 + itab-entry_qnt.ENDIF.ENDIF.ENDLOOP.IF G_ZTVRESB-LABST >= G_ZTVRESB-BDMNG AND G_ZTVRESB-ENMNG <= G_ZTVRESB-BDMNG AND G_ZTVRESB-LABST >= temp2 and G_ZTVRESB-BDMNG > 0.CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'EXPORTINGinput  = VBELNIMPORTINGoutput = VBELN.DESCRIBE TABLE itab LINES lcnt.lcnt = lcnt + 1.itab-LINE_ID = lcnt.itab-material = G_ZTVRESB-MATNR."物料编号itab-plant = WERKS."工厂itab-stge_loc = G_ZTVRESB-LGORT."库存地点itab-move_type = '261'."MOVE_TYPE'."移动类型(库存管理)itab-entry_qnt = G_ZTVRESB-BDMNG."以输入单位计的数量itab-ORDERID = VBELN.itab-RES_TYPE = G_ZTVRESB-RSART. =====================一定要加上  itab-RESERV_NO = G_ZTVRESB-rsnum."预留编号itab-RES_ITEM = G_ZTVRESB-rspos."预留项目编号append itab.CLEAR itab.CLEAR temp2.ELSEIF G_ZTVRESB-LABST < G_ZTVRESB-BDMNG.CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'EXPORTINGinput  = VBELNIMPORTINGoutput = VBELN.CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'EXPORTINGinput  = G_ZTVRESB-MATNRIMPORTINGoutput = G_ZTVRESB-MATNR.L_ZSCJKRETURN-AUFNR = VBELN.L_ZSCJKRETURN-MATNR = G_ZTVRESB-MATNR.L_ZSCJKRETURN-STATUS = 'E'.L_ZSCJKRETURN-MESSAGE = '库存' && L_ZTVRESB-LGORT &&'数量' && G_ZTVRESB-LABST && '小于需求量' && G_ZTVRESB-BDMNG .APPEND L_ZSCJKRETURN.CLEAR L_ZSCJKRETURN.ENDIF.ENDLOOP.IF NOT itab[] IS INITIAL.CALL FUNCTION 'BAPI_GOODSMVT_CREATE'EXPORTINGGOODSMVT_HEADER  = gmheadGOODSMVT_CODE    = gmcodeIMPORTINGMATERIALDOCUMENT = MATERIALDOCUMENTTABLESGOODSMVT_SERV_PART_DATA = LGOODSMVT_SERV_PART_DATA[]GOODSMVT_ITEM    = itab[]RETURN           = errmsg.IF NOT MATERIALDOCUMENT IS INITIAL.CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'EXPORTINGWAIT = 'X'.commit WORK AND WAIT .ELSE.CALL FUNCTION 'BAPI_TRANSACTION_ROLLBACK'.ENDIF.ENDIF.SELECT PLNBEZ INTO matnr1 FROM AFKO WHERE AUFNR = vbeln.ENDSELECT.CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'EXPORTINGinput  = matnr1IMPORTINGoutput = matnr1.LOOP AT errmsg.L_ZSCJKRETURN-AUFNR = VBELN.L_ZSCJKRETURN-MATNR = matnr1.L_ZSCJKRETURN-STATUS = errmsg-type.L_ZSCJKRETURN-MESSAGE = 'OSSNO.' && errmsg-ID && errmsg-NUMBER && ',MSG:' && errmsg-MESSAGE.APPEND L_ZSCJKRETURN.CLEAR L_ZSCJKRETURN.ENDLOOP.*  -----返回信息存入表中LOOP AT L_ZSCJKRETURN.GET TIME.t_num = t_num + 1.CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'EXPORTINGinput  = t_numIMPORTINGoutput = t_num.CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'EXPORTINGinput  = L_ZSCJKRETURN-AUFNRIMPORTINGoutput = L_ZSCJKRETURN-AUFNR.CONCATENATE sy-UZEIT L_ZSCJKRETURN-AUFNR t_num  INTO temp-CREATETIME.temp-AUFNR = L_ZSCJKRETURN-AUFNR.temp-MATNR = L_ZSCJKRETURN-MATNR.temp-MESSAGE = L_ZSCJKRETURN-MESSAGE.temp-time = sy-DATUM.APPEND temp.NUM = STRLEN( L_ZSCJKRETURN-MESSAGE ) - 2."字符长度
*    CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
*      EXPORTING
*        input = NUM
*      IMPORTING
*        output = NUM.L_ZSCJKRETURN-MESSAGE = L_ZSCJKRETURN-MESSAGE+NUM(2).IF L_ZSCJKRETURN-MESSAGE = '锁定'.MARK = 1.ENDIF.time = sy-DATUM - 5.delete FROM ZTVCJLLMESSAGE WHERE ZTVCJLLMESSAGE~time = time.COMMIT WORK.ENDLOOP.INSERT ZTVCJLLMESSAGE from table temp."暂时不用日志COMMIT WORK.ENDFUNCTION.

SAP 领料BAPI BAPI_GOODSMVT_CREATE 提示 短缺未限制使用的SL相关推荐

  1. SAP货物移动BAPI BAPI_GOODSMVT_CREATE(WMS TO SAP)

    移动代码 01 -- MB01 02 -- MB31 03 -- MB1A 04 -- MB1B 05 -- MB1C 06 -- MB11 07 -- MB04 一.收货(101) 说明:采购订单. ...

  2. U8 领料申请单提交提示未能加载文件或程序集“UFIDA.U8.HB.WorkFlow.PlugIns”......

    原因:安装U8时有些dll文件没有安上. 解决办法:在U8安装根目录 . C:\U8SOFT\Workflow\PlugIn .C:\Windows\System32 .C:\Windows\SysW ...

  3. SAP BAPI BAPI_GOODSMVT_CREATE Goods movement

    这个BAPI一直还活着,不知道为什么,可能SAP没工夫升级吧... 今天主要是GM_CODE的问题,对应如下,同时下面转一个同学的文章... GM_CODE Tcode 描述 MovementType ...

  4. 利用BAPI(BAPI_GOODSMVT_CREATE)投料消耗(261)销售订单E库存

    BAPI_GOODSMVT_CREATE进行261投料的时候需注意的事项: 1.在项目中,利用BAPI(BAPI_GOODSMVT_CREATE)投料消耗(261)销售订单E库存,ITEM表中的销售订 ...

  5. SAP 411移库demo BAPI BAPI_GOODSMVT_CREATE

    SAP 411移库demo BAPI BAPI_GOODSMVT_CREATE REPORT zmm026. TABLES:mska. **全局定义 TYPES:BEGIN OF tp_alv, ma ...

  6. 未上线PP模块的生产领料处理

    **业务场景:**有时候会遇到公司产品主要是委外加工为主,但是有1至2道工序可能是由公司内部自行生产,比如简单的组装或包装等,因为基本不涉及到生产,所以一般都不会上PP模块,但是厂内的那道工序还是需要 ...

  7. PP 关于工单领料的总结

    SAP  PP生产计划模块是一个集成模块,而SAP PP中关于工单领料以下是具体的总结: 工单入库Tcode:MIGO,在入库前应检查工单领料是否已完成: 1.查看领料情况:Tcode: CO03,元 ...

  8. u8文件服务器错误,u8提示文件服务器未配置

    u8提示文件服务器未配置 内容精选 换一换 云堡垒机配置了FTP/SFTP远程备份,报请检查服务器密码或网络连接情况错误,不能启动远程备份.选择备份具体某一天日志,提示备份正在执行,但远程服务器未接收 ...

  9. MIGO BAPI BAPI_GOODSMVT_CREATE 使用汇总

    GOODSMVT_CODE取值含义 01 MB01 02 MB31 03 MB1A "发 04 MB1B "转储 05 MB1C "其它收货 06 MB1107 MB04 ...

最新文章

  1. 学python买什么书好-python官方推荐30本面向初学者的书籍!你看过几本?
  2. C语言标识符的链接属性
  3. centos 6.3 x86_64安装32位JDK的问题
  4. python 注释一段话_干货!Python入门基础知识点总结
  5. mysql6.10,MySQL经典50题-第6-10题
  6. IDEA 配置weblogic home时,weblogic version无法选择
  7. Log4j2使用总结
  8. pytorch学习笔记(3):常用网络层介绍
  9. java二分查找算法字符串数组_Java 算法——二分查找数组集合关键元素
  10. python3.6.5安装步骤-Centos7 安装Python3.6.5
  11. 模因(meme)收集
  12. 如何批量删除Excel工作簿中vba代码
  13. 鸿蒙不支持PDF,华为鸿蒙 HarmonyOS IoT 应用设计文档(1).pdf
  14. 不用 VIP 也能高速下载!迅雷 11 新版抢先体验 2T迅雷离线云盘
  15. 白话Elasticsearch59-数据建模实战_ Nested Aggregation/ Reverse nested Aggregation对嵌套的博客评论数据进行聚合分析
  16. 计算机无法检测更新失败怎么办,Windows更新错误解决方案
  17. 免费合并多个PDF文件
  18. BINKS 502375润滑脂
  19. 如何抛弃鼠标全键盘操作xcode
  20. Megacli常用命令汇总

热门文章

  1. 购买的随身WiFi扣卡日记-拆掉内置的esim流量卡
  2. 【UE·蓝图底层篇】一文搞懂NativeClass、GeneratedClass、BlueprintClass、ParentClass
  3. 美团外卖红包个人CPS H5推广链接和小程序码,小程序跳转路径的获取方法
  4. 计算机开不了机反复重启,电脑一直重启就是开不了机怎么样解决
  5. Sql语句为什么大写
  6. 股票python量化交易002-常见量化指标(基本面)
  7. android 怎么看架构,怎么查看手机设备架构
  8. hxxp://www.hao923.com.cn/劫持浏览器
  9. Unreal4 使用spline , splinemesh组件构建赛道小例子
  10. SX1278 FSK 调试记录