100小时学习SAP之自学环境（一）

《100小时学会SAP》很老的一本书，现在想认真的花些时间学习一下。

系统环境：

选用仁鹏的ECC6 EHP7 纯净系统虚拟机，WIN2003， SQLSERVER2008，磁盘大小80GB。（虽然自己也是BASIS,安装出来其实也是一样，就用这个把，很方便，应该把时间都花到模块上）。

WIN2003 ECC6 EHP7 纯净版_免费高速下载|百度网盘-分享无限制

系统跑起来后，给了16G物理内存，调整SAP总的内存占用 em/initial_size_MB 10000 给SAP 10GB。建立逻辑系统用 T-code: SALE ，SCC4新建一个client100，里面要指定逻辑系统。

退出系统，用SAP* ,pass 登陆client100, 密码不对。参数文件（C:\usr\sap\ECC\SYS\profile）中加： login/no_automatic_user_sapstar = 0 搞定。没空用rz10,自己的系统直接就改参数文件了。

登陆client100,用scc9 从源client000中，参数选SAP_CUST, 把000拷贝到100中。

（3小时完成，db02看看 free 20G, OS C盘还剩5G, 够用就行）

MM配置：

按书中完成MM后台配置，之后要求创建5个原材料物料主数据。

正好练习一下ABAP，写了一个物料主数据的批导入程序：

程序导入数据模版：

物料类型

物料号

行业领域

工厂

物料描述

基本计量单位

物料组

采购组

MRP类型

MRP控制者

批量

计划交货时间

计划边际码

安全库存

可用性检查

评估类

价格控制

价格单位

移动平均价

ROH

R999-701

P999

金属片

PG1

Z01

3000

