메뉴 건너뛰기

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

 

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

 

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

번호 제목 글쓴이 날짜 조회 수
6135 parameter ID 확인하는 방법? [2] dhs 2019.11.22 13434
6134 GUI STATUS 관련 질문드립니다. 비행청년 2019.11.21 221
6133 st04 sql cluster table 쿼리 질문 [2] 무너티대 2019.11.20 1589
6132 안녕하세요 abap 꿈나무입니다. 질문이있어요. abaper1002 2019.11.19 273
6131 디버깅 문의 드립니다. [5] 라이언 2019.11.13 699
6130 SAP에서 XML를 URL를 통해 보낼 때 파라미터의 처리 [2] bbodri84 2019.11.04 1926
6129 기초적인 질문드립니다. select-options no intervals 동적변경 sapabaper 2019.10.30 473
6128 class alv edit 필드 숫자 자동변경 [2] sap는어려워 2019.10.25 906
6127 SAP RFC 호출방식 중 WSDL 문의 드립니다. [1] trazz 2019.10.17 1570
6126 HANA 버젼에서 추가된 문법만 볼 수 있는 자료가 있나요? ㅠㅠ [2] 아밥조밥현수 2019.10.15 774
6125 hana에서 char offset 관련 질문요 [2] 파출부 2019.10.15 899
6124 [webdynpro abap]dropdown by key에서 text+key. 순서변경 file 제니킴킴. 2019.10.11 277
6123 SAP Business Function 이란 뭔가요~? [1] 난꿀 2019.10.10 562
6122 BAPI로 전표 생성시 세금코드 관련 문의 [2] file 해피소울 2019.10.08 572
6121 스마트폼 질문 / 스마트폼에서 인쇄창 없이 미리보기만 가능한가요? 한혜원 2019.10.08 282
6120 stms 에서 function import 할 때 오류. [2] dhs 2019.10.07 819
» 'REUSE_ALV_GRID_DISPLAY' 으로 구현된 ALV 에서 CELL 값 변경시 색상 변경 질문드립니다. thegreats 2019.10.04 865
6118 날짜 관련 로직 질문 드립니다 [6] shc120 2019.10.02 348
6117 질문입니다 ㅠ [1] file 아밥어렵네요 2019.09.24 596
6116 조회 옵션 변경 후 variant 지정 [1] 파뤼타임 2019.09.23 395