展BOM
CS_BOM_EXPL_MAT_V2
*&---------------------------------------------------------------------*
*& Form BOM_EXPLOSION
*&---------------------------------------------------------------------*
FORM bom_explosion.
DATA: g_ccxfeld TYPE ccxfeld. IF r_nobom = 'X'.
g_ccxfeld = ''.
ELSE.
g_ccxfeld = 'X'. " 展BOM
ENDIF. CALL FUNCTION 'CS_BOM_EXPL_MAT_V2'
EXPORTING
*" VALUE(FTREL) LIKE CSDATA-XFELD DEFAULT SPACE
*" VALUE(ALEKZ) LIKE CSDATA-XFELD DEFAULT SPACE
*" VALUE(ALTVO) LIKE CSDATA-XFELD DEFAULT SPACE
*" VALUE(AUFSW) LIKE CSDATA-XFELD DEFAULT SPACE
*" VALUE(AUMGB) LIKE CSDATA-XFELD DEFAULT SPACE
*" VALUE(AUMNG) LIKE STKO-BMENG DEFAULT 0
*" VALUE(AUSKZ) LIKE CSDATA-XFELD DEFAULT SPACE
*" VALUE(AMIND) LIKE CSDATA-XFELD DEFAULT SPACE
*" VALUE(BAGRP) LIKE MARA-MATNR DEFAULT SPACE
*" VALUE(BEIKZ) LIKE STPO-BEIKZ DEFAULT SPACE
*" VALUE(BESSL) LIKE CSDATA-XFELD DEFAULT SPACE
*" VALUE(BGIXO) LIKE CSDATA-XFELD DEFAULT SPACE
*" VALUE(BREMS) LIKE CSDATA-XFELD DEFAULT SPACE
capid = 'PP01'
*" VALUE(CHLST) LIKE CSDATA-XFELD DEFAULT SPACE
*" VALUE(COSPR) LIKE CSDATA-XFELD DEFAULT SPACE
*" VALUE(CUOBJ) LIKE MARC-CUOBJ DEFAULT 000000000000000
*" VALUE(CUOVS) TYPE IBVERSION DEFAULT 0
*" VALUE(CUOLS) LIKE CSDATA-XFELD DEFAULT SPACE
datuv = sy-datum
*" VALUE(DELNL) LIKE CSDATA-XFELD DEFAULT SPACE
*" VALUE(DRLDT) LIKE CSDATA-XFELD DEFAULT SPACE
*" VALUE(EHNDL) LIKE CSDATA-XFELD DEFAULT SPACE
*" VALUE(EMENG) LIKE STKO-BMENG DEFAULT 0
*" VALUE(ERSKZ) LIKE STPO-ERSKZ DEFAULT SPACE
*" VALUE(ERSSL) LIKE CSDATA-XFELD DEFAULT SPACE
*" VALUE(FBSTP) LIKE CSDATA-XFELD DEFAULT SPACE
*" VALUE(KNFBA) LIKE CSDATA-XFELD DEFAULT SPACE
*" VALUE(KSBVO) LIKE CSDATA-XFELD DEFAULT SPACE
*" VALUE(MBWLS) LIKE CSDATA-XFELD DEFAULT SPACE
*" VALUE(MKTLS) LIKE CSDATA-XFELD DEFAULT 'X'
*" VALUE(MDMPS) LIKE CSDATA-XFELD DEFAULT SPACE
mehrs = g_ccxfeld " X:多階, 空白:單階
*" VALUE(MKMAT) LIKE CSDATA-XFELD DEFAULT SPACE
*" VALUE(MMAPS) LIKE CSDATA-XFELD DEFAULT SPACE
*" VALUE(SALWW) LIKE CSDATA-XFELD DEFAULT SPACE
*" VALUE(SPLWW) LIKE CSDATA-XFELD DEFAULT SPACE
*" VALUE(MMORY) LIKE CSDATA-XFELD DEFAULT SPACE
mtnrv = gt_input-matnr "gt_data-matnr
*" VALUE(NLINK) LIKE CSDATA-XFELD DEFAULT SPACE
*" VALUE(POSTP) LIKE STPO-POSTP DEFAULT SPACE
*" VALUE(RNDKZ) LIKE CSDATA-XFELD DEFAULT SPACE
*" VALUE(RVREL) LIKE STPO-RVREL DEFAULT SPACE
*" VALUE(SANFR) LIKE STPO-SANFE DEFAULT SPACE
*" VALUE(SANIN) LIKE STPO-SANIN DEFAULT SPACE
*" VALUE(SANKA) LIKE STPO-SANKA DEFAULT SPACE
*" VALUE(SANKO) LIKE STPO-SANKO DEFAULT SPACE
*" VALUE(SANVS) LIKE STPO-SANVS DEFAULT SPACE
*" VALUE(SCHGT) LIKE STPO-SCHGT DEFAULT SPACE
*" VALUE(STKKZ) LIKE STPO-STKKZ DEFAULT SPACE
*" VALUE(STLAL) LIKE STKO-STLAL DEFAULT SPACE
*" VALUE(STLAN) LIKE STZU-STLAN DEFAULT SPACE
stpst =
*" VALUE(SVWVO) LIKE CSDATA-XFELD DEFAULT 'X'
werks = gt_input-werks "'BP01'
*" VALUE(NORVL) LIKE CSDATA-XFELD DEFAULT SPACE
*" VALUE(MDNOT) LIKE CSDATA-XFELD DEFAULT SPACE
*" VALUE(PANOT) LIKE CSDATA-XFELD DEFAULT SPACE
*" VALUE(QVERW) LIKE TMQ2-USEQU DEFAULT SPACE
verid = 'X'
*" VALUE(VRSVO) LIKE CSDATA-XFELD DEFAULT 'X'
IMPORTING
topmat = topmatx
TABLES
stb = stbp
EXCEPTIONS
alt_not_found
call_invalid
material_not_found
missing_authorization
no_bom_found
no_plant_data
no_suitable_bom_found
conversion_error. IF NOT sy-subrc = .
EXIT.
ENDIF.
ENDFORM. " BOM_EXPLOSION
展BOM的更多相关文章
- ZPPR032-批量展BOM
*-----------------------------------------------------------------------REPORT zppr032 NO STANDARD P ...
- [MSSQL]最小公约数
[摘要]一个朋友在展BOM的时候有这种需求,两列字段(数值):A ,B A=用量,B=底数,组成用量=用量/底数.A/B,若能被整除,显示整除的结果,若不能整除显示分数形式A/B(分数形式要是约分 ...
- MM-委外业务
SAP MM-分包业务讲解(subcontracting)-01-主数据与采购订单的创建 SAP MM-分包业务讲解(subcontracting)-02-主数据与采购订单的创建-多BOM的业务情况分 ...
- ZPPR001-(展bom)
************************************************************************ Title : ZPPR010 ** Applicat ...
- 订单BOM、销售BOM、标准BOM
订单BOM.销售BOM.标准BOM 訂單BOM: 是實際生產時用的BOM, 在標準BOM和銷售BOM基礎上增減物料的BOM銷售BOM: 是為特定客戶設定的BOM, 在主檔數據層次上的BOM, 在生 ...
- 订单BOM与销售BOM的区别
訂單BOM: 是實際生產時用的BOM, 在標準BOM和銷售BOM基礎上增減物料的BOM 銷售BOM: 是為特定客戶設定的BOM, 在主檔數據層次上的BOM, 在生產時是帶到訂單BOM中去的. 標準BO ...
- HTML BOM Browser对象
BOM:Browser Object Model,即浏览器对象模型,提供了独立于内容的.可以与浏览器窗口进行互动的对象结构. Browser对象:指BOM提供的多个对象,包括:Window.Navig ...
- 一步步学习javascript基础篇(7):BOM和DOM
一.什么是BOM.什么是DOM BOM即浏览器对象模型,主要用了访问一些和网页无关的浏览器功能.如:window.location.navigator.screen.history等对象. DOM即文 ...
- BOM,DOM,ECMAScripts三者的关系
一:DOM 文档对象模型(DOM)是表示文档(比如HTML和XML)和访问.操作构成文档的各种元素的应用程序接口(API) DOM是HTML与JavaScript之间沟通的桥梁. DOM下,HTM ...
随机推荐
- Mybatis3.0-[tp_28-29]-映射文件-resultMap_自定义结果集映射规则_及关联环境的搭建
笔记要点出错分析与总结工程组织 1.定义接口 EmployeeMapperPlus.java package com.dao; import com.bean.*; public interface ...
- P2661 信息传递[最小环+边带权并查集]
题目来源:洛谷 题目描述 有 n 个同学(编号为 1 到 n )正在玩一个信息传递的游戏.在游戏里每人都有一个固定的信息传递对象,其中,编号为 i 的同学的信息传递对象是编号为 Ti 的同学. 游戏 ...
- Mac配置Fiddler抓包工具
前言 一直以来都是在Win环境下工作,对于抓包工具,自然当属Fiddler最最出色,不过Fiddler是在.Net runtime环境下运行的,所以想要在Mac下使用,需要配置一些依赖.在试过了Cha ...
- python pip获取所有已安装的第三包
pip freeze > requirements.txt # 生成txt 文件 pip install -r requirements.txt # 别人使用时可以直接安装所有的包 [progr ...
- 57、springmvc-整合
57.springmvc-整合 57.1 创建Spring MVC Annotation项目 <?xml version="1.0" encoding="UTF-8 ...
- 使用其他服务器引入JS文件
使用其他服务器引入JS文件,1,减轻服务器压力2,速度快3,可以缓存 cdnjs库,更新比较快https://cdnjs.com/ cdn库 引入JS文件如:jquerybootcdn : https ...
- idea2018使用整理
1.idea怎么设置选中文件时,自动在左侧弹出文件所在位置及文件?
- Greenplum 查看表的分区键与分区类型
方法一 查看表的分区键 select d.nspname||'.'||a.relname as table_name,string_agg(b.attname,',') as column_namef ...
- GreenPlum 数据库创建用户、文件空间、表空间、数据库
前几篇文章介绍了GreenPlum数据库的安装.启动.关闭.状态检查.登录等操作,数据库已经创建好了,接下来介绍如何使用数据库.按照习惯,需要先创建测试用户.表空间.数据库.先创建测试用户dbdrea ...
- AtCoder Beginner Contest 133
目录 Contest Info Solutions A. T or T B.Good Distance C. Remainder Minimization 2019 D. Rain Flows int ...