메뉴 건너뛰기

SAP 한국 커뮤니티



안녕하세요 초보 ABAP 개발자입니다.

 

기존에 REUSE_ALV_GRID_DISPLAY' 으로 구현된 ALV 에서 CELL 값 변경시 해당 CELL의 값을 체크해서 색상을 변경 시킬려고 하는데 잘 되지 않아 질문드립니다.

 

 

*----- TYPE-POOLS
TYPE-POOLS SLIS.

 

 

*----- LIST VIEWER
DATA EVENTCAT TYPE SLIS_T_EVENT WITH HEADER LINE,
       SELFIELD TYPE SLIS_SELFIELD.
DATA FIELDCAT TYPE SLIS_T_FIELDCAT_ALV,
       FIELDCAT_2 TYPE SLIS_T_FIELDCAT_ALV,
       FIELDCAT_IN LIKE LINE OF FIELDCAT,
       FIELDCAT_IN2 LIKE LINE OF FIELDCAT.
DATA SORT TYPE SLIS_T_SORTINFO_ALV,
       SORT_IN LIKE LINE OF SORT .
DATA COL_POS TYPE I,
       G_LAYOUT_S  TYPE SLIS_LAYOUT_ALV .

 

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

FORM START_GRID_DISPLAY .
  GS_GRIDSET-EDT_CLL_CB 'X'.
  G_LAYOUT_S-COLTAB_FIELDNAME 'CELLSCOL'.

*  CLEAR GV_DCHECK .
  CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
    EXPORTING
      I_CALLBACK_PROGRAM       SY-REPID
      I_CALLBACK_PF_STATUS_SET 'SET_PF_STATUS'
      I_CALLBACK_USER_COMMAND  'USER_COMMAND'
      I_GRID_SETTINGS          GS_GRIDSET
      IS_LAYOUT                G_LAYOUT_S
      I_DEFAULT                'X'
      I_SAVE                   'A'
      IS_VARIANT               ALV_VARIANT
      IT_EVENTS                GT_EVENTS[]
      IT_FIELDCAT              FIELDCAT
      IT_SORT                  SORT
    TABLES
      T_OUTTAB                 IT_LT[].
  IF SY-SUBRC <> 0.
    MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
          WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
  ENDIF.

 

 

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

FORM MARK_CHANGED_A USING
RR_DATA_CHANGED TYPE REF TO CL_ALV_CHANGED_DATA_PROTOCOL
RS_MOD_CELLS TYPE LVC_S_MODI.

 

DATA P_SELFIELD TYPE SLIS_SELFIELD.

READ TABLE IT_LT INDEX RS_MOD_CELLS-ROW_ID.

 

  IF GV_PAN1   NE IT_LT-FOB.
    CLEAR GS_SCOL.
    GS_SCOL-FNAME 'PAN'.
    GS_SCOL-COLOR-COL 6.
*          GS_SCOL-COLOR-INT = 0.
    GS_SCOL-COLOR-INV 1.

    APPEND GS_SCOL TO GT_SCOL.

    INSERT LINES OF GT_SCOL INTO TABLE IT_LT-CELLSCOL.

    MODIFY IT_LT INDEX  RS_MOD_CELLS-ROW_ID.

    CALL METHOD RR_DATA_CHANGED->MODIFY_CELL
      EXPORTING
        I_ROW_ID    RS_MOD_CELLS-ROW_ID
        I_FIELDNAME 'CELLSCOL'
        I_VALUE     GT_SCOL..

    REFRESH GT_SCOL.

    PERFORM USER_COMMAND USING 'RE' P_SELFIELD. -> 강제 REFRESH

  ENDIF.

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

FORM USER_COMMAND USING R_UCOMM TYPE SY-UCOMM
                        LS_SELFIELD  TYPE SLIS_SELFIELD .

  DATA LS_SELFIELD1 TYPE SLIS_SELFIELD.



  CASE R_UCOMM.
    WHEN '&IC1'.
    WHEN 'INS' .
      CLEAR IT_LT .

     IT_LT-ZHOSNM   P_ZHOSNM .
      IT_LT-AEDAT    P_AEDAT .
      IT_LT-PTEXT    GV_PTEXT .
      APPEND IT_LT .

      LS_SELFIELD-REFRESH 'X'.
      LS_SELFIELD-COL_STABLE 'X'.
      LS_SELFIELD-ROW_STABLE 'X'.
    WHEN 'DEL'.
      DELETE IT_LT WHERE MARK 'X'.
      IF SY-SUBRC <> .
        MESSAGE E000 WITH TEXT-013 .
      ENDIF .

      LS_SELFIELD-REFRESH 'X'.
      LS_SELFIELD-COL_STABLE 'X'.
      LS_SELFIELD-ROW_STABLE 'X'.

    WHEN OTHERS.
      LS_SELFIELD-REFRESH 'X'.
      LS_SELFIELD-COL_STABLE 'X'.
      LS_SELFIELD-ROW_STABLE 'X'.
  ENDCASE .
ENDFORM .                    "USER_COMMAND

 

이런식으로 구현해봤는데 반영이 되질 않습니다.ㅠㅠ

 

고수님들 도움 부탁드리겠습니다.

번호 제목 글쓴이 날짜 조회 수
6129 SAP RFC 호출방식 중 WSDL 문의 드립니다. [1] trazz 2019.10.17 30
6128 HANA 버젼에서 추가된 문법만 볼 수 있는 자료가 있나요? ㅠㅠ 아밥조밥현수 2019.10.15 40
6127 hana에서 char offset 관련 질문요 [1] 파출부 2019.10.15 31
6126 [webdynpro abap]dropdown by key에서 text+key. 순서변경 file 제니킴킴. 2019.10.11 84
6125 SAP Business Function 이란 뭔가요~? 난꿀 2019.10.10 43
6124 BAPI로 전표 생성시 세금코드 관련 문의 [2] file 해피소울 2019.10.08 54
6123 스마트폼 질문 / 스마트폼에서 인쇄창 없이 미리보기만 가능한가요? 한혜원 2019.10.08 46
6122 stms 에서 function import 할 때 오류. [2] dhs 2019.10.07 44
» 'REUSE_ALV_GRID_DISPLAY' 으로 구현된 ALV 에서 CELL 값 변경시 색상 변경 질문드립니다. thegreats 2019.10.04 55
6120 날짜 관련 로직 질문 드립니다 [6] shc120 2019.10.02 72
6119 질문입니다 ㅠ [1] file 아밥어렵네요 2019.09.24 142
6118 조회 옵션 변경 후 variant 지정 [1] 파뤼타임 2019.09.23 77
6117 [BDC] MODE 'N'일 경우 에러잡기 [1] mandongs 2019.09.19 108
6116 [BDC] CO11N 관련 BDC 문의 (텍스트 화면 필드) [1] file 아좀더 2019.09.17 85
6115 서브스크린 ALV에서 레이아웃 저장관련 문의 [1] file 해피소울 2019.09.11 79
6114 PR 자재코드 BAPI로 변경 기능 문의 드립니다. file 업산 2019.09.06 59
6113 GUI Status의 Standard toolbar관련 질문 [1] file tubiel 2019.09.04 84
6112 Simple Tree 이벤트 버튼 추가 및 핸들링 문의드립니다. [2] 그렁이 2019.09.03 85
6111 alv 툴바 버튼 클릭 관련 질문드립니다. [2] thegreats 2019.08.27 119
6110 excel에 그림을 넣고 그림이 들어간 셀의 사이즈를 조정하는 프로그램을 만들고 있는데요.. Sunny 2019.08.22 117