自定義FIELDCAT參數控制ALV輸出


  除了可以用REUSE_ALV_FIELDCATALOG_MERGE函數來獲取FIELDCAT之外,還可以自定義FIELDCAT參數,不過這種方式需要自定義字段名稱。

  REPORT  ZZWEI_ALV_DEMO.
  TYPE-POOLS:SLIS."引用類型池
  TABLES:SPFLI.
  DATA:fieldCat TYPE SLIS_T_FIELDCAT_ALV WITH HEADER LINE,
        layout TYPE SLIS_LAYOUT_ALV,
        w_repid LIKE SY-REPID.

  DATA:lspfli LIKE STANDARD TABLE OF SPFLI WITH HEADER LINE.

  *屏幕開始事件
  START-OF-SELECTION.
    PERFORM GETDATA.
    PERFORM CATALOG.
    PERFORM ALVSHOW.

  FORM GETDATA.
    SELECT FROM SPFLI INTO CORRESPONDING FIELDS OF TABLE lspfli.
  ENDFORM.
  

  FORM CATALOG.
      w_repid = SY-REPID.
      CLEAR fieldCat.

    "定義宏來設置FIELDAT屬性 &1 &2 &3分別為參數
    DEFINE fieldcatset.
      fieldCat-REF_TABNAME ='LSPFLI'.
      fieldCat-FIELDNAME = &1.
      fieldCat-SELTEXT_L = &2.
      fieldCat-COL_POS = &3.
      APPEND fieldCat.
    END-OF-DEFINITION.

    fieldcatset 'CARRID' '航線承運人' SY-TABIX.
    fieldcatset 'CONNID' '航班數量' SY-TABIX.
    fieldcatset 'COUNTRYFR' '起飛國家' SY-TABIX.
    fieldcatset 'CITYFROM' '起飛城市' SY-TABIX.
    fieldcatset 'AIRPFROM' '部門機場' SY-TABIX.
    fieldcatset 'COUNTRYTO' '目的國家' SY-TABIX.
    fieldcatset 'AIRPTO' '目的機場' SY-TABIX.
    fieldcatset 'FLTIME' '航班時間' SY-TABIX.
    fieldcatset 'DEPTIME' '離開' SY-TABIX.
    fieldcatset 'ARRTIME' '到達時間' SY-TABIX.
    fieldcatset 'DISTANCE' '距離' SY-TABIX.
    fieldcatset 'DISTID' '位於' SY-TABIX.
    fieldcatset 'FLTYPE' '圖解' SY-TABIX.
    fieldcatset 'PERIOD' '周期' SY-TABIX.

    layout-COLWIDTH_OPTIMIZE = 'x'"設置LAYOUT輸出格式最優化

  ENDFORM.

  

  FORM ALVSHOW.
    CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
      EXPORTING
        I_CALLBACK_PROGRAM = w_repid
        "I_SAVE = ''
        IS_LAYOUT = layout
        I_GRID_TITLE = 'AlV DEMO'
        IT_FIELDCAT = fieldCat[]
      TABLES
        T_OUTTAB = lspfli
      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.

  運行界面如下:
  


免責聲明!

本站轉載的文章為個人學習借鑒使用,本站對版權不負任何法律責任。如果侵犯了您的隱私權益,請聯系本站郵箱yoyou2525@163.com刪除。



 
粵ICP備18138465號   © 2018-2025 CODEPRJ.COM