본문 바로가기

ABAP

라인별 중복 데이터 체크하기

반응형
  DATA(LT_TEMP) = GT_LIST.

  LOOP AT GT_LIST ASSIGNING FIELD-SYMBOL(<FS_LIST>).

      DATA(LV_COUNT) = REDUCE I( INIT LV_X = 0 FOR LS IN LT_TEMP USING KEY IDX01
                                 WHERE ( KOSTL = <FS_LIST>-KOSTL AND KSTAR = <FS_LIST> KSTAR ) NEXT LV_X = LV_X + 1 ).
      IF LV_COUNT > 1.
        <FS_LIST>-ICON    = ICON_RED_LIGHT.
        <FS_LIST>-MESSAGE = '중복된 코스트센터, 원가요소가 존재합니다.'.
      ENDIF.
    ENDIF.

  ENDLOOP.

코스트센터(KOSTL)와 원가요소(KSTAR) 필드를 기준으로 중복 데이터를 체크하는 방법

반응형