Today we learn enhancement for BTE SAMPLE_INTERFACE_00001650.
Tcode:FBL1N_FBL3N_FBL5N
Add detail customer fields to line item .
Result is like this.
Steps:科目行项目明细个性化字段增加. Below is Sample code:
Step1:SE11 创建结构ZFI_TEXT
字段：KKTEXT,NKTEXT。
Step：2，SE38，run程序RFPOSXEXTEND
该步目的是激活拓展的结构。RFPOSX, T021S, RFPOSXEXT
Step3:Tcode：FIBF 维护业务框架
进入环境-》信息系统。
执行，并选中函数事件 00001650，
选中事件1650“行项目显示：每行增加数据”，执行“样本函数模块”，进入函数创建窗口，
实现函数（建议将该函数Copy一份实现）
FUNCTION SAMPLE_INTERFACE_00001650.
*”———————————————————————-
*”*”Lokale Schnittstelle:
*” IMPORTING
*” VALUE(I_POSTAB) LIKE RFPOS STRUCTURE RFPOS
*” EXPORTING
*” VALUE(E_POSTAB) LIKE RFPOS STRUCTURE RFPOS
*”———————————————————————-
*————– Initialize Output by using the following line ———-
* E_POSTAB = I_POSTAB.
“””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””$”$\SE:(1) Function Module SAMPLE_INTERFACE_00001650, End A
*$*$-Start: (1)———————————————————————————$*$*
ENHANCEMENT 1 ZFI_FBL3N. “active version
DATA:
l_KTEXT(20) TYPE c,
l_kokrs TYPE TKA02-KOKRS .
e_postab = i_postab .
*获取成本中心字段描述
CLEAR l_kokrs .
SELECT SINGLE kokrs
INTO l_kokrs
FROM TKA02
WHERE bukrs = e_postab-bukrs .
* and GSBER = wa_bseg-GSBER.
IF e_postab-KOSTL <> ”.
CLEAR: l_KTEXT.
SELECT SINGLE KTEXT
FROM CSKT
INTO l_KTEXT
WHERE SPRAS = sy-langu
and KOKRS = l_kokrs
and KOSTL = e_postab-KOSTL
and DATBI >= e_postab-budat.
IF l_KTEXT IS NOT INITIAL.
e_postab-kKTEXT = l_KTEXT.
ENDIF.
endif.
*获取成本中心字段描述
IF e_postab-AUFNR is NOT INITIAL.
CLEAR l_KTEXT.
SELECT SINGLE KTEXT
FROM aufk
INTO l_KTEXT
WHERE aufnr = e_postab-AUFNR.
IF l_KTEXT is NOT INITIAL.
e_postab-nktext = l_KTEXT .
ENDIF.
ENDIF.
i_postab = e_postab .
ENDENHANCEMENT.
*$*$-End: (1)———————————————————————————$*$*
ENDFUNCTION.
Step4:创建客户化事件实现对函数的关联响应
新开窗口，Tcode：FIBF
【设置】–》【产品】–》【一个客户的】
新增条目ZFI_TEXT，注意：将A的勾打上表示激活。
Step5:FIBF.
保存后创建函数模块，实现事件与函数之间的关联。
【设置】==》【P/S函数模块】-》【一个客户的】
| 字段含义说明： |
| 事件——定制化事件编号00001650 |
| 产品——业务交易事件产品名ZFI_TEXT |
| 函数模块——定制化事件样本函数模块SAMPLE_INTERFACE_00001650 |
我的微信公众号【 hot583 】 或者在这个链接联系我
本文链接 ： http://www.hot583.com/2022/07/05/sample_interface_00001650/
本文为作者原创，如果这篇文章对您有用，欢迎转载，
转载请务必注明来源《今日热点在看》http://www.hot583.com/
微信原文《全文完》
