SAP中批量维护物料价格实践
SAP 价格信息维护
Info record 的创建
（ZMMG0150）03
10、确认信息无误后，提 交批准申请，创建完成
8、选择关税 J0_ 进口件 JZ_ 国内件
9、进口件需点击条件 按钮进入补充条件维护 关税、运费所占比列， 国内件无需维护
7、输入价格差异值， 价格基准量与单价保 持一致
Info record 的审批
3、进入以下界面，可以看到该零件的价格变动记录，生效日期
2
Info record 的创建
（ZMMG0150）01
1、按左图所示路 径找到ZMMG015 0，双击进入
2、进入单价报告 预览界面，点击新 制报告
Info record 的创建
（ZMMG0150）02
1、首先在这里输入供应商代码，回车后会自动带出 供应商名成！
2、双击报告编号可以进入info record 预览画面，可以查看所 填内容，确认内容无误后返回 到这个画面，点击抬头空白选 择此行
Info record 的释放
（ZMMG0170）
路径：SAP菜单 物流 物料管理 开发程序 HSC Master Management Unit price Management ZMMG0170
3、进入源清单维护界 面，输入生效截止日期 （开始日期参考订单、 结束日期填最大值）、 供应商代码、采购组织： CN50，核对信息无误 后保存。
价格历史查询—接到新订单以后应先查询系统原有价格，确认价格变动类型
1、按左图所示路 径找到ZMMR004， 双击进入 2、输入公司代码、工厂、物料号点击运行
（ZMMG0160）
路径：SAP菜单 物流 物料管理 开发程序 HSC Master Management Unit price Approved ZMMG0160
sap流程CO-06_作业类型计划价格维护作业
作業產出價格維護作業
第一節作業說明
目的
係為產品成本各途程及相關作業之類型之固定及變動單價之設定(如:工作中心直接人工之單位成本)。
步驟
1)執行交易代碼KP26
2)選取版本
3)輸入開始期間
4)輸入截止期間
5)輸入會計年度
6)輸入成本中心
7)輸入作業類型
8)輸入作業類型價格
注意事項
1)作業類型計劃價格亦可透過計算而來，價格計算步驟：KP06→KP26→KSS4→KSPI
第二節作業流程
交易代碼與功能表
KP26會計-> 成本控制-> 成本中心會計-> 規劃-> 作業產出/價格-> 更改交易代碼畫面
此為交易代碼輸入區
資料輸入備註說明
執行畫面
欄位說明
後續作業
欄位說明
後續作業
執行後產生畫面
後續作業
儲存後產生畫面。
SAP物料价格信息维护流程
●判断依据是在SAP系统中查找是否存在该供应商的企业代码。
●遵循财务部提供的供应商分类和编码规则，达到业务和财务数据信息共享，3.物料价格信息维护流程本流程是关于采购部在SAP系统中.对某个供应商提供的物料价格信息进行维护的过程。
设计此流程的目的在于：针对一些相对同定的物料价格，南于波动较小，故可在SAP系统中针对供应商维护这些物料的单价后，可在每次创建采购订单时自动由系统带出该供应商对陔物料的价格，便于操作。
(l)流程主要控制点。
物料价格信息维护申请表南采购部经理签字确认，随后由采购部组织相关部门进行论证，公司高管确认后，由采购部专人在SAP中维护物料价格信息维护申请表，井将纸介申请表存档、(2)业务流程主要改进和变化。
●维护权限集中，保证了物料价格信息的安全性，●方便查询某个供应商提供该物料的价格，便于管理一●SAP系统按照现有价格日录格式提供奁询报表一●在制度卜保证维护单价的实时性和准确性，在下采购订单时会更方便和准确，减小人为出错的概率4物料采购流程本流程是关于采购部在SAP系统巾进行物料采购的操作流程。
销售线提起采购申请，经过审批后在SAP 系统中生成采购申清，并根据采购申请生成采购订单、(1)流程主要控制点●物料采购申请表由销售线填报，并注明物料编码，然后提交采购部审批。
●审批后的采购申请在SAP系统中进行申请信息的录入，并根据采购申请生成采购订单，在下订单之前，如果需要进行维护物料主数据、供啦商主数据、物料价格信息等操作，则进入相应的流程，再则无法在SAP系统中下订单，从而保证了流程和操作的完整性.●采购订单打印m来，须传真给供应商，并将采购订单号通知销售线，以便供应商/销售线按订单送/l盘货。
(2)业务流程主要改进和变化●规范物料的采购申请流程，采购申请有电子存档，方便后续业务统计和审查。
●规范物料的采购流程，保证了物料编码、物料价格信息、供应商主数据的完整性，方便后续业务操作和统计●提供汇总采购申请表的报表，可支持对采购预算、采购计划完成情况的统计及分析。
sap物料管理
SAP物料管理1. 介绍SAP物料管理是SAP ERP系统中的一个重要模块，主要用于组织和管理企业的物料信息、库存和采购流程。
通过SAP物料管理模块，企业可以有效地控制物料流通，优化库存管理，提高采购效率。
在SAP物料管理模块中，主要包括物料主数据管理、库存管理和采购管理三个主要子模块。
2. 物料主数据管理物料主数据是SAP物料管理的核心内容，它包括了所有与物料相关的信息和属性。
在SAP物料管理模块中，用户可以创立、维护和管理物料主数据，以满足企业对物料信息的需求。
物料主数据的属性包括物料编码、物料描述、物料类型、根本计量单位、物料组等。
用户可以根据企业的实际需求，灵巧地定义物料主数据的属性。
同时，用户还可以通过物料主数据管理功能进行物料主数据的导入、导出和批量维护。
3. 库存管理库存管理是SAP物料管理模块的另一个重要功能。
它主要用于对企业物料库存的管理和控制，确保物料库存的准确性和及时性。
通过SAP物料管理模块的库存管理功能，用户可以进行物料库存的初始化、盘点和调整。
此外，还可以进行库存预警和库存报表的生成。
通过这些功能，用户可以通过实时的库存信息对物料的需求进行合理安排，防止库存过多或过少的情况发生。
4. 采购管理采购管理是SAP物料管理模块的另一个关键功能，它主要用于管理企业的采购流程。
通过SAP物料管理模块的采购管理功能，用户可以创立采购订单、执行采购需求方案、进行供给商选择和评估等操作。
此外，还可以通过采购管理功能进行采购合同的管理和控制。
采购管理功能可以帮助企业优化采购流程，提高采购效率。
通过与其他模块的集成，可以实现采购需求的自动触发和采购订单的自动生成，减少了人工操作和错误的可能性。
5. SAP物料管理的优势SAP物料管理模块具有以下优势：•统一管理物料信息，防止了重复输入和数据不一致的问题。
•实时监控库存情况，及时预警和调整库存，降低库存风险。
•优化采购流程，提高采购效率和准确性。
SAP物料市场价格维护
物料市场价格维护目录1文档概述 (3)1.1文档目的 (3)1.2文档主要内容 (3)1.3文档的保存 (3)2操作内容 (4)2.1市场价格维护（MEK1） (4)2.2市场价格更改（MEK2） (7)2.3市场价格显示（MEK3） (10)1 文档概述1.1 文档目的本文是做为最终用户的操作手册，指导最终用户在进行物料市场价格维护时的相关操作步骤。
1.2 文档主要内容本文的主要内容包含SAP系统中所对应的物料市场价格维护内容，主要有：➢物料市场价格创建(MEK1)➢物料市场价格修改(MEK2)➢物料市场价格显示(MEK3)1.3 文档的保存确保此文档为最新版，由于主文档的更改，已打印出的文档及以前复制的版本将不再生效。
此文档将存放于文档服务器上.2005/9/2026/06/2023 2 操作内容2.1 市场价格维护（MEK1）路径：后勤 -> 物料管理 ->采购 -> 主数据-> 条件->其它->MEK1-创建步骤1-选择物料市场价格维护事务代码用鼠标选中目录中MEK1-创建，双击鼠标左键可进入物料市场价格维护：初始屏幕2005/9/2026/06/2023 步骤2-输入创建条件记录代码字段名说明字段属性用户可输入值备注条件类型输入创建市场价格类型代码必输输入创建市场价格类型代码点击，进入步骤3-市场价格视图维护字段名说明字段属性用户可输入值备注2005/9/2026/06/2023字段名说明字段属性用户可输入值备注信息记录类别选择输入采购信息记录类别必输物料输入需维护市场价格的物料编码必输输入需维护市场价格的物料编码金额输入物料市场价格必输输入物料市场价格单位输入价格币种必输输入价格币种点击,市场价格保存2005/9/2026/06/20232.2 市场价格更改（MEK2）路径：后勤 -> 物料管理 ->采购 -> 主数据-> 条件->其它->MEK2-更改用鼠标选中目录中MEK2-更改，双击鼠标左键可进入物料市场价格更改维护：初始屏幕2005/9/2026/06/2023 步骤1-输入更改创建条件记录代码点击,进入步骤2-更改市场价格选项维护字段名说明字段属性用户可输入值备注2005/9/2026/06/2023字段名说明字段属性用户可输入值备注信息记录类别选择输入采购信息记录类别必输物料输入需更改市场价格的物料编码必输输入需更改市场价格的物料编码点击,进入步骤3-更改市场价格字段名说明字段属性用户可输入值备注金额输入更改的市场价格必输输入更改的市场价格2005/9/2026/06/2023 点击,市场价格更改保存2.3 市场价格显示（MEK3）路径：后勤 -> 物料管理 ->采购 -> 主数据-> 条件->其它->MEK3-显示步骤1-选取择市场价格显示事务代码2005/9/2026/06/2023用鼠标选中目录中MEK3-显示，双击鼠标左键可进入物料市场价格显示维护：初始屏幕步骤2-输入市场价格条件记录代码字段名说明字段属性用户可输入值备注2005/9/2026/06/2023 字段名说明字段属性用户可输入值备注条件类型输入需显示市场价格类型代码必输输入需显示市场价格类型代码点击，进入点击,进入2005/9/2026/06/2023 步骤3-显示市场价格。
SAP有数量结构的物料成本核算
SAP有数量结构的物料成本核算的历史与发展
历史背景
SAP有数量结构的物料成本核算起源于德国，最初是为了满足工业制造业的成本核算需求。随着信息技术的发展， 该方法逐渐被广泛应用于全球范围内的企业。
发展趋势
随着企业对于成本控制和精细化管理的要求不断提高，SAP有数量结构的物料成本核算将继续发展并不断完善。 同时，随着云计算、大数据等技术的普及和应用，该方法将与先进技术相结合，为企业提供更加智能化、自动化 的成本核算解决方案。
统一计量单位
确保所有物料采用统一的计量单位，避免因单位不 统一导致成本核算出现误差。
优化数量结构参数
根据企业实际情况，调整数量结构的参数设 置，如批量、损耗率等，以提高成本核算的 准确性。
提高数据输入的准确性
建立数据输入规范
01
制定详细的数据输入规范，明确数据来源和录入流程，确保数
据的一致性和准确性。
案例三
总结词
作业类型合理设置、成本分摊精确、 决策支持有效
详细描述
某高科技企业通过合理设置SAP作业 类型和精确的成本分摊，实现了对产 品成本的精确核算，为企业的决策提 供了有效的支持，促进了企业的可持 续发展。
THANKS FOR WATCHING
感谢您的观看
要点二
解决方案
采用分布式计算技术，将数据分散到多个服务器进行处理 ，提高系统整体性能。同时，定期对数据库进行优化和清 理，确保数据存储的合理性和高效性。
成本分摊的准确性问题
挑战描述
在有数量结构的物料成本核算中，如何准确 地将成本分摊到各个产品或物料上是一个重 要问题。
解决方案
采用基于数量的成本分摊方法，根据物料的 实际消耗数量进行成本分摊。同时，加强生 产过程中的数据采集和监控，确保数据准确
SAP S4 物料主数据批量维护
*&---------------------------------------------------------------------* *& Report ZMMB001*&---------------------------------------------------------------------* *&Description: 物料批量导入*&Data: 2017/11/8*&---------------------------------------------------------------------* REPORT zmmb001.TYPE-POOLS: slis,ustyp,icon.*excel 下载模板TYPES: BEGIN OF ty_excel,name(20) TYPE c,END OF ty_excel.*excel 上传模板TYPES: BEGIN OF ty_upload,*&---------------------------------------------------------------------* *& 基本数据1*&---------------------------------------------------------------------* *** mbrsh(1) TYPE c, "行业matnr(40) TYPE c, "SAP物料编码 Amtart(4) TYPE c, "物料类型 Bmaktx(40) TYPE c, "物料描述 Cmaktx_en(40) TYPE c, "物料描述英文 Dmatkl(9) TYPE c, "物料组 Emeins(3) TYPE c, "基本计量单位 Fbismt(18) TYPE c, "旧物料编码 Gspart(2) TYPE c, "产品组 Hgroes(32) TYPE c, "大小/量纲 Ibrgew(17) TYPE c, "毛重 Jgewei(3) TYPE c, "重量单位 K*** werks(4) TYPE c, "工厂*** volum(17) TYPE c, "业务量*** voleh(3) TYPE c, "体积单位*&---------------------------------------------------------------------**& 基本数据2*&---------------------------------------------------------------------*zeinr(22) TYPE c, "凭证（设计图号） Lkzkfg(1) TYPE c, "物料可配置 M*** normt(18) TYPE c, "行业标准描述（例如 ANSI 或 ISO）*&---------------------------------------------------------------------**& 工厂数据/存储1*&---------------------------------------------------------------------*werks(4) TYPE c, "工厂 Nlgort(10) TYPE c, "库存地点 O*&---------------------------------------------------------------------**& 工厂数据/存储2*&---------------------------------------------------------------------*sernp(4) TYPE c, "序列号参数文件 P*&---------------------------------------------------------------------**& 销售：销售组织数据1*&---------------------------------------------------------------------*vkorg(4) TYPE c, "销售组织 Qvtweg(2) TYPE c, "分销渠道 R*&---------------------------------------------------------------------**& 销售：销售组织数据2*&---------------------------------------------------------------------*dwerk(4) TYPE c, "交货工厂 Staxm1(1) TYPE c, "税分类1 Tkondm(2) TYPE c, "物料定价组 Uversg(1) TYPE c, "物料统计组（默认1 按物料） Vktgrm(2) TYPE c, "科目设置组 Wmtpos(4) TYPE c, "项目类别 Xprodh(18) TYPE c, "产品层次 Ymtpos_mara(4) TYPE c, "普通项目类别组 Z*&---------------------------------------------------------------------**& 销售：一般/工厂*&---------------------------------------------------------------------*ladgr(4) TYPE c, "装载组 ABmtvfp(2) TYPE c, "可用性检查 AC*&---------------------------------------------------------------------* *& 采购*&---------------------------------------------------------------------* ekgrp(3) TYPE c, "采购组 ADbstme(3) TYPE c, "订单单位'AE* vabme(1) TYPE c, "可变单位umrez(5) TYPE c, "换算关系基本单位 AFumren(5) TYPE c, "换算关系订单单位 AGxchpf(1) TYPE c, "批次管理 AH* kautb(1) TYPE c, "自动采购订单* mmsta(2) TYPE c, "工厂特定的物料状态*&---------------------------------------------------------------------* *& MRP视图1*&---------------------------------------------------------------------* dismm(2) TYPE c, "mrp类型 AIdisgr(4) TYPE c, "mrp组dispo(3) TYPE c, "mrp控制者 AJdisls(2) TYPE c, "批量大小 AKbstmi(4) TYPE c, "最小批量大小 ALbstrf(17) TYPE c, "舍入值 AMberid(10) TYPE c, "MRP范围 AN*** dismmb(2) TYPE c, "mrp类型*&---------------------------------------------------------------------* *& MRP视图2*&---------------------------------------------------------------------* beskz(1) TYPE c, "采购类型 AOsobsl(2) TYPE c, "特殊采购类 APrgekz(1) TYPE c, "反冲 AQeisbe(17) TYPE c, "安全库存 ARlgfsb(4) TYPE c, "外部采购仓储地点 ATlgpro(4) TYPE c, "生产仓储地点 ASdzeit(3) TYPE c, "自制时间 AUplifz(3) TYPE c, "计划交货时间 AVwebaz(3) TYPE c, "收货处理时间 AWfhori(3) TYPE c, "计划边际码 AX*&---------------------------------------------------------------------* *& MRP视图3*&---------------------------------------------------------------------* mtvfp_mrp(2) TYPE c, "可用性检查组 AYstrgr(2) TYPE c, "策略组 AZ*&---------------------------------------------------------------------* *& MRP视图4*&---------------------------------------------------------------------* sbdkz(1) TYPE c, "独立/集中 BAkausf(7) TYPE c, "组件报废% BB*** sauft(1) TYPE c, "重复制造*** sfepr(4) TYPE c, "重复生产参数文件*&---------------------------------------------------------------------* *& 工作计划*&---------------------------------------------------------------------* fevor(3) TYPE c, "生产管理员 BCsfcpf(6) TYPE c, "生产计划参数文件 BD*** ueeto(5) TYPE c, "过度交货允差*&---------------------------------------------------------------------* *& 会计1*&---------------------------------------------------------------------* bklas(4) TYPE c, "评估类： BEvprsv(1) TYPE c, "价格控制 BFpeinh(5) TYPE c, "价格单位 BGpvprs(11) TYPE c, "移动平均价 BHstprs(11) TYPE c, "标准成本价 BI*** mlast(1) TYPE c, "价格确定*** mlmaa(1) TYPE c, "ml作业*&---------------------------------------------------------------------* *& 成本1*&---------------------------------------------------------------------* ekalr(1) TYPE c, "用qs的成本估算 BJhkmat(1) TYPE c, "物料来源 BKawsls(6) TYPE c, "差异码 BLlosgr(13) TYPE c, "成本核算批量 BMprctr(10) TYPE c, "利润中心 BN*** ncost(1) TYPE c, "不用计算成本:NO_COSTING *&---------------------------------------------------------------------* *& 质量视图*&---------------------------------------------------------------------* *** qmpur(1) TYPE c, "QM采购激活*** ssqss(8) TYPE c, "QM控制码:CTRL_KEY*** art(8) TYPE c, "检验类型*** aktiv(1) TYPE c, "检验类型-物料*&---------------------------------------------------------------------* *& 附加数据*&---------------------------------------------------------------------* *** laeng(17) TYPE c, "长度*** breit(17) TYPE c, "宽度*** hoehe(17) TYPE c, "高度*** meabm(3) TYPE c, "尺寸单位*** eumren(5) TYPE c, "分母*** meinh(3) TYPE c, "账面库存可选单位*** eumrez(5) TYPE c, "分子*** ebrgew(17) TYPE c, "毛重*** egewei(3) TYPE c, "重量单位*** evolum(17) TYPE c, "业务量*** evoleh(3) TYPE c, "体积单位long_text(100) TYPE c, "长文本* langu(2) TYPE c, "外文语言* l_maktx(40) TYPE c, "外文描述*&---------------------------------------------------------------------* *& 分类*&---------------------------------------------------------------------* *** classtype(3) TYPE c, "类别种类*** classnum(18) TYPE c, "类别*&---------------------------------------------------------------------* *& 返回状态*&---------------------------------------------------------------------* icon(40) TYPE c,memo(255) TYPE c,END OF ty_upload.TYPES: BEGIN OF ty_lgort,werks TYPE t001l-werks,lgort TYPE t001l-lgort,END OF ty_lgort.*&---------------------------------------------------------------------- **内表、工作区、变量、常量、指针定义**&---------------------------------------------------------------------- DATA: gt_excel TYPE STANDARD TABLE OF ty_excel, gs_excel LIKE LINE OF gt_excel.DATA: gt_upload TYPE STANDARD TABLE OF ty_upload,gs_upload LIKE LINE OF gt_upload.DATA: gt_lgort TYPE STANDARD TABLE OF ty_lgort,gs_lgort LIKE LINE OF gt_lgort.DATA: gt_mdma1 TYPE TABLE OF mdma,gs_mdma1 LIKE LINE OF gt_mdma1.DATA: gt_inob TYPE TABLE OF inob,gs_inob LIKE LINE OF gt_inob.DATA: gt_art TYPE STANDARD TABLE OF tq34,gs_art LIKE LINE OF gt_art.DATA: gt_indata TYPE alsmex_tabline OCCURS 0 WITH HEADER LINE, gs_indata TYPE alsmex_tabline.DATA:BEGIN OF gt_mara1 OCCURS 0,matnr TYPE mara-matnr,END OF gt_mara1.DATA: gv_fullpath TYPE string,gv_path TYPE string,gv_name TYPE string.DATA: gt_fieldcat TYPE lvc_t_fcat,gs_fieldcat LIKE LINE OF gt_fieldcat,gs_layout TYPE lvc_s_layo.FIELD-SYMBOLS: <fs_gw> TYPE any,<fs_wa> TYPE ty_upload.DEFINE init_fieldcat.CLEAR gs_fieldcat.gs_fieldcat-fieldname = &1.gs_fieldcat-coltext = &2.gs_fieldcat-ref_table = &3.gs_fieldcat-ref_field = &4.gs_fieldcat-qfieldname = &5.gs_fieldcat-edit = &6.gs_fieldcat-icon = &7.gs_fieldcat-outputlen = &8.gs_fieldcat-checkbox = &9.APPEND gs_fieldcat TO gt_fieldcat.END-OF-DEFINITION.*&----------调用BAPI参数定义--------（S）DATA: gs_headdata TYPE bapimathead,* gt_headdata TYPE TABLE OF bapimathead,gs_headdata1 TYPE bapie1matheader,gt_headdata1 TYPE TABLE OF bapie1matheader,gs_mara TYPE bapi_mara,gt_mara TYPE TABLE OF bapi_mara,gs_marax TYPE bapi_marax,gt_marax TYPE TABLE OF bapi_marax,gs_marc TYPE bapi_marc,gt_marc TYPE TABLE OF bapi_marc,gs_marcx TYPE bapi_marcx,gt_marcx TYPE TABLE OF bapi_marcx,gs_ters TYPE bapie1mpop,gt_ters TYPE TABLE OF bapie1mpop,gs_tersx TYPE bapie1mpopx,gt_tersx TYPE TABLE OF bapie1mpopx,gs_mard TYPE bapie1mard,gt_mard TYPE TABLE OF bapie1mard,gs_mardx TYPE bapie1mardx,gt_mardx TYPE TABLE OF bapie1mardx,gs_mlgn TYPE bapi_mlgn,gt_mlgn TYPE TABLE OF bapi_mlgn,gs_mlgnx TYPE bapi_mlgnx,gt_mlgnx TYPE TABLE OF bapi_mlgnx,gs_mvke TYPE bapie1mvke,gt_mvke TYPE TABLE OF bapie1mvke,gs_mvkex TYPE bapie1mvkex,gt_mvkex TYPE TABLE OF bapie1mvkex,gs_mlgt TYPE bapi_mlgt,gt_mlgt TYPE TABLE OF bapi_mlgt,gs_mlgtx TYPE bapi_mlgtx,gt_mlgtx TYPE TABLE OF bapi_mlgtx,gs_mbew TYPE bapi_mbew,gt_mbew TYPE TABLE OF bapi_mbew,gs_mbewx TYPE bapi_mbewx,gt_mbewx TYPE TABLE OF bapi_mbewx,gt_return1 TYPE STANDARD TABLE OF bapiret2, gs_return1 LIKE LINE OF gt_return1,gt_return5 TYPE STANDARD TABLE OF bapiret2, gs_return5 LIKE LINE OF gt_return5,gs_makt TYPE bapi_makt,gt_makt TYPE TABLE OF bapi_makt,gs_mlan TYPE bapie1mlan,gt_mlan TYPE TABLE OF bapie1mlan,gs_mltx TYPE bapi_mltx,gt_mltx TYPE TABLE OF bapi_mltx,gs_marm TYPE bapi_marm,gt_marm TYPE TABLE OF bapi_marm,gs_marmx TYPE bapi_marmx,gt_marmx TYPE TABLE OF bapi_marmx,gs_mean TYPE bapi_mean,gt_mean TYPE TABLE OF bapi_mean.DATA: gs_mdma LIKE mdma,gs_dpop LIKE dpop,gs_sdibe TYPE sdibe_massfields,gs_return2 TYPE bapireturn1,gt_return2 TYPE TABLE OF bapireturn1.DATA: gv_objectkeynew TYPE bapi1003_key-object,gs_return3 TYPE bapiret2,gt_return3 TYPE TABLE OF bapiret2.DATA: gs_qmat TYPE bapi1001004_qmat,gt_qmat TYPE TABLE OF bapi1001004_qmat,gs_return4 TYPE bapiret2,gt_return4 TYPE TABLE OF bapiret2.DATA: gs_return_class TYPE bapiret2,gt_return_class TYPE TABLE OF bapiret2.*&---------------------------------------------------------------------* *& 加入OLE*&---------------------------------------------------------------------* * HANDLES FOR OLE OBJECTSDATA: gv_excel TYPE ole2_object, " EXCEL OBJECTgv_mapl TYPE ole2_object, " LIST OF WORKBOOKS gv_map TYPE ole2_object, " WORKBOOKgv_zl TYPE ole2_object, " CELLgv_f TYPE ole2_object, " FONTgv_column TYPE ole2_object.*&---------------------------------------------------------------------* *& 下载相关*&---------------------------------------------------------------------* DATA: gv_sheet TYPE ole2_object,gv_activesheet TYPE ole2_object,gv_newsheet TYPE ole2_object,gv_appl TYPE ole2_object,gv_work TYPE ole2_object,gv_cell TYPE ole2_object.SELECTION-SCREEN: BEGIN OF BLOCK blk1 WITH FRAME TITLE TEXT-004.PARAMETERS: p_path TYPE string."文件路径PARAMETERS: rb_cre RADIOBUTTON GROUP grp1 DEFAULT 'X' USER-COMMAND comm."创建PARAMETERS: rb_cha RADIOBUTTON GROUP grp1."修改PARAMETERS: rb_down RADIOBUTTON GROUP grp1."下载模板SELECTION-SCREEN: END OF BLOCK blk1.LOAD-OF-PROGRAM.*&------------------------------------------------------------------**初始化处理*&------------------------------------------------------------------INITIALIZATION.*&------------------------------------------------------------------**选择屏幕*&------------------------------------------------------------------AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_path."获取文件地址搜索帮助PERFORM frm_get_fielpath.*{ INSERT ED2K900102 1*&---------------------------------------------------------------**& 参数输入检查*&-----------------------------------------------------------------*AT SELECTION-SCREEN.*&--------------------------------------------------------------**& 选择屏幕控制*&------------------------------------------------------------*AT SELECTION-SCREEN OUTPUT .*&------------------------------------------------------------------**程序开始处理*&------------------------------------------------------------------START-OF-SELECTION."选择创建或修改物料主数据IF rb_cre = 'X' OR rb_cha = 'X'.IF p_path IS NOT INITIAL."excel上传PERFORM frm_upload_file_xls."数据处理PERFORM frm_deal_data."fieldcat显示PERFORM frm_fieldcat."alv样式PERFORM frm_layout."alv输出PERFORM frm_alv.ENDIF." 选择下载模板ELSEIF rb_down = 'X'.PERFORM frm_get_fullpath CHANGING gv_fullpath gv_path gv_name.* 路径为空则退出IF gv_fullpath IS INITIAL.MESSAGE '用户取消操作' TYPE 'S'.RETURN.ENDIF."下载模板PERFORM frm_down USING gv_fullpath.ENDIF.*&------------------------------------------------------------------**程序结束处理*&------------------------------------------------------------------END-OF-SELECTION.*&---------------------------------------------------------------------**& Form FRM_GET_FIELPATH*&---------------------------------------------------------------------** 获取上传文件路径*----------------------------------------------------------------------** --> p1 text* <-- p2 text*----------------------------------------------------------------------*FORM frm_get_fielpath .CALL FUNCTION 'TB_LIMIT_WS_FILENAME_GET' IMPORTINGfilename = p_pathEXCEPTIONSselection_cancel = 1selection_error = 2OTHERS = 3.ENDFORM. " FRM_GET_FIELPATH*&---------------------------------------------------------------------* *& Form FRM_UPLOAD_FILE_XLS*&---------------------------------------------------------------------* * 获取xls文档中的数据*----------------------------------------------------------------------** --> p1 text* <-- p2 text*----------------------------------------------------------------------*FORM frm_upload_file_xls.DATA: lv_filename TYPE rlgrap-filename.lv_filename = p_path."获取上传excel文档中的数据CALL FUNCTION 'ALSM_EXCEL_TO_INTERNAL_TABLE' EXPORTINGfilename = lv_filenamei_begin_col = 1i_begin_row = 5i_end_col = 9999i_end_row = 9999TABLESintern = gt_indataEXCEPTIONSinconsistent_parameters = 1upload_ole = 2OTHERS = 3.IF sy-subrc <> 0.* Implement suitable error handling hereENDIF.ENDFORM. " FRM_UPLOAD_FILE_XLS*&---------------------------------------------------------------------**& Form frm_deal_data*&---------------------------------------------------------------------** 处理上传数据*----------------------------------------------------------------------** --> p1 text* <-- p2 text*----------------------------------------------------------------------*FORM frm_deal_data.*BREAK-POINT.CLEAR:gt_upload,gt_upload[]."对上传的数据进行处理LOOP AT gt_indata.AT NEW row.CLEAR gs_upload.ENDAT.* CONDENSE gt_indata-value ."NO-GAPS.ASSIGN COMPONENT gt_indata-col OF STRUCTURE gs_upload TO <fs_gw>.IF gt_indata-col = 1.*** CALL FUNCTION 'CONVERSION_EXIT_MATN1_INPUT' "物料数据补零*** EXPORTING*** input = gt_indata-value*** IMPORTING*** output = gt_indata-value.***<fs_gw> = gt_indata-value.ELSEIF gt_indata-col = 6.*** CALL FUNCTION 'CONVERSION_EXIT_CUNIT_INPUT' "基本计量单位*** EXPORTING*** input = gt_indata-value*** language = sy-langu*** IMPORTING*** output = gt_indata-value*** EXCEPTIONS*** unit_not_found = 1*** OTHERS = 2.***<fs_gw> = gt_indata-value.SELECT SINGLE msehi INTO <fs_gw> FROM t006a WHERE mseht = gt_indata-value . ELSEIF gt_indata-col = 11.*** CALL FUNCTION 'CONVERSION_EXIT_CUNIT_INPUT' "重量单位*** EXPORTING*** input = gt_indata-value*** language = sy-langu*** IMPORTING*** output = gt_indata-value*** EXCEPTIONS*** unit_not_found = 1*** OTHERS = 2.***<fs_gw> = gt_indata-value.SELECT SINGLE msehi INTO <fs_gw> FROM t006a WHERE mseht = gt_indata-value . ELSEIF gt_indata-col = 15. "体积单位*** CALL FUNCTION 'CONVERSION_EXIT_CUNIT_INPUT'*** EXPORTING*** input = gt_indata-value*** language = sy-langu*** IMPORTING*** output = gt_indata-value*** EXCEPTIONS*** unit_not_found = 1*** OTHERS = 2.***<fs_gw> = gt_indata-value.ELSEIF gt_indata-col = 31.*** CALL FUNCTION 'CONVERSION_EXIT_CUNIT_INPUT' "订单单位*** EXPORTING*** input = gt_indata-value*** language = sy-langu*** IMPORTING*** output = gt_indata-value*** EXCEPTIONS*** unit_not_found = 1*** OTHERS = 2.***<fs_gw> = gt_indata-value.SELECT SINGLE msehi INTO <fs_gw> FROM t006a WHERE mseht = gt_indata-value .ELSEIF gt_indata-col = 73. "尺寸单位*** CALL FUNCTION 'CONVERSION_EXIT_CUNIT_INPUT'*** EXPORTING*** input = gt_indata-value*** language = sy-langu*** IMPORTING*** output = gt_indata-value*** EXCEPTIONS*** unit_not_found = 1*** OTHERS = 2.***<fs_gw> = gt_indata-value.ELSEIF gt_indata-col = 75. "账面库存可选单位*** CALL FUNCTION 'CONVERSION_EXIT_CUNIT_INPUT' *** EXPORTING*** input = gt_indata-value*** language = sy-langu*** IMPORTING*** output = gt_indata-value*** EXCEPTIONS*** unit_not_found = 1*** OTHERS = 2.***<fs_gw> = gt_indata-value.ELSEIF gt_indata-col = 78. "重量单位*** CALL FUNCTION 'CONVERSION_EXIT_CUNIT_INPUT' *** EXPORTING*** input = gt_indata-value*** language = sy-langu*** IMPORTING*** output = gt_indata-value*** EXCEPTIONS*** unit_not_found = 1*** OTHERS = 2.***<fs_gw> = gt_indata-value.ELSEIF gt_indata-col = 80. "体积单位*** CALL FUNCTION 'CONVERSION_EXIT_CUNIT_INPUT' *** EXPORTING*** input = gt_indata-value*** language = sy-langu*** IMPORTING*** output = gt_indata-value*** EXCEPTIONS*** unit_not_found = 1*** OTHERS = 2.***<fs_gw> = gt_indata-value.ELSE.<fs_gw> = gt_indata-value.ENDIF.AT END OF row.APPEND gs_upload TO gt_upload.ENDAT.ENDLOOP.ENDFORM.*&---------------------------------------------------------------------**& Form fr_fieldcat*&---------------------------------------------------------------------** text*----------------------------------------------------------------------*FORM frm_fieldcat.init_fieldcat 'ICON' TEXT-001 '' '' '' '' 'X' 4 ''.init_fieldcat 'MEMO' TEXT-002 '' '' '' '' '' 40 ''.init_fieldcat 'MBRSH' '' 'MARA' 'MBRSH' '' '' '' 8 ''."行业init_fieldcat 'MTART' '' 'MARA' 'MTART' '' '' '' 8 ''."物料类型init_fieldcat 'WERKS' '' 'MARC' 'WERKS' '' '' '' 8 ''."工厂init_fieldcat 'MATNR' '' 'MARA' 'MATNR' '' '' '' 15 ''."SAP物料编码init_fieldcat 'MAKTX' '' 'MAKT' 'MAKTX' '' '' '' 20 ''."物料描述init_fieldcat 'BISMT' '' 'MARA' 'BISMT' '' '' '' 20 ''."旧物料编码init_fieldcat 'MATKL' '' 'MARA' 'MATKL' '' '' '' 6 ''."物料组init_fieldcat 'SPART' '' 'MARA' 'SPART' '' '' '' 4 ''."产品组init_fieldcat 'MEINS' '' 'MARA' 'MEINS' '' '' '' 10 ''."基本计量单位init_fieldcat 'BRGEW' '' 'MARA' 'BRGEW' '' '' '' 5 ''."毛重*** init_fieldcat 'NTGEW' '' 'MARA' 'NTGEW' '' '' '' 5 ''."净重init_fieldcat 'GEWEI' '' 'MARA' 'GEWEI' '' '' '' 5 ''."重量单位init_fieldcat 'GROES' '' 'MARA' 'GROES' '' '' '' 8 ''."大小/量纲init_fieldcat 'VOLUM' '' 'MARA' 'VOLUM' '' '' '' 6 ''."业务量init_fieldcat 'VOLEH' '' 'MARA' 'VOLEH' '' '' '' 6 ''."体积单位init_fieldcat 'NORMT' '' 'MARA' 'NORMT' '' '' '' 10 ''."行业标准描述（例如 ANSI 或 ISO） *** init_fieldcat 'CLASSTYPE' TEXT-004 '' '' '' '' '' 10 ''."类别种类*** init_fieldcat 'CLASSNUM' TEXT-005 '' '' '' '' '' 15 ''."类别init_fieldcat 'EKGRP' '' 'MARC' 'EKGRP' '' '' '' 6 ''."采购组init_fieldcat 'BSTME' '' 'MARA' 'BSTME' '' '' '' 8 ''."订单单位'** init_fieldcat 'VABME' '' 'MARA' 'VABME' '' '' '' 8 ''."可变单位init_fieldcat 'UMREZ' TEXT-007 'MARM' 'UMREZ' '' '' '' 6 ''."换算关系基本单位init_fieldcat 'UMREN' TEXT-006 'MARM' 'UMREN' '' '' '' 6 ''."换算关系订单单位init_fieldcat 'XCHPF' '' 'MARC' 'XCHPF' '' '' '' 8 ''."批次管理init_fieldcat 'KAUTB' '' 'MARC' 'KAUTB' '' '' '' 10 ''."自动采购订单init_fieldcat 'MMSTA' '' 'MARC' 'MMSTA' '' '' '' 8 ''."工厂特定的物料状态init_fieldcat 'DISMM' '' 'MARC' 'DISMM' '' '' '' 8 ''."MRP类型init_fieldcat 'DISGR' '' 'MARC' 'DISGR' '' '' '' 8 ''."mrp组init_fieldcat 'DISPO' '' 'MARC' 'DISPO' '' '' '' 8 ''."MRP控制者init_fieldcat 'DISLS' '' 'MARC' 'DISLS' '' '' '' 8 ''."批量大小init_fieldcat 'BERID' '' 'MDMA' 'BERID' '' '' '' 8 ''."MRP范围init_fieldcat 'DISMM' '' 'MDMA' 'DISMM' '' '' '' 8 ''."MRP类型init_fieldcat 'BSTRF' '' 'MARC' 'BSTRF' '' '' '' 6 ''."舍入值init_fieldcat 'BESKZ' '' 'MARC' 'BESKZ' '' '' '' 8 ''."采购类型init_fieldcat 'SOBSL' '' 'MARC' 'SOBSL' '' '' '' 8 ''."特殊采购类init_fieldcat 'RGEKZ' '' 'MARC' 'RGEKZ' '' '' '' 8 ''."反冲init_fieldcat 'EISBE' '' 'MARC' 'EISBE' '' '' '' 8 ''."安全库存init_fieldcat 'LGPRO' '' 'MARC' 'LGPRO' '' '' '' 8 ''."生产仓储地点init_fieldcat 'LGFSB' '' 'MARC' 'LGFSB' '' '' '' 8 ''."外部采购仓储地点init_fieldcat 'FHORI' '' 'MARC' 'FHORI' '' '' '' 8 ''."计划边际码init_fieldcat 'PLIFZ' '' 'MARC' 'PLIFZ' '' '' '' 8 ''."计划交货时间init_fieldcat 'DZEIT' '' 'MARC' 'DZEIT' '' '' '' 8 ''."自制时间init_fieldcat 'STRGR' '' 'MARC' 'STRGR' '' '' '' 8 ''."策略组init_fieldcat 'MTVFP_MRP' '' 'MARC' 'MTVFP' '' '' '' 10 ''."可用性检查组init_fieldcat 'SBDKZ' '' 'MARC' 'SBDKZ' '' '' '' 8 ''."独立/集中*** init_fieldcat 'SAUFT' '' 'MARC' 'SAUFT' '' '' '' 8 ''."重复制造*** init_fieldcat 'SFEPR' '' 'MARC' 'SFEPR' '' '' '' 8 ''."重复生产参数文件init_fieldcat 'UEETO' '' 'MARC' 'UEETO' '' '' '' 8 ''."过度交货允差init_fieldcat 'FEVOR' '' 'MARC' 'FEVOR' '' '' '' 8 ''."生产管理员init_fieldcat 'VKORG' '' 'MVKE' 'VKORG' '' '' '' 8 ''."销售组织init_fieldcat 'VTWEG' '' 'MVKE' 'VTWEG' '' '' '' 8 ''."分销渠道init_fieldcat 'DWERK' '' 'MVKE' 'DWERK' '' '' '' 8 ''."交货工厂init_fieldcat 'TAXM1' '' 'MLAN' 'TAXM1' '' '' '' 8 ''."税分类1init_fieldcat 'KTGRM' '' 'MVKE' 'KTGRM' '' '' '' 8 ''."科目设置组init_fieldcat 'MTPOS' '' 'MVKE' 'MTPOS' '' '' '' 8 ''."项目类别init_fieldcat 'TRAGR' '' 'MARA' 'TRAGR' '' '' '' 8 ''."运输组init_fieldcat 'LADGR' '' 'MARC' 'LADGR' '' '' '' 8 ''."装载组init_fieldcat 'MLAST' '' 'MBEW' 'MLAST' '' '' '' 8 ''."价格确定init_fieldcat 'MLMAA' '' 'MBEW' 'MLMAA' '' '' '' 8 ''."ML作业init_fieldcat 'BKLAS' '' 'MBEW' 'BKLAS' '' '' '' 8 ''."评估类init_fieldcat 'VPRSV' '' 'MBEW' 'VPRSV' '' '' '' 8 ''."价格控制init_fieldcat 'PEINH' '' 'MBEW' 'PEINH' '' '' '' 8 ''."价格单位init_fieldcat 'NCOST' '' 'MARC' 'NCOST' '' '' '' 8 ''."不用计算成本:NO_COSTING init_fieldcat 'EKALR' '' 'MBEW' 'EKALR' '' '' '' 8 ''."用QS的成本估算init_fieldcat 'HKMAT' '' 'MBEW' 'HKMAT' '' '' '' 8 ''."物料来源*** init_fieldcat 'QMPUR' '' 'MARA' 'QMPUR' '' '' '' 8 ''."QM采购激活。
SAP-批量修改主数据（客户、供应商、物料）
SAP-批量修改主数据（客户、供应商、物料）SAP-批量修改主数据(客户、供应商、物料)TCODE: MASS对于批量修改主数据如客户，供应商等，可以试⽤⼀下Mass , 它所能修改的范围如下：选定要修改的对象后，点击运⾏，会要求选择需要修改的表和字段，然后填写过滤出要修改数据的条件随后会显⽰所有需要修改的数据：可以在下⽅表格⾥⼀个⼀个输⼊要修改的值，如果是统⼀修改成相同的值，可以填写在上⽅表格的新值⾏⾥，然后点批量更改，会将下⽅表格的值统⼀改为相同⼀个值，确定所有要修改项正确后，点击保存按钮，会更新到sap数据库。
退出后查看⼀下修改的主数据是否已改确认⽆误 .补充：对于各类主数据⼀般有相应更快捷的批修改tcode,其实都是调⽤这个只是默认选好了对象。
如：XK99 批量维护供应商.MM17 批量维护物料。
XD99 批理维护客户.OB_GLACC11 批量维护科⽬数据OB_GLACC12 批量维护公司代码数据KE55 批量维护利润中⼼主数据然后填写过滤出要修改数据的条件随后会显⽰所有需要修改的数据：可以在下⽅表格⾥⼀个⼀个输⼊要修改的值，如果是统⼀修改成相同的值，可以填写在上⽅表格的新值⾏⾥，然后点批量更改，会将下⽅表格的值统⼀改为相同⼀个值，确定所有要修改项正确后，点击保存按钮，会更新到sap数据库。
退出后查看⼀下修改的主数据是否已改确认⽆误 .补充：对于各类主数据⼀般有相应更快捷的批修改tcode,其实都是调⽤这个只是默认选好了对象。
如：XK99 批量维护供应商.MM17 批量维护物料。
ＸD99 批理维护客户.XD07 修改客户的账户组OB_GLACC11 批量维护科⽬娄据OB_GLACC12 批量维护公司代码数据KE55 批量维护利润中⼼主数据。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
SAP 中批量维护物料价格实践
贾晋林 （天津钢铁集团有限公司，天津 300301）
[摘 要] 针对企业在实施 SAP 后物料价格在修订过程中存在的物料编码数量大、种类多、规则复杂等问题，通过将 SAP 开发查询程序与 EXCEL 函数和筛选功能相结合，简化了工作流程，提高了 SAP 维护物料价格工作的效率，保证 了企业成本核算的准确性。 [关键词] SAP；物料；价格；函数
SAP 中，一个物料对应一个物料编码，同一物 料编码的物料可以存在于一（多）个公司下的不同
收稿日期：2017-03-26 修回日期：2017-04-18 作者简介：贾晋林(1970-)，男，山西阳城人，工程硕士，高级工程师， 从事钢铁生产工艺及成本管控、ERP 项目运行维护及管理工作。
工厂，其价格控制方式按实际需要通常分为标准价 和移动平均价，标准价相当于手工核算中的计划 价，而移动平均价相当于实际价。计划价的修改可 以随时进行，但标准价的修改必须在生效日物料账 期打开后且该物料没有发生任何业务操作（没有物 料移动）前进行。比如，2017 年 1 月 1 日起执行新 的 标准 价， 通常 在 2016 年 12 月 31 日 21:30 用 MMPV 打开 2017 年 1 月物料账期，同时锁定除更 改标准价操作者外所有人的操作权限，确保标准价 更改成功。通常情况下，由于物料编码数量多，手工 维护修改不现实，采用批导方式维护是多数企业的 选择。
1 引言 物料价格维护是企业的一项重要工作，特别是
在市场价格波动大的情况下，确保计划价贴近市场 实际价格，对保证企业成本核算的准确性意义重 大。即使在市场行情变化不大的情况下，企业通常 也需要每年维护一次计划价格。
企业在实施 SAP 项目后，与手工核算一个很 大的不同是：
在 SAP 中，计划价的意义基本上仅存在于报 表层面，对成本核算有影响的是标准价和移动平均 价，而手工核算中仅有计划价，没有标准价的概念； 其次，手工核算中物料是不区分工厂的，一个物料 对应一个计划价，而在 SAP 中，物料是基于工厂 的，一个物料可能同时存在于数个工厂，就必须在 每个工厂维护计划价。 2 SAP 中物料价格维护的主要困难
Practice of Materiel Price Batch Maintaining in SAP
(Tianjin Iron and Steel Group Co., Ltd., Tianjin 300301, China) Abstract During the revision process of material price after the company implemented SAP, problems were found such as big amount of material code, too many categories and complicated principles. The operation process was simplified with the combination of SAP development and inquiry program with EXCEL functions and screening functions. The efficiency of SAP material price maintaining was im原 proved and the accuracy of enterprise cost accounting ensured. Key words SAP; material; price; function
（3）对于部分移动平均价物料，由于核算与内 部考核需要，在 SAP 中需要变更计划价，而这种情 况下其标准价是无法更改的。如第一类原燃辅料计 590 余条物料中约有 170 余条移动平均价物料，具 体细分到公司、工厂则有 800 余条，针对这种情况 应区别对待。
（4）物料编码、物料类别与公司、工厂没有对应 关系，无法根据物料编码、物料类别判断物料存在 的公司与工厂范围。
（5）物料编码数据量大，手工查询与维护不仅 费时费力，而且容易出错。 3 SAP 中物料价格维护实践
通过多次实践、摸索、思考、再实践，我们通过 SAP 系 统 中 SQVI 快 速 浏 览 器 工 具 与 EXCEL 结 合，找到了一条高效率、高质量完成计划价、标准价 修订任务的方法。
具体思路是：首先通过 SAP 系统导出当前系 统所有物料及对应工厂计划价，然后区分不同类 别，通过 EXCEL 函数公式查找匹配更新计划价，经 检查确认无误后，生成对应计划价、标准价导入文 件，最后在合适的时间导入 SAP。相对而言，前两个 是关键环节，不仅工作量大，而且技术含量高。 3.1 SQVI 设计及物料 - 工厂 - 计划价数据导出
天钢在 SAP 中维护修订计划价、标准价的主
- பைடு நூலகம்2 -
〈计 算 机 应 用 与 自 动 化〉
SAP 中批量维护物料价格实践
要困难有： （1）原始计划价修订文件通常会将每个物料编
码对应一个价格，SAP 中计划价、标准价导入模板 不仅需要区分物料编码，而且要区分公司、工厂。
（2）手工核算与 SAP 核算物料粗细度与维度 不同，如第八类半成品/产成品约 9870 余条物料， 细分到公司、工厂则有 14870 余条，而手工核算中 仅按钢坯、板材、棒材圆钢、棒材螺纹、棒材方钢、高 线等 14 个大类及全公司一个维度维护计划价。
天钢是大型钢铁企业，实施 ERP 时物料分为 原燃辅料、副产品、贸易物资、半成品/产成品、能源 介质等 8 大类 36 000 余条物料，如果考虑公司、工 厂维度，合计约有 111 000 余条物料，其中标准价 物料约有 10 500 条，如果考虑公司、工厂维度的 话，约有 17 600 条。针对如此多的物料，准确、迅速 地按指定模板格式建立计划价、标准价导入文件， 是计划价调整中一项非常重要的工作。