SAP Enhancement系列：Customer Exit

需求说明：

        检查供应商的地址里的街道（Street）字段是否超长（最长20个字符）。

 

 

输入一些必输字段，进入debug模式。

在debug模式里，设置动态断点 “call customer-function”.

点击F8，直接停在call customer-function语句上。

 

  点击program 按钮，进入当前程序。

双击“001”，进入exit function module.

点击功能模块文档，了解功能说明和注意事项。

双击以‘Z‘开头的include，点回车创建include程序。

 

 

在Include ‘ZXSZARU01’添加如下代码，并激活。

 

IF sy-uname = '你的用户名'.   BREAK-POINT.   DATA: l_error TYPE addr_error.   IF x_dialog_allowed IS NOT INITIAL.     IF STRLEN( x_adrc_struc-street ) > 20.       y_retcode = 'E'.       l_error-msg_id = 'Z1'.       l_error-msg_type = 'E'.       l_error-msg_number = 201.       l_error-tablename = 'ADDR1_DATA'.       l_error-fieldname = 'STREET'.       APPEND l_error TO error_table.

    ELSE.       y_adrc_struc = x_adrc_struc.     ENDIF.   ENDIF. ENDIF.

进入事务‘CMOD’， 创建一个Project。

添加描述。

 

   

进入事务‘SMOD‘，查找Enhancement。

在‘Component name‘输入exit FM名字‘EXIT_SAPLSZAR_001’。

在‘CMOD’中输入找到的Enhancement Name。

保存Project ‘ZGMX_Ven’.

激活Project ‘ZGMX_Ven’.

 

测试：再次运行事务‘MK01’， 在street字段里输入21个字符，显示系统提示。