日韩性视频-久久久蜜桃-www中文字幕-在线中文字幕av-亚洲欧美一区二区三区四区-撸久久-香蕉视频一区-久久无码精品丰满人妻-国产高潮av-激情福利社-日韩av网址大全-国产精品久久999-日本五十路在线-性欧美在线-久久99精品波多结衣一区-男女午夜免费视频-黑人极品ⅴideos精品欧美棵-人人妻人人澡人人爽精品欧美一区-日韩一区在线看-欧美a级在线免费观看

歡迎訪問 生活随笔!

生活随笔

當前位置: 首頁 > 编程资源 > 编程问答 >内容正文

编程问答

ABAP开发如何动态的实现任意表的ALV显示

發布時間:2025/3/20 编程问答 15 豆豆
生活随笔 收集整理的這篇文章主要介紹了 ABAP开发如何动态的实现任意表的ALV显示 小編覺得挺不錯的,現在分享給大家,幫大家做個參考.

ABAP開發中如何動態的實現任意表的ALV的顯示,以下是具體操作步驟:

第一部分:程序框架

REPORT??ZALV_20090304_EVENT.

INCLUDE?ZALV_DATA_INTI.

INCLUDE?ZALV_EVENT_F01.

START-OF-SELECTION.

PERFORM?SUB_ALV_DATA_GET.

?

第二部分:INCLUDE?ZALV_DATA_INTI.

??TYPE-POOLS:ABAP.

PARAMETERS?P_NAME?TYPE?OBJNAME.

DATA?LT_TABLE?TYPE?TABLE?OF?DFIES.

DATA?LS_TABLE?TYPE?DFIES.

CALL?FUNCTION?'DDIF_NAMETAB_GET'

??EXPORTING

????TABNAME???????????=?P_NAME

TABLES

*???X031L_TAB?????????=

???DFIES_TAB?????????=?LT_TABLE

EXCEPTIONS

???NOT_FOUND?????????=?1

???OTHERS????????????=?2

??????????.

IF?SY-SUBRC?<>?0.

??MESSAGE?ID?SY-MSGID?TYPE?SY-MSGTY?NUMBER?SY-MSGNO

??????????WITH?SY-MSGV1?SY-MSGV2?SY-MSGV3?SY-MSGV4.

ENDIF.

DATA?LR_STRUC?TYPE?REF?TO?CL_ABAP_STRUCTDESCR.

DATA?LR_TABLE?TYPE?REF?TO?CL_ABAP_TABLEDESCR.

DATA?LR_TYPE?TYPE?REF?TO?CL_ABAP_TYPEDESCR.

DATA?LR_DATA??TYPE?REF?TO?CL_ABAP_DATADESCR.

DATA?L_STRING?TYPE?STRING.

DATA?LT_COMP?TYPE??ABAP_COMPONENT_TAB.

DATA?LS_COMP?LIKE?LINE?OF??LT_COMP.

DATA?E_WA?TYPE?REF?TO?DATA.

DATA?E_TABLE?TYPE?REF?TO?DATA.

FIELD-SYMBOLS?TYPE?STANDARD?TABLE.

FIELD-SYMBOLS?TYPE?ANY.

LOOP?AT?LT_TABLE?INTO?LS_TABLE.

??CONCATENATE?LS_TABLE-TABNAME?'-'?LS_TABLE-FIELDNAME?INTO?L_STRING.

*??L_STRING?=?LS_COMP-NAME.

??LS_COMP-NAME?=?LS_TABLE-FIELDNAME.

??CALL?METHOD?CL_ABAP_DATADESCR=>DESCRIBE_BY_NAME

????EXPORTING

??????P_NAME?????????=?L_STRING

????RECEIVING

??????P_DESCR_REF????=?LR_TYPE

????EXCEPTIONS

??????TYPE_NOT_FOUND?=?1

??????OTHERS?????????=?2.

??IF?SY-SUBRC?<>?0.

????MESSAGE?ID?SY-MSGID?TYPE?SY-MSGTY?NUMBER?SY-MSGNO

???????????????WITH?SY-MSGV1?SY-MSGV2?SY-MSGV3?SY-MSGV4.

??ENDIF.

??LS_COMP-TYPE??=?LR_TYPE.

??APPEND?LS_COMP?TO?LT_COMP.

??CLEAR?LS_COMP.

ENDLOOP.

CALL?METHOD?CL_ABAP_STRUCTDESCR=>CREATE

??EXPORTING

????P_COMPONENTS?=?LT_COMP

??RECEIVING

????P_RESULT?????=?LR_STRUC

????.

CALL?METHOD?CL_ABAP_TABLEDESCR=>CREATE

??EXPORTING

????P_LINE_TYPE??=?LR_STRUC

??RECEIVING

????P_RESULT?????=?LR_TABLE

????.

CREATE?DATA?E_WA????TYPE?HANDLE?LR_STRUC.

CREATE?DATA?E_TABLE?TYPE?HANDLE?LR_TABLE.

ASSIGN?E_WA->*?TO?.

ASSIGN?E_TABLE->*?TO?.

?????第三部分:INCLUDE?ZALV_EVENT_F01.

??FORM?SUB_ALV_DATA_GET?.

SELECT?*?INTO?CORRESPONDING?FIELDS?OF?TABLE?FROM?(P_NAME).

???CALL?FUNCTION?'REUSE_ALV_GRID_DISPLAY'

??????EXPORTING

????????I_STRUCTURE_NAME??????????????????=?P_NAME

???????TABLES

?????????T_OUTTAB??????????????????????????=

??????EXCEPTIONS

????????PROGRAM_ERROR?????????????????????=?1

????????OTHERS????????????????????????????=?2

???????????????.

?????IF?SY-SUBRC?<>?0.

MESSAGE?ID?SY-MSGID?TYPE?SY-MSGTY?NUMBER?SY-MSGNO

?????????WITH?SY-MSGV1?SY-MSGV2?SY-MSGV3?SY-MSGV4.

?????ENDIF.

ENDFORM.????????????????????"?SUB_ALV_DATA_GET

總結

以上是生活随笔為你收集整理的ABAP开发如何动态的实现任意表的ALV显示的全部內容,希望文章能夠幫你解決所遇到的問題。

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