SAP Enhancement POINT和Enhancement SECTION

一个EN-SPOTS 可以有多个EN-POINT和多个EN-SECTION。

SAP的隐式增强 就是一个Enhancement point, 一个Enhancement point只有实施后才有效。

Enhancement section 直接插入代码，不需实施

1: 在编辑状态下，不要打开增强模式，回车换行，不要在最后一行。

在下面PATH下：EDIT->EnhancementOperations-->CreateOptions

建立一个Enhancement SPOT 和

一个Enhancement point或

Enhancement SECTION.

Enhancement SECTION.

不需要实施， 在增加了ENHANCEMENT SECTION后，回到SE38编辑器中

可直接插入代码。

Enhancement point .

需要实施，需要打开增强模式，进行增强实施。

2: 对Enhancement point进行实施

打开增强模式 ，CLICK下面按钮，

3：把光标放到要实施的Enhancement point上。

然后转到：EDIT->EnhancementOperations-->CreateImplementation

输入：实施名称和描述

完成后，输入你想加入的代码。

*&---------------------------------------------------------------------*

*&ReportYTESTENHANCE

*&

*&---------------------------------------------------------------------*

*&

*&

*&---------------------------------------------------------------------*

REPORTYTESTENHANCE.

TABLES:T001L.

WRITE:/'TESTEnhancementSpot'.

WRITE:/.

WRITE:/.

WRITE:/'Create:EnhancementSPOT:ZES_SPOT_001'.

WRITE:/'Create:EnhancementPOINT:ZEP_POINT_001'.

WRITE:/'Donotswitchenhancementmode,DirectlyClick:EDIT->EnhancementOperations-->CreateOptions'.

WRITE:/.

WRITE:/SY-ULINE.

ENHANCEMENT-POINTZEP_POINT_001SPOTSZES_SPOT_001.

*$*$-Start:ZEP_POINT_001-----------------------------------------------------------------------$*$*

ENHANCEMENT1ZIM_ZEP_POINT_002."activeversion

WRITE:/5'ZEP_POINT_001->ZIM_ZEP_POINT_002codeinsertbegin'.

WRITE:/8'ThisistestforEnhancement-point'.

WRITE:/8'Switchtoenhancementmodefirst,Thenputcursoronthepointyouwanttoenhance'.

WRITE:/8'CreateImplementtionViaEDIT->EnhancementOperations-->CreateImplementation'.

WRITE:/5'ZEP_POINT_001->ZIM_ZEP_POINT_002codeinsertend'.

ENDENHANCEMENT.

*$*$-End:ZEP_POINT_001-----------------------------------------------------------------------$*$*

WRITE:/.

WRITE:/SY-ULINE.

WRITE:/'CreateEnhancementPOINT:ZEP_POINT_002'.

WRITE:/'Path:EDIT->EnhancementOperations-->CreateOptions'.

ENHANCEMENT-POINTZEP_POINT_002SPOTSZES_SPOT_001.

WRITE:/.

WRITE:/SY-ULINE.

WRITE:/'CreateEnhancementsection:ZES_SECTION_001'.

ENHANCEMENT-SECTIONZES_SECTON_001SPOTSZES_SPOT_001.

WRITE:/5'ENHANCEMENT-SECTIONcodeinsertbegin'.

WRITE:/8'ThisistestforEnhancement-section'.

WRITE:/8'Enhancement-section,Insertcodedirectly,Notneedtoswitchtoenhancementmode'.

WRITE:/5'ENHANCEMENT-SECTIONcodeinsertend'.

END-ENHANCEMENT-SECTION.

WRITE:/.

WRITE:/SY-ULINE.

WRITE:/'TESTEND'.