ALV设计模板

 

文章引用自： http://blog.sina.com.cn/wangxuexuan

************************************************************************

*程序公用变量定义

************************************************************************

TYPE-POOLS:  SLIS[A1] .

 

DATA: ITAB_LTABLE TYPE TABLE OF TYP_LTABLE.

DATA: WA_LTABLE TYPE TYP_LTABLE.

[A2] DATA: LWS_FIELDCAT TYPE SLIS_FIELDCAT_ALV.

DATA: LT_FIELDCAT  TYPE SLIS_T_FIELDCAT_ALV.

*&---------------------------------------------------------------------*

*&                 FRM_PREPARE_LIST

*&                 设置ALV显示结构

*&---------------------------------------------------------------------*

FORM FRM_PREPARE_LIST .

 

  LWS_FIELDCAT-FIELDNAME = 'NUMBE'.

  LWS_FIELDCAT-REPTEXT_DDIC = '序号'.

  LWS_FIELDCAT-OUTPUTLEN = 7.

  APPEND LWS_FIELDCAT TO LT_FIELDCAT.

  …………

  LWS_FIELDCAT-FIELDNAME = 'MEINS[A3] '.

  LWS_FIELDCAT-REPTEXT_DDIC = '单位[A4] '.

  LWS_FIELDCAT-OUTPUTLEN = 4.

  APPEND LWS_FIELDCAT TO LT_FIELDCAT.

 

ENDFORM.                    "FRM_PREPARE_LIST

 

*&---------------------------------------------------------------------*

*&                 FRM_OUTPUT

*&                 用ALV输出

*&---------------------------------------------------------------------*

FORM FRM_OUTPUT.

 

  CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'

    EXPORTING

      IT_FIELDCAT   = LT_FIELDCAT[A5] 

    TABLES

      T_OUTTAB      = ITAB_LTABLE[A6] 

    EXCEPTIONS

      PROGRAM_ERROR = 1

      OTHERS        = 2.

[A7] 

ENDFORM.                    "OUTPUT

---

 [A1]定义

 [A2]程序数据工作空间(a structure and a internaltable

 [A3]工作空间（internaltable）中的数据栏

 [A4]栏位在alv中的抬头显示

 [A5]就是FRM_PREPARE_LIST所做的结果（alv显示显示结构）

 [A6]Alv显示数据

 [A7]异常捕获