廢話不多說，直接上傻瓜代碼。歸根結底，就是要將顯示的字段一行一行的放入fieldcat的表里。

"定義ALV數據變量 DATA:IT_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV,WA_FIELDCAT TYPE SLIS_FIELDCAT_ALV,WA_LAYOUT TYPE SLIS_LAYOUT_ALV. "定義ALV結構字段，使用宏的方式 DATA: POS TYPE I. DEFINE ADD1.CLEAR wa_fieldcat.ADD 1 TO POS.WA_FIELDCAT-FIELDNAME = &1. "字段名稱WA_FIELDCAT-TABNAME = &2. "字段所在的表WA_FIELDCAT-SELTEXT_M = &3."字段描述APPEND WA_FIELDCAT TO IT_FIELDCAT. END-OF-DEFINITION. "透明表取數 SELECT AUFNR, AUART, ERNAM INTO TABLE @DATA(AUFK_TAB) FROM AUFK UP TO 10 ROWS. CLEAR:WA_FIELDCAT,IT_FIELDCAT,WA_LAYOUT. "增加顯示字段 ADD1 'AUFNR' 'AUFK_TAB' '銷售訂單'. ADD1 'AUART' 'AUFK_TAB' '銷售類型'. ADD1 'ERNAM' 'AUFK_TAB' '創建者'. "ALV格式控制 WA_LAYOUT-ZEBRA = 'X'. "呈現顏色交替 WA_LAYOUT-COLWIDTH_OPTIMIZE = 'X'. "優化列寬選項是否設置 "調用ALV顯示函數 CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'EXPORTINGI_CALLBACK_PROGRAM = SY-REPIDIS_LAYOUT = WA_LAYOUTIT_FIELDCAT = IT_FIELDCATTABLEST_OUTTAB = AUFK_TABEXCEPTIONSPROGRAM_ERROR = 1OTHERS = 2. IF SY-SUBRC <> 0. ENDIF.

顯示效果：

?

?

其中宏的一部分也可變成慢慢的將工作區加入進fieldcat表，見下一篇例子。

轉載于:https://www.cnblogs.com/BruceKing/p/11024526.html

總結

以上是生活随笔為你收集整理的简单的ALV显示例子的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。