posted @ 2023-05-25 23:57 Chris的博客 阅读(11) 评论(0) 推荐(0) 编辑
摘要:
DATA:ls_thead TYPE thead. CLEAR:ls_thead. ls_thead-tdid = 'Z006'. ls_thead-tdspras = sy-langu. ls_thead-tdname = <fs_alv>-vbeln. ls_thead-tdobject = ' 阅读全文
摘要:
DATA(LV_LINES) = REDUCE I( INIT X = 0 FOR LS_TEMP IN GT_ALV WHERE ( SEL = 'X' AND LIGHTS = '@08@') NEXT X = X + 1 ). IF LV_LINES = 0. MESSAGE '请选择要操作的 阅读全文
posted @ 2023-05-25 23:42 Chris的博客 阅读(7) 评论(0) 推荐(0) 编辑
摘要:
WHEN '&IC1'. "获取当前alv所在行数据 READ TABLE gt_data INTO gs_data INDEX rs_selfield-tabindex. IF sy-subrc = 0. SET PARAMETER ID: 'AUN' FIELD gs_data-vbeln. C 阅读全文
posted @ 2023-05-25 23:21 Chris的博客 阅读(7) 评论(0) 推荐(0) 编辑
摘要:
SELECTION-SCREEN BEGIN OF LINE. PARAMETERS : p_bukrs TYPE char4, p_belnr TYPE char10. SELECTION-SCREEN END OF LINE. SELECTION-SCREEN BEGIN OF BLOCK bk 阅读全文
posted @ 2023-05-25 23:17 Chris的博客 阅读(3) 评论(0) 推荐(0) 编辑
摘要:
***定义一个内表用于存储下拉框数据,该表含有两个字段,key 和text DATA: list TYPE vrm_values. *选择屏幕 PARAMETERS s_lsbox TYPE mara-matkl AS LISTBOX VISIBLE LENGTH 10 DEFAULT ' '. * 阅读全文
posted @ 2023-05-25 23:16 Chris的博客 阅读(6) 评论(0) 推荐(0) 编辑