转——Jack Wu
http://blog.csdn.net/CompassButton/archive/2005/02/05/281437.aspx
REPORT ZEXIT_HELP 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'
and obj_name = tstc-pgmna.
move : tadir-devclass to v_devclass.
if sy-subrc ne 0.
select single * from trdir where name = tstc-pgmna.
if trdir-subc eq 'F'.
select single * from tfdir where pname = tstc-pgmna.
select single * from enlfdir where funcname =
tfdir-funcname.
select single * from tadir where pgmid = 'R3TR'
and object = 'FUGR'
and obj_name eq enlfdir-area.
move : tadir-devclass to v_devclass.
endif.
endif.
select * from tadir into table jtab
where pgmid = 'R3TR'
and object = 'SMOD'
and devclass = v_devclass.
select single * from tstct where sprsl eq sy-langu and
tcode eq p_tcode.
format color col_positive intensified off.
write:/(19) 'Transaction Code - ',
20(20) p_tcode,
45(50) tstct-ttext.
skip.
if not jtab[] is initial.
write:/(95) sy-uline.
format color col_heading intensified on.
write:/1 sy-vline,
2 'Exit Name',
21 sy-vline ,
22 'Description',
95 sy-vline.
write:/(95) sy-uline.
loop at jtab.
select single * from modsapt
where sprsl = sy-langu and
name = jtab-obj_name.
format color col_normal intensified off.
write:/1 sy-vline,
2 jtab-obj_name hotspot on,
21 sy-vline ,
22 modsapt-modtext,
95 sy-vline.
endloop.
write:/(95) sy-uline.
describe table jtab.
skip.
format color col_total intensified on.
write:/ 'No of Exits:' , sy-tfill.
else.
format color col_negative intensified on.
write:/(95) 'No User Exit exists'.
endif.
else.
format color col_negative intensified on.
write:/(95) 'Transaction Code Does Not Exist'.
endif.
at line-selection.
get cursor field field1.
check field1(4) eq 'JTAB'.
set parameter id 'MON' field sy-lisel+1(10).
call transaction 'SMOD' and skip first screen.
分享到:
相关推荐
本文将详细介绍如何通过一个ABAP程序查找SAP系统的用户出口,帮助IT专业人员更好地理解和利用这一特性。 ### SAP用户出口概述 用户出口是SAP提供的一种扩展点,它允许客户在不改变标准程序的情况下插入自定义代码...
在SAP系统中,用户出口(User Exit)是为用户提供的一种自定义功能,允许企业根据自身业务需求对标准SAP程序进行扩展或调整。本文将详细介绍如何查找和利用SAP用户出口。 首先,用户出口主要分为两种类型: 1. **...
在SAP系统中,用户出口(User Exit)是一种特殊的增强点,允许开发人员在标准SAP程序中插入自定义逻辑或功能。这种机制为最终用户提供了高度的灵活性,可以根据特定业务需求对SAP标准流程进行定制化修改。 #### 1.2 ...
在 SAP ABAP 开发中,用户...这个文档(查找SAP标准程序用户出口以及BADI的方法.doc)应该提供了详细的步骤和截图,帮助你在实际操作中更好地理解和应用这些概念。通过实践,你会更加熟练地掌握 SAP ABAP 的扩展技术。
在SAP系统中,用户出口(User Exit)是为用户提供的一种自定义和扩展标准系统功能的方法。用户出口允许企业根据自身业务需求对SAP的功能进行调整,而不必修改标准源代码,这有助于保持系统的稳定性和可升级性。下面...
总的来说,SAP增强查找是SAP ABAP开发中不可或缺的一部分,它使企业能够定制SAP系统以适应其独特的业务流程,同时保持与SAP的标准更新兼容性。正确理解和使用各种增强技术,能够提高系统的灵活性和可维护性。
在SAP系统中,**出口(Enhancements)**是一个重要的概念,它允许企业在不改变标准软件的前提下,根据自身业务需求定制功能。本文将深入探讨SAP-R/3中的出口机制,包括其定义、应用场景以及如何实现具体的出口程序。...
这样既能够满足企业的特殊需求,又能在SAP系统升级时保留自定义的代码。 **2. 特点** - **可定制性**:用户可以根据实际业务需要,在出口中添加或修改逻辑。 - **兼容性**:由于自定义代码与标准程序分离,因此...
SAP用户出口培训是针对SAP系统中的一种关键特性,旨在帮助用户在不修改标准事务代码的情况下进行二次开发,以满足其独特的业务需求。在R3系统中,标准事务可能无法涵盖所有组织的具体操作流程,这时候就需要利用用户...
在SAP系统中,为了提高数据查询效率和用户体验,通常会使用到“帮助搜索”功能。然而,在实际操作过程中,用户可能会遇到某些特定需求未被满足的情况,比如需要查询的数据字段在标准搜索帮助中并未提供。此时,就...
在企业级软件开发中,尤其是针对SAP系统的定制化需求,**ABAP增强技术**是至关重要的一个环节。它为用户提供了一种灵活的方式,来扩展和定制SAP的标准应用程序,而无需直接修改SAP提供的源代码。这种方式不仅有助于...
在SAP系统中,增强是一种允许用户在不改变标准代码的基础上,对现有的应用程序进行修改或添加自定义逻辑的方法。通过增强,企业可以在不影响SAP标准支持的情况下,满足特定业务需求。SAP提供了多种类型的增强机制,...
例如,`Z_FOUND_BADI`可能是指这个程序的名字,而`Z_USEREXIT(V9)`则可能代表了一个具体的用户出口或者说是程序的版本号。此外,报告中还提到了一系列的选择文本,如`P_ALVALV`格式、权限检查搜索(`P_AUTH`)、显示...
本篇文章将详细探讨ABAP中的增强技术,包括透明表及结构的增强、字典文档的增强以及用户出口(User Exits)等内容。 #### 二、透明表及结构的增强 ##### 1. Append Structure - **定义**: Append Structure 是一种...