ALV簡單的應(yīng)用
Tables:?MARA.
*在這里定義一個用于顯示的內(nèi)部表
data:?begin?of?itab?occurs? 10 ,
????????MATNR?like?MARA-MATNR ,
????????MTART?LIKE?MARA-MTART ,
????????MEINS?LIKE?MARA-MEINS ,
??????end?of?itab.
*
type-pools:?slis.
*定義一個顯示的內(nèi)表的一行
DATA:?L_ALV_FILED??TYPE?SLIS_FIELDCAT_ALV.
*定義顯示的一列的框架
DATA:?L_ALV_FILEDCAT??TYPE?SLIS_T_FIELDCAT_ALV.
CLEAR?L_ALV_FILED.
*定義第一列的屬性
*定義顯示位置 , 顯示的字段.在下面?zhèn)鬟f內(nèi)表中的名字一樣的值
*顯示標(biāo)題名字
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.
*查詢以下三個字段的數(shù)據(jù) , 然后放入這個內(nèi)表
SELECT?MATNR
???????MTART
???????MEINS
??INTO?CORRESPONDING?FIELDS?OF?TABLE?ITAB
??FROM?MARA
?WHERE?MATNR?IN?P_MATNR.
?APPEND?ITAB.
*然后調(diào)用以下的這個函數(shù).然后
*?把定義的顯示框架和數(shù)據(jù)內(nèi)表傳遞過去.
*?REUSE_ALV_LIST_DISPLAY
CALL?FUNCTION?'REUSE_ALV_GRID_DISPLAY'
????EXPORTING
???????IT_FIELDCAT? = ?L_ALV_FILEDCAT
????Tables
???????t_outtab? = ?ITAB.
*在這里定義一個用于顯示的內(nèi)部表
data:?begin?of?itab?occurs? 10 ,
????????MATNR?like?MARA-MATNR ,
????????MTART?LIKE?MARA-MTART ,
????????MEINS?LIKE?MARA-MEINS ,
??????end?of?itab.
*
type-pools:?slis.
*定義一個顯示的內(nèi)表的一行
DATA:?L_ALV_FILED??TYPE?SLIS_FIELDCAT_ALV.
*定義顯示的一列的框架
DATA:?L_ALV_FILEDCAT??TYPE?SLIS_T_FIELDCAT_ALV.
CLEAR?L_ALV_FILED.
*定義第一列的屬性
*定義顯示位置 , 顯示的字段.在下面?zhèn)鬟f內(nèi)表中的名字一樣的值
*顯示標(biāo)題名字
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.
*查詢以下三個字段的數(shù)據(jù) , 然后放入這個內(nèi)表
SELECT?MATNR
???????MTART
???????MEINS
??INTO?CORRESPONDING?FIELDS?OF?TABLE?ITAB
??FROM?MARA
?WHERE?MATNR?IN?P_MATNR.
?APPEND?ITAB.
*然后調(diào)用以下的這個函數(shù).然后
*?把定義的顯示框架和數(shù)據(jù)內(nèi)表傳遞過去.
*?REUSE_ALV_LIST_DISPLAY
CALL?FUNCTION?'REUSE_ALV_GRID_DISPLAY'
????EXPORTING
???????IT_FIELDCAT? = ?L_ALV_FILEDCAT
????Tables
???????t_outtab? = ?ITAB.
posted on 2006-12-18 10:47 瘋流成性 閱讀(518) 評論(0) 編輯 收藏 所屬分類: SAP - > ABAP