*&---------------------------------------------------------------------*
*& REPORT  ZMM0001
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*
REPORT ZMM0001.
DATA: BEGIN OF RECORD OCCURS 0,HEAD_MATL_TYPE TYPE MTART,"物料类型HEAD_MATERIAL TYPE MATNR,"物料号HEAD_IND_SECTOR TYPE MBRSH,"行业领域MARC_PLANT TYPE WERKS_D, "工厂T_MAKT_MATL_DESC TYPE MAKTX,"物料描述MARA_BASE_UOM TYPE MEINS,"基本计量单位MARA_MATL_GROUP TYPE MATKL,"物料组MARC_PUR_GROUP TYPE EKGRP,"采购组MARC_MRP_TYPE TYPE DISMM, "MRP类型MARC_MRP_CTRLER TYPE DISPO,"MRP控制者MARC_LOTSIZEKEY TYPE DISLS,"批量MARC_PLND_DELRY TYPE PLIFZ,"计划交货时间MARC_SM_KEY TYPE FHORI," 计划边际码MARC_SAFETY_STK TYPE EISBE,"安全库存MARC_AVAILCHECK TYPE MTVFP,"可用性检查MBEW_VAL_CLASS TYPE BKLAS,"评估类MBEW_PRICE_CTRL TYPE VPRSV,"价格控制MBEW_PRICE_UNIT TYPE PEINH,"价格单位MBEW_MOVING_PR TYPE VERPR_BAPI,"移动平均价END OF RECORD.
"输入参数
DATA:
HEADDATA TYPE BAPIMATHEAD, "表头数据
CLIENTDATA TYPE BAPI_MARA, "基本数据
CLIENTDATAX TYPE BAPI_MARAX,
PLANTDATA TYPE BAPI_MARC, "工厂级别数据
PLANTDATAX TYPE BAPI_MARCX,
FORECASTPARAMETERS TYPE BAPI_MPOP, "预测
FORECASTPARAMETERSX TYPE BAPI_MPOPX,
PLANNINGDATA TYPE BAPI_MPGD, "计划
PLANNINGDATAX TYPE BAPI_MPGDX,
STORAGELOCATIONDATA TYPE BAPI_MARD, "存储位置
STORAGELOCATIONDATAX TYPE BAPI_MARDX,
VALUATIONDATA TYPE BAPI_MBEW, "评估数据
VALUATIONDATAX TYPE BAPI_MBEWX,
WAREHOUSENUMBERDATA TYPE BAPI_MLGN, "仓库数据
WAREHOUSENUMBERDATAX TYPE BAPI_MLGNX,
SALESDATA TYPE BAPI_MVKE, "销售数据
SALESDATAX TYPE BAPI_MVKEX,
STORAGETYPEDATA TYPE BAPI_MLGT, "存储类型数据
STORAGETYPEDATAX TYPE BAPI_MLGTX.
"TABLE参数
DATA:
MATERIALDESCRIPTION TYPE TABLE OF BAPI_MAKT WITH HEADER LINE,"描述
UNITSOFMEASURE TYPE TABLE OF BAPI_MARM WITH HEADER LINE,"单位
UNITSOFMEASUREX TYPE TABLE OF BAPI_MARMX WITH HEADER LINE,
TAXCLASSIFICATIONS TYPE TABLE OF BAPI_MLAN WITH HEADER LINE."税分类
"RETURN
DATA RETURN TYPE BAPIRET2.
*声明一个输入框,变量是DATASET
PARAMETERS: DATASET TYPE LOCALFILE.
*屏幕选择输入框,去打开取文件名FORM.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR DATASET.PERFORM OPEN_FILE USING DATASET.
START-OF-SELECTION.PERFORM IMPORT_FROM_FILE TABLES RECORD[] USING DATASET.
*如果内表中没内容,退出IF RECORD[] IS INITIAL.WRITE:/'输入数据为空'.EXIT.ENDIF.DATA: PR_UNIT TYPE MEINS."基本计量单位LOOP AT RECORD.CLEAR HEADDATA.HEADDATA-MATERIAL = RECORD-HEAD_MATERIAL. "物料号HEADDATA-MATL_TYPE = RECORD-HEAD_MATL_TYPE. "物料类型HEADDATA-IND_SECTOR = RECORD-HEAD_IND_SECTOR."行业领域HEADDATA-BASIC_VIEW = 'X'.HEADDATA-SALES_VIEW = 'X'.HEADDATA-PURCHASE_VIEW = 'X'.HEADDATA-MRP_VIEW = 'X'.HEADDATA-WAREHOUSE_VIEW = 'X'.HEADDATA-ACCOUNT_VIEW = 'X'.HEADDATA-COST_VIEW = 'X'."基本数据CLEAR CLIENTDATA.CLIENTDATA-MATL_GROUP = RECORD-MARA_MATL_GROUP. "物料组PERFORM GET_PR_UNIT USING RECORD-MARA_BASE_UOM CHANGING PR_UNIT. "基本计量单位CLIENTDATA-BASE_UOM = PR_UNIT.CLEAR CLIENTDATAX.CLIENTDATAX-MATL_GROUP = 'X'.CLIENTDATAX-BASE_UOM = 'X'.CLIENTDATAX-EXTMATLGRP = 'X'.CLIENTDATAX-ITEM_CAT = 'X'.CLIENTDATAX-NET_WEIGHT = 'X'.CLIENTDATAX-TRANS_GRP = 'X'."工厂级别数据CLEAR PLANTDATA.PLANTDATA-PLANT = RECORD-MARC_PLANT. "工厂PLANTDATA-PUR_GROUP = RECORD-MARC_PUR_GROUP."采购组PLANTDATA-MRP_TYPE = RECORD-MARC_MRP_TYPE."MRP类型PLANTDATA-MRP_CTRLER = RECORD-MARC_MRP_CTRLER."MRP控制者PLANTDATA-LOTSIZEKEY = RECORD-MARC_LOTSIZEKEY."批量PLANTDATA-PLND_DELRY = RECORD-MARC_PLND_DELRY."计划交货时间PLANTDATA-SM_KEY = RECORD-MARC_SM_KEY." 计划边际码PLANTDATA-SAFETY_STK = RECORD-MARC_SAFETY_STK."安全库存PLANTDATA-AVAILCHECK = RECORD-MARC_AVAILCHECK."可用性检查CLEAR PLANTDATAX.PLANTDATAX-PLANT = RECORD-MARC_PLANT.PLANTDATAX-AVAILCHECK = 'X'.PLANTDATAX-LOADINGGRP = 'X'.PLANTDATAX-PUR_GROUP = 'X'.PLANTDATAX-BATCH_MGMT = 'X'.PLANTDATAX-AUTO_P_ORD = 'X'.PLANTDATAX-IND_POST_TO_INSP_STOCK = 'X'.PLANTDATAX-QUOTAUSAGE = 'X'.PLANTDATAX-SOURCELIST = 'X'.PLANTDATAX-MRP_GROUP = 'X'.PLANTDATAX-MRP_TYPE = 'X'.PLANTDATAX-MRP_CTRLER = 'X'.PLANTDATAX-LOTSIZEKEY = 'X'.PLANTDATAX-MINLOTSIZE = 'X'.PLANTDATAX-MAXLOTSIZE = 'X'.PLANTDATAX-ROUND_VAL = 'X'.PLANTDATAX-PROC_TYPE = 'X'.PLANTDATAX-BACKFLUSH = 'X'.PLANTDATAX-PLND_DELRY = 'X'.PLANTDATAX-GR_PR_TIME = 'X'.PLANTDATAX-SAFETY_STK = 'X'.PLANTDATAX-SM_KEY = 'X'.PLANTDATAX-PLAN_STRGP = 'X'.PLANTDATAX-ALT_BOM_ID = 'X'."会计、成本CLEAR VALUATIONDATA.VALUATIONDATA-VAL_AREA = RECORD-MARC_PLANT. "评估范围===================VALUATIONDATA-VAL_CLASS = RECORD-MBEW_VAL_CLASS. "评估类VALUATIONDATA-PRICE_CTRL = RECORD-MBEW_PRICE_CTRL. "价格控制VALUATIONDATA-PRICE_UNIT = RECORD-MBEW_PRICE_UNIT. "价格单位VALUATIONDATA-MOVING_PR = RECORD-MBEW_MOVING_PR. "移动平均价CLEAR VALUATIONDATAX.VALUATIONDATAX-VAL_AREA = RECORD-MARC_PLANT.VALUATIONDATAX-VAL_CLASS = 'X'.VALUATIONDATAX-PRICE_CTRL = 'X'.VALUATIONDATAX-PRICE_UNIT = 'X'.VALUATIONDATAX-MOVING_PR = 'X'."物料描述CLEAR MATERIALDESCRIPTION[].MATERIALDESCRIPTION-LANGU_ISO = 'ZH'.MATERIALDESCRIPTION-MATL_DESC = RECORD-T_MAKT_MATL_DESC. "物料描述APPEND MATERIALDESCRIPTION.CALL FUNCTION 'BAPI_MATERIAL_SAVEDATA'EXPORTINGHEADDATA = HEADDATACLIENTDATA = CLIENTDATACLIENTDATAX = CLIENTDATAXPLANTDATA = PLANTDATAPLANTDATAX = PLANTDATAXVALUATIONDATA = VALUATIONDATAVALUATIONDATAX = VALUATIONDATAXIMPORTINGRETURN = RETURNTABLESMATERIALDESCRIPTION = MATERIALDESCRIPTION[].IF SY-SUBRC = 0.CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'EXPORTINGWAIT = 'X'.WRITE:/ RETURN-MESSAGE.ENDIF.ENDLOOP."获取基本计量单位内码
FORM GET_PR_UNIT USING UNIT1 CHANGING UNIT2.SELECT SINGLE MSEHI INTO UNIT2 FROM T006A WHERE SPRAS = 1 AND MSEH3 = UNIT1.IF SY-SUBRC <> 0.UNIT2 = UNIT1.ENDIF.
ENDFORM.
*--------------取文件名的FORM-------------
FORM OPEN_FILE CHANGING X TYPE LOCALFILE .CALL FUNCTION 'WS_FILENAME_GET'EXPORTINGDEF_FILENAME     = ''DEF_PATH         = ''MASK             = ',*.TXT,*.TXT.'MODE             = '0'TITLE            = '取文件名'IMPORTINGFILENAME         = XEXCEPTIONSINV_WINSYS       = 01NO_BATCH         = 02SELECTION_CANCEL = 03SELECTION_ERROR  = 04.
ENDFORM.
*--------把文件放内表的FORM----------------
FORM IMPORT_FROM_FILE TABLES RECORD_TEMP LIKE RECORD[]USING X TYPE LOCALFILE.DATA: FLENGTH TYPE I.CALL FUNCTION 'WS_UPLOAD'EXPORTINGFILENAME            = XFILETYPE            = 'DAT'IMPORTINGFILELENGTH          = FLENGTHTABLESDATA_TAB            = RECORD_TEMPEXCEPTIONSCONVERSION_ERROR    = 1FILE_OPEN_ERROR     = 2FILE_READ_ERROR     = 3INVALID_TABLE_WIDTH = 4INVALID_TYPE        = 5.
ENDFORM.

