[ABAP] SELECTION-SCREEN COMMENT

SELECTION-SCREEN

PARAMETERS 선택된 코드에 대한 text 띄우기

 

SELECTION-SCREEN : BEGIN OF BLOCK b1 WITH FRAME TITLE TEXT-001.
PARAMETERS : p_bukrs  TYPE acepsoit-bukrs   OBLIGATORY.
SELECTION-SCREEN : COMMENT 40(20) gv_butxt.
PARAMETERS : p_poyear TYPE acepsoit-poyear  OBLIGATORY..
PARAMETERS : p_poper  TYPE acepsoit-poper   OBLIGATORY.
SELECTION-SCREEN : END OF BLOCK b1.

AT SELECTION-SCREEN OUTPUT.

  SELECT SINGLE butxt
  FROM t001
  INTO @gv_butxt
  WHERE bukrs = @p_bukrs
    AND spras = @sy-langu.
    
    
AT SELECTION-SCREEN.

  SELECT SINGLE *
  FROM t001
  INTO @DATA(ls_bukrs)
  WHERE bukrs = @p_bukrs.

  IF sy-subrc <> 0.
    MESSAGE '등록되지 않은 회사코드 입니다' TYPE 'S' DISPLAY LIKE 'W'.
    CLEAR gv_butxt.
    REJECT.
  ENDIF.

 

SELECTION-SCREEN COMMENT에서 사용한 변수는 따로 선언하지 않아도 됐다.