需求
因为涉及系统之间的家伙但传输,方便业务查看该交货单是否已经发送,因此再交货单的抬头页面进行增强,给出一个是否发送的字段显示。如下:
业务加载项 LE_SHP_TAB_CUST_HEAD
se19创建业务加载项
一共有四个方法,我们这边只用到前三个即可
ACTIVATE_TAB_PAGE
新增页签,填入创建的选择屏幕
ef_caption = '增强字段'. " 页签名称
ef_program = 'SAPLZSD_DELIVERY'. " 项目名称 SAPL+函数组
ef_dynpro = '9001'. " 屏幕号
TRANSFER_DATA_TO_SUBSCREEN
将数据写入屏幕
CALL FUNCTION 'Z_TRANSFER_DATA_TO_SUBSCREEN' " 函数组 ZSD_DELIVERY 下的方法
EXPORTING
is_likp = is_likp
trtyp = if_trtyp.
TRANSFER_DATA_FROM_SUBSCREEN
将屏幕中的数据保存至表中
CALL FUNCTION 'Z_TRANSFER_SUBSCREEN_TO_DATA' " 函数组 ZSD_DELIVERY 下的方法
IMPORTING
zsend = cs_likp-zsend.
自建函数组ZSD_DELIVERY
屏幕
右击创建屏幕并进行布局编辑
逻辑流
对不同的事务进行不同的处理,有的可编辑 有的只是显示
MODULE screen_9001 OUTPUT.
LOOP AT SCREEN.
IF g_trtyp = 'A'.
screen-input = 0. " 只显示
ELSE.
screen-input = 1. " 可编辑
ENDIF.
MODIFY SCREEN.
ENDLOOP.
ENDMODULE.
g_trtyp的类型可以在t180表里进行查看
z_transfer_data_to_subscreen
数据写入屏幕
z_transfer_subscreen_to_data
屏幕回填数据
附加结构
增强屏幕中的字段也是我们自定义的,因此在对应的likp表中还需要新增附加结构
标签:客制化,DATA,likp,SUBSCREEN,交货单,屏幕,SAP,trtyp From: https://www.cnblogs.com/pnj-owowa/p/16891544.html