代码很长，影响文本连贯性，不贴上来，又影响完整性。只有把文章分开了。接下来请看：

100小时学习SAP之自学MM模块（二）_james-lx的博客-CSDN博客_sap系统mm模块CSDN的blog上传图片不是很方便，虽然图片展现更加生动。学习时间不应该浪费到发帖上，所有多用文字记录。为了测试物料主数据导入程序，结果我多导入了20个物料。按书上后续内容一看mm60里面垃圾物料太多，需要归档！1、用MM17批量选择垃圾物料，使用字段MARA-LVORM。批量给物料打上删除标记。2、运行程序 MMREO001 选择要删除的物料...https://basis.blog.csdn.net/article/details/51799475

100小时学习SAP之自学环境（一）相关推荐

100小时学会sap傻瓜式入门版生产计划pp篇
100小时学会sap傻瓜式入门版-生产计划pp篇生产计划: 1.定义生产计划参数文件,生产计划参数文件可以分配给物料或者生产计划员.分配给物料主数据的生产计划参数具有更高的优先级.在创建生产订单时, ...
100小时学SAP SD后台配置清单
100小时学SAP SD后台配置清单 SD模块销售主数据练习点:维护销售业务主数据(物料主数据销售视图-MM01.物料的销售价格-VK11.销项税率-VK11.客户档案销售视图-VD01/VD02). ...
今天终于把《100小时学会SAP》看完了
Mark一下看来这本书还真只能说是简单的操作入门指导,不过这本书至少可以提供一些思路,能起着钥匙的作用,剩下的就得靠自己了. 来自 " ITPUB博客 " ,链接:http:// ...
我学习SAP的一点经历
接触并开始学习SAP 应该是从2008年的六月份开始的,到现在,也已经快一年了,中间走过很多的弯路(呵呵,不知道现在是不是上路了),看过不少的东西,可是现在记得的好像不多了. 去年的六月份,我开始接触 ...
2022年我应该怎么学习SAP？上篇
2019年的时候我写了一篇<我应该怎么学习SAP>,结合自己的过往和经历,给想要入行的朋友们一点参考,文章引起很多人关注和反响. 那么本文还是以问答的形式来回答众多朋友的问题,希望能够对想 ...
100小时学SAP-SD(June笔记)
100小时学SAP-SD(June笔记) 1.建立销售组织.分销渠道.产品组并分配 1)说明 SD销售组织是为企业销售而建立的组织单元,用于物料和服务的销售.销售组织下又可以分为若干个分销渠道,用于不 ...
免费python自学攻略-420小时学习代码之后:如何教你免费自学Python
大约在1.5年前,我开始自学python编程.今天,我对于完成我的项目感到自信. 老实说,我认为对于我能够码出中级初学者级别的代码感到有点自豪.在过去的几个月持续快速提高后,我现在已经过了编程拐点-- ...
SAP License：我应该怎么学习SAP？
越来越多的人在后台留言问我怎么进入SAP行业.应该怎么学习SAP.35岁了学习SAP还来得及吗?大部分都是外行想入行SAP的朋友.作为过来人,这些问题我也曾经问过别人,也走过不少弯路.但现在轮到别人问 ...
想比较全面地学习 SAP XXX，能指导下从哪儿开始学习吗？
其实曾经有不少朋友给我留言,询问本文标题描述的问题.XXX 可以替换成任意一个 SAP 产品或者技术,比如: 想比较全面地学习 SAP ABAP,能指导下从哪儿开始学习吗? 想比较系统地学习 SAP ...
网络安全系统教程+渗透测试+学习路线（自学笔记）
一.什么是网络安全网络安全可以基于攻击和防御视角来分类,我们经常听到的 "红队"."渗透测试" 等就是研究攻击技术,而"蓝队"." ...

100小时学习SAP之自学环境（一）

100小时学习SAP之自学环境（一）相关推荐

最新文章

热门文章