在REUSE_ALV_GRID_DISPLAY上不存在选择行

2020-08-26 05:11发布

点击此处---> 群内免费提供SAP练习系统(在群公告中)加入QQ群:457200227(SAP S4 HANA技术交流) 群内免费提供SAP练习系统(在群公告中)嗨,请问当我使用REUSE_AL...

         点击此处--->   EasySAP.com群内免费提供SAP练习系统(在群公告中)

加入QQ群:457200227(SAP S4 HANA技术交流) 群内免费提供SAP练习系统(在群公告中)


嗨,请问当我使用REUSE_ALV_GRID_DISPLAY函数时,我在显示表上找不到选择行,

这是我的脚本:

TYPES:ty_002的开头,ydt_bd002-in_pegawai的类型中的
,d d中的
*,
kp ydt_bd002-kode_pegawai的类型,
np ydt_bd002-nama_pegawai的类型, END 。
DATA:带有标题行的ty_002的it_table类型表,
lt_fcat类型slis_t_fieldcat_alv,
wa_fcat像lt_fcat的行,
lt_lay类型slis_layout_alv。 选择开始。
PERFORM获取数据。
PERFORM alv_build_fieldcat。
PERFORM alv_report_layout。
PERFORM alv_grid_display。 *&------------------------------------------------ --------------------- *
*&表格GET_DATA
*&---------------- -------------------------------------------------- --- *
*文字
* ------------------------------------- --------------------------------- *
FORM get_data。
刷新:it_table。
从ydt_bd002 SELECT in_pegawai kode_pegawai nama_pegawai插入表it_table。
ENDFORM。 " GET_DATA *&---------------------------------------------- ----------------------- *
*&表格ALV_BUILD_FIELDCAT
*&-------------- -------------------------------------------------- ----- *
*文字
* ----------------------------------- ----------------------------------- *
FORM alv_build_fieldcat。清除wa_fcat。
wa_fcat-
wa_fcat-tabname ='IT_TABLE'。
wa_fcat-seltext_m ='KEHADIRAN'。
wa_fcat-just ='C'。
将wa_fcat附加到lt_fcat。清除wa_fcat。
wa_fcat-fieldname ='KP'。
wa_fcat-tabname ='IT_TABLE'。
wa_fcat-seltext_m ='KODE PEGAWAI'。
wa_fcat-just ='C'。
APPEND wa_fcat TO lt_fcat。清除wa_fcat。
wa_fcat-fieldname ='NP'。
wa_fcat-tabname ='IT_TABLE'。
wa_fcat-seltext_m ='NAMA PEGAWAI'。
wa_fcat-just ='C' 。
APPEND wa_fcat TO lt_fcat。ENDFORM。" ALV_BUILD_FIELDCAT *&----------------------------------- ---------------------------------- *
*&表格ALV_REPORT_LAYOUT
*&--- --------------------------------------- --------------------------- *
*文字
* ------------- -------------------------------------------------- ------- *
FORM alv_report_layout。
lt_lay-box_fieldname ='SEL'。
"设置字段名称以存储行选择
lt_lay-edit ='X'。 "使整个ALV表可编辑
lt_lay-zebra ='X'。
ENDFORM。" ALV_REPORT_LAYOUT *&------------------------ --------------------------------------------- *
* &表格ALV_GRID_DISPLAY
*&------------------------------------------ --------------------------- *
*文字
* ------------- -------------------------------------------------- ------- *
FORM alv_grid_display。 呼叫功能'REUSE_ALV_GRID_DISPLAY'
导出
* I_INTERFACE_CHECK =''
* I_BYPASSING_BUFFER =''
* I_BUFFER_ACTIVE =''
I_CALLBACK_PROGRAM = SY-REPID_ I_CALLBACK_USER_COMMAND ='UCOMM'
* I_CALLBACK_TOP_OF_PAGE =''
* I_CALLBACK_HTML_TOP_OF_PAGE =''
* I_CALLBACK_HTML_END_OF_LIST =''
* I_STRUCTURE_NAME ='br ID =
* I_GRID_SETTINGS =
* IS_LAYOUT =
IT_FIELDCAT = LT_FCAT
* IT_EXCLUDING =
* IT_SPECIAL_GROUPS =
* IT_SORT =
* IT_FILTER =
* IS_SEL_HIDE = < br> * I_DEFAULT ='X'
I_SAVE ='X'
* IS_VARIANT =
* IT_EVENTS =
* IT_EVENT_EXIT =
* IS_PRINT =
* IS_REPREP_ID =
* I_SCREEN_START_COLUMN = 0
* I_SCREEN_START_LINE = 0
* I_SCREEN_END_COLUMN = 0
* I_SCREEN_END_LINE = 0
* I_HTML_HEIGHT_TOP = 0
* I_HTML_HEIGHT_END = 0
* IT_HV_GRAPH
* IT_ADD_FIELDCAT =
* IT_EXCEPT_QINFO =
* IR_SALV _FULLSCREEN_ADAPTER =
*导入
* E_EXIT_CAUSED_BY_CALLER =
* ES_EXIT_CAUSED_BY_USER =
表格
t_outtab = IT_TABLE
* EXCEPTIONS
*程序错误= 1
*其他 >。
IF SY-SUBRC <> 0.
*在此处实施适当的错误处理
ENDIF。 ENDFORM。 "使用RT_EXTAB类型SLIS_T_EXTAB的ALV_GRID_DISPLAY表单MY_STATUS。
SET PF-STATUS'STANDARD'。
ENDFORM。使用P_UCOM SY-UCOMM
PS_SELFIELD类型SLIS_SELFIELD形式的UCOMM形式。
数据:A。CALL。 POPUP_TO_CONFIRM'
导出
TITLEBAR ='请确认'
text_question ='确认出席?'
DISPLAY_CANCEL_BUTTON ='X'
导入
答案= a
例外
> TEXT_NOT_FOUND = 1
其他=2。如果A ='1'。
UPDATE ydt_bd002设置in_pegawai = sy-datum。
消息'HADIR'类型'S'。
刷新IT_TABLE。
> ELSEIF A ='2'。
UPDATE ydt_bd002设置in_pegawai = 0。
消息'TIDAK HADIR'类型'W'。ENDIF。
ps_selfield-refresh = abap_true。
ENDFORM。

(10.0 kB)