Tables:?MARA.
*在這里定義一個用于顯示的內部表
data:?begin?of?itab?occurs?
10
,
????????MATNR?like?MARA-MATNR
,
????????MTART?LIKE?MARA-MTART
,
????????MEINS?LIKE?MARA-MEINS
,
??????end?of?itab.
*
type-pools:?slis.
*定義一個顯示的內表的一行
DATA:?L_ALV_FILED??TYPE?SLIS_FIELDCAT_ALV.
*定義顯示的一列的框架
DATA:?L_ALV_FILEDCAT??TYPE?SLIS_T_FIELDCAT_ALV.
CLEAR?L_ALV_FILED.
*定義第一列的屬性
*定義顯示位置
,
顯示的字段.在下面傳遞內表中的名字一樣的值
*顯示標題名字
L_ALV_FILED-COL_POS?
=
?
1
.
L_ALV_FILED-FIELDNAME?
=
?'MATNR'.
L_ALV_FILED-seltext_M?
=
?'第一列'.
APPEND?L_ALV_FILED?TO?L_ALV_FILEDCAT.
L_ALV_FILED-COL_POS?
=
?
2
.
L_ALV_FILED-FIELDNAME?
=
?'MTART'.
L_ALV_FILED-seltext_M?
=
?'第二列'.
APPEND?L_ALV_FILED?TO?L_ALV_FILEDCAT.
L_ALV_FILED-COL_POS?
=
?
3
.
L_ALV_FILED-FIELDNAME?
=
?'MEINS'.
L_ALV_FILED-seltext_M?
=
?'第三列'.
APPEND?L_ALV_FILED?TO?L_ALV_FILEDCAT.
*輸出畫面
SELECT-OPTIONS:?P_MATNR?FOR?MARA-MATNR.
*查詢以下三個字段的數據
,
然后放入這個內表
SELECT?MATNR
???????MTART
???????MEINS
??INTO?CORRESPONDING?FIELDS?OF?TABLE?ITAB
??FROM?MARA
?WHERE?MATNR?IN?P_MATNR.
?APPEND?ITAB.
*然后調用以下的這個函數.然后
*?把定義的顯示框架和數據內表傳遞過去.
*?REUSE_ALV_LIST_DISPLAY
CALL?FUNCTION?'REUSE_ALV_GRID_DISPLAY'
????EXPORTING
???????IT_FIELDCAT?
=
?L_ALV_FILEDCAT
????Tables
???????t_outtab?
=
?ITAB.