<ABAP> Mainternance View에 Event 넣기(유지보수뷰)

T-code : se54

해당 뷰에 대한 특수한 Event를 넣어볼 예정

원래는 아무것도 없었는데 내가 만들어준 것이다.
수정모드로 들어간 후에 저렇게 만들어 주면 되는데..

가장 앞쪽의 03번은.. 이 리스트를 Help로 볼 수 있어서... 선택이 쉽다.
03번이면 삭제에 대한 이벤트를 준 것이다.

프로그램 form 문 안에 아래와 같은 소스를 넣었다.

*----------------------------------------------------------------------*
***INCLUDE LZOF00002F02 .
*----------------------------------------------------------------------*
FORM check_assigned_hscode.

  DATA : lv_matnr LIKE marc-matnr,
             lv_stawn LIKE marc-stawn.
  LOOP AT extract.      <- Extract 는 View들의 리스트 전체의 값들이다.
    CHECK <xmark> EQ markiert.      "SELECTED LINE
    CLEAR : lv_matnr, lv_stawn.
    lv_matnr = <vim_extract_key>+3(18).  <- 여기 필드심볼은 Key 값들만 들어가 있다.
    SELECT DISTINCT stawn INTO lv_stawn
                                         FROM marc
                                         WHERE matnr = lv_matnr
                                          AND stawn NE space.  <- Stawn이 키값이 아니라서 Distinct를 썼다.
    ENDSELECT.
    IF sy-subrc = 0.
      ignored_entries_exist = 'X'.  <- 이 부분때문에 팝업창이 뜨게 된다. 해봐라.
      MOVE uebergehen TO <xmark>.    <- 체크된 필드가 <Xmark>에 표시로 이동 된다.    ( "*" 이 들어와있더라.)
      READ TABLE total WITH KEY <vim_extract_key> BINARY SEARCH.
      MOVE uebergehen TO <mark>.
      MODIFY total INDEX sy-tabix.
      MODIFY extract.
    ENDIF.
  ENDLOOP.
  MESSAGE i000(sv) WITH 'HS Code exist in Material Master!'.
ENDFORM.                    "CHECK_ASSIGNED_HSCODE



쉽지만 모르는게 많은..

이런거는 Help에서도 나와있다.