본문 바로가기

SAP

FIELD CATALOG MACRO

  DEFINE __fieldcat.
    IF &1 IS NOT INITIAL.   " & = 넣어줄 수 있는 값
      gs_fcat-col_pos = &1.
    ENDIF.

    IF &2 IS NOT INITIAL.
      gs_fcat-edit = &2.
    ENDIF.

    IF &3 IS NOT INITIAL.
      gs_fcat-coltext
      = gs_fcat-tooltip
      = gs_fcat-seltext
      = gs_fcat-scrtext_m
      = &3.
    ENDIF.

    IF &4 IS NOT INITIAL.
      gs_fcat-hotspot = &4.
    ENDIF.

    IF &5 IS NOT INITIAL.
      gs_fcat-just = &5.
    ENDIF.

    IF &6 IS NOT INITIAL.
      gs_fcat-cfieldname = &6.  " 통화참조
    ENDIF.

    IF &7 IS NOT INITIAL.
      gs_fcat-qfieldname = &7.  " 단위참조
    ENDIF.

    IF &8 IS NOT INITIAL.
      gs_fcat-key = &8.
    ENDIF.

    IF &9 IS NOT INITIAL.
      gs_fcat-checkbox = &9.
    ENDIF.
    
END-OF-DEFINITION.
  LOOP AT gt_fcat INTO gs_fcat.
    CASE gs_fcat-fieldname.     " 선언한 FIELD NAME 입력
      WHEN 'MATNR'.
         __fieldcat : '1' '' TEXT-f01 'X' '' '' '' '' ''.
      WHEN 'MAKTX'.
         __fieldcat : '2' '' TEXT-f02 '' '' '' '' '' ''.
      WHEN 'ERSDA'.
         __fieldcat : '3' '' TEXT-f03 '' '' '' '' '' ''.
      WHEN 'LAEDA'.
         __fieldcat : '4' '' TEXT-f04 '' '' '' '' '' ''.
      WHEN 'MTART'.
         __fieldcat : '5' '' TEXT-f05 '' '' '' '' '' ''.
      WHEN 'MBRSH'.
         __fieldcat : '6' '' TEXT-f06 '' '' '' '' '' ''.
      WHEN 'MATKL'.
         __fieldcat : '7' '' TEXT-f07 '' '' '' '' '' ''.
      WHEN 'MEINS'.
         __fieldcat : '8' '' TEXT-f08 '' '' '' '' '' ''.
      WHEN OTHERS.
         gs_fcat-no_out = 'X'.
    ENDCASE.

    MODIFY gt_fcat FROM gs_fcat.
    CLEAR: gs_fcat.

  ENDLOOP.
반응형

'SAP' 카테고리의 다른 글

GET_DOMAIN_VALUES  (0) 2025.02.27
GET_SELECTED_ROWS  (0) 2025.02.27
RADIO BUTTON 동적 설정  (0) 2025.02.27
SELECT-OPTIONS MACRO  (0) 2025.02.27
ALV TOOLBAR 삭제  (0) 2025.02.27