SAP 增强发展史

文章详细介绍了SAP系统中的四种增强开发方式,包括基于源代码的增强、函数模块的增强、BADI(BusinessAdd-In)以及SwitchFramework,这些都是为了满足标准系统无法满足的特定业务需求。每种增强方式都有其特点和应用场景,如源代码增强可能涉及标准代码修改,而BADI则采用面向对象的概念,提供了更灵活的扩展机制。

增强(enhancement)的概念其实很广,SAP标准系统之上的所有二次开发,我们都可以理解为增强,做增强的目的就是标准的sap正常的业务系统 不能满足实际需求,所以我们在标准的系统基础进行增加不同的功能来达到不同企业的要求,换句话说我们今天开发过程中所有的ADD-ON都可以说是增强开 发。

 但作为开发人员所说的增强主要是标准系统事先预留好的接口,根据不同业务需求,进行开发,我们称为增强,又叫出口。

比如:1:在业务检查时,比如在某个工厂发货,可以设定在某个库位的出货只能使用某种移动类型。2:在需要界面增强时,比如用户对某个字段要求大写,但是 最终用户不按规范操作,这也可以在出口中自动转换,有些模块甚至能自定义数据库字段,并且可以在出口中增加字段输入。还有的模块能对输入数据检查,甚至实 现自动替代等功能。3:有不规则业务时,比如按某种条件定价,可以设定从自己定义的表中按某种条件取值 4:搜索帮助的出口,可以对Sap标准的搜索帮助做权限控制。等等。

 Sap的用户出口发展至今有四代:

一、第一代(基于源代码的增强)是sap提供一个空代码的子过程,在这个子过程中用户可以添加自己的代码,控制自己的需求。这类增强都需要修改sap的标 准代码,它们在发布的时候都是空的,集中在一些文件名倒数第二个字符为Z的包含程序中,由于在标准程序中,所以所有程序的全局数据都可以使用,但同时系统 升级时会被新版本覆盖;这种源代码增强和屏幕增强的说明可以从事务码 spro 后台配置中相关模块的路径里面找到;一般是以UserExit_打头的子模块。

找到所要增强的的程序,查找UserExit关键字。

这类增强事先要到 service marketplace 申请对象键(ACCESS KEY),然后才能修改这些子程序。

查找此类出口的方法:

1、  在增强程序中找第二个字符为Z的包含程序;

2、  在后台找对应模块增强;

3、  在程序中搜索USEREXIT_打头的关键字子程序;

4、  字节列出对象列表“Display Object List”按钮,在Subroutines列表下找“userexit”打头的子程序;           

二、  第二代增强(基于函数模块的增强),用SMOD和CMOD维护;在SAP发布的版本中,使用Call customer-function ‘xxx’调用函数模块的,所以你可以通过在程序中收cusomer-function来查找第二代增强,第二代增强函数名构成:Exit_程序名_’xxx(3 digital number)’,这样你就可以找到对应的增强函数模块了,它们在发布的时候只有一句代码include ‘xxxxxxx’,修改时无需像第一代增强一样需要ACCESS key,直接双击回车就可以了,但同时这种增强以及后面几代的增强都不能像第一代一样随便使用程序的全局数据,只能使用接口中传递进来的参数。

第二代增强中主要有3类:1)E . Ehancement exits:     这些出口 Exit_打头,你可以到SE37中查看,也可以在数据字典中TFDIR(函数表)中查询Exit_打头的函数。2)C .GUI codes,   (GUI增强) 3)S . Subscreens(屏幕增强)。4)T. include structure增强

 Enhancement比较重要的表MODSAP,这个表里重要的字段增强名(Name),组件类型(TYP: E C S T),组件功能模块名(Member):里面记录了所有enhancement的增强.TFDIR所有的函数表,重要字段FUNCName(函数名),MAND(功能模块激活状态 如果是C代表此函数模块激活)。

 查找Enhancement的方法:

1、在程序中搜索Customer-function找到后面的3为digit suffix,然后出口函数组成就是Exit_程序名_3 digit suffix.

2、代码找增强 利用如下代码找enhancement(有些exit使用它并不能找到)

REPORT  ZLC_FIND_EXIT no standard page heading.

tables : tstc, tadir, modsapt, modact, trdir, tfdir, enlfdir.

tables : tstct.

data : jtab like tadir occurs 0 with header line.

data : field1(30).

data : v_devclass like tadir-devclass.

parameters : p_tcode like tstc-tcode obligatory.



select single * from tstc where tcode eq p_tcode.

if sy-subrc eq 0.

 select single * from tadir where pgmid = 'R3TR'

 and object = 'PROG'

 an
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值